Theorem: FOL.NV.Sub.Var.One.Rec.fastAdmitsAux_imp_free_and_bound_unchanged
Proof state before:
F : Formula
v u : VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders F
⊢ toIsBoundAux binders F = toIsBoundAux binders (fastReplaceFree v u F)
Tactic:
induction F generalizing binders
Proof state after:
case pred_const_
v u : VarName
a✝¹ : PredName
a✝ : List VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders (pred_const_ a✝¹ a✝)
⊢ toIsBoundAux binders (pred_const_ a✝¹ a✝) = toIsBoundAux binders (fastReplaceFree v u (pred_const_ a✝¹ a✝))

case pred_var_
v u : VarName
a✝¹ : PredName
a✝ : List VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders (pred_var_ a✝¹ a✝)
⊢ toIsBoundAux binders (pred_var_ a✝¹ a✝) = toIsBoundAux binders (fastReplaceFree v u (pred_var_ a✝¹ a✝))

case eq_
v u a✝¹ a✝ : VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders (eq_ a✝¹ a✝)
⊢ toIsBoundAux binders (eq_ a✝¹ a✝) = toIsBoundAux binders (fastReplaceFree v u (eq_ a✝¹ a✝))

case true_
v u : VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders true_
⊢ toIsBoundAux binders true_ = toIsBoundAux binders (fastReplaceFree v u true_)

case false_
v u : VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders false_
⊢ toIsBoundAux binders false_ = toIsBoundAux binders (fastReplaceFree v u false_)

case not_
v u : VarName
a✝ : Formula
a_ih✝ :
  ∀ (binders : Finset VarName),
    v ∉ binders → fastAdmitsAux v u binders a✝ → toIsBoundAux binders a✝ = toIsBoundAux binders (fastReplaceFree v u a✝)
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders a✝.not_
⊢ toIsBoundAux binders a✝.not_ = toIsBoundAux binders (fastReplaceFree v u a✝.not_)

case imp_
v u : VarName
a✝¹ a✝ : Formula
a_ih✝¹ :
  ∀ (binders : Finset VarName),
    v ∉ binders →
      fastAdmitsAux v u binders a✝¹ → toIsBoundAux binders a✝¹ = toIsBoundAux binders (fastReplaceFree v u a✝¹)
a_ih✝ :
  ∀ (binders : Finset VarName),
    v ∉ binders → fastAdmitsAux v u binders a✝ → toIsBoundAux binders a✝ = toIsBoundAux binders (fastReplaceFree v u a✝)
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders (a✝¹.imp_ a✝)
⊢ toIsBoundAux binders (a✝¹.imp_ a✝) = toIsBoundAux binders (fastReplaceFree v u (a✝¹.imp_ a✝))

case and_
v u : VarName
a✝¹ a✝ : Formula
a_ih✝¹ :
  ∀ (binders : Finset VarName),
    v ∉ binders →
      fastAdmitsAux v u binders a✝¹ → toIsBoundAux binders a✝¹ = toIsBoundAux binders (fastReplaceFree v u a✝¹)
a_ih✝ :
  ∀ (binders : Finset VarName),
    v ∉ binders → fastAdmitsAux v u binders a✝ → toIsBoundAux binders a✝ = toIsBoundAux binders (fastReplaceFree v u a✝)
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders (a✝¹.and_ a✝)
⊢ toIsBoundAux binders (a✝¹.and_ a✝) = toIsBoundAux binders (fastReplaceFree v u (a✝¹.and_ a✝))

case or_
v u : VarName
a✝¹ a✝ : Formula
a_ih✝¹ :
  ∀ (binders : Finset VarName),
    v ∉ binders →
      fastAdmitsAux v u binders a✝¹ → toIsBoundAux binders a✝¹ = toIsBoundAux binders (fastReplaceFree v u a✝¹)
a_ih✝ :
  ∀ (binders : Finset VarName),
    v ∉ binders → fastAdmitsAux v u binders a✝ → toIsBoundAux binders a✝ = toIsBoundAux binders (fastReplaceFree v u a✝)
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders (a✝¹.or_ a✝)
⊢ toIsBoundAux binders (a✝¹.or_ a✝) = toIsBoundAux binders (fastReplaceFree v u (a✝¹.or_ a✝))

case iff_
v u : VarName
a✝¹ a✝ : Formula
a_ih✝¹ :
  ∀ (binders : Finset VarName),
    v ∉ binders →
      fastAdmitsAux v u binders a✝¹ → toIsBoundAux binders a✝¹ = toIsBoundAux binders (fastReplaceFree v u a✝¹)
a_ih✝ :
  ∀ (binders : Finset VarName),
    v ∉ binders → fastAdmitsAux v u binders a✝ → toIsBoundAux binders a✝ = toIsBoundAux binders (fastReplaceFree v u a✝)
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders (a✝¹.iff_ a✝)
⊢ toIsBoundAux binders (a✝¹.iff_ a✝) = toIsBoundAux binders (fastReplaceFree v u (a✝¹.iff_ a✝))

case forall_
v u a✝¹ : VarName
a✝ : Formula
a_ih✝ :
  ∀ (binders : Finset VarName),
    v ∉ binders → fastAdmitsAux v u binders a✝ → toIsBoundAux binders a✝ = toIsBoundAux binders (fastReplaceFree v u a✝)
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders (forall_ a✝¹ a✝)
⊢ toIsBoundAux binders (forall_ a✝¹ a✝) = toIsBoundAux binders (fastReplaceFree v u (forall_ a✝¹ a✝))

case exists_
v u a✝¹ : VarName
a✝ : Formula
a_ih✝ :
  ∀ (binders : Finset VarName),
    v ∉ binders → fastAdmitsAux v u binders a✝ → toIsBoundAux binders a✝ = toIsBoundAux binders (fastReplaceFree v u a✝)
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders (exists_ a✝¹ a✝)
⊢ toIsBoundAux binders (exists_ a✝¹ a✝) = toIsBoundAux binders (fastReplaceFree v u (exists_ a✝¹ a✝))

case def_
v u : VarName
a✝¹ : DefName
a✝ : List VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : fastAdmitsAux v u binders (def_ a✝¹ a✝)
⊢ toIsBoundAux binders (def_ a✝¹ a✝) = toIsBoundAux binders (fastReplaceFree v u (def_ a✝¹ a✝))