Merge pull request diagrams#333 from bacchanalia/fixedsegmenteq

add derived Eq and Ord instances for FixedSegment
bacchanalia · Mar 28, 2019 · 30d06d9 · 30d06d9
2 parents 2bfe139 + 1d15451
commit 30d06d9
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Diagrams/Segment.hs b/src/Diagrams/Segment.hs
@@ -371,7 +371,7 @@ instance (Metric v, OrderedField n)
 --   the absolute locations of the vertices and control points.
 data FixedSegment v n = FLinear (Point v n) (Point v n)
                       | FCubic (Point v n) (Point v n) (Point v n) (Point v n)
-  deriving Show
+  deriving (Eq, Ord, Show)
 
 type instance V (FixedSegment v n) = v
 type instance N (FixedSegment v n) = n