eq(l0(A,B),1,[l1(A,B,C,D,E),loop_cont_l1(D,E)],[C=0]).
eq(l0(A,B),1,[l1(A,B,C,D,E)],[C=1]).
eq(loop_cont_l1(A,B),0,[l2(A,B,C,D,E),loop_cont_l2(D,E)],[C=0]).
eq(loop_cont_l1(A,B),0,[l2(A,B,C,D,E)],[C=1]).
eq(l1(A,B,C,D,E),1,[l1(A-1,B+1,C,D,E)],[A>=1]).
eq(l2(A,B,C,D,E),1,[l2(A,B-1,C,D,E)],[B>=1]).
eq(l1(A,B,C,A,B),1,[],[C=0,0>=A]).
eq(l2(A,B,C,A,B),0,[],[C=1]).