module Point (
Point(..),
dot,
- scale
- )
+ scale )
where
-import Test.QuickCheck (Arbitrary(..))
+import Test.Tasty.QuickCheck ( Arbitrary(..) )
-- | Represents a point in three dimensions. We use a custom type (as
-- opposed to a 3-tuple) so that we can make the coordinates strict.
+--
data Point =
Point !Double !Double !Double
deriving (Eq, Show)