ScaMaC  0.8.2
A Scalable Matrix Collection
scamac_cblas_wrapper.h
Go to the documentation of this file.
1 
8 #ifndef SCAMAC_CBLAS_WRAPPER_H
9 #define SCAMAC_CBLAS_WRAPPER_H
10 
11 #include <complex.h>
12 
13 /* basic C interface for the few level 1 BLAS routines needed here */
14 
15 /* COPYRIGHT: CBLAS .... */
16 
17 #define BLAS_INT int
18 
19 double cblas_ddot(const BLAS_INT N, const double *X, const BLAS_INT incX,
20  const double *Y, const BLAS_INT incY);
21 double cblas_dnrm2(const BLAS_INT N, const double *X, const BLAS_INT incX);
22 
23 void cblas_daxpy(const BLAS_INT N, const double alpha, const double *X,
24  const BLAS_INT incX, double *Y, const BLAS_INT incY);
25 void cblas_dscal(const BLAS_INT N, const double alpha, double *X, const BLAS_INT incX);
26 void cblas_dcopy(const BLAS_INT N, const double *X, const BLAS_INT incX,
27  double *Y, const BLAS_INT incY);
28 
29 void cblas_zdotc_sub(const BLAS_INT N, const double complex *X, const BLAS_INT incX,
30  const double complex *Y, const BLAS_INT incY, double complex *dotc);
31 double cblas_dznrm2(const BLAS_INT N, const double complex *X, const BLAS_INT incX);
32 
33 void cblas_zaxpy(const BLAS_INT N, const double complex *alpha, const double complex *X,
34  const BLAS_INT incX, double complex *Y, const BLAS_INT incY);
35 void cblas_zdscal(const BLAS_INT N, const double alpha, double complex *X, const BLAS_INT incX);
36 void cblas_zcopy(const BLAS_INT N, const double complex *X, const BLAS_INT incX,
37  double complex *Y, const BLAS_INT incY);
38 
39 #endif /* SCAMAC_CBLAS_WRAPPER_H */
Generated by   doxygen 1.8.13