Refactor cloud zoning

2022-07-23 13:18:25 +01:00
parent 12fad676f2
commit 94d5691f46
7 changed files with 57 additions and 20 deletions
@@ -2,7 +2,7 @@ module Dodge.Default.World where
 import Dodge.Data
 import Dodge.Zone.Size
 import Dodge.Zone.Object
-import Geometry.Vector3D
+--import Geometry.Vector3D
 import Geometry.Zone
 import Geometry.Data
 import Geometry.Polygon
@@ -30,7 +30,7 @@ defaultWorld = World
    , _crZoning         = mempty --Zoning IM.empty crZoneSize zoneOfCreature
    , _creatureGroups   = IM.empty
    , _clouds           = mempty
-    , _clZoning         = Zoning IM.empty clZoneSize (zonePos (stripZ . _clPos))
+    , _clZoning         = mempty
    , _gusts            = IM.empty
    , _gsZoning         = mempty --Zoning IM.empty clZoneSize (zonePos _guPos)
    , _itemPositions    = IM.empty