Attempt to make CWorld correct instance of Store

src/Dodge/Data/Item/Misc.hs

@@ -7,6 +7,9 @@ import Control.Lens
 import Data.Aeson
 import Data.Aeson.TH
 import Geometry.Data
+import TH.Derive
+import Data.Store
+import LinearHelp
 
 data ItemDimension = ItemDimension
     { _dimRad :: Float
@@ -40,3 +43,7 @@ deriveJSON defaultOptions ''ItemDimension
 deriveJSON defaultOptions ''ItemPortage
 deriveJSON defaultOptions ''ItemValue
 deriveJSON defaultOptions ''ItemValueType
+$($(derive [d| instance Deriving (Store ItemDimension) |]))
+$($(derive [d| instance Deriving (Store ItemPortage) |]))
+$($(derive [d| instance Deriving (Store ItemValue) |]))
+$($(derive [d| instance Deriving (Store ItemValueType) |]))