⊦ #oc(a, x -1l b) = (a ≠ b ∨ ¬ b ∈ x ⊃ #oc(a, x);#oc(b, x) - 1)
Used simplifier rules: pred-03: ⊦ n -1 = n - 1; from specification nat