X-Git-Url: http://gitweb.michael.orlitzky.com/?p=spline3.git;a=blobdiff_plain;f=src%2FTetrahedron.hs;h=359ade5f115624aff8ee1030b0f4e347b1135f68;hp=f3b53198362768b8fdbe83085cc55b8e6306b7cc;hb=3f7331f579118687cd73b977ce6aa7d401f88a09;hpb=cf2126c163fc1cf26175da1c7200a0ec1e3e034d

diff --git a/src/Tetrahedron.hs b/src/Tetrahedron.hs
index f3b5319..359ade5 100644
--- a/src/Tetrahedron.hs
+++ b/src/Tetrahedron.hs
@@ -18,19 +18,18 @@ import qualified Data.Vector as V (
   sum
   )
 
-import Prelude hiding (LT)
 import Test.Framework (Test, testGroup)
 import Test.Framework.Providers.HUnit (testCase)
 import Test.Framework.Providers.QuickCheck2 (testProperty)
-import Test.HUnit
+import Test.HUnit (Assertion, assertEqual)
 import Test.QuickCheck (Arbitrary(..), Gen, Property, (==>))
 
 import Comparisons ((~=), nearly_ge)
 import FunctionValues (FunctionValues(..), empty_values)
 import Misc (factorial)
-import Point
-import RealFunction
-import ThreeDimensional
+import Point (Point, scale)
+import RealFunction (RealFunction, cmult, fexp)
+import ThreeDimensional (ThreeDimensional(..))
 
 data Tetrahedron =
   Tetrahedron { function_values :: FunctionValues,