simp only [relate] at v_γ_w
W✝ : Type
M : KripkeModel W✝
v w : W✝
α β : Program
v_γ_w : relate M (α;'β) v w
ℓ : TP (α;'β)
v_conF : (M, v)⊨Con (F (α;'β) ℓ)
⊢ ∃ δ ∈ P (α;'β) ℓ, relateSeq M δ v w
W✝ : Type
M : KripkeModel W✝
v w : W✝
α β : Program
ℓ : TP (α;'β)
v_conF : (M, v)⊨Con (F (α;'β) ℓ)
v_γ_w : ∃ y, relate M α v y ∧ relate M β y w
⊢ ∃ δ ∈ P (α;'β) ℓ, relateSeq M δ v w