apply IsReplOfFormulaInFormula.imp_
case h1.a
P Q : Formula
v : VarName
h1 : ¬isFreeIn v P
⊢ IsReplOfFormulaInFormula (forall_ v P) P ((forall_ v P).imp_ (forall_ v Q)) (P.imp_ (forall_ v Q))
case h1.a.a
P Q : Formula
v : VarName
h1 : ¬isFreeIn v P
⊢ IsReplOfFormulaInFormula (forall_ v P) P (forall_ v P) P

case h1.a.a
P Q : Formula
v : VarName
h1 : ¬isFreeIn v P
⊢ IsReplOfFormulaInFormula (forall_ v P) P (forall_ v Q) (forall_ v Q)