Implement terminals

2022-03-14 20:39:23 +00:00
parent 1b6f11709c
commit f16f32d9d3
30 changed files with 313 additions and 119 deletions
@@ -34,7 +34,7 @@ cenLasTur :: Room
 cenLasTur = roomNgon 8 200 & rmPmnts .~
    [ putLasTurret 0.02
    , heightWallPS (resetPLUse $ rprBoolShift (const . isInLnk) (shiftInBy 100)) 30 covershape
-    , mntLightLnkCond $ rpBool isInLnk
+    , mntLightLnkCond $ rprBool $ const . isInLnk
    ]
  where
    covershape = rectNSEW 10 (-10) 20 (-20)