Actual source code: petscpc.h

petsc-3.7.6 2017-04-24
Report Typos and Errors
  1: !
  2: !
  3: !  Include file for Fortran use of the PC (preconditioner) package in PETSc
  4: !
  5:  #include petsc/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)
 13: !
 14: !     PCJacobiType
 15: !
 16:       PetscEnum PC_JACOBI_DIAGONAL
 17:       PetscEnum PC_JACOBI_ROWMAX
 18:       PetscEnum PC_JACOBI_ROWSUM
 19:       parameter (PC_JACOBI_DIAGONAL=0)
 20:       parameter (PC_JACOBI_ROWMAX=1)
 21:       parameter (PC_JACOBI_ROWSUM=2)
 22: !
 23: ! PCASMType
 24: !
 25:       PetscEnum PC_ASM_BASIC
 26:       PetscEnum PC_ASM_RESTRICT
 27:       PetscEnum PC_ASM_INTERPOLATE
 28:       PetscEnum PC_ASM_NONE

 30:       parameter (PC_ASM_BASIC = 3,PC_ASM_RESTRICT = 1)
 31:       parameter (PC_ASM_INTERPOLATE = 2,PC_ASM_NONE = 0)
 32: !
 33: ! PCCompositeType
 34: !
 35:       PetscEnum PC_COMPOSITE_ADDITIVE
 36:       PetscEnum PC_COMPOSITE_MULTIPLICATIVE
 37:       PetscEnum PC_COMPOSITE_SYM_MULTIPLICATIVE
 38:       PetscEnum PC_COMPOSITE_SPECIAL
 39:       PetscEnum PC_COMPOSITE_SCHUR
 40:       parameter (PC_COMPOSITE_ADDITIVE=0,PC_COMPOSITE_MULTIPLICATIVE=1)
 41:       parameter (PC_COMPOSITE_SYM_MULTIPLICATIVE=2)
 42:       parameter (PC_COMPOSITE_SPECIAL=3,PC_COMPOSITE_SCHUR=4)
 43: !
 44: ! PCRichardsonConvergedReason
 45: !
 46:       PetscEnum PCRICHARDSON_CONVERGED_RTOL
 47:       PetscEnum PCRICHARDSON_CONVERGED_ATOL
 48:       PetscEnum PCRICHARDSON_CONVERGED_ITS
 49:       PetscEnum PCRICHARDSON_DIVERGED_DTOL
 50:       parameter (PCRICHARDSON_CONVERGED_RTOL = 2)
 51:       parameter (PCRICHARDSON_CONVERGED_ATOL = 3)
 52:       parameter (PCRICHARDSON_CONVERGED_ITS  = 4)
 53:       parameter (PCRICHARDSON_DIVERGED_DTOL = -4)
 54: !
 55: ! PCFieldSplitSchurPreType
 56: !
 57:       PetscEnum PC_FIELDSPLIT_SCHUR_PRE_SELF
 58:       PetscEnum PC_FIELDSPLIT_SCHUR_PRE_SELFP
 59:       PetscEnum PC_FIELDSPLIT_SCHUR_PRE_A11
 60:       PetscEnum PC_FIELDSPLIT_SCHUR_PRE_USER
 61:       PetscEnum PC_FIELDSPLIT_SCHUR_PRE_FULL
 62:       parameter (PC_FIELDSPLIT_SCHUR_PRE_SELF=0)
 63:       parameter (PC_FIELDSPLIT_SCHUR_PRE_SELFP=1)
 64:       parameter (PC_FIELDSPLIT_SCHUR_PRE_A11=2)
 65:       parameter (PC_FIELDSPLIT_SCHUR_PRE_USER=3)
 66:       parameter (PC_FIELDSPLIT_SCHUR_PRE_FULL=4)
 67: !
 68: ! PCPARMSGlobalType
 69: !
 70:       PetscEnum PC_PARMS_GLOBAL_RAS
 71:       PetscEnum PC_PARMS_GLOBAL_SCHUR
 72:       PetscEnum PC_PARMS_GLOBAL_BJ
 73:       parameter (PC_PARMS_GLOBAL_RAS=0)
 74:       parameter (PC_PARMS_GLOBAL_SCHUR=1)
 75:       parameter (PC_PARMS_GLOBAL_BJ=2)
 76: !
 77: ! PCPARMSLocalType
 78: !
 79:       PetscEnum PC_PARMS_LOCAL_ILU0
 80:       PetscEnum PC_PARMS_LOCAL_ILUK
 81:       PetscEnum PC_PARMS_LOCAL_ILUT
 82:       PetscEnum PC_PARMS_LOCAL_ARMS
 83:       parameter (PC_PARMS_LOCAL_ILU0=0)
 84:       parameter (PC_PARMS_LOCAL_ILUK=1)
 85:       parameter (PC_PARMS_LOCAL_ILUT=2)
 86:       parameter (PC_PARMS_LOCAL_ARMS=3)
 87: !
 88: ! PCFieldSplitSchurFactType
 89: !
 90:       PetscEnum PC_FIELDSPLIT_SCHUR_FACT_DIAG
 91:       PetscEnum PC_FIELDSPLIT_SCHUR_FACT_LOWER
 92:       PetscEnum PC_FIELDSPLIT_SCHUR_FACT_UPPER
 93:       PetscEnum PC_FIELDSPLIT_SCHUR_FACT_FULL
 94:       parameter (PC_FIELDSPLIT_SCHUR_FACT_DIAG=0)
 95:       parameter (PC_FIELDSPLIT_SCHUR_FACT_LOWER=1)
 96:       parameter (PC_FIELDSPLIT_SCHUR_FACT_UPPER=2)
 97:       parameter (PC_FIELDSPLIT_SCHUR_FACT_FULL=3)

 99: !
