Cleanup

src/Dodge/Base/Collide.hs

@@ -39,7 +39,6 @@ module Dodge.Base.Collide
     , anythingHitCirc
     ) where
 import Dodge.Data
-import Dodge.Zone
 import Dodge.Zoning
 import Dodge.Base.Wall
 import Geometry
@@ -49,7 +48,6 @@ import Data.List (sortOn)
 import Data.Maybe
 import qualified IntMapHelp as IM
 import Control.Lens
-import Control.Monad
 import StreamingHelp
 import qualified Streaming.Prelude as S
 import qualified Data.IntSet as IS