Cleanup

src/Dodge/Room/Modify/Girder.hs

@@ -7,7 +7,6 @@ module Dodge.Room.Modify.Girder
 --import Dodge.Data
 import Dodge.LevelGen.Data
 import Dodge.Data
-import Dodge.RandomHelp
 --import Dodge.Room.Procedural
 import Dodge.Room.Foreground
 --import Dodge.Room.RoadBlock
@@ -20,12 +19,11 @@ import Color
 import Shape
 import LensHelp
 import Geometry
+import RandomHelp
 
 import Data.Maybe
 import Data.List (nub)
---import Data.Tree
 import Control.Monad.State
-import System.Random
 import qualified Data.Set as S
 
 addGirderNS :: RandomGen g => (Point2 -> Point2 -> Shape) -> Color -> Room -> State g Room