%%%%%%%%%%%%%%%%%%%%% Basic options op(400, xfx, [*,+,^,v,/,\,#]). % infix operators op(300,yf,@). % postfix operator clear(print_kept). clear(print_new_demod). clear(print_back_demod). assign(pick_given_ratio, 4). assign(max_mem, 20000). set(knuth_bendix). set(hyper_res). set(para_from_units_only). set(para_into_units_only). %%%%%%%%%%%%%%%%%%%%% Clauses list(usable). x = x. end_of_list. list(sos). x* (y*x)=y. x*y=y*x. e*e=e. (x*e)+ (e*y)=x*y. (x*y)*z!= (x*u)*v | (w*y)*z= (w*u)*v. % (A*B)*e!=A+B. end_of_list. list(passive). A + B != e * (A*B). end_of_list.