Fixed typo.
--- a/src/FOL/IFOL.ML Thu Apr 06 10:56:39 1995 +0200
+++ b/src/FOL/IFOL.ML Thu Apr 06 10:58:56 1995 +0200
@@ -51,8 +51,7 @@
"[| ~P; (P-->False) ==> Q |] ==> Q"
(fn prems=> [ (REPEAT (ares_tac (prems@[impI,notE]) 1)) ]);
-
-(* For substitution int an assumption P, reduce Q to P-->Q, substitute into
+(* For substitution into an assumption P, reduce Q to P-->Q, substitute into
this implication, then apply impI to move P back into the assumptions.
To specify P use something like
eres_inst_tac [ ("P","ALL y. ?S(x,y)") ] rev_mp 1 *)