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 double precision
22: #define MatFactorInfo double precision
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,MAT_FINAL_ASSEMBLY
106: parameter(MAT_FLUSH_ASSEMBLY=1,MAT_FINAL_ASSEMBLY=0)
107: !
108: ! Matrix options; must match those in include/petscmat.h
109: !
110: PetscEnum MAT_ROW_ORIENTED,MAT_COLUMN_ORIENTED,MAT_ROWS_SORTED
111: PetscEnum MAT_COLUMNS_SORTED,MAT_NO_NEW_NONZERO_LOCATIONS
112: PetscEnum MAT_YES_NEW_NONZERO_LOCATIONS,MAT_SYMMETRIC
113: PetscEnum MAT_STRUCTURALLY_SYMMETRIC,MAT_NO_NEW_DIAGONALS
114: PetscEnum MAT_YES_NEW_DIAGONALS,MAT_INODE_LIMIT_1
115: PetscEnum MAT_INODE_LIMIT_2,MAT_INODE_LIMIT_3,MAT_INODE_LIMIT_4
116: PetscEnum MAT_INODE_LIMIT_5,MAT_IGNORE_OFF_PROC_ENTRIES
117: PetscEnum MAT_ROWS_UNSORTED,MAT_COLUMNS_UNSORTED
118: PetscEnum MAT_NEW_NONZERO_LOCATION_ERR
119: PetscEnum MAT_NEW_NONZERO_ALLOCATION_ERR,MAT_USE_HASH_TABLE
120: PetscEnum MAT_KEEP_ZEROED_ROWS,MAT_IGNORE_ZERO_ENTRIES
121: PetscEnum MAT_USE_INODES,MAT_DO_NOT_USE_INODES
122: PetscEnum MAT_NOT_SYMMETRIC,MAT_HERMITIAN
123: PetscEnum MAT_NOT_STRUCTURALLY_SYMMETRIC,MAT_NOT_HERMITIAN
124: PetscEnum MAT_SYMMETRY_ETERNAL,MAT_NOT_SYMMETRY_ETERNAL
126: parameter (MAT_ROW_ORIENTED=1,MAT_COLUMN_ORIENTED=2)
127: parameter (MAT_ROWS_SORTED=4,MAT_COLUMNS_SORTED=8)
128: parameter (MAT_NO_NEW_NONZERO_LOCATIONS=16)
129: parameter (MAT_YES_NEW_NONZERO_LOCATIONS=32)
130: parameter (MAT_SYMMETRIC=64,MAT_STRUCTURALLY_SYMMETRIC=65)
131: parameter (MAT_NO_NEW_DIAGONALS=66,MAT_YES_NEW_DIAGONALS=67)
132: parameter (MAT_INODE_LIMIT_1=68,MAT_INODE_LIMIT_2=69)
133: parameter (MAT_INODE_LIMIT_3=70,MAT_INODE_LIMIT_4=71)
134: parameter (MAT_INODE_LIMIT_5=72,MAT_IGNORE_OFF_PROC_ENTRIES=73)
135: parameter (MAT_ROWS_UNSORTED=74,MAT_COLUMNS_UNSORTED=75)
136: parameter (MAT_NEW_NONZERO_LOCATION_ERR=76)
137: parameter (MAT_NEW_NONZERO_ALLOCATION_ERR=77)
138: parameter (MAT_USE_HASH_TABLE=78)
139: parameter (MAT_KEEP_ZEROED_ROWS=79)
140: parameter (MAT_IGNORE_ZERO_ENTRIES=80)
141: parameter (MAT_USE_INODES=81,MAT_DO_NOT_USE_INODES=82)
142: parameter (MAT_NOT_SYMMETRIC=83,MAT_HERMITIAN=84)
143: parameter (MAT_NOT_STRUCTURALLY_SYMMETRIC=85)
144: parameter (MAT_NOT_HERMITIAN=86)
145: parameter (MAT_SYMMETRY_ETERNAL=87,MAT_NOT_SYMMETRY_ETERNAL=88)
147: !
148: ! MatDuplicateOption
149: !
150: PetscEnum MAT_DO_NOT_COPY_VALUES,MAT_COPY_VALUES
151: parameter (MAT_DO_NOT_COPY_VALUES=0,MAT_COPY_VALUES=1)
152: !
153: ! Flags for PCSetOperators()
154: !
155: PetscEnum SAME_NONZERO_PATTERN,DIFFERENT_NONZERO_PATTERN
156: PetscEnum SAME_PRECONDITIONER
158: parameter (SAME_NONZERO_PATTERN = 0,DIFFERENT_NONZERO_PATTERN = 1)
159: parameter (SAME_PRECONDITIONER = 2)
161: !
162: ! Note: MAT_INFO_SIZE must equal # elements in MatInfo structure
163: ! (See petsc/include/petscmat.h)
164: !
165: PetscEnum MAT_INFO_SIZE
167: parameter (MAT_INFO_SIZE=14)
169: PetscEnum MAT_INFO_ROWS_GLOBAL,MAT_INFO_COLUMNS_GLOBAL
170: PetscEnum MAT_INFO_ROWS_LOCAL,MAT_INFO_COLUMNS_LOCAL
171: PetscEnum MAT_INFO_BLOCK_SIZE,MAT_INFO_NZ_ALLOCATED
172: PetscEnum MAT_INFO_NZ_USED,MAT_INFO_NZ_UNNEEDED
173: PetscEnum MAT_INFO_MEMORY,MAT_INFO_ASSEMBLIES
174: PetscEnum MAT_INFO_MALLOCS,MAT_INFO_FILL_RATIO_GIVEN
175: PetscEnum MAT_INFO_FILL_RATIO_NEEDED,MAT_INFO_FACTOR_MALLOCS
177: parameter (MAT_INFO_ROWS_GLOBAL=1,MAT_INFO_COLUMNS_GLOBAL=2)
178: parameter (MAT_INFO_ROWS_LOCAL=3,MAT_INFO_COLUMNS_LOCAL=4)
179: parameter (MAT_INFO_BLOCK_SIZE=5,MAT_INFO_NZ_ALLOCATED=6)
180: parameter (MAT_INFO_NZ_USED=7,MAT_INFO_NZ_UNNEEDED=8)
181: parameter (MAT_INFO_MEMORY=9,MAT_INFO_ASSEMBLIES=10)
182: parameter (MAT_INFO_MALLOCS=11,MAT_INFO_FILL_RATIO_GIVEN=12)
183: parameter (MAT_INFO_FILL_RATIO_NEEDED=13)
184: parameter (MAT_INFO_FACTOR_MALLOCS=14)
185: !
186: ! MatReuse
187: !
188: PetscEnum MAT_INITIAL_MATRIX,MAT_REUSE_MATRIX
190: parameter (MAT_INITIAL_MATRIX=0,MAT_REUSE_MATRIX=1)
192: !
193: ! MatInfoType
194: !
195: PetscEnum MAT_LOCAL,MAT_GLOBAL_MAX,MAT_GLOBAL_SUM
197: parameter (MAT_LOCAL=1,MAT_GLOBAL_MAX=2,MAT_GLOBAL_SUM=3)
199: !
200: ! Note: MAT_FACTORINFO_SIZE must equal # elements in MatFactorInfo structure
201: ! (See petsc/include/petscmat.h)
202: !
203: PetscEnum MAT_FACTORINFO_SIZE
205: parameter (MAT_FACTORINFO_SIZE=11)
207: PetscEnum MAT_FACTORINFO_LEVELS
208: PetscEnum MAT_FACTORINFO_FILL
209: PetscEnum MAT_FACTORINFO_DIAGONAL_FILL
210: PetscEnum MAT_FACTORINFO_DT
211: PetscEnum MAT_FACTORINFO_DTCOL
212: PetscEnum MAT_FACTORINFO_DTCOUNT
213: PetscEnum MAT_FACTORINFO_DAMPING
214: PetscEnum MAT_FACTORINFO_SHIFT
215: PetscEnum MAT_FACTORINFO_SHIFT_FRACTION
216: PetscEnum MAT_FACTORINFO_ZERO_PIVOT
217: PetscEnum MAT_FACTORINFO_PIVOT_IN_BLOCKS
219: parameter (MAT_FACTORINFO_DAMPING = 1)
220: parameter (MAT_FACTORINFO_SHIFT = 2)
221: parameter (MAT_FACTORINFO_SHIFT_FRACTION = 3)
222: parameter (MAT_FACTORINFO_DIAGONAL_FILL = 4)
223: parameter (MAT_FACTORINFO_DT = 5)
224: parameter (MAT_FACTORINFO_DTCOL = 6)
225: parameter (MAT_FACTORINFO_DTCOUNT = 7)
226: parameter (MAT_FACTORINFO_LEVELS = 8)
227: parameter (MAT_FACTORINFO_FILL = 9)
228: parameter (MAT_FACTORINFO_PIVOT_IN_BLOCKS = 10)
229: parameter (MAT_FACTORINFO_ZERO_PIVOT = 11)
232: !
233: ! Options for SOR and SSOR
234: ! MatSorType may be bitwise ORd together, so do not change the numbers
235: !
236: PetscEnum SOR_FORWARD_SWEEP,SOR_BACKWARD_SWEEP,SOR_SYMMETRIC_SWEEP
237: PetscEnum SOR_LOCAL_FORWARD_SWEEP,SOR_LOCAL_BACKWARD_SWEEP
238: PetscEnum SOR_LOCAL_SYMMETRIC_SWEEP,SOR_ZERO_INITIAL_GUESS
239: PetscEnum SOR_EISENSTAT,SOR_APPLY_UPPER,SOR_APPLY_LOWER
241: parameter (SOR_FORWARD_SWEEP=1,SOR_BACKWARD_SWEEP=2)
242: parameter (SOR_SYMMETRIC_SWEEP=3,SOR_LOCAL_FORWARD_SWEEP=4)
243: parameter (SOR_LOCAL_BACKWARD_SWEEP=8)
244: parameter (SOR_LOCAL_SYMMETRIC_SWEEP=12)
245: parameter (SOR_ZERO_INITIAL_GUESS=16,SOR_EISENSTAT=32)
246: parameter (SOR_APPLY_UPPER=64,SOR_APPLY_LOWER=128)
247: !
248: ! MatOperation
249: !
250: PetscEnum MATOP_SET_VALUES
251: PetscEnum MATOP_GET_ROW
252: PetscEnum MATOP_RESTORE_ROW
253: PetscEnum MATOP_MULT
254: PetscEnum MATOP_MULT_ADD
255: PetscEnum MATOP_MULT_TRANSPOSE
256: PetscEnum MATOP_MULT_TRANSPOSE_ADD
257: PetscEnum MATOP_SOLVE
258: PetscEnum MATOP_SOLVE_ADD
259: PetscEnum MATOP_SOLVE_TRANSPOSE
260: PetscEnum MATOP_SOLVE_TRANSPOSE_ADD
261: PetscEnum MATOP_LUFACTOR
262: PetscEnum MATOP_CHOLESKYFACTOR
263: PetscEnum MATOP_RELAX
264: PetscEnum MATOP_TRANSPOSE
265: PetscEnum MATOP_GETINFO
266: PetscEnum MATOP_EQUAL
267: PetscEnum MATOP_GET_DIAGONAL
268: PetscEnum MATOP_DIAGONAL_SCALE
269: PetscEnum MATOP_NORM
270: PetscEnum MATOP_ASSEMBLY_BEGIN
271: PetscEnum MATOP_ASSEMBLY_END
272: PetscEnum MATOP_COMPRESS
273: PetscEnum MATOP_SET_OPTION
274: PetscEnum MATOP_ZERO_ENTRIES
275: PetscEnum MATOP_ZERO_ROWS
276: PetscEnum MATOP_LUFACTOR_SYMBOLIC
277: PetscEnum MATOP_LUFACTOR_NUMERIC
278: PetscEnum MATOP_CHOLESKY_FACTOR_SYMBOLIC
279: PetscEnum MATOP_CHOLESKY_FACTOR_NUMERIC
280: PetscEnum MATOP_SETUP_PREALLOCATION
281: PetscEnum MATOP_ILUFACTOR_SYMBOLIC
282: PetscEnum MATOP_ICCFACTOR_SYMBOLIC
283: PetscEnum MATOP_GET_ARRAY
284: PetscEnum MATOP_RESTORE_ARRAY
286: PetscEnum MATOP_DUPLICATE
287: PetscEnum MATOP_FORWARD_SOLVE
288: PetscEnum MATOP_BACKWARD_SOLVE
289: PetscEnum MATOP_ILUFACTOR
290: PetscEnum MATOP_ICCFACTOR
291: PetscEnum MATOP_AXPY
292: PetscEnum MATOP_GET_SUBMATRICES
293: PetscEnum MATOP_INCREASE_OVERLAP
294: PetscEnum MATOP_GET_VALUES
295: PetscEnum MATOP_COPY
296: PetscEnum MATOP_PRINT_HELP
297: PetscEnum MATOP_SCALE
298: PetscEnum MATOP_SHIFT
299: PetscEnum MATOP_DIAGONAL_SHIFT
300: PetscEnum MATOP_ILUDT_FACTOR
301: PetscEnum MATOP_GET_BLOCK_SIZE
303: PetscEnum MATOP_GET_ROW_IJ
304: PetscEnum MATOP_RESTORE_ROW_IJ
305: PetscEnum MATOP_GET_COLUMN_IJ
306: PetscEnum MATOP_RESTORE_COLUMN_IJ
307: PetscEnum MATOP_FDCOLORING_CREATE
308: PetscEnum MATOP_COLORING_PATCH
309: PetscEnum MATOP_SET_UNFACTORED
310: PetscEnum MATOP_PERMUTE
311: PetscEnum MATOP_SET_VALUES_BLOCKED
312: PetscEnum MATOP_GET_SUBMATRIX
313: PetscEnum MATOP_DESTROY
314: PetscEnum MATOP_VIEW
315: PetscEnum MATOP_GET_MAPS
316: PetscEnum MATOP_USE_SCALED_FORM
317: PetscEnum MATOP_SCALE_SYSTEM
318: PetscEnum MATOP_UNSCALE_SYSTEM
319: PetscEnum MATOP_SET_LOCAL_TO_GLOBAL_MAP
320: PetscEnum MATOP_SET_VALUES_LOCAL
321: PetscEnum MATOP_ZERO_ROWS_LOCAL
322: PetscEnum MATOP_GET_ROW_MAX
323: PetscEnum MATOP_CONVERT
324: PetscEnum MATOP_SET_COLORING
325: PetscEnum MATOP_SET_VALUES_ADIC
326: PetscEnum MATOP_SET_VALUES_ADIFOR
327: PetscEnum MATOP_FD_COLORING_APPLY
328: PetscEnum MATOP_SET_FROM_OPTIONS
329: PetscEnum MATOP_MULT_CON
330: PetscEnum MATOP_MULT_TRANSPOSE_CON
331: PetscEnum MATOP_ILU_FACTOR_SYMBOLIC_CON
332: PetscEnum MATOP_PERMUTE_SPARSIFY
333: PetscEnum MATOP_MULT_MULTIPLE
334: PetscEnum MATOP_SOLVE_MULTIPLE
335: PetscEnum MATOP_GET_INERTIA
336: PetscEnum MATOP_LOAD
337: PetscEnum MATOP_IS_SYMMETRIC
338: PetscEnum MATOP_IS_HERMITIAN
339: PetscEnum MATOP_IS_STRUCTURALLY_SYMMETRIC
340: PetscEnum MATOP_PB_RELAX
341: PetscEnum MATOP_GET_VECS
342: PetscEnum MATOP_MAT_MULT
343: PetscEnum MATOP_MAT_MULT_SYMBOLIC
344: PetscEnum MATOP_MAT_MULT_NUMERIC
345: PetscEnum MATOP_PTAP
346: PetscEnum MATOP_PTAP_SYMBOLIC
347: PetscEnum MATOP_PTAP_NUMERIC
349: parameter(MATOP_SET_VALUES=0)
350: parameter(MATOP_GET_ROW=1)
351: parameter(MATOP_RESTORE_ROW=2)
352: parameter(MATOP_MULT=3)
353: parameter(MATOP_MULT_ADD=4)
354: parameter(MATOP_MULT_TRANSPOSE=5)
355: parameter(MATOP_MULT_TRANSPOSE_ADD=6)
356: parameter(MATOP_SOLVE=7)
357: parameter(MATOP_SOLVE_ADD=8)
358: parameter(MATOP_SOLVE_TRANSPOSE=9)
359: parameter(MATOP_SOLVE_TRANSPOSE_ADD=10)
360: parameter(MATOP_LUFACTOR=11)
361: parameter(MATOP_CHOLESKYFACTOR=12)
362: parameter(MATOP_RELAX=13)
363: parameter(MATOP_TRANSPOSE=14)
364: parameter(MATOP_GETINFO=15)
365: parameter(MATOP_EQUAL=16)
366: parameter(MATOP_GET_DIAGONAL=17)
367: parameter(MATOP_DIAGONAL_SCALE=18)
368: parameter(MATOP_NORM=19)
369: parameter(MATOP_ASSEMBLY_BEGIN=20)
370: parameter(MATOP_ASSEMBLY_END=21)
371: parameter(MATOP_COMPRESS=22)
372: parameter(MATOP_SET_OPTION=23)
373: parameter(MATOP_ZERO_ENTRIES=24)
374: parameter(MATOP_ZERO_ROWS=25)
375: parameter(MATOP_LUFACTOR_SYMBOLIC=26)
376: parameter(MATOP_LUFACTOR_NUMERIC=27)
377: parameter(MATOP_CHOLESKY_FACTOR_SYMBOLIC=28)
378: parameter(MATOP_CHOLESKY_FACTOR_NUMERIC=29)
379: parameter(MATOP_SETUP_PREALLOCATION=30)
380: parameter(MATOP_ILUFACTOR_SYMBOLIC=31)
381: parameter(MATOP_ICCFACTOR_SYMBOLIC=32)
382: parameter(MATOP_GET_ARRAY=33)
383: parameter(MATOP_RESTORE_ARRAY=34)
384: parameter(MATOP_DUPLICATE=35)
385: parameter(MATOP_FORWARD_SOLVE=36)
386: parameter(MATOP_BACKWARD_SOLVE=37)
387: parameter(MATOP_ILUFACTOR=38)
388: parameter(MATOP_ICCFACTOR=39)
389: parameter(MATOP_AXPY=40)
390: parameter(MATOP_GET_SUBMATRICES=41)
391: parameter(MATOP_INCREASE_OVERLAP=42)
392: parameter(MATOP_GET_VALUES=43)
393: parameter(MATOP_COPY=44)
394: parameter(MATOP_PRINT_HELP=45)
395: parameter(MATOP_SCALE=46)
396: parameter(MATOP_SHIFT=47)
397: parameter(MATOP_DIAGONAL_SHIFT=48)
398: parameter(MATOP_ILUDT_FACTOR=49)
399: parameter(MATOP_GET_BLOCK_SIZE=50)
400: parameter(MATOP_GET_ROW_IJ=51)
401: parameter(MATOP_RESTORE_ROW_IJ=52)
402: parameter(MATOP_GET_COLUMN_IJ=53)
403: parameter(MATOP_RESTORE_COLUMN_IJ=54)
404: parameter(MATOP_FDCOLORING_CREATE=55)
405: parameter(MATOP_COLORING_PATCH=56)
406: parameter(MATOP_SET_UNFACTORED=57)
407: parameter(MATOP_PERMUTE=58)
408: parameter(MATOP_SET_VALUES_BLOCKED=59)
409: parameter(MATOP_GET_SUBMATRIX=60)
410: parameter(MATOP_DESTROY=61)
411: parameter(MATOP_VIEW=62)
412: parameter(MATOP_GET_MAPS=63)
413: parameter(MATOP_USE_SCALED_FORM=64)
414: parameter(MATOP_SCALE_SYSTEM=65)
415: parameter(MATOP_UNSCALE_SYSTEM=66)
416: parameter(MATOP_SET_LOCAL_TO_GLOBAL_MAP=67)
417: parameter(MATOP_SET_VALUES_LOCAL=68)
418: parameter(MATOP_ZERO_ROWS_LOCAL=69)
419: parameter(MATOP_GET_ROW_MAX=70)
420: parameter(MATOP_CONVERT=71)
421: parameter(MATOP_SET_COLORING=72)
422: parameter(MATOP_SET_VALUES_ADIC=73)
423: parameter(MATOP_SET_VALUES_ADIFOR=74)
424: parameter(MATOP_FD_COLORING_APPLY=75)
425: parameter(MATOP_SET_FROM_OPTIONS=76)
426: parameter(MATOP_MULT_CON=77)
427: parameter(MATOP_MULT_TRANSPOSE_CON=78)
428: parameter(MATOP_ILU_FACTOR_SYMBOLIC_CON=79)
429: parameter(MATOP_PERMUTE_SPARSIFY=80)
430: parameter(MATOP_MULT_MULTIPLE=81)
431: parameter(MATOP_SOLVE_MULTIPLE=82)
432: parameter(MATOP_GET_INERTIA=83)
433: parameter(MATOP_LOAD=84)
434: parameter(MATOP_IS_SYMMETRIC=85)
435: parameter(MATOP_IS_HERMITIAN=86)
436: parameter(MATOP_IS_STRUCTURALLY_SYMMETRIC=87)
437: parameter(MATOP_PB_RELAX=88)
438: parameter(MATOP_GET_VECS=89)
439: parameter(MATOP_MAT_MULT=90)
440: parameter(MATOP_MAT_MULT_SYMBOLIC=91)
441: parameter(MATOP_MAT_MULT_NUMERIC=92)
442: parameter(MATOP_PTAP=93)
443: parameter(MATOP_PTAP_SYMBOLIC=94)
444: parameter(MATOP_PTAP_NUMERIC=95)
445: !
446: !
447: !
448: PetscEnum MATRIX_BINARY_FORMAT_DENSE
449: parameter (MATRIX_BINARY_FORMAT_DENSE=-1)
450: !
451: ! End of Fortran include file for the Mat package in PETSc
452: !
453: #endif