| n < # y, y[n] ∈ y[n, a] -1l a ∨ y[n] ∈ y -1l y[n] ⊦ #oc(y[n], y[n, a] -1l a) = #oc(y[n], y -1l y[n]), y = [] |
⊦ a ∈ x → #oc(a, x -1l a) = #oc(a, x) -1
n < # y, y[n] ∈ y, y[n] ∈ y[n, a] -1l a ∨ y[n] ∈ y -1l y[n] ⊦ #oc(y[n], y[n, a] -1l a) = #oc(y[n], y) -1, y = []
Used simplifier rules: notin: ⊦ ¬ a ∈ x → #oc(a, x) = 0;%oc-zero: ⊦ #oc(a, x) = 0 ↔ ¬ a ∈ x;% ⊦ ¬ a ∈ x → x -1l a = x; (s)% ⊦ m < # x → (x[m] ∈ x ↔ true); (ss) Used terms: y, y[n]