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 10: #define PetscViewerAndFormat PetscFortranAddr 12: #define PetscViewers PetscFortranAddr 13: #define PetscFileMode PetscEnum 14: #define PetscViewerType character*(80) 15: #define PetscViewerFormat PetscEnum 17: #define PETSCVIEWERSOCKET 'socket' 18: #define PETSCVIEWERASCII 'ascii' 19: #define PETSCVIEWERBINARY 'binary' 20: #define PETSCVIEWERSTRING 'string' 21: #define PETSCVIEWERDRAW 'draw' 22: #define PETSCVIEWERVU 'vu' 23: #define PETSCVIEWERMATHEMATICA 'mathematica' 24: #define PETSCVIEWERNETCDF 'netcdf' 25: #define PETSCVIEWERHDF5 'hdf5' 26: #define PETSCVIEWERVTK 'vtk' 27: #define PETSCVIEWERMATLAB 'matlab' 28: #define PETSCVIEWERSAWS 'saws' 30: #endif