simp [H, relateSeq] at *
W✝ : Type
M : KripkeModel W✝
v w : W✝
τ : Formula
v_γ_w : relate M (?'τ) v w
⊢ ∃ Fδ ∈ H (?'τ), (M, v)⊨Fδ.1 ∧ relateSeq M Fδ.2 v w
W✝ : Type
M : KripkeModel W✝
v w : W✝
τ : Formula
v_γ_w : v = w ∧ evaluate M v τ
⊢ evaluate M v τ ∧ v = w