-- nonDetGameStep1 game dice dnum acc
-- | trace ("G1 >" ++ (show game) ++ "-" ++ (show dice) ++ ": " ++ (show gnum)) False = undefined
-- | otherwise = MS.foldOccur (nonDetGameStep2 dice dnum) acc game
-- nonDetGameStep1 game dice dnum acc
-- | trace ("G1 >" ++ (show game) ++ "-" ++ (show dice) ++ ": " ++ (show gnum)) False = undefined
-- | otherwise = MS.foldOccur (nonDetGameStep2 dice dnum) acc game