From 2afb3f225800f5e7a27c9368b1391a0e16f206d6 Mon Sep 17 00:00:00 2001 From: Michael Orlitzky Date: Mon, 4 Mar 2019 20:48:32 -0500 Subject: [PATCH] src/Cube.hs: make some import lists explicit. --- src/Cube.hs | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/src/Cube.hs b/src/Cube.hs index df2f8ab..5a70afc 100644 --- a/src/Cube.hs +++ b/src/Cube.hs @@ -18,9 +18,9 @@ import qualified Data.Vector as V ( import Prelude hiding ( LT ) import Test.Tasty ( TestTree, testGroup ) import Test.Tasty.QuickCheck ( - Arbitrary(..), + Arbitrary( arbitrary ), Gen, - Positive(..), + Positive( Positive ), choose, testProperty ) import Cardinal ( @@ -35,8 +35,12 @@ import Comparisons ( (~=), (~~=) ) import qualified Face ( Face(..), center ) import FunctionValues ( FunctionValues, eval, rotate ) import Misc ( all_equal, disjoint ) -import Point ( Point(..), dot ) -import Tetrahedron ( Tetrahedron(..), barycenter, c, volume ) +import Point ( Point( Point ), dot ) +import Tetrahedron ( + Tetrahedron(Tetrahedron, function_values, v0, v1, v2, v3), + barycenter, + c, + volume ) data Cube = Cube { i :: !Int, j :: !Int, -- 2.43.2