| ⊦ perm(x, [] + a ') ↔ a ∈ x ∧ perm(x -1l a, []) |
x -1l a = [], a ∈ x ⊦ x = a '
Used simplifier rules: perm-one: ⊦ perm(x, a ') ↔ x = a ';%perm-e: ⊦ perm([], []);%empty: ⊦ perm(x, []) ↔ x = [];%one-01: ⊦ a ' -1l a = []; from specification list-del%in-17: ⊦ a ∈ b ' ↔ a = b; from specification list%a: ⊦ (x + y) + z = x + y + z; from specification list%Nil: ⊦ [] + x = x; from specification list