[Haskell-cafe] mapM and Control.Arrow