| # x = # y, ¬ dups(x), ∀ a. a ∈ x → a ∈ y ⊦ perm(x, y) |
# x = # y, ∀ a. a ∈ x → a ∈ y ⊦ dups(x), #oc(a, x) ≤ #oc(a, y) ∧ #oc(a0, y) ≤ #oc(a0, x)
Used simplifier rules: perm-def: ⊦ perm(x, y) ↔ ¬ ¬(x ⊆m y ∧ y ⊆m x);%msubset: ⊦ x ⊆m y ↔ (∀ a. #oc(a, x) ≤ #oc(a, y));