Actual source code: petsclog.h

  1: !
  2: !  $Id: petsclog.h,v 1.19 2001/04/10 23:57:15 balay Exp $;

  4: #if !defined (PETSC_AVOID_DECLARATIONS)

  6: !
  7: !  Include file for Fortran use of the Plog package in PETSc
  8: !

 10:        integer    MAT_Mult
 11:        parameter (MAT_Mult = 0)
 12:        integer    MAT_MatrixFreeMult
 13:        parameter (MAT_MatrixFreeMult = 1)
 14:        integer    MAT_AssemblyBegin
 15:        parameter (MAT_AssemblyBegin = 2)
 16:        integer    MAT_AssemblyEnd
 17:        parameter (MAT_AssemblyEnd = 3)
 18:        integer    MAT_GetOrdering
 19:        parameter (MAT_GetOrdering = 4)
 20:        integer    MAT_MultTranspose
 21:        parameter (MAT_MultTranspose = 5)
 22:        integer    MAT_MultAdd
 23:        parameter (MAT_MultAdd = 6)
 24:        integer    MAT_MultTransposeAdd
 25:        parameter (MAT_MultTransposeAdd = 7)
 26:        integer    MAT_LUFactor
 27:        parameter (MAT_LUFactor = 8)
 28:        integer    MAT_CholeskyFactor
 29:        parameter (MAT_CholeskyFactor = 9)
 30:        integer    MAT_LUFactorSymbolic
 31:        parameter (MAT_LUFactorSymbolic = 10)
 32:        integer    MAT_ILUFactorSymbolic
 33:        parameter (MAT_ILUFactorSymbolic = 11)
 34:        integer    MAT_CholeskyFactorSymbolic
 35:        parameter (MAT_CholeskyFactorSymbolic = 12)
 36:        integer    MAT_ICCFactorSymbolic
 37:        parameter (MAT_ICCFactorSymbolic = 13)
 38:        integer    MAT_LUFactorNumeric
 39:        parameter (MAT_LUFactorNumeric = 14)
 40:        integer    MAT_CholeskyFactorNumeric
 41:        parameter (MAT_CholeskyFactorNumeric = 15)
 42:        integer    MAT_Relax
 43:        parameter (MAT_Relax = 16)
 44:        integer    MAT_Copy
 45:        parameter (MAT_Copy = 17)
 46:        integer    MAT_Convert
 47:        parameter (MAT_Convert = 18)
 48:        integer    MAT_Scale
 49:        parameter (MAT_Scale = 19)
 50:        integer    MAT_ZeroEntries
 51:        parameter (MAT_ZeroEntries = 20)
 52:        integer    MAT_Solve
 53:        parameter (MAT_Solve = 21)
 54:        integer    MAT_SolveAdd
 55:        parameter (MAT_SolveAdd = 22)
 56:        integer    MAT_SolveTranspose
 57:        parameter (MAT_SolveTranspose = 23)
 58:        integer    MAT_SolveTransposeAdd
 59:        parameter (MAT_SolveTransposeAdd = 24)
 60:        integer    MAT_SetValues
 61:        parameter (MAT_SetValues = 25)
 62:        integer    MAT_ForwardSolve
 63:        parameter (MAT_ForwardSolve = 26)
 64:        integer    MAT_BackwardSolve
 65:        parameter (MAT_BackwardSolve  = 27)
 66:        integer    MAT_Load
 67:        parameter (MAT_Load = 28)
 68:        integer    MAT_View
 69:        parameter (MAT_View = 29)
 70:        integer    MAT_ILUFactor
 71:        parameter (MAT_ILUFactor = 30)
 72:        integer    MAT_GetColoring
 73:        parameter (MAT_GetColoring = 31)
 74:        integer    MAT_GetSubMatrices
 75:        parameter (MAT_GetSubMatrices = 32)
 76:        integer    MAT_GetValues
 77:        parameter (MAT_GetValues = 33)
 78:        integer    MAT_IncreaseOverlap
 79:        parameter (MAT_IncreaseOverlap = 34)
 80:        integer    MAT_GetRow
 81:        parameter (MAT_GetRow = 35)
 82:        integer    MAT_GetPartitioning
 83:        parameter (MAT_GetPartitioning = 36)

 85:        integer    MAT_FDColoringApply
 86:        parameter (MAT_FDColoringApply = 38)

 88:        integer    MAT_FDColoringCreate
 89:        parameter (MAT_FDColoringCreate = 41)

 91:        integer    VEC_ReduceArithmetic
 92:        parameter (VEC_ReduceArithmetic = 37)
 93:        integer    VEC_View
 94:        parameter (VEC_View = 39)

 96:        integer    VEC_Max
 97:        parameter (VEC_Max = 42)
 98:        integer    VEC_Min
 99:        parameter (VEC_Min = 43)
