00001
00002
00003
00004
00005
00006
00007
00008
00016 #ifndef __CLAPACK_H__
00017 #define __CLAPACK_H__
00018
00019
00020
00022 int dims_dgesvx(double* _a, double* _x, double* _b, int _n, int _nrhs);
00024 int dims_dgelss(double* _a, double* _x, double* _b, int _m, int _n, int _nrhs,
00025 double* _s, int* _rank, int _lwork);
00027 int dims_dporfs(double* _a, double* _x, double* _b, int _m, int _nrhs);
00028 int dims_dposv(double* _a, double* _x, double* _b, int _m, int _nrhs);
00029 int dims_dposvx(double* _a, double* _x, double* _b, int _m, int _nrhs, double* _rcond);
00030
00032 int dims_svd(double* _a, int m, int n, double* _u, double* _sigma, double* _vt);
00033
00035 int dims_eigs(int _n, double *_a, double *w);
00036 int dims_eigs2(int _n, double *_a, double *w);
00037
00039
00047 int dims_dgeev(int _n, double* _a, double* _wr, double* _wi, double* _vr);
00048
00050
00057 int dims_dgeev_simple(int _n, double* _a, double* _wr, double* _wi);
00058
00060
00066 int dims_det(int _n, double* _a, double* _x);
00067
00069 int dims_copy(double* _x, double* _y, int _n);
00070 int dims_scale_myself(double* _x, double _alpha, int _n);
00071 int dims_scale(double* _x, double _alpha, int _n, double* _y);
00072 double dims_dot(double* _x, double* _y, int _n);
00073 int dims_dgemv(double* _A, int _m, int _n, double* _x, double* _y);
00074 int dims_dgemv_tran(double* _A, int _m, int _n, double* _x, double* _y);
00075 int dims_dgemm(double* _A, double* _B, int _m, int _n, int _k, double* _C);
00076 int dims_dsyrk(double* _A, int _n, int _k, double* _C);
00077 int dims_dsyrk_trans_first(double* _A, int _n, int _k, double* _C);
00078 int dims_daxpy(int _n, double _alpha, double* _x, double* _y);
00079
00080
00081 #endif