[Haskell-cafe] Problems with do notation