Remove generic and flat instances

src/Dodge/Data/Creature/Perception.hs

@@ -23,7 +23,6 @@ module Dodge.Data.Creature.Perception (
     auDist,
 ) where
 
-import Flat
 import Control.Lens
 import Data.Aeson
 import Data.Aeson.TH
@@ -37,18 +36,18 @@ data Perception = Perception
     , _cpVision :: Vision
     , _cpAudition :: Audition
     }
-    deriving (Eq, Ord, Show, Read, Generic, Flat)
+    deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 data Vision = Eyes
     { _viFOV :: FloatFloat
     , _viDist :: FloatFloat
     }
-    deriving (Eq, Ord, Show, Read, Generic, Flat)
+    deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 newtype Audition = Ears
     { _auDist :: FloatFloat
     }
-    deriving (Eq, Ord, Show, Read, Generic, Flat)
+    deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 data Vigilance
     = Comatose
@@ -56,17 +55,17 @@ data Vigilance
     | Lethargic
     | Vigilant
     | Overstrung
-    deriving (Eq, Ord, Show, Read, Generic, Flat)
+    deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 data Attention
     = AttentiveTo {_getAttentiveTo :: IM.IntMap Awareness}
     | Fixated {_getFixated :: Int}
-    deriving (Eq, Ord, Show, Read, Generic, Flat)
+    deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 data Awareness
     = Suspicious Float
     | Cognizant Float
-    deriving (Eq, Ord, Show, Read, Generic, Flat)
+    deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 makeLenses ''Perception
 makeLenses ''Vision