| ∀ a. rev(x0) -l a = rev(x0 -l a) ⊦ (rev(x0) + a0 ') -l a = rev((a0 ' + x0) -l a), a = a0 |
∀ a. rev(x0) -l a = rev(x0 -l a) ⊦ (rev(x0) + a0 ') -l a = rev(x0 -l a) + a0 ', a = a0
Used simplifier rules: del-n: ⊦ a ≠ b → (b ' + x) -l a = b ' + (x -l a);% ⊦ x + a = x + a '; (s)% ⊦ rev(a ' + x) = rev(x) + a; (s)%a: ⊦ (x + y) + z = x + y + z; from specification list