#ifndef mymkl

#define mymkl 1

void rcopy (int *n, double *x, int *incx, double *y, int *incy);

void rscal (int *n, double *alpha, double *x, int *incx);

void raxpy (int *n, double *alpha, double *x, int *incx, double *y, int *incy);

double rdot (int *n, double *x, int *incx, double *y, int *incy);

#endif