Permalink
Browse files

corrected 10, and minor refactor

  • Loading branch information...
1 parent 2ec7abb commit 91b587f8605835ed62498ba0a4eee81ceabc46ee Eric Wilson committed Jan 11, 2011
Showing with 3 additions and 4 deletions.
  1. +1 −2 007.hs
  2. +2 −2 010.hs
View
3 007.hs
@@ -1,5 +1,4 @@
import EulerMath.Primes
-
euler7 :: Int -> Int
-euler7 n = last $ nPrimes n
+euler7 = last . nPrimes
View
4 010.hs
@@ -1,4 +1,4 @@
import EulerMath.Primes
-euler10 :: Int -> Int
-euler10 = sum . primesUpTo
+euler10 :: Int -> Integer
+euler10 = sum . map toInteger . primesUpTo

0 comments on commit 91b587f

Please sign in to comment.