Actual source code: petscpc.h
petsc-3.7.7 2017-09-25
Report Typos and Errors

      1: !
      2: !
      3: !  Include file for Fortran use of the PC (preconditioner) package in PETSc
      4: !
      5:  #include petsc/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)
     13: !
     14: !     PCJacobiType
     15: !
     16:       PetscEnum PC_JACOBI_DIAGONAL
     17:       PetscEnum PC_JACOBI_ROWMAX
     18:       PetscEnum PC_JACOBI_ROWSUM
     19:       parameter (PC_JACOBI_DIAGONAL=0)
     20:       parameter (PC_JACOBI_ROWMAX=1)
     21:       parameter (PC_JACOBI_ROWSUM=2)
     22: !
     23: ! PCASMType
     24: !
     25:       PetscEnum PC_ASM_BASIC
     26:       PetscEnum PC_ASM_RESTRICT
     27:       PetscEnum PC_ASM_INTERPOLATE
     28:       PetscEnum PC_ASM_NONE

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

     99: !
    100: ! CoarseProblemType
    101: !
    102:       PetscEnum SEQUENTIAL_BDDC
    103:       PetscEnum REPLICATED_BDDC
    104:       PetscEnum PARALLEL_BDDC
    105:       PetscEnum MULTILEVEL_BDDC
    106:       parameter (SEQUENTIAL_BDDC=0)
    107:       parameter (REPLICATED_BDDC=1)
    108:       parameter (PARALLEL_BDDC=2)
    109:       parameter (MULTILEVEL_BDDC=3)

    111:       PetscEnum PC_MG_MULTIPLICATIVE
    112:       PetscEnum PC_MG_ADDITIVE
    113:       PetscEnum PC_MG_FULL
    114:       PetscEnum PC_MG_KASKADE
    115:       PetscEnum PC_MG_CASCADE
    116:       parameter (PC_MG_MULTIPLICATIVE=0,PC_MG_ADDITIVE=1)
    117:       parameter (PC_MG_FULL=2,PC_MG_KASKADE=3)
    118:       parameter (PC_MG_CASCADE=3)

    120: ! PCMGCycleType
    121:       PetscEnum PC_MG_CYCLE_V
    122:       PetscEnum PC_MG_CYCLE_W
    123:       parameter (PC_MG_CYCLE_V = 1,PC_MG_CYCLE_W = 2)

    125:       PetscEnum PC_EXOTIC_FACE
    126:       PetscEnum PC_EXOTIC_WIREBASKET
    127:       parameter (PC_EXOTIC_FACE=0,PC_EXOTIC_WIREBASKET=1)
    128: !
    129: ! PCFailedReason
    130: !
    131:       PetscEnum PC_NOERROR
    132:       PetscEnum PC_FACTOR_STRUCT_ZEROPIVOT
    133:       PetscEnum PC_FACTOR_NUMERIC_ZEROPIVOT
    134:       PetscEnum PC_FACTOR_OUTMEMORY
    135:       PetscEnum PC_FACTOR_OTHER
    136:       PetscEnum PC_SUBPC_ERROR

    138:       parameter (PC_NOERROR=0)
    139:       parameter (PC_FACTOR_STRUCT_ZEROPIVOT=1)
    140:       parameter (PC_FACTOR_NUMERIC_ZEROPIVOT=2)
    141:       parameter (PC_FACTOR_OUTMEMORY=3)
    142:       parameter (PC_FACTOR_OTHER=4)
    143:       parameter (PC_SUBPC_ERROR=5)

    145:       external  PCMGRESIDUALDEFAULT
    146: !
    147: !  End of Fortran include file for the PC package in PETSc