Separate out concrete part of world

src/Dodge/Zoning/World.hs

@@ -10,7 +10,7 @@ zoneOfSight' s w =
     ]
   where 
     --(xs,ys) = unzip $ map zoneOfPoint $ screenPolygon cfig w -- ++ [_cameraViewFrom w]
-    (xs,ys) = unzip $ map sizeZoneOfPoint $ _boundBox w -- ++ [_cameraViewFrom w]
+    (xs,ys) = unzip $ map sizeZoneOfPoint $ _boundBox (_cWorld w) -- ++ [_cameraViewFrom w]
     sizeZoneOfPoint (V2 x y) = (f x, f y)
       where
         f = floor . (/ s)