RosettaCodeData/Task/Fibonacci-sequence/Standard-ML/fibonacci-sequence-2.ml

2 lines
59 B
OCaml

fun fib n = if n < 2 then n else fib (n - 1) + fib (n - 2)