1 #pragma once
2 
3 #ifndef TLIN_CBLAS_WRAP
4 #define TLIN_CBLAS_WRAP
5 
6 #include "tcommon.h"
7 
8 #undef DVAPI
9 #undef DVVAR
10 #ifdef TNZEXT_EXPORTS
11 #define DVAPI DV_EXPORT_API
12 #define DVVAR DV_EXPORT_VAR
13 #else
14 #define DVAPI DV_IMPORT_API
15 #define DVVAR DV_IMPORT_VAR
16 #endif
17 
18 #include "tlin_matrix.h"
19 
20 /*
21   EXPLANATION:
22 
23     The tlin_cblas_wrap files implement a simplified wrapper interface to CBLAS
24   routines.
25 */
26 
27 //================================================================================
28 
29 namespace tlin {
30 
31 //***************************************************************************
32 //    CBLAS-related routines
33 //***************************************************************************
34 
35 void DVAPI sum(int n, const double *x, double *&y);
36 
37 void DVAPI multiply(int rows, int cols, const double *A, const double *x,
38                     double *&y);
39 void DVAPI multiply(const mat &A, const double *x, double *&y);
40 
41 }  // namespace tlin
42 
43 #endif  // TLIN_CBLAS_WRAP
44