fib1 function

w/o print