let
  fib' = i: n: m: if i == 0
    then n
    else fib' (i - 1) m (n + m);

  fib = n: fib' n 1 1;
in fib 10