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 =
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,
