| # x ≤ # y, ∀ a. a ∈ x ↔ a ∈ y ⊦ # x = # y, dups(x), dups(y) |
# x < # y, ∀ a. a ∈ x ↔ a ∈ y ⊦ # x = # y, y = [], dups(x), dups(y)
Used simplifier rules: ⊦ # x = 0 ↔ x = []; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ m ≠ n → (m ≤ n ↔ m < n); (s)