Cleanup

src/Dodge/Data/Block.hs

@@ -10,7 +10,7 @@ module Dodge.Data.Block (
 ) where
 
 import Flat
-import LinearHelp
+import LinearHelp ()
 import Color
 import Control.Lens
 import Data.Aeson
@@ -20,8 +20,6 @@ import Dodge.Data.Material
 import Dodge.Data.PathGraph
 import Geometry
 import Shape.Data
-import TH.Derive
-import Data.Store
 
 data Block = Block
     { _blID :: Int