oops, take out that 1 in fib1<br>
<br>
fib(A,B,C,_) when A == B -> C;<br>

fib(A,B,C,D) -> fib(A,B+1,C+D,C).  <br>