ViennaCL - The Vienna Computing Library: tests/src/matrix_product_double.cpp Source File

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