Remove generic and flat instances

src/Dodge/Data/Item/Misc.hs

@@ -5,7 +5,6 @@
 
 module Dodge.Data.Item.Misc where
 
-import Flat
 import Control.Lens
 import Data.Aeson
 import Data.Aeson.TH
@@ -17,7 +16,7 @@ data ItemDimension = ItemDimension
     , _dimCenter :: Point3
     , _dimAttachPos :: Point3
     }
-    deriving (Eq, Show, Read, Generic, Flat)
+    deriving (Eq, Show, Read) --Generic, Flat)
 
 data ItemPortage
     = HeldItem
@@ -26,16 +25,16 @@ data ItemPortage
         }
     | WornItem
     | NoPortage
-    deriving (Eq, Show, Read, Generic, Flat)
+    deriving (Eq, Show, Read) --Generic, Flat)
 
 --data ItemValue = ItemValue
 --    { _ivInt :: Int
 --    , _ivType :: ItemValueType
 --    }
---    deriving (Eq, Show, Read, Generic, Flat)
+--    deriving (Eq, Show, Read) --Generic, Flat)
 --
 --data ItemValueType = MundaneItem | ArtefactItem
---    deriving (Eq, Show, Read, Generic, Flat)
+--    deriving (Eq, Show, Read) --Generic, Flat)
 
 makeLenses ''ItemDimension
 makeLenses ''ItemPortage