Add shrinkability and cursed items

src/Dodge/WorldEvent/Damage.hs

@@ -2,7 +2,6 @@ module Dodge.WorldEvent.Damage
     ( damThingHitWith
     ) where
 import Dodge.Data
-import Dodge.Creature.State.Data
 import Geometry
 import Dodge.Wall.Damage
 

src/Dodge/WorldEvent/Explosion.hs

@@ -8,7 +8,6 @@ module Dodge.WorldEvent.Explosion
     , makeTeslaExplosionAt
     ) where
 import Dodge.Data
-import Dodge.Data.SoundOrigin
 import Dodge.Default
 import Dodge.Zone
 import Dodge.Base.Collide

src/Dodge/WorldEvent/HitEffect.hs

@@ -5,7 +5,6 @@ module Dodge.WorldEvent.HitEffect
     , penWalls
     ) where
 import Dodge.Data
-import Dodge.Creature.State.Data
 import Geometry
 
 import Data.Bifunctor

src/Dodge/WorldEvent/Shockwave.hs

@@ -4,7 +4,6 @@ module Dodge.WorldEvent.Shockwave
     )
   where
 import Dodge.Data
-import Dodge.Creature.State.Data
 import Dodge.Wall.Damage
 import Dodge.Base
 import Dodge.Zone

src/Dodge/WorldEvent/Sound.hs

@@ -6,7 +6,6 @@ module Dodge.WorldEvent.Sound
     )
   where
 import Dodge.Data
-import Dodge.Data.SoundOrigin
 import Dodge.SoundLogic
 import Sound.Data
 import Geometry.Data

src/Dodge/WorldEvent/SpawnParticle.hs

@@ -7,9 +7,6 @@ module Dodge.WorldEvent.SpawnParticle
     , makeFlameletTimed
     ) where
 import Dodge.Data
-import Dodge.Data.SoundOrigin
-import Dodge.Creature.State.Data
---import Dodge.WorldEvent.Damage
 import Dodge.Base
 import Dodge.WorldEvent.HitEffect
 import Dodge.WorldEvent.ThingsHit