1 /* interface_lapack.h
2  *
3  * SRE, Tue Jul 13 15:11:51 2004 [St. Louis]
4  */
5 #ifndef eslINTERFACE_LAPACK_INCLUDED
6 #define eslINTERFACE_LAPACK_INCLUDED
7 #include "esl_config.h"
8 #ifdef HAVE_LIBLAPACK
9 
10 /* This is the C interface to the Fortran77 dgeev routine,
11  * provided by the LAPACK library:
12  */
13 extern void  dgeev_(char *jobvl, char *jobvr, int *n, double *a,
14                     int *lda, double *wr, double *wi, double *vl,
15                     int *ldvl, double *vr, int *ldvr,
16                     double *work, int *lwork, int *info);
17 
18 /* and this is our C interface to the lapack call:
19  */
20 extern int esl_lapack_dgeev(ESL_DMATRIX *A, double **ret_Er, double **ret_Ei, ESL_DMATRIX **ret_VL, ESL_DMATRIX **ret_VR);
21 
22 #endif /*HAVE_LIBLAPACK*/
23 #endif /*eslINTERFACE_LAPACK_INCLUDED*/
24 
25