| # s0 + # s1 < #(s0 ∩ s1), a ∈ s1, ∀ s0. ¬ # s0 + # s1 < #(s0 ∩ s1) ⊦ |
# s0 + # s1 < #(s0 ∩ s1), a ∈ s1, a0 ∈ s1, ∀ s0. ¬ # s0 + # s1 < #(s0 ∩ s1) ⊦
Used simplifier rules: ⊦ ¬ a ∈ ∅; (s)% ⊦ s1 = s2 ↔ (∀ a. a ∈ s1 ↔ a ∈ s2); (s)% ⊦ m < n → n ≠ 0; (s)%ne-01: ⊦ a ∈ s → s ≠ ∅; (forward) from specification set-basic%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic