Cleanup

2023-05-01 10:30:33 +01:00
parent 1a746adad2
commit b34a9f5b09
2 changed files with 0 additions and 23 deletions
@@ -1,21 +0,0 @@
-module Dodge.Particle.Damage where
-
-import Dodge.Data.Bullet
-import Geometry
-
-simpleDam' :: DamageType -> Int -> Bullet -> Point2 -> [Damage]
-simpleDam' dt amount bt p = [Damage dt amount sp p ep NoDamageEffect]
-  where
-    sp = _buPos bt
-    bulVel = _buVel bt
-    ep = sp +.+ bulVel
-
-hvBulDams :: [Damage]
-hvBulDams =
-    [ Damage PIERCING 25 0 0 0 NoDamageEffect
-    , Damage PIERCING 25 0 0 0 NoDamageEffect
-    , Damage PIERCING 25 0 0 0 NoDamageEffect
-    , Damage PIERCING 25 0 0 0 NoDamageEffect
-    , Damage PIERCING 25 0 0 0 $ TorqueDamage 0.7
-    , Damage PIERCING 25 0 0 0 $ PushBackDamage 3
-    ]