Summation of primes: Difference between revisions
→{{header|Haskell}}: Added a Haskell version
(→{{header|Haskell}}: Added a Haskell version) |
|||
Line 245:
The sum of all primes below 2 million is 142,913,828,922.
</pre>
=={{header|Haskell}}==
<lang haskell>import Data.Numbers.Primes (primes)
sumOfPrimesBelow :: Integral a => a -> a
sumOfPrimesBelow n =
sum $ takeWhile (< n) primes
main :: IO ()
main = print $ sumOfPrimesBelow 2000000</lang>
{{Out}}
<pre>142913828922</pre>
|