]> gitweb.michael.orlitzky.com - spline3.git/commitdiff
Fix the one failing test and its documentation.
authorMichael Orlitzky <michael@orlitzky.com>
Tue, 6 Sep 2011 17:27:27 +0000 (13:27 -0400)
committerMichael Orlitzky <michael@orlitzky.com>
Tue, 6 Sep 2011 17:27:27 +0000 (13:27 -0400)
src/Grid.hs

index d31ffabdf2aa122cadacf0cc9d85513f4989033a..893fe5c360d3f39c73a99ebab26d1320fd798815 100644 (file)
@@ -365,18 +365,18 @@ test_trilinear9x9x9_reproduced =
 --
 --   Example from before the fix:
 --
---   > b0 (tetrahedron c 15) p
---   -3.4694469519536365e-18
+--   b1 (tetrahedron c 20) (0, 17.5, 0.5)
+--   -0.0
 --
 test_tetrahedra_collision_sensitivity :: Assertion
 test_tetrahedra_collision_sensitivity =
   assertTrue "tetrahedron collision tests isn't too sensitive" $
-             contains_point t15 p
+             contains_point t20 p
   where
     g = make_grid 1 naturals_1d
-    cube = cube_at g 0 17 1
-    p = (0, 16.75, 0.5) :: Point
-    t15 = tetrahedron cube 15
+    cube = cube_at g 0 18 0
+    p = (0, 17.5, 0.5) :: Point
+    t20 = tetrahedron cube 20
 
 
 prop_cube_indices_never_go_out_of_bounds :: Grid -> Gen Bool