Cleanup

2022-07-10 12:51:20 +01:00
parent 23022d85a1
commit 7a1dbbb3f9
13 changed files with 35 additions and 198 deletions
@@ -51,8 +51,7 @@ teslaBeamCombine (p,(a,b,bm),(x,y,_)) w

 lasRayAt :: Color -> Int -> Float -> Point2 -> Float -> Particle
 lasRayAt col dam phasev pos dir = LaserParticle
-    { _ptDraw = drawLaser
-    , _ptUpdate = mvLaser phasev pos dir
+    { _ptUpdate = mvLaser phasev pos dir
    , _ptRange = 800
    , _ptDamage = dam
    , _ptPhaseV = phasev