Actual source code: petscmeshdef.h

  1: !
  2: !
  3: !  Include file for Fortran use of the Mesh package in PETSc
  4: !
  5: #if !defined (__PETSCMESHDEF_H)

 8:  #include finclude/petscdadef.h

 10: #if !defined(PETSC_USE_FORTRAN_DATATYPES)
 11: #define Mesh PetscFortranAddr
 12: #define SectionReal PetscFortranAddr
 13: #define SectionInt  PetscFortranAddr
 14: #endif

 16: #define MeshType character*(80)

 18: #define MESHSIEVE 'sieve'

 20: #endif