| ⊦ #oc(a, x -l b) = #oc(a, x), a = b |
∀ a, b. #oc(a, x0 -l b) = #oc(a, x0) ∨ a = b ⊦ #oc(a, (a0 + x0) -l b) = #oc(a, a0 + x0), a = b
Used simplifier rules: oc-e: ⊦ #oc(a, []) = 0;%list freely generated by [], +;;%del-e: ⊦ [] -l a = []; from specification list-del