Cleanup

src/Dodge/WorldEvent/Explosion.hs

@@ -14,7 +14,7 @@ import Dodge.Zone
 import Dodge.Base.Collide
 import Dodge.WorldEvent.SpawnParticle
 --import Dodge.WorldEvent.Flash
-import Dodge.RandomHelp
+import RandomHelp
 import Dodge.SoundLogic
 import Dodge.WorldEvent.Shockwave
 import Geometry
@@ -25,7 +25,6 @@ import LensHelp
 import Control.Monad.State
 import Data.List
 --import Data.Maybe
-import System.Random
 
 makePoisonExplosionAt 
     :: Point2   -- ^ Position

src/Dodge/WorldEvent/Sound.hs

@@ -8,7 +8,7 @@ import Dodge.Data
 import Dodge.SoundLogic
 import Sound.Data
 import Geometry.Data
-import Dodge.RandomHelp
+import RandomHelp
 
 import Control.Lens
 import Control.Monad.State.Lazy

src/Dodge/WorldEvent/SpawnParticle.hs

@@ -18,13 +18,12 @@ import Dodge.WorldEvent.Cloud
 import Dodge.WorldEvent.Flash
 import Dodge.WorldEvent.Shockwave
 import Dodge.SoundLogic
-import Dodge.RandomHelp
+import RandomHelp
 import Picture
 import Geometry
 import qualified IntMapHelp as IM
 import LensHelp
 
-import System.Random
 import Control.Monad.State
 import Data.Tuple
 aFlameParticle