Actual source code: petscviewer.h

petsc-3.12.5 2020-03-29
Report Typos and Errors
  1: !
  2: !  Include file for Fortran use of the PetscViewer package in PETSc
  3: !
  4: #include "petsc/finclude/petscviewer.h"

  6:       type tPetscViewer
  7:         PetscFortranAddr:: v PETSC_FORTRAN_TYPE_INITIALIZE
  8:       end type tPetscViewer

 10:       PetscViewer, parameter :: PETSC_NULL_VIEWER                          &
 11:      &            = tPetscViewer(0)
 12: !
 13: !     The numbers used below should match those in
 14: !     petsc/private/fortranimpl.h
 15: !
 16:       PetscViewer, parameter :: PETSC_VIEWER_STDOUT_SELF =                &
 17:      &           tPetscViewer(9)
 18:       PetscViewer, parameter :: PETSC_VIEWER_DRAW_WORLD   =                &
 19:      &           tPetscViewer(4)
 20:       PetscViewer, parameter :: PETSC_VIEWER_DRAW_SELF    =                &
 21:      &           tPetscViewer(5)
 22:       PetscViewer, parameter :: PETSC_VIEWER_SOCKET_WORLD =                &
 23:      &           tPetscViewer(6)
 24:       PetscViewer, parameter :: PETSC_VIEWER_SOCKET_SELF  =                &
 25:      &           tPetscViewer(7)
 26:       PetscViewer, parameter :: PETSC_VIEWER_STDOUT_WORLD =                &
 27:      &           tPetscViewer(8)
 28:       PetscViewer, parameter :: PETSC_VIEWER_STDERR_WORLD =                &
 29:      &           tPetscViewer(10)
 30:       PetscViewer, parameter :: PETSC_VIEWER_STDERR_SELF  =                &
 31:      &           tPetscViewer(11)
 32:       PetscViewer, parameter :: PETSC_VIEWER_BINARY_WORLD =                &
 33:      &           tPetscViewer(12)
 34:       PetscViewer, parameter :: PETSC_VIEWER_BINARY_SELF  =                &
 35:      &           tPetscViewer(13)
 36:       PetscViewer, parameter :: PETSC_VIEWER_MATLAB_WORLD =                &
 37:      &           tPetscViewer(14)
 38:       PetscViewer, parameter :: PETSC_VIEWER_MATLAB_SELF  =                &
 39:      &           tPetscViewer(15)

 41:       PetscViewer PETSC_VIEWER_STDOUT_
 42:       PetscViewer PETSC_VIEWER_DRAW_
 43:       external PETSC_VIEWER_STDOUT_
 44:       external PETSC_VIEWER_DRAW_
 45:       external PetscViewerAndFormatDestroy
 46: !
 47: !  Flags for binary I/O
 48: !
 49:       PetscEnum FILE_MODE_READ
 50:       PetscEnum FILE_MODE_WRITE
 51:       PetscEnum FILE_MODE_APPEND
 52:       PetscEnum FILE_MODE_UPDATE
 53:       PetscEnum FILE_MODE_APPEND_UPDATE

 55:       parameter (FILE_MODE_READ = 0)
 56:       parameter (FILE_MODE_WRITE = 1)
 57:       parameter (FILE_MODE_APPEND = 2)
 58:       parameter (FILE_MODE_UPDATE = 3)
 59:       parameter (FILE_MODE_APPEND_UPDATE = 4)

 61: !
 62: !  PetscViewer formats
 63: !
 64:       PetscEnum PETSC_VIEWER_DEFAULT
 65:       PetscEnum PETSC_VIEWER_ASCII_MATLAB
 66:       PetscEnum PETSC_VIEWER_ASCII_MATHEMATICA
 67:       PetscEnum PETSC_VIEWER_ASCII_IMPL
 68:       PetscEnum PETSC_VIEWER_ASCII_INFO
 69:       PetscEnum PETSC_VIEWER_ASCII_INFO_DETAIL
 70:       PetscEnum PETSC_VIEWER_ASCII_COMMON
 71:       PetscEnum PETSC_VIEWER_ASCII_SYMMODU
 72:       PetscEnum PETSC_VIEWER_ASCII_INDEX
 73:       PetscEnum PETSC_VIEWER_ASCII_DENSE
 74:       PetscEnum PETSC_VIEWER_ASCII_MATRIXMARKET
 75:       PetscEnum PETSC_VIEWER_ASCII_VTK
 76:       PetscEnum PETSC_VIEWER_ASCII_VTK_CELL
 77:       PetscEnum PETSC_VIEWER_ASCII_VTK_COORDS
 78:       PetscEnum PETSC_VIEWER_ASCII_PCICE
 79:       PetscEnum PETSC_VIEWER_ASCII_PYTHON
 80:       PetscEnum PETSC_VIEWER_ASCII_FACTOR_INFO
 81:       PetscEnum PETSC_VIEWER_ASCII_LATEX
 82:       PetscEnum PETSC_VIEWER_ASCII_XML
 83:       PetscEnum PETSC_VIEWER_ASCII_GLVIS
 84:       PetscEnum PETSC_VIEWER_ASCII_CSV
 85:       PetscEnum PETSC_VIEWER_DRAW_BASIC
 86:       PetscEnum PETSC_VIEWER_DRAW_LG
 87:       PetscEnum PETSC_VIEWER_DRAW_LG_XRANGE
 88:       PetscEnum PETSC_VIEWER_DRAW_CONTOUR
 89:       PetscEnum PETSC_VIEWER_DRAW_PORTS
 90:       PetscEnum PETSC_VIEWER_VTK_VTS
 91:       PetscEnum PETSC_VIEWER_VTK_VTR
 92:       PetscEnum PETSC_VIEWER_VTK_VTU
 93:       PetscEnum PETSC_VIEWER_BINARY_MATLAB
 94:       PetscEnum PETSC_VIEWER_NATIVE
 95:       PetscEnum PETSC_VIEWER_HDF5_PETSC
 96:       PetscEnum PETSC_VIEWER_HDF5_VIZ
 97:       PetscEnum PETSC_VIEWER_HDF5_XDMF
 98:       PetscEnum PETSC_VIEWER_HDF5_MAT
 99:       PetscEnum PETSC_VIEWER_NOFORMAT
