[Haskell-cafe] Smarter do notation