module Dodge.Tile where
--import Dodge.Data

--tilePolyFromRoomPoly :: Room -> Room
--tilePolyFromRoomPoly rm = rm & rmFloor .~ Tile
--    { _tilePoly