[Haskell-cafe] (liftM join .) . mapM