Stun turret turn with electrical damage

src/Dodge/WorldEvent/Damage.hs

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

src/Dodge/WorldEvent/Explosion.hs

@@ -72,10 +72,7 @@ makeFlameExplosionAt p w
     -- the ( Nthing :: Maybe Int ) here is "maybe" a creature id that the
     -- particle passes through for the first frame of its existence
 
-makeExplosionAt 
-    :: Point2   -- ^ Position
-    -> World 
-    -> World
+makeExplosionAt :: Point2 -> World -> World
 makeExplosionAt p w 
     = soundMultiFrom [Explosion 0,Explosion 1] p bangS Nothing
     . addFlames 

src/Dodge/WorldEvent/HitEffect.hs

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

src/Dodge/WorldEvent/Shockwave.hs

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

src/Dodge/WorldEvent/SpawnParticle.hs

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