Untitled
public text v1 · immutableinfib :: [Int]
infib = 1 : 1 : zipWith (+) infib (tail infib)
main = print $ sum $ filter even $ takeWhile (<= 4000000) infibinfib :: [Int]
infib = 1 : 1 : zipWith (+) infib (tail infib)
main = print $ sum $ filter even $ takeWhile (<= 4000000) infib