Actual source code: petscmg.h

  1: !
  2: !  Include file for Fortran use of the MG preconditioner in PETSc
  3: !
 4:  #include finclude/petscmgdef.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: !
 18: !  Other defines
 19: !
 20:       PetscEnum PC_MG_V_CYCLE
 21:       PetscEnum PC_MG_W_CYCLE
 22:       parameter (PC_MG_V_CYCLE=1,PC_MG_W_CYCLE=2)

 24:       PetscEnum PC_EXOTIC_FACE
 25:       PetscEnum PC_EXOTIC_WIREBASKET
 26:       parameter (PC_EXOTIC_FACE=0,PC_EXOTIC_WIREBASKET=1)

 28:       external  PCMGDEFAULTRESIDUAL

 30: !PETSC_DEC_ATTRIBUTES(PCMGDEFAULTRESIDUAL,'_PCMGDEFAULTRESIDUAL')

 32: !
 33: !     End of Fortran include file for the  MG include file in PETSc