00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031 #ifndef CLAPACK_H
00032
00033 #define CLAPACK_H
00034 #include "cblas.h"
00035
00036 #ifndef ATLAS_ORDER
00037 #define ATLAS_ORDER CBLAS_ORDER
00038 #endif
00039 #ifndef ATLAS_UPLO
00040 #define ATLAS_UPLO CBLAS_UPLO
00041 #endif
00042 #ifndef ATLAS_DIAG
00043 #define ATLAS_DIAG CBLAS_DIAG
00044 #endif
00045 int clapack_sgesv(const enum CBLAS_ORDER Order, const int N, const int NRHS,
00046 float *A, const int lda, int *ipiv,
00047 float *B, const int ldb);
00048 int clapack_sgetrf(const enum CBLAS_ORDER Order, const int M, const int N,
00049 float *A, const int lda, int *ipiv);
00050 int clapack_sgetrs
00051 (const enum CBLAS_ORDER Order, const enum CBLAS_TRANSPOSE Trans,
00052 const int N, const int NRHS, const float *A, const int lda,
00053 const int *ipiv, float *B, const int ldb);
00054 int clapack_sgetri(const enum CBLAS_ORDER Order, const int N, float *A,
00055 const int lda, const int *ipiv);
00056 int clapack_sposv(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00057 const int N, const int NRHS, float *A, const int lda,
00058 float *B, const int ldb);
00059 int clapack_spotrf(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00060 const int N, float *A, const int lda);
00061 int clapack_spotrs(const enum CBLAS_ORDER Order, const enum CBLAS_UPLO Uplo,
00062 const int N, const int NRHS, const float *A, const int lda,
00063 float *B, const int ldb);
00064 int clapack_spotri(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00065 const int N, float *A, const int lda);
00066 int clapack_slauum(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00067 const int N, float *A, const int lda);
00068 int clapack_strtri(const enum ATLAS_ORDER Order,const enum ATLAS_UPLO Uplo,
00069 const enum ATLAS_DIAG Diag,const int N, float *A, const int lda);
00070
00071 int clapack_dgesv(const enum CBLAS_ORDER Order, const int N, const int NRHS,
00072 double *A, const int lda, int *ipiv,
00073 double *B, const int ldb);
00074 int clapack_dgetrf(const enum CBLAS_ORDER Order, const int M, const int N,
00075 double *A, const int lda, int *ipiv);
00076 int clapack_dgetrs
00077 (const enum CBLAS_ORDER Order, const enum CBLAS_TRANSPOSE Trans,
00078 const int N, const int NRHS, const double *A, const int lda,
00079 const int *ipiv, double *B, const int ldb);
00080 int clapack_dgetri(const enum CBLAS_ORDER Order, const int N, double *A,
00081 const int lda, const int *ipiv);
00082 int clapack_dposv(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00083 const int N, const int NRHS, double *A, const int lda,
00084 double *B, const int ldb);
00085 int clapack_dpotrf(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00086 const int N, double *A, const int lda);
00087 int clapack_dpotrs(const enum CBLAS_ORDER Order, const enum CBLAS_UPLO Uplo,
00088 const int N, const int NRHS, const double *A, const int lda,
00089 double *B, const int ldb);
00090 int clapack_dpotri(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00091 const int N, double *A, const int lda);
00092 int clapack_dlauum(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00093 const int N, double *A, const int lda);
00094 int clapack_dtrtri(const enum ATLAS_ORDER Order,const enum ATLAS_UPLO Uplo,
00095 const enum ATLAS_DIAG Diag,const int N, double *A, const int lda);
00096
00097 int clapack_cgesv(const enum CBLAS_ORDER Order, const int N, const int NRHS,
00098 void *A, const int lda, int *ipiv,
00099 void *B, const int ldb);
00100 int clapack_cgetrf(const enum CBLAS_ORDER Order, const int M, const int N,
00101 void *A, const int lda, int *ipiv);
00102 int clapack_cgetrs
00103 (const enum CBLAS_ORDER Order, const enum CBLAS_TRANSPOSE Trans,
00104 const int N, const int NRHS, const void *A, const int lda,
00105 const int *ipiv, void *B, const int ldb);
00106 int clapack_cgetri(const enum CBLAS_ORDER Order, const int N, void *A,
00107 const int lda, const int *ipiv);
00108 int clapack_cposv(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00109 const int N, const int NRHS, void *A, const int lda,
00110 void *B, const int ldb);
00111 int clapack_cpotrf(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00112 const int N, void *A, const int lda);
00113 int clapack_cpotrs(const enum CBLAS_ORDER Order, const enum CBLAS_UPLO Uplo,
00114 const int N, const int NRHS, const void *A, const int lda,
00115 void *B, const int ldb);
00116 int clapack_cpotri(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00117 const int N, void *A, const int lda);
00118 int clapack_clauum(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00119 const int N, void *A, const int lda);
00120 int clapack_ctrtri(const enum ATLAS_ORDER Order,const enum ATLAS_UPLO Uplo,
00121 const enum ATLAS_DIAG Diag,const int N, void *A, const int lda);
00122
00123 int clapack_zgesv(const enum CBLAS_ORDER Order, const int N, const int NRHS,
00124 void *A, const int lda, int *ipiv,
00125 void *B, const int ldb);
00126 int clapack_zgetrf(const enum CBLAS_ORDER Order, const int M, const int N,
00127 void *A, const int lda, int *ipiv);
00128 int clapack_zgetrs
00129 (const enum CBLAS_ORDER Order, const enum CBLAS_TRANSPOSE Trans,
00130 const int N, const int NRHS, const void *A, const int lda,
00131 const int *ipiv, void *B, const int ldb);
00132 int clapack_zgetri(const enum CBLAS_ORDER Order, const int N, void *A,
00133 const int lda, const int *ipiv);
00134 int clapack_zposv(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00135 const int N, const int NRHS, void *A, const int lda,
00136 void *B, const int ldb);
00137 int clapack_zpotrf(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00138 const int N, void *A, const int lda);
00139 int clapack_zpotrs(const enum CBLAS_ORDER Order, const enum CBLAS_UPLO Uplo,
00140 const int N, const int NRHS, const void *A, const int lda,
00141 void *B, const int ldb);
00142 int clapack_zpotri(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00143 const int N, void *A, const int lda);
00144 int clapack_zlauum(const enum ATLAS_ORDER Order, const enum ATLAS_UPLO Uplo,
00145 const int N, void *A, const int lda);
00146 int clapack_ztrtri(const enum ATLAS_ORDER Order,const enum ATLAS_UPLO Uplo,
00147 const enum ATLAS_DIAG Diag,const int N, void *A, const int lda);
00148
00149 #endif