Beispiel: Primzahlen

Aufgabe: bestimme π(n) : = Anzahl der Primzahlen in [1..n] auf naive Weise (durch Testen und Abzählen)

num_primes_from_to :: Int -> Int -> Int
num_primes_from_to lo hi 
    = length $ filter id 
    $ map prime [ lo .. hi ]
prime :: Int -> Bool

parallele Auswertung von map prime [lo..hi]:

map prime [lo..hi] 
    `using` parListChunk 100000 rseq

http://hackage.haskell.org/packages/archive/parallel/3.2.0.3/doc/html/Control-Parallel-Strategies.html


Johannes Waldmann 2013-06-18