fib(0, 1):-!.
fib(1, 1):-!.
fib(N, W) :- fib (N - 1, W) + fib (N - 2, W).