Generic instances for tuples, error recovery, show details when multiple solutions
This commit is contained in:
@@ -40,8 +40,10 @@ instance Add Point where
|
||||
instance Sub Point where
|
||||
(a,b) - (c,d) = (a - c, b - d)
|
||||
|
||||
instance Ord Point where
|
||||
(a,b) < (c,d) = a < c || a == c && b < d
|
||||
|
||||
instance Eq Point where
|
||||
(a,b) == (c,d) = a == c && b == d
|
||||
|
||||
-- instance Ord Point where
|
||||
-- (a,b) < (c,d) = a < c || a == c && b < d
|
||||
|
||||
-- instance Eq Point where
|
||||
-- (a,b) == (c,d) = a == c && b == d
|
||||
|
||||
Reference in New Issue
Block a user