| ⊦ rmdup(x + a ') = rmdup(x -l a) + a ' |
∀ a. rmdup(x0 + a ') = rmdup(x0 -l a) + a ' ⊦ rmdup((a0 + x0) + a ') = rmdup((a0 + x0) -l a) + a '
Used simplifier rules: del-e: ⊦ [] -l a = [];%list freely generated by [], +;;% ⊦ [] + x = x; (s)%a: ⊦ (x + y) + z = x + y + z; from specification list% ⊦ rmdup(a ') = a '; (s)% ⊦ rmdup([]) = []; (s)% ⊦ a ' = b ' ↔ a = b; (s)