1: !
  2: !  Include file for Fortran use of the PetscViewer package in PETSc
  3: !
  4:  #include petsc/finclude/petscviewerdef.h

  6: #if !defined(PETSC_USE_FORTRAN_DATATYPES)
  7:       PetscViewer PETSC_VIEWER_STDOUT_
  8:       external PETSC_VIEWER_STDOUT_
  9:       external PetscViewerAndFormatDestroy
 10: #endif
 11: !
 12: !  Flags for binary I/O
 13: !
 14:       PetscEnum FILE_MODE_READ
 15:       PetscEnum FILE_MODE_WRITE
 16:       PetscEnum FILE_MODE_APPEND
 17:       PetscEnum FILE_MODE_UPDATE
 18:       PetscEnum FILE_MODE_APPEND_UPDATE

 20:       parameter (FILE_MODE_READ = 0)
 21:       parameter (FILE_MODE_WRITE = 1)
 22:       parameter (FILE_MODE_APPEND = 2)
 23:       parameter (FILE_MODE_UPDATE = 3)
 24:       parameter (FILE_MODE_APPEND_UPDATE = 4)

 26: !
 27: !  PetscViewer formats
 28: !
 29:       PetscEnum PETSC_VIEWER_DEFAULT
 30:       PetscEnum PETSC_VIEWER_ASCII_MATLAB
 31:       PetscEnum PETSC_VIEWER_ASCII_MATHEMATICA
 32:       PetscEnum PETSC_VIEWER_ASCII_IMPL
 33:       PetscEnum PETSC_VIEWER_ASCII_INFO
 34:       PetscEnum PETSC_VIEWER_ASCII_INFO_DETAIL
 35:       PetscEnum PETSC_VIEWER_ASCII_COMMON
 36:       PetscEnum PETSC_VIEWER_ASCII_SYMMODU
 37:       PetscEnum PETSC_VIEWER_ASCII_INDEX
 38:       PetscEnum PETSC_VIEWER_ASCII_DENSE
 39:       PetscEnum PETSC_VIEWER_ASCII_MATRIXMARKET
 40:       PetscEnum PETSC_VIEWER_ASCII_VTK
 41:       PetscEnum PETSC_VIEWER_ASCII_VTK_CELL
 42:       PetscEnum PETSC_VIEWER_ASCII_VTK_COORDS
 43:       PetscEnum PETSC_VIEWER_ASCII_PCICE
 44:       PetscEnum PETSC_VIEWER_ASCII_PYTHON
 45:       PetscEnum PETSC_VIEWER_ASCII_FACTOR_INFO
 46:       PetscEnum PETSC_VIEWER_ASCII_LATEX
 47:       PetscEnum PETSC_VIEWER_ASCII_XML
 48:       PetscEnum PETSC_VIEWER_DRAW_BASIC
 49:       PetscEnum PETSC_VIEWER_DRAW_LG
 50:       PetscEnum PETSC_VIEWER_DRAW_CONTOUR
 51:       PetscEnum PETSC_VIEWER_DRAW_PORTS
 52:       PetscEnum PETSC_VIEWER_VTK_VTS
 53:       PetscEnum PETSC_VIEWER_VTK_VTR
 54:       PetscEnum PETSC_VIEWER_VTK_VTU
 55:       PetscEnum PETSC_VIEWER_BINARY_MATLAB
 56:       PetscEnum PETSC_VIEWER_NATIVE
 57:       PetscEnum PETSC_VIEWER_HDF5_VIZ
 58:       PetscEnum PETSC_VIEWER_NOFORMAT

 60:       parameter (PETSC_VIEWER_DEFAULT = 0)
 61:       parameter (PETSC_VIEWER_ASCII_MATLAB = 1)
 62:       parameter (PETSC_VIEWER_ASCII_MATHEMATICA = 2)
 63:       parameter (PETSC_VIEWER_ASCII_IMPL = 3)
 64:       parameter (PETSC_VIEWER_ASCII_INFO = 4)
 65:       parameter (PETSC_VIEWER_ASCII_INFO_DETAIL = 5)
 66:       parameter (PETSC_VIEWER_ASCII_COMMON = 6)
 67:       parameter (PETSC_VIEWER_ASCII_SYMMODU = 7)
 68:       parameter (PETSC_VIEWER_ASCII_INDEX = 8)
 69:       parameter (PETSC_VIEWER_ASCII_DENSE = 9)
 70:       parameter (PETSC_VIEWER_ASCII_MATRIXMARKET = 10)
 71:       parameter (PETSC_VIEWER_ASCII_VTK = 11)
 72:       parameter (PETSC_VIEWER_ASCII_VTK_CELL = 12)
 73:       parameter (PETSC_VIEWER_ASCII_VTK_COORDS = 13)
 74:       parameter (PETSC_VIEWER_ASCII_PCICE = 14)
 75:       parameter (PETSC_VIEWER_ASCII_PYTHON = 15)
 76:       parameter (PETSC_VIEWER_ASCII_FACTOR_INFO = 16)
 77:       parameter (PETSC_VIEWER_ASCII_LATEX = 17)
 78:       parameter (PETSC_VIEWER_ASCII_XML = 18)
 79:       parameter (PETSC_VIEWER_DRAW_BASIC = 19)
 80:       parameter (PETSC_VIEWER_DRAW_LG = 20)
 81:       parameter (PETSC_VIEWER_DRAW_CONTOUR = 21)
 82:       parameter (PETSC_VIEWER_DRAW_PORTS = 22)
 83:       parameter (PETSC_VIEWER_VTK_VTS = 23)
 84:       parameter (PETSC_VIEWER_VTK_VTR = 24)
 85:       parameter (PETSC_VIEWER_VTK_VTU = 25)
 86:       parameter (PETSC_VIEWER_BINARY_MATLAB = 26)
 87:       parameter (PETSC_VIEWER_NATIVE = 27)
 88:       parameter (PETSC_VIEWER_HDF5_VIZ = 28)
 89:       parameter (PETSC_VIEWER_NOFORMAT = 29)
 90: !
 91: !  End of Fortran include file for the PetscViewer package in PETSc