X-Git-Url: https://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FTests%2FGrid.hs;h=f94a519566c2efc6f37dcd9675b2a85ee7e32b3e;hb=b9c6d5f4f9cf3e0e8c32499959c879e6300717f6;hp=3cc316ae302771a7b80c12c8fdbca76fdcaba1a5;hpb=d1ee387490ef0ada8781f4bf81f82cce7f0006ba;p=spline3.git

diff --git a/src/Tests/Grid.hs b/src/Tests/Grid.hs
index 3cc316a..f94a519 100644
--- a/src/Tests/Grid.hs
+++ b/src/Tests/Grid.hs
@@ -360,19 +360,15 @@ test_trilinear9x9x9_reproduced =
 --
 --   Example from before the fix:
 --
---   > b0 (tetrahedron12 c) p
---   -2.168404344971019e-18
 --   > b0 (tetrahedron15 c) p
 --   -3.4694469519536365e-18
 --
 test_tetrahedra_collision_sensitivity :: Assertion
 test_tetrahedra_collision_sensitivity =
-  assertTrue "tetrahedron collision tests aren't too sensitive" $
-             contains_point t12 p &&
+  assertTrue "tetrahedron collision tests isn't too sensitive" $
              contains_point t15 p
   where
-    g = make_grid 1 trilinear
+    g = make_grid 1 naturals_1d
     c = cube_at g 0 17 1
     p = (0, 16.75, 0.5) :: Point
-    t12 = tetrahedron12 c
     t15 = tetrahedron15 c