fib.ml 159 B

123456789
  1. let rec fib_rec n =
  2. if n < 2 then
  3. n
  4. else
  5. fib_rec (n - 1) + fib_rec (n - 2)
  6. let () =
  7. Printf.printf "%d\n" (fib_rec (int_of_string Sys.argv.(1)))