1: ! 2: ! Include file for Fortran use of the MG preconditioner in PETSc 3: ! 4: #include finclude/petscpcmgdef.h 6: ! 7: ! 8: PetscEnum PC_MG_MULTIPLICATIVE 9: PetscEnum PC_MG_ADDITIVE 10: PetscEnum PC_MG_FULL 11: PetscEnum PC_MG_KASKADE 12: PetscEnum PC_MG_CASCADE 13: parameter (PC_MG_MULTIPLICATIVE=0,PC_MG_ADDITIVE=1) 14: parameter (PC_MG_FULL=2,PC_MG_KASKADE=3) 15: parameter (PC_MG_CASCADE=3) 17: ! PCMGCycleType 18: PetscEnum PC_MG_CYCLE_V 19: PetscEnum PC_MG_CYCLE_W 20: parameter (PC_MG_CYCLE_V = 1,PC_MG_CYCLE_W = 2) 22: PetscEnum PC_EXOTIC_FACE 23: PetscEnum PC_EXOTIC_WIREBASKET 24: parameter (PC_EXOTIC_FACE=0,PC_EXOTIC_WIREBASKET=1) 26: external PCMGDEFAULTRESIDUAL 28: ! 29: ! End of Fortran include file for the MG include file in PETSc