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:  #include slepcblaslapack.h

 21: /*
 22:     These are real case. PLANSO currently only has DOUBLE PRECISION version
 23: */

 25: #define PLANdr_    SLEPC_FORTRAN(plandr,PLANDR)
 26: #define PLANdr2_   SLEPC_FORTRAN(plandr2,PLANDR2)
 27: #define PLANop_    SLEPC_FORTRAN(op,OP)
 28: #define PLANopm_   SLEPC_FORTRAN(opm,OPM)
 29: #define PLANstore_ SLEPC_FORTRAN(store,STORE)

 31: EXTERN_C_BEGIN

 33: extern void  PLANdr_ (int*,int*,int*,PetscReal*,PetscReal*,PetscReal*,PetscTruth*,
 34:                       PetscReal*,int*,int*,PetscScalar*,PetscScalar*,PetscReal*,
 35:                       int*,int*,int*,MPI_Comm*);
 36: extern void  PLANdr2_(int*,int*,int*,int*,PetscReal*,
 37:                       PetscReal*,int*,int*,PetscScalar*,PetscScalar*,PetscReal*,int*,
 38:                       int*,int*,MPI_Comm*);

 40: EXTERN_C_END

 42: #endif