LaTeX-examples/documents/Programmierparadigmen/scripts/haskell/primzahlsieb.hs

mirror of https://github.com/MartinThoma/LaTeX-examples.git synced 2025-04-26 06:48:04 +02:00
primes::[Integer]
primes = sieve [2..] where
    sieve (p:xs) = p:sieve [x | x <- xs,
                                x `mod` p > 0]
added more Haskell examples 2014-09-09 19:47:05 +02:00			`primes::[Integer]`
			`primes = sieve [2..] where`
			`sieve (p:xs) = p:sieve [x \| x <- xs,`
			x `mod` p > 0]