[Haskell-cafe] Problems with nested Monads