Cleanup, redo damage direction

src/Dodge/Data/AimStance.hs

@@ -1,5 +1,4 @@
 {-# LANGUAGE StrictData #-}
-{-# LANGUAGE TemplateHaskell #-}
 
 module Dodge.Data.AimStance where
 

src/Dodge/Data/EnergyBall/Type.hs

@@ -10,8 +10,7 @@ import Data.Aeson
 import Data.Aeson.TH
 
 data EnergyBallType
-    = FlamingBall
-    | FlameletBall {_fbSize :: Float, _fbRot :: Float}
+    = FlameletBall {_fbSize :: Float, _fbRot :: Float}
     | ElectricalBall
     | ExplosiveBall
     | FlashBall