Cleanup

src/Dodge/Floor.hs

@@ -26,14 +26,13 @@ import Dodge.Data
 --import Dodge.Room.RunPast
 --import MonadHelp
 import LensHelp
-import Dodge.RandomHelp
+import RandomHelp
 --import Color
 --import Dodge.Wire
 
 --import Control.Lens
 import Control.Monad.State
 --import Control.Monad.Loops
-import System.Random
 --import Data.Sequence hiding (zipWith)
 --import Data.Maybe
 --import qualified Data.IntMap.Strict as IM