ALGO: add missing Show instances to RangeSearch

This commit is contained in:
hasufell 2014-11-14 21:24:14 +01:00
parent b9c8207981
commit af2e1b59cd
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020

View File

@ -34,6 +34,7 @@ data QuadTree a
-- |Represents a Quadrant in the 2D plane.
data Quad = NW | NE
| SW | SE
deriving (Show)
-- |A Crumb used for the QuadTree Zipper.
data Crumb a = NWCrumb (QuadTree a) (QuadTree a) (QuadTree a)
@ -50,6 +51,7 @@ type Zipper a = (QuadTree a, Breadbrumbs a)
-- |Orientation.
data Orient = North | South | East | West
deriving (Show)
-- |Get a sub-square of the current square, e.g. nw, ne, sw or se.