Re: [Haskell-beginners] doing state right

Bah! I completely forgot arrays were constant in lookup. Thanks On Thu, Apr 23, 2009 at 3:05 AM, Chaddaï Fouché wrote:

On Thu, Apr 23, 2009 at 10:03 AM, Chaddaï Fouché wrote:

...

main = quick_ppm "foo.ppm" (\i j -> isPrime ((i-1)*limit+j)) limit limit  where    isPrime n = primeSieve ! n    primeSieve :: UArray Int Bool    primeSieve = accumArray (\_ _ -> True) False (0,limit*limit) $ zip primes (repeat ())

That should read as "zip (takeWhile (<= limit*limit) primes) (repeat ())" of course.

-- Jedaï