Actual source code: petscmat.h

petsc-master 2019-11-16
Report Typos and Errors
  1: !
  2: !
  3: !  Include file for Fortran use of the Mat package in PETSc
  4: !
  5: #if !defined (PETSCMATDEF_H)
  6: #define PETSCMATDEF_H

  8: #include "petsc/finclude/petscvec.h"

 10: #define Mat type(tMat)
 11: #define MatNullSpace type(tMatNullSpace)
 12: #define MatFDColoring type(tMatFDColoring)

 14: #define MatColoring PetscFortranAddr
 15: #define MatPartitioning PetscFortranAddr
 16: #define MatCoarsen PetscFortranAddr
 17: #define MatAIJIndices PetscFortranAddr
 18: #define MatType character*(80)
 19: #define MatSolverType character*(80)
 20: #define MatOption PetscEnum
 21: #define MatCreateSubMatrixOption PetscEnum
 22: #define MPChacoGlobalType PetscEnum
 23: #define MPChacoLocalType PetscEnum
 24: #define MPChacoEigenType PetscEnum
 25: #define MPPTScotchStragegyType PetscEnum
 26: #define MatAssemblyType PetscEnum
 27: #define MatFactorType PetscEnum
 28: #define MatFactorError PetscEnum
 29: #define MatFactorShiftType PetscEnum
 30: #define MatFactorSchurStatus PetscEnum
 31: #define MatOrderingType character*(80)
 32: #define MatSORType PetscEnum
 33: #define MatInfoType PetscEnum
 34: #define MatReuse PetscEnum
 35: #define MatOperation PetscEnum
 36: #define MatColoringType character*(80)
 37: #define MatInfo PetscLogDouble
 38: #define MatFactorInfo PetscReal
 39: #define MatDuplicateOption PetscEnum
 40: #define MatStructure PetscEnum
 41: #define MatPartitioningType character*(80)
 42: #define MatCoarsenType character*(80)
 43: #define MatCompositeType PetscEnum
 44: #define MatCompositeMergeType PetscEnum
 45: #define MatStencil PetscInt
 46: #define MatStencil_k 1
 47: #define MatStencil_j 2
 48: #define MatStencil_i 3
 49: #define MatStencil_c 4

 51: #define MATPARTITIONING_CURRENT 'current'
 52: #define MATPARTITIONING_PARMETIS 'parmetis'

 54: #define MATCOARSEN_MIS 'mis'

 56: #define MATCOLORINGNATURAL 'natural'
 57: #define MATCOLORINGSL      'sl'
 58: #define MATCOLORINGLF      'lf'
 59: #define MATCOLORINGID      'id'
 60: #define MATCOLORINGGREEDY  'greedy'
 61: #define MATCOLORINGJP      'jp'

 63: #define MATORDERINGNATURAL   'natural'
 64: #define MATORDERINGND        'nd'
 65: #define MATORDERING1WD       '1wd'
 66: #define MATORDERINGRCM       'rcm'
 67: #define MATORDERINGQMD       'qmd'
 68: #define MATORDERINGROWLENGTH 'rowlength'
 69: #define MATORDERINGWBM       'wbm'
 70: #define MATORDERINGSPECTRAL  'spectral'
 71: #define MATORDERINGAMD       'amd'
 72: !
 73: !  Matrix types
 74: !
 75: #define MATSAME            'same'
 76: #define MATMAIJ            'maij'
 77: #define MATSEQMAIJ         'seqmaij'
 78: #define MATMPIMAIJ         'mpimaij'
 79: #define MATIS              'is'
 80: #define MATAIJ             'aij'
 81: #define MATSEQAIJ          'seqaij'
 82: #define MATMPIAIJ          'mpiaij'
 83: #define MATAIJCRL          'aijcrl'
 84: #define MATSEQAIJCRL       'seqaijcrl'
 85: #define MATMPIAIJCRL       'mpiaijcrl'
 86: #define MATAIJCUSPARSE     'aijcusparse'
 87: #define MATSEQAIJCUSPARSE  'seqaijcusparse'
 88: #define MATMPIAIJCUSPARSE  'mpiaijcusparse'
 89: #define MATAIJVIENNACL     'aijviennacl'
 90: #define MATSEQAIJVIENNACL  'seqaijviennacl'
 91: #define MATMPIAIJVIENNACL  'mpiaijviennacl'
 92: #define MATAIJPERM         'aijperm'
 93: #define MATSEQAIJPERM      'seqaijperm'
 94: #define MATMPIAIJPERM      'mpiaijperm'
 95: #define MATAIJSELL         'aijsell'
 96: #define MATSEQAIJSELL      'seqaijsell'
 97: #define MATMPIAIJSELL      'mpiaijsell'
 98: #define MATAIJMKL          'aijmkl'
 99: #define MATSEQAIJMKL       'seqaijmkl'
