eq(f0(A,B,C),1,[f1(A,B,2,D,E,F,G),loop_cont_f1(E,F,G)],[D=0,A>=0,3>=A,3>=B,B>=0]).
eq(f0(A,B,C),1,[f1(A,B,2,D,E,F,G)],[D=1,A>=0,3>=A,3>=B,B>=0]).
eq(f1(A,B,C,D,E,F,G),1,[f1(A,B+1,C,D,E,F,G)],[C+A>=2*B+1]).
eq(f1(A,B,C,D,E,F,G),1,[f1(A,B-1,C,D,E,F,G)],[2*B>=2+C+A]).
eq(f1(A,B,C,D,A,B,C),0,[],[D=1]).