| ⊦ s -- a = ∅ ↔ s = ∅ ∨ s = ∅ ++ a |
⊦ (∀ a0. a0 = a ∨ ¬ a0 ∈ s) ↔ (∀ a0. ¬ a0 ∈ s) ∨ (∀ a0. a0 ∈ s ↔ a0 = a)
Used simplifier rules: del-rax: ⊦ a ∈ s -- b ↔ ¬ ¬(a ≠ b ∧ a ∈ s);%in-04: ⊦ a ∈ ∅ ++ b ↔ a = b; from specification set-basic%In-empty: ⊦ ¬ a ∈ ∅; from specification set-basic%Extension: ⊦ s1 = s2 ↔ (∀ a. a ∈ s1 ↔ a ∈ s2); from specification set-basic