100:        integer    VEC_TDot
101:        parameter (VEC_TDot = 44)
102:        integer    VEC_Scale
103:        parameter (VEC_Scale = 45)
104:        integer    VEC_Copy
105:        parameter (VEC_Copy = 46)
106:        integer    VEC_Set
107:        parameter (VEC_Set = 47)
108:        integer    VEC_AXPY
109:        parameter (VEC_AXPY = 48)
110:        integer    VEC_AYPX
111:        parameter (VEC_AYPX = 49)
112:        integer    VEC_Swap
113:        parameter (VEC_Swap = 50)
114:        integer    VEC_WAXPY
115:        parameter (VEC_WAXPY = 51)
116:        integer    VEC_AssemblyBegin
117:        parameter (VEC_AssemblyBegin = 52)
118:        integer    VEC_AssemblyEnd
119:        parameter (VEC_AssemblyEnd = 53)
120:        integer    VEC_MTDot
121:        parameter (VEC_MTDot = 54)

123:        integer    VEC_MAXPY
124:        parameter (VEC_MAXPY = 56)
125:        integer    VEC_PMult
126:        parameter (VEC_PMult = 57)
127:        integer    VEC_SetValues
128:        parameter (VEC_SetValues = 58)
129:        integer    VEC_Load
130:        parameter (VEC_Load = 59)
131:        integer    VEC_ScatterBarrier
132:        parameter (VEC_ScatterBarrier = 60)
133:        integer    VEC_ScatterBegin
134:        parameter (VEC_ScatterBegin = 61)

136:        integer    VEC_ScatterEnd
137:        parameter (VEC_ScatterEnd = 62)
138:        integer    VEC_SetRandom
139:        parameter (VEC_SetRandom = 63)
140:        integer    VEC_NormBarrier
141:        parameter (VEC_NormBarrier = 64)
142:        integer    VEC_Norm
143:        parameter (VEC_Norm = 65)
144:        integer    VEC_DotBarrier
145:        parameter (VEC_DotBarrier = 66)
146:        integer    VEC_Dot
147:        parameter (VEC_Dot = 67)
148:        integer    VEC_MDotBarrier
149:        parameter (VEC_MDotBarrier = 68)
150:        integer    VEC_MDot
151:        parameter (VEC_MDot = 69)


154:        integer    SLES_Solve
155:        parameter (SLES_Solve = 70)
156:        integer    SLES_SetUp
157:        parameter (SLES_SetUp = 71)
158:        integer    KSP_GMRESOrthogonalization
159:        parameter (KSP_GMRESOrthogonalization = 72)
160:        integer    PC_ApplyCoarse
161:        parameter (PC_ApplyCoarse = 73)
162:        integer    PC_ModifySubMatrices
163:        parameter (PC_ModifySubMatrices = 74)
164:        integer    PC_SetUp
165:        parameter (PC_SetUp = 75)
166:        integer    PC_SetUpOnBlocks
167:        parameter (PC_SetUpOnBlocks = 76)
168:        integer    PC_Apply
169:        parameter (PC_Apply = 77)
170:        integer    PC_ApplySymmetricLeft
171:        parameter (PC_ApplySymmetricLeft = 78)
172:        integer    PC_ApplySymmetricRight
173:        parameter (PC_ApplySymmetricRight = 79)

175:        integer    SNES_Solve
176:        parameter (SNES_Solve = 80)
177:        integer    SNES_LineSearch
178:        parameter (SNES_LineSearch = 81)
179:        integer    SNES_FunctionEval
180:        parameter (SNES_FunctionEval = 82)
181:        integer    SNES_JacobianEval
182:        parameter (SNES_JacobianEval = 83)
183:        integer    SNES_MinimizationFunctionEval
184:        parameter (SNES_MinimizationFunctionEval = 84)
185:        integer    SNES_GradientEval
186:        parameter (SNES_GradientEval = 85)
187:        integer    SNES_HessianEval
188:        parameter (SNES_HessianEval = 86)

190:        integer    VEC_ReduceBarrier
191:        parameter (VEC_ReduceBarrier = 87)
192:        integer    VEC_ReduceComm
193:        parameter (VEC_ReduceComm = 88)

195:        integer    TS_Step
196:        parameter (TS_Step = 90)
197:        integer    TS_PseudoComputeTimeStep
198:        parameter (TS_PseudoComputeTimeStep = 91)
199:        integer    TS_FunctionEval
200:        parameter (TS_FunctionEval = 92)
201:        integer    TS_JacobianEval
202:        parameter (TS_JacobianEval = 93)

204:        integer    Petsc_Barrier
205:        parameter (Petsc_Barrier = 100)

207:        integer    EC_SetUp
208:        parameter (EC_SetUp = 105)
209:        integer    EC_Solve
210:        parameter (EC_Solve = 106)

212: #endif