simp only [Var.freeVarSet] at a2
v : Var
X : String
vs : List Var
a1 : ∃ a ∈ vs, v ∈ a.freeVarSet
x : String
a2 : free_ x ∈ vs ∧ v ∈ (free_ x).freeVarSet
⊢ v ∈ vs ∧ v.isFree
v : Var
X : String
vs : List Var
a1 : ∃ a ∈ vs, v ∈ a.freeVarSet
x : String
a2 : free_ x ∈ vs ∧ v ∈ {free_ x}
⊢ v ∈ vs ∧ v.isFree