eq(f0(A,B,C),1,[f5(0,0,C,D,E,F,G),loop_cont_f5(E,F,G)],[D=0]).
eq(f0(A,B,C),1,[f5(0,0,C,D,E,F,G)],[D=1]).
eq(f5(A,B,C,D,E,F,G),1,[f5(A+1,B+2,H+I,D,E,F,G)],[]).
eq(f5(A,B,C,D,A,B,C),1,[],[D=1]).