| perm(x, y), perm(y, x), a ∈ y ++ a ⊦ perm(x, (y ++ a) -1l a), a ∈ x |
⊦ ¬ a ∈ x → x ++ a = a + x
Used simplifier rules: in: ⊦ a ∈ y ∧ ¬ a ∈ x → ¬ perm(x, y);%sym-02: ⊦ ¬ perm(x, y) → ¬ perm(y, x);% ⊦ a + x = a ' + x; (s)% ⊦ ¬ a ∈ x → (a ∈ b ' + x ↔ a = b); (s)%a: ⊦ (x + y) + z = x + y + z; from specification list% ⊦ (a ' + x) -1l a = x; (s) Used terms: a, y