simp only [eq_comm]
case a.h.e'_4
D : Type
I : Interpretation D
E : Env
v t : VarName
F F' : Formula
h1_X : PredName
h1_xs : List VarName
h1_v h1_t : VarName
V : VarAssignment D
x : VarName
a✝ : x ∈ h1_xs
⊢ (if x = h1_v then V h1_t else V x) = (V ∘ fun x => if h1_v = x then h1_t else x) x
case a.h.e'_4
D : Type
I : Interpretation D
E : Env
v t : VarName
F F' : Formula
h1_X : PredName
h1_xs : List VarName
h1_v h1_t : VarName
V : VarAssignment D
x : VarName
a✝ : x ∈ h1_xs
⊢ (if h1_v = x then V h1_t else V x) = (V ∘ fun x => if h1_v = x then h1_t else x) x