mirror of
https://github.com/amd/blis.git
synced 2026-04-19 23:28:52 +00:00
CPP Templatee test files update
Change-Id: Ia9637556b50b10cb4409e18f369a3e7fc35569fb
This commit is contained in:
97
testcpp/test_spr.cc
Normal file
97
testcpp/test_spr.cc
Normal file
@@ -0,0 +1,97 @@
|
||||
/*
|
||||
|
||||
BLISPP
|
||||
C++ test driver for BLIS CPP gemm routine and reference blis gemm routine.
|
||||
|
||||
Copyright (C) 2019, Advanced Micro Devices, Inc.
|
||||
|
||||
Redistribution and use in source and binary forms, with or without
|
||||
modification, are permitted provided that the following conditions are
|
||||
met:
|
||||
- Redistributions of source code must retain the above copyright
|
||||
notice, this list of conditions and the following disclaimer.
|
||||
- Redistributions in binary form must reproduce the above copyright
|
||||
notice, this list of conditions and the following disclaimer in the
|
||||
documentation and/or other materials provided with the distribution.
|
||||
- Neither the name(s) of the copyright holder(s) nor the names of its
|
||||
contributors may be used to endorse or promote products derived
|
||||
from this software without specific prior written permission.
|
||||
|
||||
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
||||
"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
||||
LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
|
||||
A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
|
||||
HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
|
||||
SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
|
||||
LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
||||
DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
||||
THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
|
||||
OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
|
||||
*/
|
||||
|
||||
#include <complex>
|
||||
#include <iostream>
|
||||
#include "blis.hh"
|
||||
#include "test.hh"
|
||||
|
||||
using namespace blis;
|
||||
using namespace std;
|
||||
//#define PRINT
|
||||
#define N 2
|
||||
|
||||
/*
|
||||
* Test application assumes matrices to be column major, non-transposed
|
||||
*/
|
||||
|
||||
template< typename T >
|
||||
void test_spr( )
|
||||
{
|
||||
int n;
|
||||
int incX = -1;
|
||||
T alpha = -1;
|
||||
|
||||
n = N;
|
||||
|
||||
|
||||
T A[] = { 0.819, 0.175, -0.809 };
|
||||
T X[] = { -0.645, -0.222 };
|
||||
T A_ref[] = { 0.769716, 0.03181, -1.225025 };
|
||||
|
||||
|
||||
#ifdef PRINT
|
||||
printmatrix(A, n, n, n,(char *) "A");
|
||||
printvector(X, n,(char *) "X");
|
||||
#endif
|
||||
blis::spr(
|
||||
CblasColMajor,
|
||||
CblasLower,
|
||||
n,
|
||||
alpha,
|
||||
X,
|
||||
incX,
|
||||
A
|
||||
);
|
||||
|
||||
#ifdef PRINT
|
||||
printmatrix (A, n ,n, n, (char *)"A blis:spr\n");
|
||||
printmatrix(A_ref, n, n, n,(char *)"A_ref blis:spr \n");
|
||||
#endif
|
||||
|
||||
if(computeErrorM(1, 1, n, n, A, A_ref )==1)
|
||||
printf("%s TEST FAIL\n" ,__PRETTY_FUNCTION__);
|
||||
else
|
||||
printf("%s TEST PASS\n" , __PRETTY_FUNCTION__);
|
||||
|
||||
|
||||
}
|
||||
|
||||
// -----------------------------------------------------------------------------
|
||||
int main( int argc, char** argv )
|
||||
{
|
||||
test_spr<double>( );
|
||||
test_spr<float>( );
|
||||
return 0;
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user