1234567891011121314151617 |
- #include "gsl_math.h"
- #include "gsl_cblas.h"
- #include "gsl_cblas__cblas.h"
- float
- cblas_sdsdot (const int N, const float alpha, const float *X, const int incX,
- const float *Y, const int incY)
- {
- #define INIT_VAL alpha
- #define ACC_TYPE double
- #define BASE float
- #include "gsl_cblas__source_dot_r.h"
- #undef ACC_TYPE
- #undef BASE
- #undef INIT_VAL
- }
|