1 #include "gsl_math.h"
2 #include "gsl_cblas.h"
3 #include "gsl_cblas__cblas.h"
4
5 void
cblas_strsm(const enum CBLAS_ORDER Order,const enum CBLAS_SIDE Side,const enum CBLAS_UPLO Uplo,const enum CBLAS_TRANSPOSE TransA,const enum CBLAS_DIAG Diag,const int M,const int N,const float alpha,const float * A,const int lda,float * B,const int ldb)6 cblas_strsm (const enum CBLAS_ORDER Order, const enum CBLAS_SIDE Side,
7 const enum CBLAS_UPLO Uplo, const enum CBLAS_TRANSPOSE TransA,
8 const enum CBLAS_DIAG Diag, const int M, const int N,
9 const float alpha, const float *A, const int lda, float *B,
10 const int ldb)
11 {
12 #define BASE float
13 #include "gsl_cblas__source_trsm_r.h"
14 #undef BASE
15 }
16