Actual source code: petscmg.h
1: !
2: ! Include file for Fortran use of the MG preconditioner in PETSc
3: !
4: #if !defined (__PETSCMG_H)
7: #define PCMGType PetscEnum
9: #endif
11: #if !defined (PETSC_AVOID_DECLARATIONS)
12: !
13: !
14: PetscEnum PC_MG_MULTIPLICATIVE,PC_MG_ADDITIVE,PC_MG_FULL
15: PetscEnum PC_MG_KASKADE,PC_MG_CASCADE
16: parameter (PC_MG_MULTIPLICATIVE=0,PC_MG_ADDITIVE=1)
17: parameter (PC_MG_FULL=2,PC_MG_KASKADE=3)
18: parameter (PC_MG_CASCADE=3)
20: !
21: ! Other defines
22: !
23: PetscEnum PC_MG_V_CYCLE,PC_MG_W_CYCLE
24: parameter (PC_MG_V_CYCLE=1,PC_MG_W_CYCLE=2)
26: external PCMGDEFAULTRESIDUAL
28: !PETSC_DEC_ATTRIBUTES(PCMGDEFAULTRESIDUAL,'_PCMGDEFAULTRESIDUAL')
30: !
31: ! End of Fortran include file for the MG include file in PETSc
33: #endif