haskell euler 10. summation of primes less than 2 million.