Continue bullet refactor

src/Dodge/Data/Bullet.hs

@@ -23,16 +23,14 @@ data BulletState = NormalBulletState
     | DyingBulletState
     | DelayedBullet Float
 data BulletUpdateMod = NoBulletUpdateMod
-
-data BulletEffect = DestroyBullet
+data BulletEffect 
+    = DestroyBullet
     | BounceBullet
     | PenetrateBullet
 data BulletSpawn = BulBall EnergyBall | BulSpark
-
 data BulletTrajectory
     = BasicBulletTrajectory
     | BezierTrajectory Point2 Point2 Point2
     | FlechetteTrajectory Point2
     | MagnetTrajectory Point2
-
 makeLenses ''Bullet

src/Dodge/Data/DamageType.hs

@@ -41,12 +41,10 @@ data Damage = Damage
     , _dmEffect :: DamageEffect
     }
   deriving (Eq,Ord,Show)
-
 isElectrical :: Damage -> Bool
 isElectrical dm = case _dmType dm of
     ELECTRICAL -> True
     _ -> False
-
 isMovementDam :: Damage -> Bool
 isMovementDam dm = case _dmType dm of
     TORQUEDAM -> True