[ag-kompilerbau] Primzahlen

  • From: Paul Kaletta <paul@xxxxxxxxx>
  • To: ag-kompilerbau@xxxxxxxxxxxxx
  • Date: Fri, 05 Aug 2005 00:27:52 +0200

Hi,

kurze Suche nach dem Primzahlproblem in Google ergab:

primes = sieve [2.. ] where
          sieve (p:x) = p : sieve [ n | n <- x, n `mod` p > 0 ]

Ciao Paul


Other related posts:

  • » [ag-kompilerbau] Primzahlen