qpms/qpmsblas.h

   1 // If included together with <cblas.h>, this must be include _afterwards_ because of the typedefs!
   2 #ifndef QPMSBLAS_H
   3 #define QPMSBLAS_H
   4 #define QPMS_BLAS_INDEX_T long long int
   5
   6 #ifndef CBLAS_H
   7 typedef enum {CblasRowMajor=101, CblasColMajor=102} CBLAS_LAYOUT;
   8 typedef enum {CblasNoTrans=111, CblasTrans=112, CblasConjTrans=113} CBLAS_TRANSPOSE;
   9 typedef enum {CblasUpper=121, CblasLower=122} CBLAS_UPLO;
  10 typedef enum {CblasNonUnit=131, CblasUnit=132} CBLAS_DIAG;
  11 typedef enum {CblasLeft=141, CblasRight=142} CBLAS_SIDE;
  12 #endif
  13
  14 void qpms_zgemm(CBLAS_LAYOUT Order, CBLAS_TRANSPOSE TransA, CBLAS_TRANSPOSE TransB,
  15                 const QPMS_BLAS_INDEX_T M, const QPMS_BLAS_INDEX_T N, const QPMS_BLAS_INDEX_T K,
  16                 const _Complex double *alpha, const _Complex double *A, const QPMS_BLAS_INDEX_T lda,
  17                 const _Complex double *B, const QPMS_BLAS_INDEX_T ldb,
  18                 const _Complex double *beta, _Complex double *C, const QPMS_BLAS_INDEX_T ldc);
  19
  20 #endif //QPMSBLAS_H