solution for 2 in haskell wasn't complete yet

This commit is contained in:
Fabian Thoms 2017-12-15 18:18:45 +01:00 committed by GitHub
parent 2717476a96
commit 1b37f3d610
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -1,6 +0,0 @@
main :: IO()
main = do
print (sum ret)
where
fibs = 1 : 2 : zipWith (+) fibs (tail fibs)
ret = filter even (takeWhile (<= 4000000) fibs)