
4 Nov
2010
4 Nov
'10
4:33 p.m.
On 4 November 2010 17:19, John Smith
foo :: IO A
bar :: Bool -> A -> Int -> Bool -> IO ()
bar' a b = bar True a b False
do x <- foo y <- foo z <- foo
bar x 1 bar y 2 bar z 3
but I don't know what to do next. Is there some form of list comprehension or combination of map and lift which will eliminate the repetition?
mapM_ (\x -> foo >>= flip bar x) [1,2,3]