1: ! 2: ! 3: ! Include file for Fortran use of the PC (preconditioner) package in PETSc 4: ! 5: #include finclude/petscpcdef.h 6: ! 7: ! PCSide 8: ! 9: PetscEnum PC_LEFT 10: PetscEnum PC_RIGHT 11: PetscEnum PC_SYMMETRIC 12: parameter (PC_LEFT=0,PC_RIGHT=1,PC_SYMMETRIC=2) 14: PetscEnum USE_PRECONDITIONER_MATRIX 15: PetscEnum USE_TRUE_MATRIX 16: parameter (USE_PRECONDITIONER_MATRIX=0,USE_TRUE_MATRIX=1) 18: ! 19: ! PCASMType 20: ! 21: PetscEnum PC_ASM_BASIC 22: PetscEnum PC_ASM_RESTRICT 23: PetscEnum PC_ASM_INTERPOLATE 24: PetscEnum PC_ASM_NONE 26: parameter (PC_ASM_BASIC = 3,PC_ASM_RESTRICT = 1) 27: parameter (PC_ASM_INTERPOLATE = 2,PC_ASM_NONE = 0) 28: ! 29: ! PCCompositeType 30: ! 31: PetscEnum PC_COMPOSITE_ADDITIVE 32: PetscEnum PC_COMPOSITE_MULTIPLICATIVE 33: PetscEnum PC_COMPOSITE_SPECIAL 34: PetscEnum PC_COMPOSITE_SCHUR 35: parameter (PC_COMPOSITE_ADDITIVE=0,PC_COMPOSITE_MULTIPLICATIVE=1) 36: parameter (PC_COMPOSITE_SPECIAL=2,PC_COMPOSITE_SCHUR=3) 37: ! 38: ! PCRichardsonConvergedReason 39: ! 40: PetscEnum PCRICHARDSON_CONVERGED_RTOL 41: PetscEnum PCRICHARDSON_CONVERGED_ATOL 42: PetscEnum PCRICHARDSON_CONVERGED_ITS 43: PetscEnum PCRICHARDSON_DIVERGED_DTOL 44: parameter (PCRICHARDSON_CONVERGED_RTOL = 2) 45: parameter (PCRICHARDSON_CONVERGED_ATOL = 3) 46: parameter (PCRICHARDSON_CONVERGED_ITS = 4) 47: parameter (PCRICHARDSON_DIVERGED_DTOL = -4) 48: ! 49: ! End of Fortran include file for the PC package in PETSc