1 #include "gsl_math.h"
2 #include "gsl_cblas.h"
3 #include "gsl_cblas__cblas.h"
4 
5 void
cblas_chpr2(const enum CBLAS_ORDER order,const enum CBLAS_UPLO Uplo,const int N,const void * alpha,const void * X,const int incX,const void * Y,const int incY,void * Ap)6 cblas_csscal (const int N, const float alpha, void *X, const int incX)
7 {
8 #define BASE float
9 #include "gsl_cblas__source_scal_c_s.h"
10 #undef BASE
11 }
12