ViennaCL - The Vienna Computing Library  1.7.1
Free open-source GPU-accelerated linear algebra and solver library.
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
matrix_product_double.cpp
Go to the documentation of this file.
1 /* =========================================================================
2  Copyright (c) 2010-2016, Institute for Microelectronics,
3  Institute for Analysis and Scientific Computing,
4  TU Wien.
5  Portions of this software are copyright by UChicago Argonne, LLC.
6 
7  -----------------
8  ViennaCL - The Vienna Computing Library
9  -----------------
10 
11  Project Head: Karl Rupp rupp@iue.tuwien.ac.at
12 
13  (A list of authors and contributors can be found in the PDF manual)
14 
15  License: MIT (X11), see file LICENSE in the base directory
16 ============================================================================= */
17 
22 #include "matrix_product_float_double.hpp"
23 
24 //
25 // -------------------------------------------------------------
26 //
27 int main()
28 {
29  std::cout << std::endl;
30  std::cout << "----------------------------------------------" << std::endl;
31  std::cout << "----------------------------------------------" << std::endl;
32  std::cout << "## Test :: BLAS 3 routines" << std::endl;
33  std::cout << "----------------------------------------------" << std::endl;
34  std::cout << "----------------------------------------------" << std::endl;
35  std::cout << std::endl;
36 
37  int retval = EXIT_SUCCESS;
38 
39  std::cout << std::endl;
40  std::cout << "----------------------------------------------" << std::endl;
41  std::cout << std::endl;
42 #ifdef VIENNACL_WITH_OPENCL
43  if ( viennacl::ocl::current_device().double_support() )
44 #endif
45  {
46  {
47  typedef double NumericT;
48  NumericT epsilon = 1.0E-11;
49  std::cout << "# Testing setup:" << std::endl;
50  std::cout << " eps: " << epsilon << std::endl;
51  std::cout << " numeric: double" << std::endl;
52  retval = run_test<NumericT>(epsilon);
53  if ( retval == EXIT_SUCCESS )
54  std::cout << "# Test passed" << std::endl;
55  else
56  return retval;
57  }
58  std::cout << std::endl;
59  std::cout << "----------------------------------------------" << std::endl;
60  std::cout << std::endl;
61  }
62 
63  std::cout << std::endl;
64  std::cout << "------- Test completed --------" << std::endl;
65  std::cout << std::endl;
66 
67 
68  return retval;
69 }
main
int main()
Definition: matrix_product_double.cpp:27
viennacl::ocl::current_device
viennacl::ocl::device const & current_device()
Convenience function for returning the active device in the current context.
Definition: backend.hpp:351
NumericT
float NumericT
Definition: bisect.cpp:40
matrix_product_float_double.hpp