Actual source code: petscviewerdef.h

petsc-3.3-p7 2013-05-11
  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 PETSCVIEWERSOCKET 'socket'
 17: #define PETSCVIEWERASCII 'ascii'
 18: #define PETSCVIEWERBINARY 'binary'
 19: #define PETSCVIEWERSTRING 'string'
 20: #define PETSCVIEWERDRAW 'draw'
 21: #define PETSCVIEWERVU 'vu'
 22: #define PETSCVIEWERMATHEMATICA 'mathematica'
 23: #define PETSCVIEWERNETCDF 'netcdf'
 24: #define PETSCVIEWERHDF5 'hdf5'
 25: #define PETSCVIEWERMATLAB 'matlab'
 26: #define PETSCVIEWERAMS 'ams'

 28: #endif