1 //=================================================================================================
2 /*!
3 // \file src/mathtest/operations/smatsmatsub/HCbHCa.cpp
4 // \brief Source file for the HCbHCa sparse matrix/sparse matrix subtraction 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/CompressedMatrix.h>
43 #include <blaze/math/HermitianMatrix.h>
44 #include <blazetest/mathtest/Creator.h>
45 #include <blazetest/mathtest/operations/smatsmatsub/OperationTest.h>
46 #include <blazetest/system/MathTest.h>
47
48 #ifdef BLAZE_USE_HPX_THREADS
49 # include <hpx/hpx_main.hpp>
50 #endif
51
52
53 //=================================================================================================
54 //
55 // MAIN FUNCTION
56 //
57 //=================================================================================================
58
59 //*************************************************************************************************
main()60 int main()
61 {
62 std::cout << " Running 'HCbHCa'..." << std::endl;
63
64 using blazetest::mathtest::ScalarA;
65 using blazetest::mathtest::ScalarB;
66
67 try
68 {
69 // Matrix type definitions
70 using HCb = blaze::HermitianMatrix< blaze::CompressedMatrix<ScalarB> >;
71 using HCa = blaze::HermitianMatrix< blaze::CompressedMatrix<ScalarA> >;
72
73 // Creator type definitions
74 using CHCb = blazetest::Creator<HCb>;
75 using CHCa = blazetest::Creator<HCa>;
76
77 // Running tests with small matrices
78 for( size_t i=0UL; i<=6UL; ++i ) {
79 for( size_t j=0UL; j<=i*i; ++j ) {
80 for( size_t k=0UL; k<=i*i; ++k ) {
81 RUN_SMATSMATSUB_OPERATION_TEST( CHCb( i, j ), CHCa( i, k ) );
82 }
83 }
84 }
85
86 // Running tests with large matrices
87 RUN_SMATSMATSUB_OPERATION_TEST( CHCb( 67UL, 7UL ), CHCa( 67UL, 13UL ) );
88 RUN_SMATSMATSUB_OPERATION_TEST( CHCb( 128UL, 16UL ), CHCa( 128UL, 8UL ) );
89 }
90 catch( std::exception& ex ) {
91 std::cerr << "\n\n ERROR DETECTED during sparse matrix/sparse matrix subtraction:\n"
92 << ex.what() << "\n";
93 return EXIT_FAILURE;
94 }
95
96 return EXIT_SUCCESS;
97 }
98 //*************************************************************************************************
99