Actual source code: plansop.h
1: /*
2: Private data structure used by the PLANSO interface
3: */
8: #include src/eps/epsimpl.h
10: typedef struct {
11: PetscReal *work;
12: int lwork;
13: } EPS_PLANSO;
15: /*
16: Definition of routines from the PLANSO package
17: */
19: #if defined(SLEPC_PLANSO_HAVE_UNDERSCORE)
20: #define SLEPC_PLANSO(lcase,ucase) lcase##_
21: #elif defined(SLEPC_PLANSO_HAVE_CAPS)
22: #define SLEPC_PLANSO(lcase,ucase) ucase
23: #else
24: #define SLEPC_PLANSO(lcase,ucase) lcase
25: #endif
27: /*
28: These are real case. PLANSO currently only has DOUBLE PRECISION version
29: */
31: #define PLANdr2_ SLEPC_PLANSO(plandr2,PLANDR2)
32: #define PLANop_ SLEPC_PLANSO(op,OP)
33: #define PLANopm_ SLEPC_PLANSO(opm,OPM)
37: EXTERN void PLANdr2_(int*,int*,int*,int*,PetscReal*,
38: PetscReal*,int*,int*,PetscScalar*,PetscScalar*,PetscReal*,int*,
39: int*,int*,MPI_Fint*);
43: #endif