diff --git a/src/meshFEM.f90 b/src/meshFEM.f90 index 7d79dd46d..1e6a95449 100644 --- a/src/meshFEM.f90 +++ b/src/meshFEM.f90 @@ -8,10 +8,12 @@ !> results !-------------------------------------------------------------------------------------------------- module mesh +#include #include #include use prec, only: pReal, pInt +use PETScdmplex use PETScdmda use PETScis @@ -89,15 +91,6 @@ use PETScis mesh_FEM_build_ipCoordinates, & mesh_cellCenterCoordinates - external :: & - DMPlexCreateFromFile, & - DMPlexDistribute, & - DMPlexCopyCoordinates, & - DMGetStratumSize, & - DMPlexGetHeightStratum, & - DMPlexGetLabelValue, & - DMPlexSetLabelValue - contains