| ∀ a0. a0 ∈ s ++ a → a0 ∈ s0 ⊦ a0 ∈ s → a0 ∈ s0, #(s0 \ s) = # s0 - #(s ++ a), a ∈ s0 \ s |
a0 ∈ s, ∀ a1. a1 = a ∨ a1 ∈ s → a1 ∈ s0 ⊦ s = ∅, #(s0 \ s) = # s0 - #(s ++ a), # s = 0, a ∈ s0 \ s, a0 ∈ s0
Used simplifier rules: size-zero-01: ⊦ s ≠ ∅ → # s ≠ 0; (forward) from specification set-basic%ne-01: ⊦ a ∈ s → s ≠ ∅; (forward) from specification set-basic%rax: ⊦ a ∈ s ++ b ↔ ¬ ¬(a = b ∨ a ∈ s); from specification set-basic