Add random floor tiles to floors

2021-06-16 00:14:18 +02:00
parent da631e3b37
commit 29902b6f22
10 changed files with 76 additions and 16 deletions
@@ -11,4 +11,5 @@ data Tile = Tile
    , _tileY :: Point2
    , _tileZ :: Float
    }
+  deriving (Eq, Ord, Show)
 makeLenses ''Tile