Move bullet trajectory into bullet update function

src/Dodge/Wall/DamageEffect.hs

@@ -1,7 +1,7 @@
 module Dodge.Wall.DamageEffect where
 import Dodge.Data
+import Dodge.Bullet
 import Dodge.Particle.Spark
-import Dodge.Particle.Bullet.Spawn
 import Dodge.Base.Wall
 import Dodge.Wall.Dust
 import Dodge.Block
@@ -135,7 +135,8 @@ wallDamageEffect dm wl w = case _dmEffect dm of
     BounceBullet bt -> w & instantBullets .:~ thebouncer
       where
         reflectVel = reflVelWall wl (_buVel bt)
-        thebouncer = aBulAt Nothing id pOut reflectVel (_buDrag bt) (_buHitEff bt) (_buWidth bt)
+        thebouncer = aBulAt Nothing --id 
+            pOut reflectVel (_buDrag bt) (_buHitEff bt) (_buWidth bt) BasicBulletTrajectory
             & buTimer .~ _buTimer bt - 1
         pOut = p +.+ squashNormalizeV (sp -.- p)
         p = _dmAt dm