Actual source code: petscmg.h
1: !
2: !
3: ! Include file for Fortran use of the MG preconditioner in PETSc
4: !
5: #if !defined (__PETSCMG_H)
8: #define MGType PetscEnum
10: #endif
12: #if !defined (PETSC_AVOID_DECLARATIONS)
13: !
14: !
15: PetscEnum MGMULTIPLICATIVE,MGADDITIVE,MGFULL,MGKASKADE,MGCASCADE
16: parameter (MGMULTIPLICATIVE=0,MGADDITIVE=1,MGFULL=2,MGKASKADE=3)
17: parameter (MGCASCADE=3)
19: !
20: ! Other defines
21: !
22: PetscEnum MG_V_CYCLE,MG_W_CYCLE
23: parameter (MG_V_CYCLE=1,MG_W_CYCLE=2)
25: external MGDEFAULTRESIDUAL
26: !PETSC_DEC_ATTRIBUTES(MGDEFAULTRESIDUAL,'_MGDEFAULTRESIDUAL')
28: !
29: ! End of Fortran include file for the MG include file in PETSc
31: #endif