100: ! CoarseProblemType
101: !
102:       PetscEnum SEQUENTIAL_BDDC
103:       PetscEnum REPLICATED_BDDC
104:       PetscEnum PARALLEL_BDDC
105:       PetscEnum MULTILEVEL_BDDC
106:       parameter (SEQUENTIAL_BDDC=0)
107:       parameter (REPLICATED_BDDC=1)
108:       parameter (PARALLEL_BDDC=2)
109:       parameter (MULTILEVEL_BDDC=3)

111:       PetscEnum PC_MG_MULTIPLICATIVE
112:       PetscEnum PC_MG_ADDITIVE
113:       PetscEnum PC_MG_FULL
114:       PetscEnum PC_MG_KASKADE
115:       PetscEnum PC_MG_CASCADE
116:       parameter (PC_MG_MULTIPLICATIVE=0,PC_MG_ADDITIVE=1)
117:       parameter (PC_MG_FULL=2,PC_MG_KASKADE=3)
118:       parameter (PC_MG_CASCADE=3)

120: ! PCMGCycleType
121:       PetscEnum PC_MG_CYCLE_V
122:       PetscEnum PC_MG_CYCLE_W
123:       parameter (PC_MG_CYCLE_V = 1,PC_MG_CYCLE_W = 2)

125:       PetscEnum PC_EXOTIC_FACE
126:       PetscEnum PC_EXOTIC_WIREBASKET
127:       parameter (PC_EXOTIC_FACE=0,PC_EXOTIC_WIREBASKET=1)
128: !
129: ! PCFailedReason
130: !
131:       PetscEnum PC_NOERROR
132:       PetscEnum PC_FACTOR_STRUCT_ZEROPIVOT
133:       PetscEnum PC_FACTOR_NUMERIC_ZEROPIVOT
134:       PetscEnum PC_FACTOR_OUTMEMORY
135:       PetscEnum PC_FACTOR_OTHER
136:       PetscEnum PC_SUBPC_ERROR

138:       parameter (PC_NOERROR=0)
139:       parameter (PC_FACTOR_STRUCT_ZEROPIVOT=1)
140:       parameter (PC_FACTOR_NUMERIC_ZEROPIVOT=2)
141:       parameter (PC_FACTOR_OUTMEMORY=3)
142:       parameter (PC_FACTOR_OTHER=4)
143:       parameter (PC_SUBPC_ERROR=5)

145:       external  PCMGRESIDUALDEFAULT
146: !
147: !  End of Fortran include file for the PC package in PETSc