EQ_TAC : tactic
A ?- t1 <=> t2 ================================= EQ_TAC A ?- t1 ==> t2 A ?- t2 ==> t1