ParMooN
 All Classes Functions Variables Friends Pages
exported.h
1 #ifndef MPIMIS_LAPACKEXPORTED
2 #define MPIMIS_LAPACKEXPORTED
3 
4 extern "C"
5 {
6 
7 /********************************************************/
8 /************************* BLAS *************************/
9 /********************************************************/
10 
11 void dgemm_(const char *transa, const char *transb, const int *m, const int *n, const int *k,
12  const double *alpha, const double *a, const int *lda, const double *b, const int *ldb,
13  const double *beta, double *c, const int *ldc);
14 
15 void dgemv_(const char *trans, const int *m, const int *n, const double *alpha,
16  const double *a, const int *lda, const double *x, const int *incx,
17  const double *beta, double *y, const int *incy);
18 
19 void dtrmv_(const char *uplo, const char *transa, const char *diag, const int *n,
20  const double *a, const int *lda, double *b, const int *incx);
21 
22 void daxpy_(const int *n, const double *alpha, const double *x, const int *incx,
23  double *y, const int *incy);
24 
25 double dnrm2_(const int *n, const double *x, const int *incx);
26 
27 void dcopy_(const int *n, const double *x, const int *incx, double *y, const int *incy);
28 
29 double ddot_(const int *n, const double *x, const int *incx, const double *y, const int *incy);
30 
31 void dscal_(const int *n, const double *a, double *x, const int *incx);
32 
33 void dtrmm_(const char *side, const char *uplo, const char *transa, const char *diag,
34  const int *m, const int *n, const double *alpha, const double *a, const int *lda,
35  double *b, const int *ldb);
36 
37 /********************************************************/
38 /************************ LAPACK ************************/
39 /********************************************************/
40 
41 void dgttrf_(int *n,double *dl,double *d,double *du,double *du2,int *ipiv,int *info);
42 
43 void dgttrs_(char* transposed,int *n,int* c,double *dl,double *d,double *du,double *du2,int *ipiv,double* x,int* m,int *info);
44 
45 void dgeqrf_(int *m,int *n,double *a,int *lda,double *tau,double *work,int *lwork,int *info);
46 
47 void dgesvd_(char *jobu,char *jobvt,int *m,int *n,double *a,int *lda,double *s,double *u,int *ldu,double *vt,int *ldvt,double *work,int *lwork,int *info);
48 
49 void dorgqr_(int *m,int *n,int *k,double *a,int *lda,double *tau,double *work,int *lwork,int *info);
50 
51 void dgetrf_(int *m,int *n,double *a,int *lda,int *ipiv,int *info);
52 
53 void dgetri_(int *n,double *a,int *lda,int *ipiv,double *work,int *lwork,int *info);
54 }
55 
56 #endif // MPIMIS_LAPACKEXPORTED