Theorem: FOL.NV.Sub.Var.One.Rec.admitsAux_imp_fastAdmitsAux
Proof state before:
case pred_const_
v u : VarName
a✝¹ : PredName
a✝ : List VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : admitsAux v u binders (pred_const_ a✝¹ a✝)
⊢ fastAdmitsAux v u binders (pred_const_ a✝¹ a✝)

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

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

case true_
v u : VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : admitsAux v u binders true_
⊢ fastAdmitsAux v u binders true_

case false_
v u : VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : admitsAux v u binders false_
⊢ fastAdmitsAux v u binders false_

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

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

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

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

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

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

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

case def_
v u : VarName
a✝¹ : DefName
a✝ : List VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : admitsAux v u binders (def_ a✝¹ a✝)
⊢ fastAdmitsAux v u binders (def_ a✝¹ a✝)
Tactic:
all_goals
  simp only [admitsAux] at h2
  simp only [fastAdmitsAux]
Proof state after:
case pred_const_
v u : VarName
a✝¹ : PredName
a✝ : List VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : v ∈ a✝ ∧ v ∉ binders → u ∉ binders
⊢ v ∈ a✝ → u ∉ binders

case pred_var_
v u : VarName
a✝¹ : PredName
a✝ : List VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : v ∈ a✝ ∧ v ∉ binders → u ∉ binders
⊢ v ∈ a✝ → u ∉ binders

case eq_
v u a✝¹ a✝ : VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : (v = a✝¹ ∨ v = a✝) ∧ v ∉ binders → u ∉ binders
⊢ v = a✝¹ ∨ v = a✝ → u ∉ binders

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

case imp_
v u : VarName
a✝¹ a✝ : Formula
a_ih✝¹ : ∀ (binders : Finset VarName), v ∉ binders → admitsAux v u binders a✝¹ → fastAdmitsAux v u binders a✝¹
a_ih✝ : ∀ (binders : Finset VarName), v ∉ binders → admitsAux v u binders a✝ → fastAdmitsAux v u binders a✝
binders : Finset VarName
h1 : v ∉ binders
h2 : admitsAux v u binders a✝¹ ∧ admitsAux v u binders a✝
⊢ fastAdmitsAux v u binders a✝¹ ∧ fastAdmitsAux v u binders a✝

case and_
v u : VarName
a✝¹ a✝ : Formula
a_ih✝¹ : ∀ (binders : Finset VarName), v ∉ binders → admitsAux v u binders a✝¹ → fastAdmitsAux v u binders a✝¹
a_ih✝ : ∀ (binders : Finset VarName), v ∉ binders → admitsAux v u binders a✝ → fastAdmitsAux v u binders a✝
binders : Finset VarName
h1 : v ∉ binders
h2 : admitsAux v u binders a✝¹ ∧ admitsAux v u binders a✝
⊢ fastAdmitsAux v u binders a✝¹ ∧ fastAdmitsAux v u binders a✝

case or_
v u : VarName
a✝¹ a✝ : Formula
a_ih✝¹ : ∀ (binders : Finset VarName), v ∉ binders → admitsAux v u binders a✝¹ → fastAdmitsAux v u binders a✝¹
a_ih✝ : ∀ (binders : Finset VarName), v ∉ binders → admitsAux v u binders a✝ → fastAdmitsAux v u binders a✝
binders : Finset VarName
h1 : v ∉ binders
h2 : admitsAux v u binders a✝¹ ∧ admitsAux v u binders a✝
⊢ fastAdmitsAux v u binders a✝¹ ∧ fastAdmitsAux v u binders a✝

case iff_
v u : VarName
a✝¹ a✝ : Formula
a_ih✝¹ : ∀ (binders : Finset VarName), v ∉ binders → admitsAux v u binders a✝¹ → fastAdmitsAux v u binders a✝¹
a_ih✝ : ∀ (binders : Finset VarName), v ∉ binders → admitsAux v u binders a✝ → fastAdmitsAux v u binders a✝
binders : Finset VarName
h1 : v ∉ binders
h2 : admitsAux v u binders a✝¹ ∧ admitsAux v u binders a✝
⊢ fastAdmitsAux v u binders a✝¹ ∧ fastAdmitsAux v u binders a✝

case forall_
v u a✝¹ : VarName
a✝ : Formula
a_ih✝ : ∀ (binders : Finset VarName), v ∉ binders → admitsAux v u binders a✝ → fastAdmitsAux v u binders a✝
binders : Finset VarName
h1 : v ∉ binders
h2 : admitsAux v u (binders ∪ {a✝¹}) a✝
⊢ v = a✝¹ ∨ fastAdmitsAux v u (binders ∪ {a✝¹}) a✝

case exists_
v u a✝¹ : VarName
a✝ : Formula
a_ih✝ : ∀ (binders : Finset VarName), v ∉ binders → admitsAux v u binders a✝ → fastAdmitsAux v u binders a✝
binders : Finset VarName
h1 : v ∉ binders
h2 : admitsAux v u (binders ∪ {a✝¹}) a✝
⊢ v = a✝¹ ∨ fastAdmitsAux v u (binders ∪ {a✝¹}) a✝

case def_
v u : VarName
a✝¹ : DefName
a✝ : List VarName
binders : Finset VarName
h1 : v ∉ binders
h2 : v ∈ a✝ ∧ v ∉ binders → u ∉ binders
⊢ v ∈ a✝ → u ∉ binders