| n < # x, m < # x ⊦ #oc(a, x[m, x[n]][n, x[m]]) = #oc(a, x), m = n, x = [], x[n] ≠ a ∧ a ≠ x[m], x[m, x[n]][n] = a ∧ a ≠ x[m] ∧ n < # x[m, x[n]] |
m < # x, n < # x ⊦ #oc(x[m], x[m, x[n]][n, x[m]]) = #oc(x[m], x), x[n] = x[m], x = []
Used simplifier rules: ⊦ x[m] = a ∧ m < # x → x[m, a] = x; (s)% ⊦ n < # x → # x[n, a] = # x; (s)%m < # x ⊦ m ≠ n → x[m, a][n] = x[n]; (s)% ⊦ m < n → (n ≤ m ↔ false); (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)