1: ! 2: ! 3: ! Include file for Fortran use of the KSP package in PETSc 4: ! 5: #include finclude/petsckspdef.h 7: ! 8: ! CG Types 9: ! 10: PetscEnum KSP_CG_SYMMETRIC 11: PetscEnum KSP_CG_HERMITIAN 13: parameter (KSP_CG_SYMMETRIC=0,KSP_CG_HERMITIAN=1) 15: PetscEnum KSP_CONVERGED_RTOL 16: PetscEnum KSP_CONVERGED_ATOL 17: PetscEnum KSP_CONVERGED_ITS 18: PetscEnum KSP_DIVERGED_NULL 19: PetscEnum KSP_DIVERGED_ITS 20: PetscEnum KSP_DIVERGED_DTOL 21: PetscEnum KSP_DIVERGED_BREAKDOWN 22: PetscEnum KSP_CONVERGED_ITERATING 23: PetscEnum KSP_CONVERGED_CG_NEG_CURVE 24: PetscEnum KSP_CONVERGED_CG_CONSTRAINED 25: PetscEnum KSP_CONVERGED_STEP_LENGTH 26: PetscEnum KSP_CONVERGED_HAPPY_BREAKDOWN 27: PetscEnum KSP_DIVERGED_BREAKDOWN_BICG 28: PetscEnum KSP_DIVERGED_NONSYMMETRIC 29: PetscEnum KSP_DIVERGED_INDEFINITE_PC 30: PetscEnum KSP_DIVERGED_NAN 31: PetscEnum KSP_DIVERGED_INDEFINITE_MAT 33: parameter (KSP_CONVERGED_RTOL = 2) 34: parameter (KSP_CONVERGED_ATOL = 3) 35: parameter (KSP_CONVERGED_ITS = 4) 36: parameter (KSP_CONVERGED_CG_NEG_CURVE = 5) 37: parameter (KSP_CONVERGED_CG_CONSTRAINED = 6) 38: parameter (KSP_CONVERGED_STEP_LENGTH = 7) 39: parameter (KSP_CONVERGED_HAPPY_BREAKDOWN = 8) 41: parameter (KSP_DIVERGED_NULL = -2) 42: parameter (KSP_DIVERGED_ITS = -3) 43: parameter (KSP_DIVERGED_DTOL = -4) 44: parameter (KSP_DIVERGED_BREAKDOWN = -5) 45: parameter (KSP_DIVERGED_BREAKDOWN_BICG = -6) 46: parameter (KSP_DIVERGED_NONSYMMETRIC = -7) 47: parameter (KSP_DIVERGED_INDEFINITE_PC = -8) 48: parameter (KSP_DIVERGED_NAN = -9) 49: parameter (KSP_DIVERGED_INDEFINITE_MAT = -10) 51: parameter (KSP_CONVERGED_ITERATING = 0) 52: ! 53: ! Possible arguments to KSPSetNormType() 54: ! 55: PetscEnum KSP_NORM_NONE 56: PetscEnum KSP_NORM_PRECONDITIONED 57: PetscEnum KSP_NORM_UNPRECONDITIONED 58: PetscEnum KSP_NORM_NATURAL 59: 60: parameter (KSP_NORM_NONE=0) 61: parameter (KSP_NORM_PRECONDITIONED=1) 62: parameter (KSP_NORM_UNPRECONDITIONED=2) 63: parameter (KSP_NORM_NATURAL=3) 64: ! 65: ! Possible arguments to KSPMonitorSet() 66: ! 67: external KSPDEFAULTCONVERGED 68: external KSPMONITORDEFAULT 69: external KSPMONITORTRUERESIDUALNORM 70: external KSPMONITORLG 71: external KSPMONITORLGTRUERESIDUALNORM 72: external KSPMONITORSOLUTION 73: external KSPMONITORSINGULARVALUE 74: external KSPGMRESMONITORKRYLOV 75: ! 76: ! Possible arguments to KSPGMRESSetRefinementType() 77: ! 78: PetscEnum KSP_GMRES_CGS_REFINE_NEVER 79: PetscEnum KSP_GMRES_CGS_REFINE_IFNEEDED 80: PetscEnum KSP_GMRES_CGS_REFINE_ALWAYS 81: ! 82: parameter (KSP_GMRES_CGS_REFINE_NEVER = 0) 83: parameter (KSP_GMRES_CGS_REFINE_IFNEEDED = 1) 84: parameter (KSP_GMRES_CGS_REFINE_ALWAYS = 2) 85: ! 86: ! End of Fortran include file for the KSP package in PETSc 87: !