Actual source code: petscviewer.h
petsc-3.13.6 2020-09-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 = tPetscViewer(0)
     11: !
     12: !     The numbers used below should match those in
     13: !     petsc/private/fortranimpl.h
     14: !
     15:       PetscViewer, parameter :: PETSC_VIEWER_STDOUT_SELF  = tPetscViewer(9)
     16:       PetscViewer, parameter :: PETSC_VIEWER_DRAW_WORLD   = tPetscViewer(4)
     17:       PetscViewer, parameter :: PETSC_VIEWER_DRAW_SELF    = tPetscViewer(5)
     18:       PetscViewer, parameter :: PETSC_VIEWER_SOCKET_WORLD = tPetscViewer(6)
     19:       PetscViewer, parameter :: PETSC_VIEWER_SOCKET_SELF  = tPetscViewer(7)
     20:       PetscViewer, parameter :: PETSC_VIEWER_STDOUT_WORLD = tPetscViewer(8)
     21:       PetscViewer, parameter :: PETSC_VIEWER_STDERR_WORLD = tPetscViewer(10)
     22:       PetscViewer, parameter :: PETSC_VIEWER_STDERR_SELF  = tPetscViewer(11)
     23:       PetscViewer, parameter :: PETSC_VIEWER_BINARY_WORLD = tPetscViewer(12)
     24:       PetscViewer, parameter :: PETSC_VIEWER_BINARY_SELF  = tPetscViewer(13)
     25:       PetscViewer, parameter :: PETSC_VIEWER_MATLAB_WORLD = tPetscViewer(14)
     26:       PetscViewer, parameter :: PETSC_VIEWER_MATLAB_SELF  = tPetscViewer(15)

     28:       PetscViewer PETSC_VIEWER_STDOUT_
     29:       PetscViewer PETSC_VIEWER_DRAW_
     30:       external PETSC_VIEWER_STDOUT_
     31:       external PETSC_VIEWER_DRAW_
     32:       external PetscViewerAndFormatDestroy
     33: !
     34: !  Flags for binary I/O
     35: !
     36:       PetscEnum, parameter :: FILE_MODE_READ = 0
     37:       PetscEnum, parameter :: FILE_MODE_WRITE = 1
     38:       PetscEnum, parameter :: FILE_MODE_APPEND = 2
     39:       PetscEnum, parameter :: FILE_MODE_UPDATE = 3
     40:       PetscEnum, parameter :: FILE_MODE_APPEND_UPDATE = 4
     41: !
     42: !  PetscViewer formats
     43: !
     44:       PetscEnum, parameter :: PETSC_VIEWER_DEFAULT = 0
     45:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_MATLAB = 1
     46:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_MATHEMATICA = 2
     47:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_IMPL = 3
     48:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_INFO = 4
     49:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_INFO_DETAIL = 5
     50:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_COMMON = 6
     51:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_SYMMODU = 7
     52:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_INDEX = 8
     53:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_DENSE = 9
     54:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_MATRIXMARKET = 10
     55:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_VTK = 11
     56:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_VTK_CELL = 12
     57:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_VTK_COORDS = 13
     58:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_PCICE = 14
     59:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_PYTHON = 15
     60:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_FACTOR_INFO = 16
     61:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_LATEX = 17
     62:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_XML = 18
     63:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_GLVIS = 19
     64:       PetscEnum, parameter :: PETSC_VIEWER_ASCII_CSV = 20
     65:       PetscEnum, parameter :: PETSC_VIEWER_DRAW_BASIC = 21
     66:       PetscEnum, parameter :: PETSC_VIEWER_DRAW_LG = 22
     67:       PetscEnum, parameter :: PETSC_VIEWER_DRAW_LG_XRANGE = 23
     68:       PetscEnum, parameter :: PETSC_VIEWER_DRAW_CONTOUR = 24
     69:       PetscEnum, parameter :: PETSC_VIEWER_DRAW_PORTS = 25
     70:       PetscEnum, parameter :: PETSC_VIEWER_VTK_VTS = 26
     71:       PetscEnum, parameter :: PETSC_VIEWER_VTK_VTR = 27
     72:       PetscEnum, parameter :: PETSC_VIEWER_VTK_VTU = 28
     73:       PetscEnum, parameter :: PETSC_VIEWER_BINARY_MATLAB = 29
     74:       PetscEnum, parameter :: PETSC_VIEWER_NATIVE = 30
     75:       PetscEnum, parameter :: PETSC_VIEWER_HDF5_PETSC = 31
     76:       PetscEnum, parameter :: PETSC_VIEWER_HDF5_VIZ = 32
     77:       PetscEnum, parameter :: PETSC_VIEWER_HDF5_XDMF = 33
     78:       PetscEnum, parameter :: PETSC_VIEWER_HDF5_MAT = 34
     79:       PetscEnum, parameter :: PETSC_VIEWER_NOFORMAT = 35
     80:       PetscEnum, parameter :: PETSC_VIEWER_LOAD_BALANCE = 36
     81: !
     82: !  End of Fortran include file for the PetscViewer package in PETSc

     84: #if defined(_WIN32) && defined(PETSC_USE_SHARED_LIBRARIES)
     85: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_NULL_VIEWER
     86: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_STDOUT_SELF
     87: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_WORLD
     88: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_SELF
     89: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_SOCKET_WORLD
     90: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_SOCKET_SELF
     91: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_STDOUT_WORLD
     92: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_STDERR_WORLD
     93: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_STDERR_SELF
     94: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_BINARY_WORLD
     95: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_BINARY_SELF
     96: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_MATLAB_WORLD
     97: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_MATLAB_SELF
     98: !DEC$ ATTRIBUTES DLLEXPORT::FILE_MODE_READ
     99: !DEC$ ATTRIBUTES DLLEXPORT::FILE_MODE_WRITE
    100: !DEC$ ATTRIBUTES DLLEXPORT::FILE_MODE_APPEND
    101: !DEC$ ATTRIBUTES DLLEXPORT::FILE_MODE_UPDATE
    102: !DEC$ ATTRIBUTES DLLEXPORT::FILE_MODE_APPEND_UPDATE
    103: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DEFAULT
    104: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_MATLAB
    105: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_MATHEMATICA
    106: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_IMPL
    107: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_INFO
    108: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_INFO_DETAIL
    109: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_COMMON
    110: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_SYMMODU
    111: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_INDEX
    112: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_DENSE
    113: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_MATRIXMARKET
    114: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_VTK
    115: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_VTK_CELL
    116: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_VTK_COORDS
    117: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_PCICE
    118: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_PYTHON
    119: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_FACTOR_INFO
    120: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_LATEX
    121: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_XML
    122: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_ASCII_GLVIS
    123: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_BASIC
    124: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_LG
    125: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_CONTOUR
    126: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_DRAW_PORTS
    127: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_VTK_VTS
    128: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_VTK_VTR
    129: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_VTK_VTU
    130: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_BINARY_MATLAB
    131: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_NATIVE
    132: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_HDF5_VIZ
    133: !DEC$ ATTRIBUTES DLLEXPORT::PETSC_VIEWER_NOFORMAT
    134: #endif