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