Create post world load function

2023-03-18 09:37:09 +00:00
parent d8fb7a1f99
commit 77c88f68a7
14 changed files with 80 additions and 48 deletions
@@ -48,7 +48,6 @@ defaultWorld =
        , _pnZoning = mempty
        , _peZoning = mempty
        , _gsZoning = mempty --Zoning IM.empty clZoneSize (zonePos _guPos)
-        , _numberFloorVerxs = 0
        }

 defaultCWGen :: CWGen
@@ -88,6 +87,8 @@ defaultCWorld =
        , _floorTiles = mempty
        --, _pathGraph = mempty 
        , _pathGraph = Data.Graph.Inductive.Graph.empty
+        , _cwTiles = mempty
+        , _numberFloorVerxs = 0
        }

 defaultLWorld :: LWorld