Guest User

test1

a guest
Sep 17th, 2014
44
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. main = print $ fib' !! 10000000
  2.       where fib' = 0 : 1 : zipWith (\x y -> mod (x + y) 10) fib' (tail fib')
Advertisement
Add Comment
Please, Sign In to add comment