eq(f1(A,B),1,[f2(A,B,C,D,E),loop_cont_f2(D,E)],[C=0,0>=A+B+1,A>=1]).
eq(f1(A,B),1,[f2(A,B,C,D,E)],[C=1,0>=A+B+1,A>=1]).
eq(f2(A,B,C,D,E),1,[f2(A-B,B,C,D,E)],[A>=0]).
eq(f2(A,B,C,A,B),1,[],[C=1,0>=A+1]).