100: #define MATMPIAIJMKL       'mpiaijmkl'
101: #define MATBAIJMKL         'baijmkl'
102: #define MATSEQBAIJMKL      'seqbaijmkl'
103: #define MATMPIBAIJMKL      'mpibaijmkl'
104: #define MATSHELL           'shell'
105: #define MATDENSE           'dense'
106: #define MATSEQDENSE        'seqdense'
107: #define MATSEQDENSECUDA    'seqdensecuda'
108: #define MATMPIDENSE        'mpidense'
109: #define MATELEMENTAL       'elemental'
110: #define MATBAIJ            'baij'
111: #define MATSEQBAIJ         'seqbaij'
112: #define MATMPIBAIJ         'mpibaij'
113: #define MATMPIADJ          'mpiadj'
114: #define MATSBAIJ           'sbaij'
115: #define MATSEQSBAIJ        'seqsbaij'
116: #define MATMPISBAIJ        'mpisbaij'

118: #define MATDAAD            'daad'
119: #define MATMFFD            'mffd'
120: #define MATNORMAL          'normal'
121: #define MATNORMALHERMITIAN 'normalh'
122: #define MATLRC             'lrc'
123: #define MATSCATTER         'scatter'
124: #define MATBLOCKMAT        'blockmat'
125: #define MATCOMPOSITE       'composite'
126: #define MATFFT             'fft'
127: #define MATFFTW            'fftw'
128: #define MATSEQCUFFT        'seqcufft'
129: #define MATTRANSPOSEMAT    'transpose'
130: #define MATSCHURCOMPLEMENT 'schurcomplement'
131: #define MATPYTHON          'python'
132: #define MATHYPRESTRUCT     'hyprestruct'
133: #define MATHYPRESSTRUCT    'hypresstruct'
134: #define MATSUBMATRIX       'submatrix'
135: #define MATLOCALREF        'localref'
136: #define MATNEST            'nest'
137: #define MATPREALLOCATOR    'preallocator'
138: #define MATSELL            'sell'
139: #define MATSEQSELL         'seqsell'
140: #define MATMPISELL         'mpisell'
141: #define MATDUMMY           'dummy'

143: !
144: ! MatMFFDType values
145: !
146: #define MATMFFD_DS 'ds'
147: #define MATMFFD_WP 'wp'

149: !
150: ! MatSolverTypes
151: !
152: #define MATSOLVERSUPERLU         'superlu'
153: #define MATSOLVERSUPERLU_DIST    'superlu_dist'
154: #define MATSOLVERSTRUMPACK       'strumpack'
155: #define MATSOLVERUMFPACK         'umfpack'
156: #define MATSOLVERCHOLMOD         'cholmod'
157: #define MATSOLVERSPARSEELEMENTAL 'sparseelemental'
158: #define MATSOLVERKLU             'klu'
159: #define MATSOLVERELEMENTAL       'elemental'
160: #define MATSOLVERESSL            'essl'
161: #define MATSOLVERLUSOL           'lusol'
162: #define MATSOLVERMUMPS           'mumps'
163: #define MATSOLVERMKL_PARDISO     'mkl_pardiso'
164: #define MATSOLVERMKL_CPARDISO    'mkl_cpardiso'
165: #define MATSOLVERPASTIX          'pastix'
166: #define MATSOLVERMATLAB          'matlab'
167: #define MATSOLVERPETSC           'petsc'
168: #define MATSOLVERBAS             'bas'
169: #define MATSOLVERCUSPARSE        'cusparse'
170: #define MATSOLVERCUDA            'cuda'

172: !
173: ! GPU Storage Formats for CUSPARSE
174: !
175: #define MatCUSPARSEStorageFormat PetscEnum
176: #define MatCUSPARSEFormatOperation PetscEnum

178: !
179: ! sparsity reducing ordering for STRUMPACK
180: !
181: #define MatSTRUMPACKReordering PetscEnum

183: #endif