Added center point procedure to edge and eps in inside to avoid some rounding errors

src/modules/mesh/moduleMesh.f90

@@ -119,6 +119,7 @@ MODULE moduleMesh
       PROCEDURE(getNodesEdge_interface),     DEFERRED, PASS:: getNodes
       PROCEDURE(intersectionEdge_interface), DEFERRED, PASS:: intersection
       PROCEDURE(randPosEdge_interface),      DEFERRED, PASS:: randPos
+      procedure(centerEdge_interface),       deferred, pass:: center
       PROCEDURE(fPsi_interface),             DEFERRED, NOPASS:: fPsi
       !Gather value and spatial derivative on the nodes at position Xi
       PROCEDURE, PASS, PRIVATE:: gatherF_edge_scalar
@@ -177,6 +178,14 @@ MODULE moduleMesh
 
     END FUNCTION randPosEdge_interface
 
+    ! Returns the center point of an edge
+    FUNCTION centerEdge_interface(self) RESULT(r)
+      IMPORT:: meshEdge
+      CLASS(meshEdge), INTENT(in):: self
+      REAL(8):: r(1:3)
+
+    END FUNCTION centerEdge_interface
+
   END INTERFACE
 
   !Containers for edges in the mesh