htswanalysis/MACS/lib/gsl/gsl-1.11/cblas/dcopy.c

   1 #include <gsl/gsl_math.h>
   2 #include <gsl/gsl_cblas.h>
   3 #include "cblas.h"
   4
   5 void
   6 cblas_dcopy (const int N, const double *X, const int incX, double *Y,
   7              const int incY)
   8 {
   9 #define BASE double
  10 #include "source_copy_r.h"
  11 #undef BASE
  12 }