00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020 #ifndef __LAPACK_H
00021 #define __LAPACK_H
00022
00023
00024
00025 #ifndef TOON_NO_NAMESPACE
00026 namespace TooN {
00027 #endif
00028
00029 extern "C" {
00030
00031 void dgetrf_(int* M, int *N, double* A, int* lda, int* IPIV, int* INFO);
00032
00033
00034 void dgetri_(int* N, double* A, int* lda, int* IPIV, double* WORK, int* lwork, int* INFO);
00035
00036
00037 void dtrsm_(char* SIDE, char* UPLO, char* TRANSA, char* DIAG, int* M, int* N, double* alpha, double* A, int* lda, double* B, int* ldb);
00038
00039
00040 void dgesvd_(char* JOBU, char* JOBVT, int* M, int *N, double* A, int* lda,
00041 double* S, double *U, int* ldu, double* VT, int* ldvt,
00042 double* WORK, int* lwork, int* INFO);
00043
00044
00045 void dsyev_(char* JOBZ, char* UPLO, int* N, double* A, int* lda, double* W,
00046 double* WORK, int* LWORK, int* INFO);
00047
00048
00049 void dpotrf_(const char* UPLO, const int* N, double* A, const int* LDA, int* INFO);
00050
00051
00052 void dpotrs_(const char* UPLO, const int* N, const int* NRHS, const double* A, const int* LDA, double* B, const int* LDB, int* INFO);
00053
00054
00055 void dpotri_(const char* UPLO, const int* N, double* A, const int* LDA, int* INFO);
00056 }
00057
00058
00059 #ifndef TOON_NO_NAMESPACE
00060 }
00061 #endif
00062
00063
00064
00065 #endif