]> gitweb.michael.orlitzky.com - spline3.git/blob - src/ThreeDimensional.hs
Remove all "otherwise -> error" cases for performance reasons.
[spline3.git] / src / ThreeDimensional.hs
1 module ThreeDimensional
2 ( ThreeDimensional(..) )
3 where
4
5 import Point(Point)
6
7 class ThreeDimensional a where
8 center :: a -> Point
9 contains_point :: a -> Point -> Bool