Small cleanup, delete unneeded code

2021-03-12 21:17:24 +01:00
parent 918f7d23b8
commit 95c9610b74
3 changed files with 3 additions and 196 deletions
@@ -121,8 +121,6 @@ bulConCr' bt p cr w
            ep = sp +.+ _btVel' bt
            mkwave = over worldEvents $ (.) (makeShockwaveAt p 15 4 1 white)

-
-
 bulHitWall' :: Particle' -> Point2 -> Wall -> World -> World
 bulHitWall' bt p x w =  damageBlocks x
                        $ createSpark 8 colID pOut (reflectDir x) Nothing