Add IntMapHelper, locate wall cutting bug

src/Dodge/WallCreatureCollisions.hs

@@ -1,6 +1,4 @@
-{- |
-Deals with moving creature wall collisions.
- -}
+{- | Deals with moving creature wall collisions.  -}
 module Dodge.WallCreatureCollisions where
 import Dodge.Data
 import Dodge.Creature.State.Data
@@ -18,6 +16,7 @@ colCrsWalls w = over creatures (fmap (colCrWall w)) w
 
 colCrWall :: World -> Creature -> Creature
 colCrWall w c 
+    | _crID c == 0 = c -- for noclip
     | p1 == p2  = pushOrCrush ls c
     | otherwise = c & crPos %~
         collideCorners rad wallPoints