-module(fib).
-export([fibr/1]).


fibr(N) -> fibloop(N, 1, 1).

fibloop(0, A, _) -> A;
fibloop(1, _, B) -> B;
fibloop(N, A, B) -> fibloop(N-1, B, A+B).