Refactor, try to limit dependencies

src/Dodge/Zoning/Wall.hs

@@ -1,13 +1,13 @@
 module Dodge.Zoning.Wall where
-import FoldableHelp
-import Dodge.Data
-import Geometry
-import Dodge.Zoning.Base
-import qualified IntMapHelp as IM
 
-import Data.Maybe
-import qualified Data.IntSet as IS
 import Control.Lens
+import qualified Data.IntSet as IS
+import Data.Maybe
+import Dodge.Data.World
+import Dodge.Zoning.Base
+import FoldableHelp
+import Geometry
+import qualified IntMapHelp as IM
 
 wlIXsNearPoint :: Point2 -> World -> IS.IntSet
 wlIXsNearPoint p w = zoneExtract (zoneOfPoint' wlZoneSize p) (w ^. cWorld . wlZoning)