[fork] Sieve

gistfile1.py

"""Translated from Haskell:
let sieve(p:xs) = p : sieve (filter (\ x -> x `mod` p /= 0) xs) in sieve [2..]
"""

from itertools import ifilter

def ints(k):
    while True:
        yield k
        k+=1

# needed due to scoping issues
def make_filter_pred(p):
    return lambda x: x % p != 0

def sieve(g):
    while True:
        p = g.next()
        yield p
        g = ifilter(make_filter_pred(p), g)

primes = sieve(ints(2))
for i in xrange(10000):
    print next(primes)