Cleanup

src/Quaternion.hs

@@ -1,7 +1,7 @@
 {-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DeriveGeneric #-}
+--{-# LANGUAGE DeriveGeneric #-}
 {-# LANGUAGE StandaloneDeriving #-}
-{-# LANGUAGE TemplateHaskell #-}
+--{-# LANGUAGE TemplateHaskell #-}
 {-# OPTIONS_GHC -fno-warn-orphans #-}
 
 {- |
@@ -20,7 +20,7 @@ import Geometry.Data
 import Geometry.Vector3D
 import Linear.Quaternion
 import qualified Linear.Quaternion as Q
-import LinearHelp
+import LinearHelp ()
 
 instance ToJSON a => ToJSON (Q.Quaternion a) where
     toEncoding = genericToEncoding defaultOptions