Back to home page

EIC code displayed by LXR

 
 

    


File indexing completed on 2024-05-18 08:30:06

0001 #ifndef _LAPACK_H
0002 #define _LAPACK_H
0003 #include <cfortran/cfortran.h>
0004 
0005 #ifdef __cplusplus
0006 extern "C" {
0007 #endif
0008 PROTOCCALLSFSUB11(DGELS,dgels,STRING,INT,INT,INT,DOUBLEV,INT,DOUBLEV,INT,DOUBLEV,INT,PINT)
0009 #define DGELS(TRANS,M,N,NRHS,A,LDA,B,LDB,WORK,LWORK,INFO) CCALLSFSUB11(DGELS,dgels,STRING,INT,INT,INT,DOUBLEV,INT,DOUBLEV,INT,DOUBLEV,INT,PINT,TRANS,M,N,NRHS,A,LDA,B,LDB,WORK,LWORK,INFO)
0010 #ifdef __cplusplus
0011 } /* extern "C" */
0012 #endif
0013 
0014 #endif /* #ifndef _LAPACK_H */