1 //=================================================================================================
2 /*!
3 // \file src/mathtest/operations/dmatdmatkron/MUaMUa.cpp
4 // \brief Source file for the MUaMUa dense matrix/dense matrix Kronecker product math test
5 //
6 // Copyright (C) 2012-2020 Klaus Iglberger - All Rights Reserved
7 //
8 // This file is part of the Blaze library. You can redistribute it and/or modify it under
9 // the terms of the New (Revised) BSD License. Redistribution and use in source and binary
10 // forms, with or without modification, are permitted provided that the following conditions
11 // are met:
12 //
13 // 1. Redistributions of source code must retain the above copyright notice, this list of
14 // conditions and the following disclaimer.
15 // 2. Redistributions in binary form must reproduce the above copyright notice, this list
16 // of conditions and the following disclaimer in the documentation and/or other materials
17 // provided with the distribution.
18 // 3. Neither the names of the Blaze development group nor the names of its contributors
19 // may be used to endorse or promote products derived from this software without specific
20 // prior written permission.
21 //
22 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY
23 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 // OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
25 // SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26 // INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
27 // TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
28 // BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29 // CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
30 // ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH
31 // DAMAGE.
32 */
33 //=================================================================================================
34
35
36 //*************************************************************************************************
37 // Includes
38 //*************************************************************************************************
39
40 #include <cstdlib>
41 #include <iostream>
42 #include <blaze/math/UniformMatrix.h>
43 #include <blazetest/mathtest/Creator.h>
44 #include <blazetest/mathtest/operations/dmatdmatkron/OperationTest.h>
45 #include <blazetest/system/MathTest.h>
46
47 #ifdef BLAZE_USE_HPX_THREADS
48 # include <hpx/hpx_main.hpp>
49 #endif
50
51
52 //=================================================================================================
53 //
54 // MAIN FUNCTION
55 //
56 //=================================================================================================
57
58 //*************************************************************************************************
main()59 int main()
60 {
61 std::cout << " Running 'MUaMUa'..." << std::endl;
62
63 using blazetest::mathtest::TypeA;
64
65 try
66 {
67 // Matrix type definitions
68 using MUa = blaze::UniformMatrix<TypeA>;
69
70 // Creator type definitions
71 using CMUa = blazetest::Creator<MUa>;
72
73 // Running tests with small matrices
74 for( size_t i=0UL; i<=4UL; ++i ) {
75 for( size_t j=0UL; j<=4UL; ++j ) {
76 for( size_t k=0UL; k<=4UL; ++k ) {
77 for( size_t l=0UL; l<=4UL; ++l ) {
78 RUN_DMATDMATKRON_OPERATION_TEST( CMUa( i, j ), CMUa( k, l ) );
79 }
80 }
81 }
82 }
83
84 // Running tests with large matrices
85 RUN_DMATDMATKRON_OPERATION_TEST( CMUa( 9UL, 15UL ), CMUa( 16UL, 8UL ) );
86 RUN_DMATDMATKRON_OPERATION_TEST( CMUa( 9UL, 15UL ), CMUa( 8UL, 16UL ) );
87 RUN_DMATDMATKRON_OPERATION_TEST( CMUa( 16UL, 8UL ), CMUa( 9UL, 15UL ) );
88 RUN_DMATDMATKRON_OPERATION_TEST( CMUa( 16UL, 8UL ), CMUa( 15UL, 9UL ) );
89 }
90 catch( std::exception& ex ) {
91 std::cerr << "\n\n ERROR DETECTED during dense matrix/dense matrix Kronecker product:\n"
92 << ex.what() << "\n";
93 return EXIT_FAILURE;
94 }
95
96 return EXIT_SUCCESS;
97 }
98 //*************************************************************************************************
99