Actual source code: petscviewer.h
petsc-3.8.4 2018-03-24
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
8: end type tPetscViewer
10: PetscViewer, parameter :: PETSC_NULL_VIEWER &
11: & = tPetscViewer(-1)
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_DRAW_BASIC
85: PetscEnum PETSC_VIEWER_DRAW_LG
86: PetscEnum PETSC_VIEWER_DRAW_CONTOUR
87: PetscEnum PETSC_VIEWER_DRAW_PORTS
88: PetscEnum PETSC_VIEWER_VTK_VTS
89: PetscEnum PETSC_VIEWER_VTK_VTR
90: PetscEnum PETSC_VIEWER_VTK_VTU
91: PetscEnum PETSC_VIEWER_BINARY_MATLAB
92: PetscEnum PETSC_VIEWER_NATIVE
93: PetscEnum PETSC_VIEWER_HDF5_VIZ
94: PetscEnum PETSC_VIEWER_NOFORMAT
96: parameter (PETSC_VIEWER_DEFAULT = 0)
97: parameter (PETSC_VIEWER_ASCII_MATLAB = 1)
98: parameter (PETSC_VIEWER_ASCII_MATHEMATICA = 2)
99: parameter (PETSC_VIEWER_ASCII_IMPL = 3)
100: parameter (PETSC_VIEWER_ASCII_INFO = 4)
101: parameter (PETSC_VIEWER_ASCII_INFO_DETAIL = 5)
102: parameter (PETSC_VIEWER_ASCII_COMMON = 6)
103: parameter (PETSC_VIEWER_ASCII_SYMMODU = 7)
104: parameter (PETSC_VIEWER_ASCII_INDEX = 8)
105: parameter (PETSC_VIEWER_ASCII_DENSE = 9)
106: parameter (PETSC_VIEWER_ASCII_MATRIXMARKET = 10)
107: parameter (PETSC_VIEWER_ASCII_VTK = 11)
108: parameter (PETSC_VIEWER_ASCII_VTK_CELL = 12)
109: parameter (PETSC_VIEWER_ASCII_VTK_COORDS = 13)
110: parameter (PETSC_VIEWER_ASCII_PCICE = 14)
111: parameter (PETSC_VIEWER_ASCII_PYTHON = 15)
112: parameter (PETSC_VIEWER_ASCII_FACTOR_INFO = 16)
113: parameter (PETSC_VIEWER_ASCII_LATEX = 17)
114: parameter (PETSC_VIEWER_ASCII_XML = 18)
115: parameter (PETSC_VIEWER_ASCII_GLVIS = 19)
116: parameter (PETSC_VIEWER_DRAW_BASIC = 20)
117: parameter (PETSC_VIEWER_DRAW_LG = 21)
118: parameter (PETSC_VIEWER_DRAW_CONTOUR = 22)
119: parameter (PETSC_VIEWER_DRAW_PORTS = 23)
120: parameter (PETSC_VIEWER_VTK_VTS = 24)
121: parameter (PETSC_VIEWER_VTK_VTR = 25)
122: parameter (PETSC_VIEWER_VTK_VTU = 26)
123: parameter (PETSC_VIEWER_BINARY_MATLAB = 27)
124: parameter (PETSC_VIEWER_NATIVE = 28)
125: parameter (PETSC_VIEWER_HDF5_VIZ = 29)
126: parameter (PETSC_VIEWER_NOFORMAT = 30)
127: !
128: ! End of Fortran include file for the PetscViewer package in PETSc