eq(f1(A,B),1,[f3(A,A,C,D,E),loop_cont_f3(D,E)],[C=0,A>=1]).
eq(f1(A,B),1,[f3(A,A,C,D,E)],[C=1,A>=1]).
eq(f3(A,B,C,D,E),1,[f3(A,B-1,C,D,E)],[B>=1]).
eq(f3(A,B,C,D,E),1,[f3(A-1,A-1,C,D,E)],[0>=B,A>=2]).
eq(f3(A,B,C,A,B),0,[],[C=1]).