Primality by trial division: Difference between revisions
→Segmented Generate and Test: copy-editing
(→Segmented Generate and Test: correct cpxty) |
(→Segmented Generate and Test: copy-editing) |
||
Line 487:
===Segmented Generate and Test===
<lang haskell>primes = 2 : 3 : sieve 5 9 (drop 2 primes) 0 where
sieve x q ps k = let fs = take k (tail primes) in
|