Actual source code: petscviewer.h

petsc-3.8.3 2017-12-09
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
  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:       external PETSC_VIEWER_STDOUT_
 43:       external PetscViewerAndFormatDestroy
 44: !
 45: !  Flags for binary I/O
 46: !
 47:       PetscEnum FILE_MODE_READ
 48:       PetscEnum FILE_MODE_WRITE
 49:       PetscEnum FILE_MODE_APPEND
 50:       PetscEnum FILE_MODE_UPDATE
 51:       PetscEnum FILE_MODE_APPEND_UPDATE

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

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

 94:       parameter (PETSC_VIEWER_DEFAULT = 0)
 95:       parameter (PETSC_VIEWER_ASCII_MATLAB = 1)
 96:       parameter (PETSC_VIEWER_ASCII_MATHEMATICA = 2)
 97:       parameter (PETSC_VIEWER_ASCII_IMPL = 3)
 98:       parameter (PETSC_VIEWER_ASCII_INFO = 4)
 99:       parameter (PETSC_VIEWER_ASCII_INFO_DETAIL = 5)
100:       parameter (PETSC_VIEWER_ASCII_COMMON = 6)
101:       parameter (PETSC_VIEWER_ASCII_SYMMODU = 7)
102:       parameter (PETSC_VIEWER_ASCII_INDEX = 8)
103:       parameter (PETSC_VIEWER_ASCII_DENSE = 9)
104:       parameter (PETSC_VIEWER_ASCII_MATRIXMARKET = 10)
105:       parameter (PETSC_VIEWER_ASCII_VTK = 11)
106:       parameter (PETSC_VIEWER_ASCII_VTK_CELL = 12)
107:       parameter (PETSC_VIEWER_ASCII_VTK_COORDS = 13)
108:       parameter (PETSC_VIEWER_ASCII_PCICE = 14)
109:       parameter (PETSC_VIEWER_ASCII_PYTHON = 15)
110:       parameter (PETSC_VIEWER_ASCII_FACTOR_INFO = 16)
111:       parameter (PETSC_VIEWER_ASCII_LATEX = 17)
112:       parameter (PETSC_VIEWER_ASCII_XML = 18)
113:       parameter (PETSC_VIEWER_ASCII_GLVIS = 19)
114:       parameter (PETSC_VIEWER_DRAW_BASIC = 20)
115:       parameter (PETSC_VIEWER_DRAW_LG = 21)
116:       parameter (PETSC_VIEWER_DRAW_CONTOUR = 22)
117:       parameter (PETSC_VIEWER_DRAW_PORTS = 23)
118:       parameter (PETSC_VIEWER_VTK_VTS = 24)
119:       parameter (PETSC_VIEWER_VTK_VTR = 25)
120:       parameter (PETSC_VIEWER_VTK_VTU = 26)
121:       parameter (PETSC_VIEWER_BINARY_MATLAB = 27)
122:       parameter (PETSC_VIEWER_NATIVE = 28)
123:       parameter (PETSC_VIEWER_HDF5_VIZ = 29)
124:       parameter (PETSC_VIEWER_NOFORMAT = 30)
125: !
126: !  End of Fortran include file for the PetscViewer package in PETSc