X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FTests%2FTetrahedron.hs;h=0b525868c0db6c7eff0f44cd0f261e41002d9f60;hb=853dbd6ddf9e8b9b3019af9ce9e2220f84b7609a;hp=0d924527e17f8cc601cc9a045a7bf7134ed54b69;hpb=88322f74281f5f6219c447c29363b4ee01199412;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