00001
00002
00004
00005
00006 extern "C"
00007
00008 {
00009
00010
00011 void cblas_dscal(const int n, const double scaleFactor, const double *positions,
00012 const int incPositions);
00013
00014 double cblas_dnrm2(const int n, const double *source, const int inc);
00015
00016 void cblas_dcopy( const int n, const double *source,
00017 const int incsrc, double* dest,
00018 const int incdest);
00019 void cblas_daxpy( const int n, const double scaleFactor,
00020 const double *shift, const int incShift,
00021 double *dest, const int incdest);
00022 int cblas_idamax( const int n, const double *positions, const int incPositions);
00023
00024 double cblas_dnrm2(const int N,const double *X,const int incX);
00025
00026 double cblas_ddot(const int N, const double *X, const int incX, const double *Y, const int incY);
00027 }