simp
case right
Worlds : Finset (Finset Formula)
MG : ModelGraph Worlds
X : { x // x ∈ Worlds }
a : Program
P : Formula
⊢ (~⌈a⌉P) ∈ ↑X → ¬evaluate (↑MG) X (⌈a⌉P)
case right
Worlds : Finset (Finset Formula)
MG : ModelGraph Worlds
X : { x // x ∈ Worlds }
a : Program
P : Formula
⊢ (~⌈a⌉P) ∈ ↑X → ∃ x, ∃ (h : x ∈ Worlds), relate (↑MG) a X ⟨x, ⋯⟩ ∧ ¬evaluate ↑MG ⟨x, ⋯⟩ P