summaryrefslogtreecommitdiff
path: root/gsl-1.9/cblas/sdsdot.c
diff options
context:
space:
mode:
Diffstat (limited to 'gsl-1.9/cblas/sdsdot.c')
-rw-r--r--gsl-1.9/cblas/sdsdot.c16
1 files changed, 16 insertions, 0 deletions
diff --git a/gsl-1.9/cblas/sdsdot.c b/gsl-1.9/cblas/sdsdot.c
new file mode 100644
index 0000000..5672ac4
--- /dev/null
+++ b/gsl-1.9/cblas/sdsdot.c
@@ -0,0 +1,16 @@
+#include <gsl/gsl_math.h>
+#include <gsl/gsl_cblas.h>
+#include "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 "source_dot_r.h"
+#undef ACC_TYPE
+#undef BASE
+#undef INIT_VAL
+}