1 #include "gsl_math.h" 2 #include "gsl_cblas.h" 3 #include "gsl_cblas__cblas.h" 4 5 void cblas_dsyr(const enum CBLAS_ORDER order,const enum CBLAS_UPLO Uplo,const int N,const double alpha,const double * X,const int incX,double * A,const int lda)6cblas_dsyr (const enum CBLAS_ORDER order, const enum CBLAS_UPLO Uplo, 7 const int N, const double alpha, const double *X, const int incX, 8 double *A, const int lda) 9 { 10 #define BASE double 11 #include "gsl_cblas__source_syr.h" 12 #undef BASE 13 } 14