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