1 #include "gsl_math.h" 2 #include "gsl_cblas.h" 3 #include "gsl_cblas__cblas.h" 4 5 CBLAS_INDEX cblas_isamax(const int N,const float * X,const int incX)6cblas_isamax (const int N, const float *X, const int incX) 7 { 8 #define BASE float 9 #include "gsl_cblas__source_iamax_r.h" 10 #undef BASE 11 } 12