| b ∈ s -- a, #(s -- a -- b) = 0, 2 < # s, ∀ a0. a0 = b ∨ a0 = a ∨ ¬ a0 ∈ s ⊦ |
#(s -- a) - 1 = 0, b ∈ s, 2 < # s, a0 ∈ s, ∀ a0. a0 = b ∨ a0 = a ∨ ¬ a0 ∈ s ⊦ b = a
Used simplifier rules: del-size: ⊦ a ∈ s → #(s -- a) = # s - 1;%Delete: ⊦ a ∈ s -- b ↔ a ≠ b ∧ a ∈ s;%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