Actual source code: petscmat.h
1: !
2: !
3: ! Include file for Fortran use of the Mat package in PETSc
4: !
5: #if !defined (__PETSCMAT_H)
8: #define Mat PetscFortranAddr
9: #define MatFDColoring PetscFortranAddr
10: #define MatPartitioning PetscFortranAddr
11: #define MatAIJIndices PetscFortranAddr
12: #define MatType character*(80)
13: #define MatOption PetscEnum
14: #define MatAssemblyType PetscEnum
15: #define MatOrderingType character*(80)
16: #define MatSORType PetscEnum
17: #define MatInfoType PetscEnum
18: #define MatReuse PetscEnum
19: #define MatOperation PetscEnum
20: #define MatColoringType character*(80)
21: #define MatInfo PetscLogDouble
22: #define MatFactorInfo PetscReal
23: #define MatDuplicateOption PetscEnum
24: #define MatStructure PetscEnum
25: #define MatPartitioningType character*(80)
26: #define MatNullSpace PetscFortranAddr
28: #define MatStencil PetscInt
29: #define MatStencil_k 1
30: #define MatStencil_j 2
31: #define MatStencil_i 3
32: #define MatStencil_c 4
34: #define MATPARTITIONING_CURRENT 'current'
35: #define MATPARTITIONING_PARMETIS 'parmetis'
37: #define MATCOLORING_NATURAL 'natural'
38: #define MATCOLORING_SL 'sl'
39: #define MATCOLORING_LF 'lf'
40: #define MATCOLORING_ID 'id'
42: #define MATORDERING_NATURAL 'natural'
43: #define MATORDERING_ND 'nd'
44: #define MATORDERING_1WD '1wd'
45: #define MATORDERING_RCM 'rcm'
46: #define MATORDERING_QMD 'qmd'
47: #define MATORDERING_ROWLENGTH 'rowlength'
48: #define MATORDERING_DSC_ND 'dsc_nd'
49: #define MATORDERING_DSC_MMD 'dsc_mmd'
50: #define MATORDERING_DSC_MDF 'dsc_mdf'
52: #endif
54: !
55: ! Matrix types
56: !
57: #define MATSAME 'same'
58: #define MATSEQMAIJ 'seqmaij'
59: #define MATMPIMAIJ 'mpimaij'
60: #define MATMAIJ 'maij'
61: #define MATIS 'is'
62: #define MATMPIROWBS 'mpirowbs'
63: #define MATSEQAIJ 'seqaij'
64: #define MATMPIAIJ 'mpiaij'
65: #define MATAIJ 'aij'
66: #define MATSHELL 'shell'
67: #define MATSEQBDIAG 'seqbdiag'
68: #define MATMPIBDIAG 'mpibdiag'
69: #define MATBDIAG 'bdiag'
70: #define MATSEQDENSE 'seqdense'
71: #define MATMPIDENSE 'mpidense'
72: #define MATDENSE 'dense'
73: #define MATSEQBAIJ 'seqbaij'
74: #define MATMPIBAIJ 'mpibaij'
75: #define MATBAIJ 'baij'
76: #define MATMPIADJ 'mpiadj'
77: #define MATSEQSBAIJ 'seqsbaij'
78: #define MATMPISBAIJ 'mpisbaij'
79: #define MATSBAIJ 'sbaij'
80: #define MATDAAD 'daad'
81: #define MATMFFD 'mffd'
82: #define MATESI 'esi'
83: #define MATPETSCESI 'petscesi'
84: #define MATNORMAL 'normal'
85: #define MATSEQAIJSPOOLES 'seqaijspooles'
86: #define MATMPIAIJSPOOLES 'mpiaijspooles'
87: #define MATSEQSBAIJSPOOLES 'seqsbaijspooles'
88: #define MATMPISBAIJSPOOLES 'mpisbaijspooles'
89: #define MATSUPERLU 'superlu'
90: #define MATSUPERLU_DIST 'superlu_dist'
91: #define MATUMFPACK 'umfpack'
92: #define MATESSL 'essl'
93: #define MATLUSOL 'lusol'
94: #define MATAIJMUMPS 'aijmumps'
95: #define MATSBAIJMUMPS 'sbaijmumps'
96: #define MATDSCPACK 'dscpack'
97: #define MATMATLAB 'matlab'
99: #if !defined (PETSC_AVOID_DECLARATIONS)
101: !
102: ! Flag for matrix assembly
103: !
104: PetscEnum MAT_FLUSH_ASSEMBLY
105: PetscEnum MAT_FINAL_ASSEMBLY
107: parameter(MAT_FLUSH_ASSEMBLY=1,MAT_FINAL_ASSEMBLY=0)
108: !
109: ! Matrix options; must match those in include/petscmat.h
110: !
111: PetscEnum MAT_ROW_ORIENTED
112: PetscEnum MAT_NEW_NONZERO_LOCATIONS
113: PetscEnum MAT_SYMMETRIC
114: PetscEnum MAT_STRUCTURALLY_SYMMETRIC
115: PetscEnum MAT_NEW_DIAGONALS
116: PetscEnum MAT_IGNORE_OFF_PROC_ENTRIES
117: PetscEnum MAT_NEW_NONZERO_LOCATION_ERR
118: PetscEnum MAT_NEW_NONZERO_ALLOCATION_ERR
119: PetscEnum MAT_USE_HASH_TABLE
120: PetscEnum MAT_KEEP_ZEROED_ROWS
121: PetscEnum MAT_IGNORE_ZERO_ENTRIES
122: PetscEnum MAT_USE_INODES
123: PetscEnum MAT_HERMITIAN
124: PetscEnum MAT_SYMMETRY_ETERNAL
125: PetscEnum MAT_USE_COMPRESSEDROW
126: PetscEnum MAT_IGNORE_LOWER_TRIANGULAR
127: PetscEnum MAT_ERROR_LOWER_TRIANGULAR
128: PetscEnum MAT_GETROW_UPPERTRIANGULAR
130: parameter (MAT_ROW_ORIENTED=0)
131: parameter (MAT_NEW_NONZERO_LOCATIONS=1)
132: parameter (MAT_SYMMETRIC=2,MAT_STRUCTURALLY_SYMMETRIC=3)
133: parameter (MAT_NEW_DIAGONALS=4)
134: parameter (MAT_IGNORE_OFF_PROC_ENTRIES=5)
135: parameter (MAT_NEW_NONZERO_LOCATION_ERR=6)
136: parameter (MAT_NEW_NONZERO_ALLOCATION_ERR=7)
137: parameter (MAT_USE_HASH_TABLE=8)
138: parameter (MAT_KEEP_ZEROED_ROWS=9)
139: parameter (MAT_IGNORE_ZERO_ENTRIES=10)
140: parameter (MAT_USE_INODES=11)
141: parameter (MAT_HERMITIAN=12)
142: parameter (MAT_SYMMETRY_ETERNAL=13)
143: parameter (MAT_USE_COMPRESSEDROW=14)
144: parameter (MAT_IGNORE_LOWER_TRIANGULAR=15)
145: parameter (MAT_ERROR_LOWER_TRIANGULAR=16)
146: parameter (MAT_GETROW_UPPERTRIANGULAR=17)
148: !
149: ! MatDuplicateOption
150: !
151: PetscEnum MAT_DO_NOT_COPY_VALUES
152: PetscEnum MAT_COPY_VALUES
153: parameter (MAT_DO_NOT_COPY_VALUES=0,MAT_COPY_VALUES=1)
154: !
155: ! Flags for PCSetOperators()
156: !
157: PetscEnum SAME_NONZERO_PATTERN
158: PetscEnum DIFFERENT_NONZERO_PATTERN
159: PetscEnum SAME_PRECONDITIONER
161: parameter (SAME_NONZERO_PATTERN = 0,DIFFERENT_NONZERO_PATTERN = 1)
162: parameter (SAME_PRECONDITIONER = 2)
164: !
165: ! Note: MAT_INFO_SIZE must equal # elements in MatInfo structure
166: ! (See petsc/include/petscmat.h)
167: !
168: PetscEnum MAT_INFO_SIZE
170: parameter (MAT_INFO_SIZE=14)
172: PetscEnum MAT_INFO_ROWS_GLOBAL
173: PetscEnum MAT_INFO_COLUMNS_GLOBAL
174: PetscEnum MAT_INFO_ROWS_LOCAL
175: PetscEnum MAT_INFO_COLUMNS_LOCAL
176: PetscEnum MAT_INFO_BLOCK_SIZE
177: PetscEnum MAT_INFO_NZ_ALLOCATED
178: PetscEnum MAT_INFO_NZ_USED
179: PetscEnum MAT_INFO_NZ_UNNEEDED
180: PetscEnum MAT_INFO_MEMORY
181: PetscEnum MAT_INFO_ASSEMBLIES
182: PetscEnum MAT_INFO_MALLOCS
183: PetscEnum MAT_INFO_FILL_RATIO_GIVEN
184: PetscEnum MAT_INFO_FILL_RATIO_NEEDED
185: PetscEnum MAT_INFO_FACTOR_MALLOCS
187: parameter (MAT_INFO_ROWS_GLOBAL=1,MAT_INFO_COLUMNS_GLOBAL=2)
188: parameter (MAT_INFO_ROWS_LOCAL=3,MAT_INFO_COLUMNS_LOCAL=4)
189: parameter (MAT_INFO_BLOCK_SIZE=5,MAT_INFO_NZ_ALLOCATED=6)
190: parameter (MAT_INFO_NZ_USED=7,MAT_INFO_NZ_UNNEEDED=8)
191: parameter (MAT_INFO_MEMORY=9,MAT_INFO_ASSEMBLIES=10)
192: parameter (MAT_INFO_MALLOCS=11,MAT_INFO_FILL_RATIO_GIVEN=12)
193: parameter (MAT_INFO_FILL_RATIO_NEEDED=13)
194: parameter (MAT_INFO_FACTOR_MALLOCS=14)
195: !
196: ! MatReuse
197: !
198: PetscEnum MAT_INITIAL_MATRIX
199: PetscEnum MAT_REUSE_MATRIX
201: parameter (MAT_INITIAL_MATRIX=0,MAT_REUSE_MATRIX=1)
203: !
204: ! MatInfoType
205: !
206: PetscEnum MAT_LOCAL
207: PetscEnum MAT_GLOBAL_MAX
208: PetscEnum MAT_GLOBAL_SUM
210: parameter (MAT_LOCAL=1,MAT_GLOBAL_MAX=2,MAT_GLOBAL_SUM=3)
212: !
213: ! Note: MAT_FACTORINFO_SIZE must equal # elements in MatFactorInfo structure
214: ! (See petsc/include/petscmat.h)
215: !
216: PetscEnum MAT_FACTORINFO_SIZE
218: parameter (MAT_FACTORINFO_SIZE=11)
220: PetscEnum MAT_FACTORINFO_LEVELS
221: PetscEnum MAT_FACTORINFO_FILL
222: PetscEnum MAT_FACTORINFO_DIAGONAL_FILL
223: PetscEnum MAT_FACTORINFO_DT
224: PetscEnum MAT_FACTORINFO_DTCOL
225: PetscEnum MAT_FACTORINFO_DTCOUNT
226: PetscEnum MAT_FACTORINFO_DAMPING
227: PetscEnum MAT_FACTORINFO_SHIFT
228: PetscEnum MAT_FACTORINFO_SHIFT_FRACTION
229: PetscEnum MAT_FACTORINFO_ZERO_PIVOT
230: PetscEnum MAT_FACTORINFO_PIVOT_IN_BLOCKS
232: parameter (MAT_FACTORINFO_DAMPING = 1)
233: parameter (MAT_FACTORINFO_SHIFT = 2)
234: parameter (MAT_FACTORINFO_SHIFT_FRACTION = 3)
235: parameter (MAT_FACTORINFO_DIAGONAL_FILL = 4)
236: parameter (MAT_FACTORINFO_DT = 5)
237: parameter (MAT_FACTORINFO_DTCOL = 6)
238: parameter (MAT_FACTORINFO_DTCOUNT = 7)
239: parameter (MAT_FACTORINFO_LEVELS = 8)
240: parameter (MAT_FACTORINFO_FILL = 9)
241: parameter (MAT_FACTORINFO_PIVOT_IN_BLOCKS = 10)
242: parameter (MAT_FACTORINFO_ZERO_PIVOT = 11)
245: !
246: ! Options for SOR and SSOR
247: ! MatSorType may be bitwise ORd together, so do not change the numbers
248: !
249: PetscEnum SOR_FORWARD_SWEEP
250: PetscEnum SOR_BACKWARD_SWEEP
251: PetscEnum SOR_SYMMETRIC_SWEEP
252: PetscEnum SOR_LOCAL_FORWARD_SWEEP
253: PetscEnum SOR_LOCAL_BACKWARD_SWEEP
254: PetscEnum SOR_LOCAL_SYMMETRIC_SWEEP
255: PetscEnum SOR_ZERO_INITIAL_GUESS
256: PetscEnum SOR_EISENSTAT
257: PetscEnum SOR_APPLY_UPPER
258: PetscEnum SOR_APPLY_LOWER
260: parameter (SOR_FORWARD_SWEEP=1,SOR_BACKWARD_SWEEP=2)
261: parameter (SOR_SYMMETRIC_SWEEP=3,SOR_LOCAL_FORWARD_SWEEP=4)
262: parameter (SOR_LOCAL_BACKWARD_SWEEP=8)
263: parameter (SOR_LOCAL_SYMMETRIC_SWEEP=12)
264: parameter (SOR_ZERO_INITIAL_GUESS=16,SOR_EISENSTAT=32)
265: parameter (SOR_APPLY_UPPER=64,SOR_APPLY_LOWER=128)
266: !
267: ! MatOperation
268: !
269: PetscEnum MATOP_SET_VALUES
270: PetscEnum MATOP_GET_ROW
271: PetscEnum MATOP_RESTORE_ROW
272: PetscEnum MATOP_MULT
273: PetscEnum MATOP_MULT_ADD
274: PetscEnum MATOP_MULT_TRANSPOSE
275: PetscEnum MATOP_MULT_TRANSPOSE_ADD
276: PetscEnum MATOP_SOLVE
277: PetscEnum MATOP_SOLVE_ADD
278: PetscEnum MATOP_SOLVE_TRANSPOSE
279: PetscEnum MATOP_SOLVE_TRANSPOSE_ADD
280: PetscEnum MATOP_LUFACTOR
281: PetscEnum MATOP_CHOLESKYFACTOR
282: PetscEnum MATOP_RELAX
283: PetscEnum MATOP_TRANSPOSE
284: PetscEnum MATOP_GETINFO
285: PetscEnum MATOP_EQUAL
286: PetscEnum MATOP_GET_DIAGONAL
287: PetscEnum MATOP_DIAGONAL_SCALE
288: PetscEnum MATOP_NORM
289: PetscEnum MATOP_ASSEMBLY_BEGIN
290: PetscEnum MATOP_ASSEMBLY_END
291: PetscEnum MATOP_COMPRESS
292: PetscEnum MATOP_SET_OPTION
293: PetscEnum MATOP_ZERO_ENTRIES
294: PetscEnum MATOP_ZERO_ROWS
295: PetscEnum MATOP_LUFACTOR_SYMBOLIC
296: PetscEnum MATOP_LUFACTOR_NUMERIC
297: PetscEnum MATOP_CHOLESKY_FACTOR_SYMBOLIC
298: PetscEnum MATOP_CHOLESKY_FACTOR_NUMERIC
299: PetscEnum MATOP_SETUP_PREALLOCATION
300: PetscEnum MATOP_ILUFACTOR_SYMBOLIC
301: PetscEnum MATOP_ICCFACTOR_SYMBOLIC
302: PetscEnum MATOP_GET_ARRAY
303: PetscEnum MATOP_RESTORE_ARRAY
305: PetscEnum MATOP_DUPLICATE
306: PetscEnum MATOP_FORWARD_SOLVE
307: PetscEnum MATOP_BACKWARD_SOLVE
308: PetscEnum MATOP_ILUFACTOR
309: PetscEnum MATOP_ICCFACTOR
310: PetscEnum MATOP_AXPY
311: PetscEnum MATOP_GET_SUBMATRICES
312: PetscEnum MATOP_INCREASE_OVERLAP
313: PetscEnum MATOP_GET_VALUES
314: PetscEnum MATOP_COPY
315: PetscEnum MATOP_PRINT_HELP
316: PetscEnum MATOP_SCALE
317: PetscEnum MATOP_SHIFT
318: PetscEnum MATOP_DIAGONAL_SHIFT
319: PetscEnum MATOP_ILUDT_FACTOR
320: PetscEnum MATOP_GET_BLOCK_SIZE
322: PetscEnum MATOP_GET_ROW_IJ
323: PetscEnum MATOP_RESTORE_ROW_IJ
324: PetscEnum MATOP_GET_COLUMN_IJ
325: PetscEnum MATOP_RESTORE_COLUMN_IJ
326: PetscEnum MATOP_FDCOLORING_CREATE
327: PetscEnum MATOP_COLORING_PATCH
328: PetscEnum MATOP_SET_UNFACTORED
329: PetscEnum MATOP_PERMUTE
330: PetscEnum MATOP_SET_VALUES_BLOCKED
331: PetscEnum MATOP_GET_SUBMATRIX
332: PetscEnum MATOP_DESTROY
333: PetscEnum MATOP_VIEW
334: PetscEnum MATOP_GET_MAPS
335: PetscEnum MATOP_USE_SCALED_FORM
336: PetscEnum MATOP_SCALE_SYSTEM
337: PetscEnum MATOP_UNSCALE_SYSTEM
338: PetscEnum MATOP_SET_LOCAL_TO_GLOBAL_MAP
339: PetscEnum MATOP_SET_VALUES_LOCAL
340: PetscEnum MATOP_ZERO_ROWS_LOCAL
341: PetscEnum MATOP_GET_ROW_MAX
342: PetscEnum MATOP_CONVERT
343: PetscEnum MATOP_SET_COLORING
344: PetscEnum MATOP_SET_VALUES_ADIC
345: PetscEnum MATOP_SET_VALUES_ADIFOR
346: PetscEnum MATOP_FD_COLORING_APPLY
347: PetscEnum MATOP_SET_FROM_OPTIONS
348: PetscEnum MATOP_MULT_CON
349: PetscEnum MATOP_MULT_TRANSPOSE_CON
350: PetscEnum MATOP_ILU_FACTOR_SYMBOLIC_CON
351: PetscEnum MATOP_PERMUTE_SPARSIFY
352: PetscEnum MATOP_MULT_MULTIPLE
353: PetscEnum MATOP_SOLVE_MULTIPLE
354: PetscEnum MATOP_GET_INERTIA
355: PetscEnum MATOP_LOAD
356: PetscEnum MATOP_IS_SYMMETRIC
357: PetscEnum MATOP_IS_HERMITIAN
358: PetscEnum MATOP_IS_STRUCTURALLY_SYMMETRIC
359: PetscEnum MATOP_PB_RELAX
360: PetscEnum MATOP_GET_VECS
361: PetscEnum MATOP_MAT_MULT
362: PetscEnum MATOP_MAT_MULT_SYMBOLIC
363: PetscEnum MATOP_MAT_MULT_NUMERIC
364: PetscEnum MATOP_PTAP
365: PetscEnum MATOP_PTAP_SYMBOLIC
366: PetscEnum MATOP_PTAP_NUMERIC
367: PetscEnum MATOP_MAT_MULT_TRANSPOSE
368: PetscEnum MATOP_MAT_MULT_TRANSPOSE_SYM
369: PetscEnum MATOP_MAT_MULT_TRANSPOSE_NUM
370: PetscEnum MATOP_PTAP_SYMBOLIC_SEQAIJ
371: PetscEnum MATOP_PTAP_NUMERIC_SEQAIJ
372: PetscEnum MATOP_PTAP_SYMBOLIC_MPIAIJ
373: PetscEnum MATOP_PTAP_NUMERIC_MPIAIJ
374: PetscEnum MATOP_SET_VALUES_ROW
375: PetscEnum MATOP_GET_ROW_UTRIANGULAR
376: PetscEnum MATOP_RESTORE_ROW_UTRIANGULAR
377: PetscEnum MATOP_MATSOLVE
378: PetscEnum MATOP_MATGETSEQNONZEROSTRUCTURE
379:
380: parameter(MATOP_SET_VALUES=0)
381: parameter(MATOP_GET_ROW=1)
382: parameter(MATOP_RESTORE_ROW=2)
383: parameter(MATOP_MULT=3)
384: parameter(MATOP_MULT_ADD=4)
385: parameter(MATOP_MULT_TRANSPOSE=5)
386: parameter(MATOP_MULT_TRANSPOSE_ADD=6)
387: parameter(MATOP_SOLVE=7)
388: parameter(MATOP_SOLVE_ADD=8)
389: parameter(MATOP_SOLVE_TRANSPOSE=9)
390: parameter(MATOP_SOLVE_TRANSPOSE_ADD=10)
391: parameter(MATOP_LUFACTOR=11)
392: parameter(MATOP_CHOLESKYFACTOR=12)
393: parameter(MATOP_RELAX=13)
394: parameter(MATOP_TRANSPOSE=14)
395: parameter(MATOP_GETINFO=15)
396: parameter(MATOP_EQUAL=16)
397: parameter(MATOP_GET_DIAGONAL=17)
398: parameter(MATOP_DIAGONAL_SCALE=18)
399: parameter(MATOP_NORM=19)
400: parameter(MATOP_ASSEMBLY_BEGIN=20)
401: parameter(MATOP_ASSEMBLY_END=21)
402: parameter(MATOP_COMPRESS=22)
403: parameter(MATOP_SET_OPTION=23)
404: parameter(MATOP_ZERO_ENTRIES=24)
405: parameter(MATOP_ZERO_ROWS=25)
406: parameter(MATOP_LUFACTOR_SYMBOLIC=26)
407: parameter(MATOP_LUFACTOR_NUMERIC=27)
408: parameter(MATOP_CHOLESKY_FACTOR_SYMBOLIC=28)
409: parameter(MATOP_CHOLESKY_FACTOR_NUMERIC=29)
410: parameter(MATOP_SETUP_PREALLOCATION=30)
411: parameter(MATOP_ILUFACTOR_SYMBOLIC=31)
412: parameter(MATOP_ICCFACTOR_SYMBOLIC=32)
413: parameter(MATOP_GET_ARRAY=33)
414: parameter(MATOP_RESTORE_ARRAY=34)
415: parameter(MATOP_DUPLICATE=35)
416: parameter(MATOP_FORWARD_SOLVE=36)
417: parameter(MATOP_BACKWARD_SOLVE=37)
418: parameter(MATOP_ILUFACTOR=38)
419: parameter(MATOP_ICCFACTOR=39)
420: parameter(MATOP_AXPY=40)
421: parameter(MATOP_GET_SUBMATRICES=41)
422: parameter(MATOP_INCREASE_OVERLAP=42)
423: parameter(MATOP_GET_VALUES=43)
424: parameter(MATOP_COPY=44)
425: parameter(MATOP_PRINT_HELP=45)
426: parameter(MATOP_SCALE=46)
427: parameter(MATOP_SHIFT=47)
428: parameter(MATOP_DIAGONAL_SHIFT=48)
429: parameter(MATOP_ILUDT_FACTOR=49)
430: parameter(MATOP_GET_BLOCK_SIZE=50)
431: parameter(MATOP_GET_ROW_IJ=51)
432: parameter(MATOP_RESTORE_ROW_IJ=52)
433: parameter(MATOP_GET_COLUMN_IJ=53)
434: parameter(MATOP_RESTORE_COLUMN_IJ=54)
435: parameter(MATOP_FDCOLORING_CREATE=55)
436: parameter(MATOP_COLORING_PATCH=56)
437: parameter(MATOP_SET_UNFACTORED=57)
438: parameter(MATOP_PERMUTE=58)
439: parameter(MATOP_SET_VALUES_BLOCKED=59)
440: parameter(MATOP_GET_SUBMATRIX=60)
441: parameter(MATOP_DESTROY=61)
442: parameter(MATOP_VIEW=62)
443: parameter(MATOP_GET_MAPS=63)
444: parameter(MATOP_USE_SCALED_FORM=64)
445: parameter(MATOP_SCALE_SYSTEM=65)
446: parameter(MATOP_UNSCALE_SYSTEM=66)
447: parameter(MATOP_SET_LOCAL_TO_GLOBAL_MAP=67)
448: parameter(MATOP_SET_VALUES_LOCAL=68)
449: parameter(MATOP_ZERO_ROWS_LOCAL=69)
450: parameter(MATOP_GET_ROW_MAX=70)
451: parameter(MATOP_CONVERT=71)
452: parameter(MATOP_SET_COLORING=72)
453: parameter(MATOP_SET_VALUES_ADIC=73)
454: parameter(MATOP_SET_VALUES_ADIFOR=74)
455: parameter(MATOP_FD_COLORING_APPLY=75)
456: parameter(MATOP_SET_FROM_OPTIONS=76)
457: parameter(MATOP_MULT_CON=77)
458: parameter(MATOP_MULT_TRANSPOSE_CON=78)
459: parameter(MATOP_ILU_FACTOR_SYMBOLIC_CON=79)
460: parameter(MATOP_PERMUTE_SPARSIFY=80)
461: parameter(MATOP_MULT_MULTIPLE=81)
462: parameter(MATOP_SOLVE_MULTIPLE=82)
463: parameter(MATOP_GET_INERTIA=83)
464: parameter(MATOP_LOAD=84)
465: parameter(MATOP_IS_SYMMETRIC=85)
466: parameter(MATOP_IS_HERMITIAN=86)
467: parameter(MATOP_IS_STRUCTURALLY_SYMMETRIC=87)
468: parameter(MATOP_PB_RELAX=88)
469: parameter(MATOP_GET_VECS=89)
470: parameter(MATOP_MAT_MULT=90)
471: parameter(MATOP_MAT_MULT_SYMBOLIC=91)
472: parameter(MATOP_MAT_MULT_NUMERIC=92)
473: parameter(MATOP_PTAP=93)
474: parameter(MATOP_PTAP_SYMBOLIC=94)
475: parameter(MATOP_PTAP_NUMERIC=95)
476: parameter(MATOP_MAT_MULT_TRANSPOSE=96)
477: parameter(MATOP_MAT_MULT_TRANSPOSE_SYM=97)
478: parameter(MATOP_MAT_MULT_TRANSPOSE_NUM=98)
479: parameter(MATOP_PTAP_SYMBOLIC_SEQAIJ=99)
480: parameter(MATOP_PTAP_NUMERIC_SEQAIJ=100)
481: parameter(MATOP_PTAP_SYMBOLIC_MPIAIJ=101)
482: parameter(MATOP_PTAP_NUMERIC_MPIAIJ=102)
483: parameter(MATOP_SET_VALUES_ROW=105)
484: parameter(MATOP_GET_ROW_UTRIANGULAR=108)
485: parameter(MATOP_RESTORE_ROW_UTRIANGULAR=109)
486: parameter(MATOP_MATSOLVE=110)
487: parameter(MATOP_MATGETSEQNONZEROSTRUCTURE=115)
488: !
489: !
490: !
491: PetscEnum MATRIX_BINARY_FORMAT_DENSE
492: parameter (MATRIX_BINARY_FORMAT_DENSE=-1)
493: !
494: ! End of Fortran include file for the Mat package in PETSc
495: !
496: #endif