simp at *
X : Finset Formula
ψ ϕ1 ϕ2 : Formula
psi_in_X : ψ ∈ X
eq_voc : voc {ϕ1, ϕ2} = voc ψ
⊢ voc X = voc (X \ {ψ}) ∪ voc {ϕ1, ϕ2}
X : Finset Formula
ψ ϕ1 ϕ2 : Formula
psi_in_X : ψ ∈ X
eq_voc : vocabOfFormula ϕ1 ∪ vocabOfFormula ϕ2 = vocabOfFormula ψ
⊢ X.biUnion vocabOfFormula = (X.erase ψ).biUnion vocabOfFormula ∪ (vocabOfFormula ϕ1 ∪ vocabOfFormula ϕ2)