mirror of
https://github.com/MartinThoma/LaTeX-examples.git
synced 2025-04-26 06:48:04 +02:00
4 lines
No EOL
132 B
Haskell
4 lines
No EOL
132 B
Haskell
primes::[Integer]
|
|
primes = sieve [2..] where
|
|
sieve (p:xs) = p:sieve [x | x <- xs,
|
|
x `mod` p > 0] |