1: ! 2: ! 3: ! Include file for Fortran use of the KSP package in PETSc 4: ! 5: #if !defined (PETSCKSPDEF_H) 6: #define PETSCKSPDEF_H 8: #include "petsc/finclude/petscpc.h" 10: #define KSP type(tKSP) 11: #define KSPGuess type(tKSPGuess) 13: #define KSPType character*(80) 14: #define KSPGuessType character*(80) 15: #define KSPCGType PetscEnum 16: #define KSPFCDTruncationType PetscEnum 17: #define KSPConvergedReason PetscEnum 18: #define KSPNormType PetscEnum 19: #define KSPGMRESCGSRefinementType PetscEnum 20: #define MatSchurComplementAinvType PetscEnum 21: ! 22: ! Various Krylov subspace methods 23: ! 24: #define KSPRICHARDSON 'richardson' 25: #define KSPCHEBYSHEV 'chebyshev' 26: #define KSPCG 'cg' 27: #define KSPCGNE 'cgne' 28: #define KSPNASH 'nash' 29: #define KSPSTCG 'stcg' 30: #define KSPGLTR 'gltr' 31: #define KSPFCG 'fcg' 32: #define KSPGMRES 'gmres' 33: #define KSPFGMRES 'fgmres' 34: #define KSPLGMRES 'lgmres' 35: #define KSPDGMRES 'dgmres' 36: #define KSPPGMRES 'pgmres' 37: #define KSPTCQMR 'tcqmr' 38: #define KSPBCGS 'bcgs' 39: #define KSPIBCGS 'ibcgs' 40: #define KSPFBCGS 'fbcgs' 41: #define KSPFBCGSR 'fbcgsr' 42: #define KSPBCGSL 'bcgsl' 43: #define KSPCGS 'cgs' 44: #define KSPTFQMR 'tfqmr' 45: #define KSPCR 'cr' 46: #define KSPLSQR 'lsqr' 47: #define KSPPREONLY 'preonly' 48: #define KSPQCG 'qcg' 49: #define KSPBICG 'bicg' 50: #define KSPMINRES 'minres' 51: #define KSPSYMMLQ 'symmlq' 52: #define KSPLCD 'lcd' 53: #define KSPPYTHON 'python' 54: #define KSPGCR 'gcr' 55: #define KSPTSIRM 'tsirm' 56: #define KSPCGLS 'cgls' 57: #define KSPFETIDP 'fetidp' 58: ! 59: ! Various Initial guesses for Krylov subspace methods 60: ! 61: #define KSPGUESSFISCHER 'fischer' 62: #define KSPGUESSPOD 'pod' 63: #endif