> main :: IO ()
> main = mapM_ ((putStrLn "") >*> putStrLn) $
>            map show [1,2,3]
> 

A couple other ways to do this code.

Without monad combinators

main = mapM_ putStrLn . ("":) . intersperse "" . map show $ [1..3]


With your combinator, but collapsing it so we don't map over the
collection twice.

main = mapM_ ((putStrLn "") >*> print) $ [1..3]

- Hitesh


_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to