htswanalysis/MACS/lib/gsl/gsl-1.11/cblas/sgemv.c

   1 #include <gsl/gsl_math.h>
   2 #include <gsl/gsl_cblas.h>
   3 #include "cblas.h"
   4
   5 void
   6 cblas_sgemv (const enum CBLAS_ORDER order, const enum CBLAS_TRANSPOSE TransA,
   7              const int M, const int N, const float alpha, const float *A,
   8              const int lda, const float *X, const int incX, const float beta,
   9              float *Y, const int incY)
  10 {
  11 #define BASE float
  12 #include "source_gemv_r.h"
  13 #undef BASE
  14 }