Actual source code: petscpc.h
petsc-3.4.2 2013-07-02

      1: !
      2: !
      3: !  Include file for Fortran use of the PC (preconditioner) package in PETSc
      4: !
     5:  #include finclude/petscpcdef.h
      6: !
      7: !  PCSide
      8: !
      9:       PetscEnum PC_LEFT
     10:       PetscEnum PC_RIGHT
     11:       PetscEnum PC_SYMMETRIC
     12:       parameter (PC_LEFT=0,PC_RIGHT=1,PC_SYMMETRIC=2)

     14: !
     15: ! PCASMType
     16: !
     17:       PetscEnum PC_ASM_BASIC
     18:       PetscEnum PC_ASM_RESTRICT
     19:       PetscEnum PC_ASM_INTERPOLATE
     20:       PetscEnum PC_ASM_NONE

     22:       parameter (PC_ASM_BASIC = 3,PC_ASM_RESTRICT = 1)
     23:       parameter (PC_ASM_INTERPOLATE = 2,PC_ASM_NONE = 0)
     24: !
     25: ! PCCompositeType
     26: !
     27:       PetscEnum PC_COMPOSITE_ADDITIVE
     28:       PetscEnum PC_COMPOSITE_MULTIPLICATIVE
     29:       PetscEnum PC_COMPOSITE_SYM_MULTIPLICATIVE
     30:       PetscEnum PC_COMPOSITE_SPECIAL
     31:       PetscEnum PC_COMPOSITE_SCHUR
     32:       parameter (PC_COMPOSITE_ADDITIVE=0,PC_COMPOSITE_MULTIPLICATIVE=1)
     33:       parameter (PC_COMPOSITE_SYM_MULTIPLICATIVE=2)
     34:       parameter (PC_COMPOSITE_SPECIAL=3,PC_COMPOSITE_SCHUR=4)
     35: !
     36: ! PCRichardsonConvergedReason
     37: !
     38:       PetscEnum PCRICHARDSON_CONVERGED_RTOL
     39:       PetscEnum PCRICHARDSON_CONVERGED_ATOL
     40:       PetscEnum PCRICHARDSON_CONVERGED_ITS
     41:       PetscEnum PCRICHARDSON_DIVERGED_DTOL
     42:       parameter (PCRICHARDSON_CONVERGED_RTOL = 2)
     43:       parameter (PCRICHARDSON_CONVERGED_ATOL = 3)
     44:       parameter (PCRICHARDSON_CONVERGED_ITS  = 4)
     45:       parameter (PCRICHARDSON_DIVERGED_DTOL = -4)
     46: !
     47: ! PCFieldSplitSchurPreType
     48: !
     49:       PetscEnum PC_FIELDSPLIT_SCHUR_PRE_SELF
     50:       PetscEnum PC_FIELDSPLIT_SCHUR_PRE_A11
     51:       PetscEnum PC_FIELDSPLIT_SCHUR_PRE_USER
     52:       parameter (PC_FIELDSPLIT_SCHUR_PRE_SELF=0)
     53:       parameter (PC_FIELDSPLIT_SCHUR_PRE_A11=1)
     54:       parameter (PC_FIELDSPLIT_SCHUR_PRE_USER=2)
     55: !
     56: ! PCPARMSGlobalType
     57: !
     58:       PetscEnum PC_PARMS_GLOBAL_RAS
     59:       PetscEnum PC_PARMS_GLOBAL_SCHUR
     60:       PetscEnum PC_PARMS_GLOBAL_BJ
     61:       parameter (PC_PARMS_GLOBAL_RAS=0)
     62:       parameter (PC_PARMS_GLOBAL_SCHUR=1)
     63:       parameter (PC_PARMS_GLOBAL_BJ=2)
     64: !
     65: ! PCPARMSLocalType
     66: !
     67:       PetscEnum PC_PARMS_LOCAL_ILU0
     68:       PetscEnum PC_PARMS_LOCAL_ILUK
     69:       PetscEnum PC_PARMS_LOCAL_ILUT
     70:       PetscEnum PC_PARMS_LOCAL_ARMS
     71:       parameter (PC_PARMS_LOCAL_ILU0=0)
     72:       parameter (PC_PARMS_LOCAL_ILUK=1)
     73:       parameter (PC_PARMS_LOCAL_ILUT=2)
     74:       parameter (PC_PARMS_LOCAL_ARMS=3)
     75: !
     76: ! PCFieldSplitSchurFactType
     77: !
     78:       PetscEnum PC_FIELDSPLIT_SCHUR_FACT_DIAG
     79:       PetscEnum PC_FIELDSPLIT_SCHUR_FACT_LOWER
     80:       PetscEnum PC_FIELDSPLIT_SCHUR_FACT_UPPER
     81:       PetscEnum PC_FIELDSPLIT_SCHUR_FACT_FULL
     82:       parameter (PC_FIELDSPLIT_SCHUR_FACT_DIAG=0)
     83:       parameter (PC_FIELDSPLIT_SCHUR_FACT_LOWER=1)
     84:       parameter (PC_FIELDSPLIT_SCHUR_FACT_UPPER=2)
     85:       parameter (PC_FIELDSPLIT_SCHUR_FACT_FULL=3)

     87: !
     88: ! CoarseProblemType
     89: !
     90:       PetscEnum SEQUENTIAL_BDDC
     91:       PetscEnum REPLICATED_BDDC
     92:       PetscEnum PARALLEL_BDDC
     93:       PetscEnum MULTILEVEL_BDDC
     94:       parameter (SEQUENTIAL_BDDC=0)
     95:       parameter (REPLICATED_BDDC=1)
     96:       parameter (PARALLEL_BDDC=2)
     97:       parameter (MULTILEVEL_BDDC=3)

     99:       PetscEnum PC_MG_MULTIPLICATIVE
    100:       PetscEnum PC_MG_ADDITIVE
    101:       PetscEnum PC_MG_FULL
    102:       PetscEnum PC_MG_KASKADE
    103:       PetscEnum PC_MG_CASCADE
    104:       parameter (PC_MG_MULTIPLICATIVE=0,PC_MG_ADDITIVE=1)
    105:       parameter (PC_MG_FULL=2,PC_MG_KASKADE=3)
    106:       parameter (PC_MG_CASCADE=3)

    108: ! PCMGCycleType
    109:       PetscEnum PC_MG_CYCLE_V
    110:       PetscEnum PC_MG_CYCLE_W
    111:       parameter (PC_MG_CYCLE_V = 1,PC_MG_CYCLE_W = 2)

    113:       PetscEnum PC_EXOTIC_FACE
    114:       PetscEnum PC_EXOTIC_WIREBASKET
    115:       parameter (PC_EXOTIC_FACE=0,PC_EXOTIC_WIREBASKET=1)

    117:       external  PCMGRESIDUAL_DEFAULT
    118: !
    119: !  End of Fortran include file for the PC package in PETSc