07.29.07

Exercise 8.5

Posted in Uncategorized at 11:52 pm by admin

data Region = ...
            | HalfPlane Coordinate Coordinate
            ...
 
(HalfPlane p1 p2) `containsR` p = p `isLeftOf` (p1,p2)