UNDISCH_TM : thm -> term * thm
A |- t1 ==> t2 ---------------- UNDISCH_TM A, t1 |- t2
UNDISCH_TM is similar to UNDISCH except that it also returns the antecedent concerned, which may be useful, for example, when the new assumption is subsequently to be discharged