1 //=================================================================================================
2 /*!
3 //  \file src/mathtest/operations/dmatdmatkron/MHaMHb.cpp
4 //  \brief Source file for the MHaMHb 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/HybridMatrix.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 'MHaMHb'..." << std::endl;
62 
63    using blazetest::mathtest::TypeA;
64    using blazetest::mathtest::TypeB;
65 
66    try
67    {
68       // Matrix type definitions
69       using MHa = blaze::HybridMatrix<TypeA,16UL,16UL>;
70       using MHb = blaze::HybridMatrix<TypeB,16UL,16UL>;
71 
72       // Creator type definitions
73       using CMHa = blazetest::Creator<MHa>;
74       using CMHb = blazetest::Creator<MHb>;
75 
76       // Running tests with small matrices
77       for( size_t i=0UL; i<=4UL; ++i ) {
78          for( size_t j=0UL; j<=4UL; ++j ) {
79             for( size_t k=0UL; k<=4UL; ++k ) {
80                for( size_t l=0UL; l<=4UL; ++l ) {
81                   RUN_DMATDMATKRON_OPERATION_TEST( CMHa( i, j ), CMHb( k, l ) );
82                }
83             }
84          }
85       }
86 
87       // Running tests with large matrices
88       RUN_DMATDMATKRON_OPERATION_TEST( CMHa(  9UL, 15UL ), CMHb( 16UL,  8UL ) );
89       RUN_DMATDMATKRON_OPERATION_TEST( CMHa(  9UL, 15UL ), CMHb(  8UL, 16UL ) );
90       RUN_DMATDMATKRON_OPERATION_TEST( CMHa( 16UL,  8UL ), CMHb(  9UL, 15UL ) );
91       RUN_DMATDMATKRON_OPERATION_TEST( CMHa( 16UL,  8UL ), CMHb( 15UL,  9UL ) );
92    }
93    catch( std::exception& ex ) {
94       std::cerr << "\n\n ERROR DETECTED during dense matrix/dense matrix Kronecker product:\n"
95                 << ex.what() << "\n";
96       return EXIT_FAILURE;
97    }
98 
99    return EXIT_SUCCESS;
100 }
101 //*************************************************************************************************
102