Advertisement
Guest User

Untitled

a guest
Jun 22nd, 2019
121
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
OCaml 0.17 KB | None | 0 0
  1. let rec fib = n =>
  2.   switch (n) {
  3.   | 0
  4.   | 1 => 1
  5.   | x when x > 0 => fib(x - 2) + fib(x - 1)
  6.   | _ => raise(Invalid_argument("Negative value supplied to fib"))
  7.   };
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement