Match Dodge.Floor with efficientRuntime branch

2022-07-02 11:35:47 +01:00
parent c866c147b9
commit 6f02efe0ab
1 changed files with 1 additions and 1 deletions
@@ -41,9 +41,9 @@ initialAnoTree :: Annotation
 initialAnoTree = OnwardList 
        $ intersperse (AnTree corDoor)
    [ IntAnno $ AnTree . startRoom
-    , AnRoom $ roomCCrits 10
    , AnRoom $ return airlock0
    , AnRoom slowDoorRoom
+--    , AnRoom $ roomCCrits 10
    , AnTree firstBreather
 --    , AnTree $ telRoomLev 1 >>= rToOnward "telRoomLev" . pure . cleatOnward
 --    ]