Move towards working implementation of attachment tree ammo

src/Dodge/Data/ComposedItem.hs

@@ -13,6 +13,7 @@ import Dodge.Data.Item.Use.Consumption.Ammo
 data ComposeLinkType 
     = AmmoInLink AmmoType
     | AmmoModLink
+    deriving (Eq,Ord,Show,Read)
 
 data ComposedItem = WeaponCI
     | WeaponScopeCI
@@ -23,3 +24,4 @@ data ComposedItem = WeaponCI
 
 makeLenses ''ComposedItem
 deriveJSON defaultOptions ''ComposedItem
+deriveJSON defaultOptions ''ComposeLinkType