6 lines
88 B
Haskell
6 lines
88 B
Haskell
|
module Main where
|
||
|
|
import Prime
|
||
|
|
|
||
|
|
main = do
|
||
|
|
print $ sum $ takeWhile (<2000000) primes
|