100:       PetscEnum PETSC_VIEWER_LOAD_BALANCE

102:       parameter (PETSC_VIEWER_DEFAULT = 0)
103:       parameter (PETSC_VIEWER_ASCII_MATLAB = 1)
104:       parameter (PETSC_VIEWER_ASCII_MATHEMATICA = 2)
105:       parameter (PETSC_VIEWER_ASCII_IMPL = 3)
106:       parameter (PETSC_VIEWER_ASCII_INFO = 4)
107:       parameter (PETSC_VIEWER_ASCII_INFO_DETAIL = 5)
108:       parameter (PETSC_VIEWER_ASCII_COMMON = 6)
109:       parameter (PETSC_VIEWER_ASCII_SYMMODU = 7)
110:       parameter (PETSC_VIEWER_ASCII_INDEX = 8)
111:       parameter (PETSC_VIEWER_ASCII_DENSE = 9)
112:       parameter (PETSC_VIEWER_ASCII_MATRIXMARKET = 10)
113:       parameter (PETSC_VIEWER_ASCII_VTK = 11)
114:       parameter (PETSC_VIEWER_ASCII_VTK_CELL = 12)
115:       parameter (PETSC_VIEWER_ASCII_VTK_COORDS = 13)
116:       parameter (PETSC_VIEWER_ASCII_PCICE = 14)
117:       parameter (PETSC_VIEWER_ASCII_PYTHON = 15)
118:       parameter (PETSC_VIEWER_ASCII_FACTOR_INFO = 16)
119:       parameter (PETSC_VIEWER_ASCII_LATEX = 17)
120:       parameter (PETSC_VIEWER_ASCII_XML = 18)
121:       parameter (PETSC_VIEWER_ASCII_GLVIS = 19)
122:       parameter (PETSC_VIEWER_ASCII_CSV = 20)
123:       parameter (PETSC_VIEWER_DRAW_BASIC = 21)
124:       parameter (PETSC_VIEWER_DRAW_LG = 22)
125:       parameter (PETSC_VIEWER_DRAW_LG_XRANGE = 23)
126:       parameter (PETSC_VIEWER_DRAW_CONTOUR = 24)
127:       parameter (PETSC_VIEWER_DRAW_PORTS = 25)
128:       parameter (PETSC_VIEWER_VTK_VTS = 26)
129:       parameter (PETSC_VIEWER_VTK_VTR = 27)
130:       parameter (PETSC_VIEWER_VTK_VTU = 28)
131:       parameter (PETSC_VIEWER_BINARY_MATLAB = 29)
132:       parameter (PETSC_VIEWER_NATIVE = 30)
133:       parameter (PETSC_VIEWER_HDF5_PETSC = 31)
134:       parameter (PETSC_VIEWER_HDF5_VIZ = 32)
135:       parameter (PETSC_VIEWER_HDF5_XDMF = 33)
136:       parameter (PETSC_VIEWER_HDF5_MAT = 34)
137:       parameter (PETSC_VIEWER_NOFORMAT = 35)
138:       parameter (PETSC_VIEWER_LOAD_BALANCE = 36)
139: !
140: !  End of Fortran include file for the PetscViewer package in PETSc

142: #if defined(_WIN32) && defined(PETSC_USE_SHARED_LIBRARIES)
143: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_NULL_VIEWER
144: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_STDOUT_SELF
145: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_WORLD
146: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_SELF
147: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_SOCKET_WORLD
148: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_SOCKET_SELF
149: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_STDOUT_WORLD
150: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_STDERR_WORLD
151: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_STDERR_SELF
152: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_BINARY_WORLD
153: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_BINARY_SELF
154: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_MATLAB_WORLD
155: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_MATLAB_SELF
156: !DEC$ ATTRIBUTES DLLEXPORT::FILE_MODE_READ
157: !DEC$ ATTRIBUTES DLLEXPORT::FILE_MODE_WRITE
158: !DEC$ ATTRIBUTES DLLEXPORT::FILE_MODE_APPEND
159: !DEC$ ATTRIBUTES DLLEXPORT::FILE_MODE_UPDATE
160: !DEC$ ATTRIBUTES DLLEXPORT::FILE_MODE_APPEND_UPDATE
161: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DEFAULT
162: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_MATLAB
163: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_MATHEMATICA
164: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_IMPL
165: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_INFO
166: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_INFO_DETAIL
167: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_COMMON
168: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_SYMMODU
169: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_INDEX
170: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_DENSE
171: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_MATRIXMARKET
172: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_VTK
173: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_VTK_CELL
174: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_VTK_COORDS
175: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_PCICE
176: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_PYTHON
177: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_FACTOR_INFO
178: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_LATEX
179: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_XML
180: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_GLVIS
181: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_BASIC
182: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_LG
183: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_CONTOUR
184: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_PORTS
185: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_VTK_VTS
186: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_VTK_VTR
187: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_VTK_VTU
188: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_BINARY_MATLAB
189: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_NATIVE
190: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_HDF5_VIZ
191: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_NOFORMAT
192: #endif