Implement first weapon into tree structure

src/Dodge/Room/Data.hs

@@ -18,3 +18,17 @@ data RoomLink = RL {_rlPos :: Point2, _rlRot :: Float}
 
 makeLenses ''Room
 makeLenses ''RoomLink
+
+-- want to split a room into its dimensions and contents
+
+data Room' = Room'
+    { _dimensions   :: Dimensions
+    , _contents     :: [PlacementSpot]
+    }
+
+data Dimensions = Dimensions
+    { _dmPolys  :: [[Point2]]
+    , _dmLinks  :: [(Point2,Float)]
+    , _dmPath   :: [(Point2, Point2)]
+    , _dmBound  :: [Point2]
+    }