An implementation of the Monty Hall problem using Haskell's monadic probability library