Guest User

Untitled

a guest
Jan 3rd, 2019
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
OCaml 0.13 KB | None | 0 0
  1. let fibo_lin n =
  2.     let rec aux = function
  3.         (0, a, b) -> a
  4.         | (n, a, b) -> aux (n - 1, b, a + b) in
  5.     aux (n, 0, 1)
Add Comment
Please, Sign In to add comment