Monadizing GameLogic.AI.Actions and randoms