Remove ComposedItem, to be replaced with PartiallyComposedItem

src/Dodge/Data/ComposedItem.hs

@@ -44,10 +44,10 @@ data ItemStructuralFunction
 
 type PartiallyComposedItem = (Item, ItemStructuralFunction, LinkTest)
 
-data ComposedItem = CItem
-    { _cItem :: Item
-    , _cItemFunction :: ItemStructuralFunction
-    }
+--data ComposedItem = CItem
+--    { _cItem :: Item
+--    , _cItemFunction :: ItemStructuralFunction
+--    }
 
 data ItemLink = ILink
     { _iatType :: ComposeLinkType
@@ -65,10 +65,10 @@ data LinkUpdate = LUpdate
     , _luChildUpdate :: PartiallyComposedItem -> PartiallyComposedItem
     }
 
-makeLenses ''ComposedItem
+--makeLenses ''ComposedItem
 makeLenses ''ItemLink
 makeLenses ''LinkTest
 makeLenses ''LinkUpdate
 deriveJSON defaultOptions ''ItemStructuralFunction
-deriveJSON defaultOptions ''ComposedItem
+--deriveJSON defaultOptions ''ComposedItem
 deriveJSON defaultOptions ''ComposeLinkType