MK_PEXISTS : (thm -> thm)
A |- !p. t1 = t2 -------------------------- MK_PEXISTS A |- (?p. t1) = (?p. t2)