X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FTests%2FTetrahedron.hs;h=0b525868c0db6c7eff0f44cd0f261e41002d9f60;hb=89a8f8f3728c6e8730a37304708312b67bc23274;hp=0d924527e17f8cc601cc9a045a7bf7134ed54b69;hpb=9849853e69c46b46996e8c775d15661b2aba27a8;p=spline3.git

diff --git a/src/Tests/Tetrahedron.hs b/src/Tests/Tetrahedron.hs
index 0d92452..0b52586 100644
--- a/src/Tests/Tetrahedron.hs
+++ b/src/Tests/Tetrahedron.hs
@@ -34,7 +34,8 @@ tetrahedron1_geometry_tests =
                       v2 = p2,
                       v3 = p3,
                       fv = empty_values,
-                      precomputed_volume = 0 }
+                      precomputed_volume = 0,
+                      number = 0 }
 
     volume1 :: Assertion
     volume1 =
@@ -69,7 +70,8 @@ tetrahedron2_geometry_tests =
                       v2 = p2,
                       v3 = p3,
                       fv = empty_values,
-                      precomputed_volume = 0 }
+                      precomputed_volume = 0,
+                      number = 0 }
 
     volume1 :: Assertion
     volume1 = assertEqual "volume1 is correct" True (vol ~= (1/3))
@@ -108,7 +110,8 @@ containment_tests =
                           v2 = p2,
                           v3 = p3,
                           fv = empty_values,
-                          precomputed_volume = 0 }
+                          precomputed_volume = 0,
+                          number = 0 }
         contained = contains_point t exterior_point
 
 
@@ -123,7 +126,8 @@ containment_tests =
                           v2 = p2,
                           v3 = p3,
                           fv = empty_values,
-                          precomputed_volume = 0 }
+                          precomputed_volume = 0,
+                          number = 0 }
         contained = contains_point t exterior_point
 
 
@@ -138,7 +142,8 @@ containment_tests =
                           v2 = p2,
                           v3 = p3,
                           fv = empty_values,
-                          precomputed_volume = 0 }
+                          precomputed_volume = 0,
+                          number = 0 }
         contained = contains_point t exterior_point
 
 
@@ -153,7 +158,8 @@ containment_tests =
                           v2 = p2,
                           v3 = p3,
                           fv = empty_values,
-                          precomputed_volume = 0 }
+                          precomputed_volume = 0,
+                          number = 0 }
         contained = contains_point t exterior_point