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

  8: #include "petsc/finclude/petscis.h"
  9: #include "petsc/finclude/petscvec.h"
 10: #include "petsc/finclude/petscmat.h"

 12: #define DMType character*(80)
 13: #define DMBoundaryType      PetscEnum
 14: #define DMPointLocationType PetscEnum
 15: #define DMAdaptFlag         PetscEnum
 16: #define PetscUnit           PetscEnum

 18: #define DM               type(tDM)

 20: #define PetscQuadrature  PetscFortranAddr
 21: #define PetscDS          PetscFortranAddr
 22: #define PetscFE          PetscFortranAddr
 23: #define PetscSpace       PetscFortranAddr
 24: #define PetscDualSpace   PetscFortranAddr
 25: #define PetscFV          PetscFortranAddr
 26: #define PetscLimiter     PetscFortranAddr
 27: #define PetscPartitioner PetscFortranAddr


 30: #define DMDA        'da'
 31: #define DMCOMPOSITE 'composite'
 32: #define DMSLICED    'sliced'
 33: #define DMSHELL     'shell'
 34: #define DMPLEX      'plex'
 35: #define DMCARTESIAN 'cartesian'
 36: #define DMREDUNDANT 'redundant'
 37: #define DMPATCH     'patch'
 38: #define DMMOAB      'moab'
 39: #define DMNETWORK   'network'
 40: #define DMFOREST    'forest'
 41: #define DMP4EST     'p4est'
 42: #define DMP8EST     'p8est'
 43: #define DMSWARM     'swarm'

 45: #endif