diff --git a/src/modules/mesh/2DCyl/moduleMesh2DCyl.f90 b/src/modules/mesh/2DCyl/moduleMesh2DCyl.f90 index df01782..7bae6b3 100644 --- a/src/modules/mesh/2DCyl/moduleMesh2DCyl.f90 +++ b/src/modules/mesh/2DCyl/moduleMesh2DCyl.f90 @@ -569,7 +569,7 @@ MODULE moduleMesh2DCyl !Compute element volume PURE SUBROUTINE volumeQuad(self) - USE moduleConstParam, ONLY: PI, PI8 + USE moduleConstParam, ONLY: PI8 IMPLICIT NONE CLASS(meshCell2DCylQuad), INTENT(inout):: self