Replace buggy circle seg intersection with a simpler test

src/Dodge/LockAndKey.hs

@@ -24,7 +24,7 @@ lockRoomMultiItems =
 
 lockRoomKeyItems :: RandomGen g => [(Int -> State g (MetaTree Room String), State g ItemType)]
 lockRoomKeyItems =
-    [ (lasCenSensEdge, takeOne [HELD LAUNCHER, HELD LASER, HELD SPARKGUN, HELD FLATSHIELD])
+    [ (lasCenSensEdge, takeOne [HELD RLAUNCHER, HELD LASER, HELD SPARKGUN, HELD FLATSHIELD])
     , (sensorRoomRunPast LASERING, return $ HELD LASER)
     , (const slowDoorRoomRunPast, return $ HELD (MINIGUNX 3))
     , (const longRoomRunPast, takeOne [HELD SNIPERRIFLE, HELD FLATSHIELD])
@@ -39,7 +39,7 @@ keyCardRunPastRand = [(keyCardRoomRunPast 0, return (HELD $ KEYCARD 0))]
 itemRooms :: RandomGen g => [(ItemType, State g (MetaTree Room String))]
 itemRooms =
     [
-        ( HELD LAUNCHER
+        ( HELD RLAUNCHER
         , join $
             takeOne
                 [ corridorBoss launcherCrit