Move analyser functions to data

2022-06-07 09:57:19 +01:00
parent d42538e3c0
commit 14acd2ee6a
4 changed files with 31 additions and 7 deletions
@@ -60,7 +60,7 @@ putTerminal'
 putTerminal' col = putTerminal'' (defaultMachine & mcColor .~ col)
    { _mcDraw = noPic . terminalShape
    , _mcHP = 100
-    , _mcSensor = SensorCloseToggle NotClose False
+    , _mcSensor = defaultProximitySensor
    }

 putTerminal :: Color -> Terminal -> Placement