eq(f2(A,B,C),1,[f3(D,E,D)],[D>=500]).
eq(f2(A,B,C),1,[f1(1+D,B,D,E,F,G,H),loop_cont_f1(F,G,H)],[E=0,499>=D]).
eq(f2(A,B,C),1,[f1(1+D,B,D,E,F,G,H)],[E=1,499>=D]).
eq(f1(A,B,C,D,E,F,G),1,[f1(1+A,B,C,D,E,F,G)],[499>=A]).
eq(f1(A,B,C,D,A,E,C),1,[],[D=1,A>=500]).