Summation of primes: Difference between revisions
Content added Content deleted
(→{{header|Haskell}}: Added a Haskell version) |
|||
Line 245: | Line 245: | ||
The sum of all primes below 2 million is 142,913,828,922. |
The sum of all primes below 2 million is 142,913,828,922. |
||
</pre> |
</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> |
|||