Cleanup, remove DeriveGeneric language extensions

src/Dodge/Data/Creature/Memory.hs

@@ -1,20 +0,0 @@
-{-# LANGUAGE DeriveGeneric #-}
---{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE StrictData #-}
-{-# LANGUAGE TemplateHaskell #-}
-
-module Dodge.Data.Creature.Memory where
-
-import Control.Lens
-import Data.Aeson
-import Data.Aeson.TH
-import Geometry.Data
-
-data Memory = Memory
-    { _soundsToInvestigate :: [Point2]
-    , _nodesSearched :: [Int]
-    }
-    deriving (Eq, Ord, Show, Read) --Generic, Flat)
-
-makeLenses ''Memory
-deriveJSON defaultOptions ''Memory

src/Dodge/Data/Creature/Misc.hs

@@ -1,5 +1,3 @@
---{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DeriveGeneric #-}
 {-# LANGUAGE StrictData #-}
 {-# LANGUAGE TemplateHaskell #-}
 

src/Dodge/Data/Creature/Perception.hs

@@ -1,5 +1,3 @@
-{-# LANGUAGE DeriveGeneric #-}
---{-# LANGUAGE DeriveAnyClass #-}
 {-# LANGUAGE StrictData #-}
 {-# LANGUAGE TemplateHaskell #-}
 

src/Dodge/Data/Creature/Stance.hs

@@ -1,17 +1,15 @@
-{-# LANGUAGE DeriveGeneric #-}
---{-# LANGUAGE DeriveAnyClass #-}
 {-# LANGUAGE StrictData #-}
 {-# LANGUAGE TemplateHaskell #-}
 
-module Dodge.Data.Creature.Stance 
-    ( module Dodge.Data.Creature.Stance
-    , module Dodge.Data.AimStance
-    )where
+module Dodge.Data.Creature.Stance (
+    module Dodge.Data.Creature.Stance,
+    module Dodge.Data.AimStance,
+) where
 
-import Dodge.Data.AimStance
 import Control.Lens
 import Data.Aeson
 import Data.Aeson.TH
+import Dodge.Data.AimStance
 import Geometry.Data
 
 data Stance = Stance
@@ -22,7 +20,7 @@ data Stance = Stance
     deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 data Carriage
-    = Walking { _strideAmount :: Float , _currentFoot :: FootForward }
+    = Walking {_strideAmount :: Float, _currentFoot :: FootForward}
     | Standing
     | Floating
     | Flying

src/Dodge/Data/Creature/State.hs

@@ -1,5 +1,3 @@
-{-# LANGUAGE DeriveGeneric #-}
---{-# LANGUAGE DeriveAnyClass #-}
 {-# LANGUAGE StrictData #-}
 {-# LANGUAGE TemplateHaskell #-}