Allow for rooms to inherit floor tiling from parents

src/Dodge/Default/Room.hs

@@ -1,5 +1,5 @@
-module Dodge.Default.Room
-    where
+module Dodge.Default.Room where
+import Data.Tile
 import Geometry.Data
 import Dodge.LevelGen.Data
 import qualified Data.IntMap.Strict as IM
@@ -16,7 +16,7 @@ defaultRoom = Room
     , _rmPartPmnt   = Nothing
     , _rmExtPmnt    = Nothing
     , _rmBound      = []
-    , _rmFloor      = []
+    , _rmFloor      = InheritFloor
     , _rmName       = "defaultRoom"
     , _rmShift      = (V2 0 0 , 0)
     , _rmViewpoints = []