Cleanup

src/Dodge/Room/Room.hs

@@ -10,7 +10,7 @@ import Dodge.Creature
 import Dodge.Room.Pillar
 import Dodge.Room.Modify.Girder
 import Dodge.LevelGen.Data
-import Dodge.RandomHelp
+import RandomHelp
 import Dodge.Default.Wall
 import Dodge.Tree
 import Dodge.Placement.Instance
@@ -29,7 +29,6 @@ import LensHelp
 import qualified Data.Set as S
 import Control.Monad.State
 --import Control.Monad.Loops
-import System.Random
 import Data.Bifunctor
 
 roomC :: RandomGen g => Float -> Float -> State g Room