This commit is contained in:
2025-06-24 08:48:08 +01:00
parent 5537efe584
commit 366b998989
10 changed files with 25 additions and 28 deletions
+1 -1
View File
@@ -28,7 +28,7 @@ applyPiercingDamage cr dm
/ V2 x x
x = crMass (_crType cr)
p = _dmPos dm
p1 = p +.+ 2 *.* squashNormalizeV (p -.- _crPos cr)
p1 = p + 2 *.* squashNormalizeV (p - _crPos cr)
damageHP :: Creature -> Int -> World -> World
damageHP cr x =