Randomize spark movement

2025-06-08 21:15:05 +01:00
parent feb9ce08cc
commit 7e8eaaa34e
4 changed files with 7 additions and 12 deletions
@@ -50,7 +50,6 @@ collectDamageTypes :: [Damage] -> M.Map DamageType Int
 collectDamageTypes = foldl' (flip f) M.empty
  where
    f dm = at (dmType dm) . non 0 +~ _dmAmount dm
-    --f dm = M.insertWith (+) (dmType dm) (_dmAmount dm)

 maxDamageType :: [Damage] -> Maybe (DamageType, Int)
 maxDamageType = safeMinimumOn (negate . snd) . M.assocs . collectDamageTypes