a ∈ x ⊦ #oc(a, x) = 1, a ∈ x -1l a
Used simplifier rules: oc-zero: ⊦ #oc(a, x) = 0 ↔ ¬ a ∈ x;%in-05: ⊦ ¬ a ∈ y -1l b ∧ a ∈ y → a = b; (forward) from specification list-del% ⊦ 1 < m ↔ ¬(m = 0 ∨ m = 1); (s)