| #(s ∪ s0) = # s, #(s ∪ s0) ≤ # s ⊦ ∀ a. a ∈ s0 → a ∈ s |
#(s ∪ s0) ≤ # s, a ∈ s0, a0 ∈ s0, ∀ a. a ∈ s0 → a ∈ s ⊦ a ∈ s
Used simplifier rules: union-sizeeq: ⊦ #(s ∪ s0) = # s ↔ s0 ⊆ s;%una: ⊦ (s ∪ s0) ∪ s1 = s ∪ s0 ∪ s1;%unc: ⊦ s ∪ s0 = s0 ∪ 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%Subset: ⊦ s1 ⊆ s2 ↔ (∀ a. a ∈ s1 → a ∈ s2); from specification set-basic