have := ReflTransGen.cases_tail_eq_neq v_γ_w
W✝ : Type
M : KripkeModel W✝
v w : W✝
β : Program
v_γ_w : Relation.ReflTransGen (relate M β) v w
⊢ ∃ Fδ ∈ H (∗β), (M, v)⊨Fδ.1 ∧ relateSeq M Fδ.2 v w
W✝ : Type
M : KripkeModel W✝
v w : W✝
β : Program
v_γ_w : Relation.ReflTransGen (relate M β) v w
this : v = w ∨ v ≠ w ∧ ∃ y, v ≠ y ∧ relate M β v y ∧ Relation.ReflTransGen (relate M β) y w
⊢ ∃ Fδ ∈ H (∗β), (M, v)⊨Fδ.1 ∧ relateSeq M Fδ.2 v w