CoCalc -- primzahlsieb.hs

📚 The CoCalc Library - books, templates and other resources

¹³²⁹³⁷ views
License: OTHER

1
primes::[Integer]
2
primes = sieve [2..] where
3
    sieve (p:xs) = p:sieve [x | x <- xs,
4
                                x `mod` p > 0]
5