Actual source code: petscpc.h
petsc-3.4.5 2014-06-29
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: !
15: ! PCASMType
16: !
17: PetscEnum PC_ASM_BASIC
18: PetscEnum PC_ASM_RESTRICT
19: PetscEnum PC_ASM_INTERPOLATE
20: PetscEnum PC_ASM_NONE
22: parameter (PC_ASM_BASIC = 3,PC_ASM_RESTRICT = 1)
23: parameter (PC_ASM_INTERPOLATE = 2,PC_ASM_NONE = 0)
24: !
25: ! PCCompositeType
26: !
27: PetscEnum PC_COMPOSITE_ADDITIVE
28: PetscEnum PC_COMPOSITE_MULTIPLICATIVE
29: PetscEnum PC_COMPOSITE_SYM_MULTIPLICATIVE
30: PetscEnum PC_COMPOSITE_SPECIAL
31: PetscEnum PC_COMPOSITE_SCHUR
32: parameter (PC_COMPOSITE_ADDITIVE=0,PC_COMPOSITE_MULTIPLICATIVE=1)
33: parameter (PC_COMPOSITE_SYM_MULTIPLICATIVE=2)
34: parameter (PC_COMPOSITE_SPECIAL=3,PC_COMPOSITE_SCHUR=4)
35: !
36: ! PCRichardsonConvergedReason
37: !
38: PetscEnum PCRICHARDSON_CONVERGED_RTOL
39: PetscEnum PCRICHARDSON_CONVERGED_ATOL
40: PetscEnum PCRICHARDSON_CONVERGED_ITS
41: PetscEnum PCRICHARDSON_DIVERGED_DTOL
42: parameter (PCRICHARDSON_CONVERGED_RTOL = 2)
43: parameter (PCRICHARDSON_CONVERGED_ATOL = 3)
44: parameter (PCRICHARDSON_CONVERGED_ITS = 4)
45: parameter (PCRICHARDSON_DIVERGED_DTOL = -4)
46: !
47: ! PCFieldSplitSchurPreType
48: !
49: PetscEnum PC_FIELDSPLIT_SCHUR_PRE_SELF
50: PetscEnum PC_FIELDSPLIT_SCHUR_PRE_A11
51: PetscEnum PC_FIELDSPLIT_SCHUR_PRE_USER
52: parameter (PC_FIELDSPLIT_SCHUR_PRE_SELF=0)
53: parameter (PC_FIELDSPLIT_SCHUR_PRE_A11=1)
54: parameter (PC_FIELDSPLIT_SCHUR_PRE_USER=2)
55: !
56: ! PCPARMSGlobalType
57: !
58: PetscEnum PC_PARMS_GLOBAL_RAS
59: PetscEnum PC_PARMS_GLOBAL_SCHUR
60: PetscEnum PC_PARMS_GLOBAL_BJ
61: parameter (PC_PARMS_GLOBAL_RAS=0)
62: parameter (PC_PARMS_GLOBAL_SCHUR=1)
63: parameter (PC_PARMS_GLOBAL_BJ=2)
64: !
65: ! PCPARMSLocalType
66: !
67: PetscEnum PC_PARMS_LOCAL_ILU0
68: PetscEnum PC_PARMS_LOCAL_ILUK
69: PetscEnum PC_PARMS_LOCAL_ILUT
70: PetscEnum PC_PARMS_LOCAL_ARMS
71: parameter (PC_PARMS_LOCAL_ILU0=0)
72: parameter (PC_PARMS_LOCAL_ILUK=1)
73: parameter (PC_PARMS_LOCAL_ILUT=2)
74: parameter (PC_PARMS_LOCAL_ARMS=3)
75: !
76: ! PCFieldSplitSchurFactType
77: !
78: PetscEnum PC_FIELDSPLIT_SCHUR_FACT_DIAG
79: PetscEnum PC_FIELDSPLIT_SCHUR_FACT_LOWER
80: PetscEnum PC_FIELDSPLIT_SCHUR_FACT_UPPER
81: PetscEnum PC_FIELDSPLIT_SCHUR_FACT_FULL
82: parameter (PC_FIELDSPLIT_SCHUR_FACT_DIAG=0)
83: parameter (PC_FIELDSPLIT_SCHUR_FACT_LOWER=1)
84: parameter (PC_FIELDSPLIT_SCHUR_FACT_UPPER=2)
85: parameter (PC_FIELDSPLIT_SCHUR_FACT_FULL=3)
87: !
88: ! CoarseProblemType
89: !
90: PetscEnum SEQUENTIAL_BDDC
91: PetscEnum REPLICATED_BDDC
92: PetscEnum PARALLEL_BDDC
93: PetscEnum MULTILEVEL_BDDC
94: parameter (SEQUENTIAL_BDDC=0)
95: parameter (REPLICATED_BDDC=1)
96: parameter (PARALLEL_BDDC=2)
97: parameter (MULTILEVEL_BDDC=3)
99: PetscEnum PC_MG_MULTIPLICATIVE
100: PetscEnum PC_MG_ADDITIVE
101: PetscEnum PC_MG_FULL
102: PetscEnum PC_MG_KASKADE
103: PetscEnum PC_MG_CASCADE
104: parameter (PC_MG_MULTIPLICATIVE=0,PC_MG_ADDITIVE=1)
105: parameter (PC_MG_FULL=2,PC_MG_KASKADE=3)
106: parameter (PC_MG_CASCADE=3)
108: ! PCMGCycleType
109: PetscEnum PC_MG_CYCLE_V
110: PetscEnum PC_MG_CYCLE_W
111: parameter (PC_MG_CYCLE_V = 1,PC_MG_CYCLE_W = 2)
113: PetscEnum PC_EXOTIC_FACE
114: PetscEnum PC_EXOTIC_WIREBASKET
115: parameter (PC_EXOTIC_FACE=0,PC_EXOTIC_WIREBASKET=1)
117: external PCMGRESIDUAL_DEFAULT
118: !
119: ! End of Fortran include file for the PC package in PETSc