| n < # x, m < # x, n < # x[m, x[n]] ⊦ #oc(x[m], x[m, x[n]]) + 1 = #oc(x[m], x), x[n] = x[m], x[m, x[n]][n] = x[m], x = [] |
m < # x, n < # x ⊦ #oc(x[m], x[m, x[n]]) + 1 = #oc(x[m], x), x[m, x[n]][n] = x[m], x[n] = x[m], x = []
Used simplifier rules: ⊦ n < # x → # x[n, a] = # x; (s)