6 Sep
2007
6 Sep
'07
8:45 p.m.
On Thu, Sep 06, 2007 at 03:42:50PM +0200, apfelmus wrote:
Dougal Stanton wrote:
To create an infinite list where each f(u) depends on the previous u, with a single seed value, use 'iterate':
main = mapM_ (uncurry (printf "%d %f\n")) (zip [1..50] (iterate f 3))
How about
main = sequence_ $ zipWith (printf "%d %f\n") [1..50] (iterate f 3)
Better yet: main = zipWithM_ (printf "%d %f\n") [1..50] (iterate f 3) Stefan