Actual source code: slepcepsdef.h
1: !
2: ! Include file for Fortran use of the EPS object in SLEPc
3: !
4: ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
5: ! SLEPc - Scalable Library for Eigenvalue Problem Computations
6: ! Copyright (c) 2002-2013, Universitat Politecnica de Valencia, Spain
7: !
8: ! This file is part of SLEPc.
9: !
10: ! SLEPc is free software: you can redistribute it and/or modify it under the
11: ! terms of version 3 of the GNU Lesser General Public License as published by
12: ! the Free Software Foundation.
13: !
14: ! SLEPc is distributed in the hope that it will be useful, but WITHOUT ANY
15: ! WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
16: ! FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for
17: ! more details.
18: !
19: ! You should have received a copy of the GNU Lesser General Public License
20: ! along with SLEPc. If not, see <http://www.gnu.org/licenses/>.
21: ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
22: !
26: #include finclude/slepcstdef.h
27: #include finclude/slepcipdef.h
28: #include finclude/slepcdsdef.h
30: #if !defined(PETSC_USE_FORTRAN_DATATYPES)
31: #define EPS PetscFortranAddr
32: #endif
34: #define EPSType character*(80)
35: #define EPSConvergedReason PetscEnum
36: #define EPSProblemType PetscEnum
37: #define EPSWhich PetscEnum
38: #define EPSExtraction PetscEnum
39: #define EPSBalance PetscEnum
40: #define EPSConv PetscEnum
41: #define EPSOrthType PetscEnum
42: #define EPSPowerShiftType PetscEnum
43: #define EPSLanczosReorthogType PetscEnum
44: #define EPSPRIMMEMethod PetscEnum
45: #define EPSPRIMMEPrecond PetscEnum
48: #define EPSPOWER 'power'
49: #define EPSSUBSPACE 'subspace'
50: #define EPSARNOLDI 'arnoldi'
51: #define EPSLANCZOS 'lanczos'
52: #define EPSKRYLOVSCHUR 'krylovschur'
53: #define EPSGD 'gd'
54: #define EPSJD 'jd'
55: #define EPSRQCG 'rqcg'
56: #define EPSCISS 'ciss'
57: #define EPSLAPACK 'lapack'
58: #define EPSARPACK 'arpack'
59: #define EPSBLZPACK 'blzpack'
60: #define EPSTRLAN 'trlan'
61: #define EPSBLOPEX 'blopex'
62: #define EPSPRIMME 'primme'
63: #define EPSFEAST 'feast'
65: #endif