Shinya Kitaoka 810553
#pragma once
Toshihiro Shimizu 890ddd
Toshihiro Shimizu 890ddd
#ifndef TLIN_CBLAS_WRAP
Toshihiro Shimizu 890ddd
#define TLIN_CBLAS_WRAP
Toshihiro Shimizu 890ddd
Toshihiro Shimizu 890ddd
#include "tcommon.h"
Toshihiro Shimizu 890ddd
Toshihiro Shimizu 890ddd
#undef DVAPI
Toshihiro Shimizu 890ddd
#undef DVVAR
Toshihiro Shimizu 890ddd
#ifdef TNZEXT_EXPORTS
Toshihiro Shimizu 890ddd
#define DVAPI DV_EXPORT_API
Toshihiro Shimizu 890ddd
#define DVVAR DV_EXPORT_VAR
Toshihiro Shimizu 890ddd
#else
Toshihiro Shimizu 890ddd
#define DVAPI DV_IMPORT_API
Toshihiro Shimizu 890ddd
#define DVVAR DV_IMPORT_VAR
Toshihiro Shimizu 890ddd
#endif
Toshihiro Shimizu 890ddd
Toshihiro Shimizu 890ddd
#include "tlin_matrix.h"
Toshihiro Shimizu 890ddd
Toshihiro Shimizu 890ddd
/*
Toshihiro Shimizu 890ddd
  EXPLANATION:
Toshihiro Shimizu 890ddd
Shinya Kitaoka 120a6e
    The tlin_cblas_wrap files implement a simplified wrapper interface to CBLAS
Shinya Kitaoka 120a6e
  routines.
Toshihiro Shimizu 890ddd
*/
Toshihiro Shimizu 890ddd
Toshihiro Shimizu 890ddd
//================================================================================
Toshihiro Shimizu 890ddd
Shinya Kitaoka 120a6e
namespace tlin {
Toshihiro Shimizu 890ddd
Toshihiro Shimizu 890ddd
//***************************************************************************
Toshihiro Shimizu 890ddd
//    CBLAS-related routines
Toshihiro Shimizu 890ddd
//***************************************************************************
Toshihiro Shimizu 890ddd
Toshihiro Shimizu 890ddd
void DVAPI sum(int n, const double *x, double *&y);
Toshihiro Shimizu 890ddd
Shinya Kitaoka 120a6e
void DVAPI multiply(int rows, int cols, const double *A, const double *x,
Shinya Kitaoka 120a6e
                    double *&y);
Toshihiro Shimizu 890ddd
void DVAPI multiply(const mat &A, const double *x, double *&y);
Toshihiro Shimizu 890ddd
Shinya Kitaoka 120a6e
}  // namespace tlin
Toshihiro Shimizu 890ddd
Shinya Kitaoka 120a6e
#endif  // TLIN_CBLAS_WRAP