| a ∈ s, #(s -- a) = 0, 2 < # s, ∀ a0. a0 = b ∨ a0 = a ∨ ¬ a0 ∈ s, ∀ a0. a0 = a ∨ ¬ a0 ∈ s ⊦ b ≠ a ∧ b ∈ s |
# s - 1 = 0, 2 < # s, a ∈ s, a0 ∈ s, ∀ a0. a0 = a ∨ ¬ a0 ∈ s, ∀ a0. a0 = b ∨ a0 = a ∨ ¬ a0 ∈ s ⊦ b ≠ a ∧ b ∈ s
Used simplifier rules: del-size: ⊦ a ∈ s → #(s -- a) = # s - 1;%In-empty: ⊦ ¬ a ∈ ∅; from specification set-basic%Extension: ⊦ s1 = s2 ↔ (∀ a. a ∈ s1 ↔ a ∈ s2); from specification set-basic%ne-01: ⊦ a ∈ s → s ≠ ∅; (forward) from specification set-basic