Simplify sparks

2025-06-07 10:07:16 +01:00
parent 7bee1549bf
commit b4bdfbf2c3
13 changed files with 101 additions and 102 deletions
@@ -152,7 +152,6 @@ mcProxTest mc w = case mc ^? mcType . _McSensor . proxRequirement of
  where
    cr = you w

--senseDamage :: Int -> DamageType -> Machine -> World -> World
 senseDamage :: Int -> SensorType -> Machine -> World -> World
 senseDamage threshold dt mc =
    (cWorld . lWorld . machines . ix mcid %~ upmc)