Continue weapon refactor, gas combinations

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

@@ -46,11 +46,15 @@ data AmmoType
 data ForceFieldType = DefaultForceField
     deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
+data GasFuel = ChemFuel
+    deriving (Eq, Ord, Show, Enum, Bounded, Read) --Generic, Flat)
+
 data GasCreate = CreatePoisonGas | CreateFlame
     deriving (Eq, Ord, Show, Enum, Bounded, Read) --Generic, Flat)
 
 makeLenses ''ProjectileUpdate
 makeLenses ''AmmoType
+deriveJSON defaultOptions ''GasFuel
 deriveJSON defaultOptions ''ProjectileDraw
 deriveJSON defaultOptions ''ProjectileCreate
 deriveJSON defaultOptions ''ProjectileUpdate