From 94c88db76fc503f6b4042c484bce9cdbcc7951b0 Mon Sep 17 00:00:00 2001 From: Eric Morway Date: Mon, 12 Aug 2024 09:22:48 -0700 Subject: [PATCH] https://github.com/MODFLOW-USGS/modflow6/pull/1988#discussion_r1713807026 --- src/Utilities/MathUtil.f90 | 2 -- 1 file changed, 2 deletions(-) diff --git a/src/Utilities/MathUtil.f90 b/src/Utilities/MathUtil.f90 index 9bebae75809..8d0a87bafff 100644 --- a/src/Utilities/MathUtil.f90 +++ b/src/Utilities/MathUtil.f90 @@ -86,7 +86,6 @@ pure logical function is_close(a, b, rtol, atol, symmetric) end function is_close !> @brief Modulo with offset for integer values. - !< pure function mod_offset_int(a, n, d) result(mo) ! -- dummy integer(I4B), intent(in) :: a !< dividend @@ -105,7 +104,6 @@ pure function mod_offset_int(a, n, d) result(mo) end function mod_offset_int !> @brief Modulo with offset for double precision values. - !< pure function mod_offset_dbl(a, n, d) result(mo) ! -- dummy real(DP), intent(in) :: a !< dividend