[Haskell-cafe] Monad proof