Move around ammo source checks

src/Dodge/Data/Item/Use/Consumption/Ammo.hs

@@ -34,25 +34,12 @@ data ProjectileUpdate
     | PJRemoteShellCollisionCheck
     deriving (Show, Eq, Ord, Read) --Generic, Flat)
 
-data AmmoSourceType
-    = BulletSource
-    | ChargeSource
-    | ChemfuelSource
-    | BombSource
-    deriving (Eq, Ord, Show, Read) --Generic, Flat)
-
 data AmmoType
     = ProjectileAmmo
-    | SmallBulletAmmo
-    | LargeBulletAmmo
+    | BulletAmmo
+    | ElectricalAmmo
     | DroneAmmo
     | GasAmmo
-        { _amCreateGas :: GasCreate
-        }
-    | ForceFieldAmmo
-        { _amForceFieldType :: ForceFieldType
-        }
-    | GenericAmmo
     deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 data ForceFieldType = DefaultForceField
@@ -69,4 +56,3 @@ deriveJSON defaultOptions ''ProjectileUpdate
 deriveJSON defaultOptions ''GasCreate
 deriveJSON defaultOptions ''ForceFieldType
 deriveJSON defaultOptions ''AmmoType
-deriveJSON defaultOptions ''AmmoSourceType