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)
Regards,
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_ $