1: ! 2: ! Include file for Fortran use of the PetscViewer package in PETSc 3: ! 4: #if !defined (__PETSCVIEWERDEF_H) 7: #if !defined(PETSC_USE_FORTRAN_DATATYPES) 8: #define PetscViewer PetscFortranAddr 9: #endif 11: #define PetscViewers PetscFortranAddr 12: #define PetscFileMode PetscEnum 13: #define PetscViewerType character*(80) 14: #define PetscViewerFormat PetscEnum 16: #define PETSC_VIEWER_SOCKET 'socket' 17: #define PETSC_VIEWER_ASCII 'ascii' 18: #define PETSC_VIEWER_BINARY 'binary' 19: #define PETSC_VIEWER_STRING 'string' 20: #define PETSC_VIEWER_DRAW 'draw' 21: #define PETSC_VIEWER_AMS 'ams' 22: #define PETSC_VIEWER_HDF5 'hdf5' 23: #define PETSC_VIEWER_NETCDF 'netcdf' 24: #define PETSC_VIEWER_MATLAB 'matlab' 26: #endif