Created the probability monad in learnyouahaskell_test.