theorem
proved
term proof
modal_duality
show as:
view Lean formalization →
formal statement (Lean)
331theorem modal_duality (p : ConfigProp) (c : Config) :
332 (□p) c ↔ ¬(◇(fun x => ¬p x)) c := by
proof body
Term-mode proof.
333 constructor
334 · intro h ⟨y, hy, hny⟩
335 exact hny (h y hy)
336 · intro h y hy
337 by_contra hc
338 exact h ⟨y, hy, hc⟩
339
340/-- Distribution: □(p → q) → (□p → □q) -/