UNFOLD_CONV : (thm list -> conv)
B |- t1 /\ ... /\ tn = t1' /\ ... /\ tn'
#UNFOLD_CONV [ASSUME "!in out. INV (in,out) = !(t:num). out t = ~(in t)"] # "INV (l1,l2) /\ INV (l2,l3) /\ (!(t:num). l1 t = l2 (t-1) \/ l3 (t-1))";; . |- INV(l1,l2) /\ INV(l2,l3) /\ (!t. l1 t = l2(t - 1) \/ l3(t - 1)) = (!t. l2 t = ~l1 t) /\ (!t. l3 t = ~l2 t) /\ (!t. l1 t = l2(t - 1) \/ l3(t - 1))