fun fibonacci(n) =
  let
      fun fib((a, b), i)=  
    if i=0 then b
        else fib((b, a + b), i-1);
           in
  fib((0, 1), n)
  end;

fun fibonacci(0) = 1
  | fibonacci(1) = 1
  | fibonacci(n) = fibonacci(n-1) + fibonacci(n-2);