| a ∈ s, a ∈ s0 ⊦ s -- a = s0 -- a ↔ s = s0 |
a ∈ s, a ∈ s0, a0 ∈ s, a1 ∈ s0 ⊦ (∀ a0. a0 ≠ a → (a0 ∈ s ↔ a0 ∈ s0)) ↔ (∀ a. a ∈ s ↔ a ∈ s0)
Used simplifier rules: Delete: ⊦ a ∈ s -- b ↔ a ≠ b ∧ a ∈ s;% ⊦ ¬ a ∈ ∅; (s)%ne-01: ⊦ a ∈ s → s ≠ ∅; (forward) from specification set-basic% ⊦ s1 = s2 ↔ (∀ a. a ∈ s1 ↔ a ∈ s2); (s)