Actual source code: petscpcmg.h

petsc-3.3-p7 2013-05-11
  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