00001 #ifndef _math_linpackd_linpackd_h 00002 #define _math_linpackd_linpackd_h 00003 00004 #ifdef __cplusplus 00005 extern "C" { 00006 #endif 00007 00008 int daxpy_(int *n, double *da, double *dx, int *incx, double *dy, int *incy); 00009 int dcopy_(int *n, double *dx, int *incx, double *dy, int *incy); 00010 int dscal_(int *n, double *da, double *dx, int *incx); 00011 int dswap_(int *n, double *dx, int *incx, double *dy, int *incy); 00012 int dsvdc_(double *x, int *ldx, int *n, int *p, 00013 double *s, double *e, double *u, int *ldu, 00014 double *v, int *ldv, double *work, int *job, int *info); 00015 int drotg_(double *da, double *db, double *c, double *s); 00016 int drot_(int *n, double *dx, int *incx, double *dy, int *incy, 00017 double *c, double *s); 00018 double dnrm2_(int *n, double *dx, int *incx); 00019 double ddot_(int *n, double *dx, int *incx, double *dy, int *incy); 00020 00021 #ifdef __cplusplus 00022 } 00023 #endif 00024 00025 #endif