Cleanup

src/Dodge/WorldEvent/Explosion.hs

@@ -9,7 +9,7 @@ module Dodge.WorldEvent.Explosion
     ) where
 import Dodge.Data
 import Dodge.LightSource
-import Dodge.Default
+--import Dodge.Default
 import Dodge.Zone
 import Dodge.Base.Collide
 import Dodge.WorldEvent.SpawnParticle
@@ -18,7 +18,7 @@ import Dodge.RandomHelp
 import Dodge.SoundLogic
 import Dodge.WorldEvent.Shockwave
 import Geometry
-import Geometry.Vector3D
+--import Geometry.Vector3D
 import Picture
 
 import Control.Monad.State

src/Dodge/WorldEvent/Flash.hs

@@ -15,12 +15,11 @@ module Dodge.WorldEvent.Flash
     , teslaGunFlashAt
     , muzFlareAt
     , flameFlicker
-    )
-    where
+    ) where
 import Dodge.Data
 import Dodge.LightSource
 import Dodge.WorldEvent.HelperParticle
-import Dodge.Default
+--import Dodge.Default
 import Picture
 import Geometry
 

src/Dodge/WorldEvent/SpawnParticle.hs

@@ -17,7 +17,7 @@ import Dodge.RandomHelp
 --import Dodge.Debug
 import Picture
 import Geometry
-import Geometry.Vector3D
+--import Geometry.Vector3D
 --import Geometry.Data
 import qualified IntMapHelp as IM
 

src/Dodge/WorldEvent/ThingsHit.hs

@@ -14,7 +14,6 @@ import Dodge.Data
 import Dodge.Base
 import Dodge.Zone
 import Geometry
-import Geometry.Vector3D
 
 import qualified Data.IntMap.Strict as IM
 import Data.List