Work on connecting pathfinding grid

2022-07-09 12:36:17 +01:00
parent 9c352e4a83
commit fb66a45495
11 changed files with 16 additions and 32 deletions
@@ -43,9 +43,9 @@ initialAnoTree = OnwardList
    [ IntAnno $ AnTree . startRoom
    , AnRoom $ roomCCrits 0
    , AnRoom $ return airlock0
-    , AnRoom slowDoorRoom
-    , AnRoom $ roomCCrits 10
-    , AnTree firstBreather
+--    , AnRoom slowDoorRoom
+--    , AnRoom $ roomCCrits 10
+--    , AnTree firstBreather
    , AnTree $ telRoomLev 1 >>= rToOnward "telRoomLev" . pure . cleatOnward
    ]