rebase geomutil

MODFLOW-USGS · Dec 13, 2023 · 9c95973 · 9c95973
1 parent 797ea3d
commit 9c95973
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 10 deletions.
diff --git a/autotest/TestGeomUtil.f90 b/autotest/TestGeomUtil.f90
@@ -22,8 +22,7 @@ subroutine collect_geomutil(testsuite)
                              test_point_in_polygon_tri), &
                 new_unittest("point_in_polygon_irr", &
                              test_point_in_polygon_irr), &
-                new_unittest("skew", test_skew), &
-                new_unittest("transform", test_transform) &
+                new_unittest("skew", test_skew) &
                 ]
   end subroutine collect_geomutil
 
@@ -322,9 +321,4 @@ subroutine test_skew(error)
     call check(error, v(1) == -2.0_DP .and. v(2) == -2.0_DP, to_string(v(1)))
   end subroutine test_skew
 
-  subroutine test_transform(error)
-    type(error_type), allocatable, intent(out) :: error
-    ! todo
-  end subroutine test_transform
-
 end module TestGeomUtil
diff --git a/src/Utilities/GeomUtil.f90 b/src/Utilities/GeomUtil.f90
@@ -6,9 +6,7 @@ module GeomUtilModule
   private
   public :: between, point_in_polygon, &
             get_node, get_ijk, get_jk, &
-            skew, transform, &
-            compose, transform_coords, &
-            modify_transf
+            skew, transform, compose
 contains
 
   !> @brief Check if a value is between two other values (inclusive).