PTAUT_PROVE : term -> thm
#PTAUT_PROVE ``!x y z w. (((x \/ ~y) ==> z) /\ (z ==> ~w) /\ w) ==> y``; |- !x y z w. (x \/ ~y ==> z) /\ (z ==> ~w) /\ w ==> y #PTAUT_PROVE ``(((x \/ ~y) ==> z) /\ (z ==> ~w) /\ w) ==> y``; |- (x \/ ~y ==> z) /\ (z ==> ~w) /\ w ==> y #PTAUT_PROVE ``!x. x = T``; Uncaught exception: HOL_ERR #PTAUT_PROVE ``x = T``; Uncaught exception: HOL_ERR