| perm(x -l a, z), perm(x, y), a0 ∈ z ∨ a0 ∈ x -l a → #oc(a0, z) = #oc(a0, x -l a), a0 ∈ y ∨ a0 ∈ x → #oc(a0, y) = #oc(a0, x), a0 ∈ y ∨ a0 ∈ z ⊦ #oc(a0, y) = #oc(a0, z), a0 = a |
perm(x -l a, z), perm(x, y), a0 ∈ y ∨ a0 ∈ x → #oc(a0, y) = #oc(a0, x), a0 ∈ y ∨ a0 ∈ z, a0 ∈ z ∨ a0 ∈ x → #oc(a0, z) = #oc(a0, x) ⊦ #oc(a0, y) = #oc(a0, z), a0 = a
Used simplifier rules: ocs-del-length: ⊦ a ≠ b → #oc(a, x -l b) = #oc(a, x);%in-del-new: ⊦ a ∈ x -l b ↔ a ∈ x ∧ a ≠ b; from specification list-del