| ¬(perm(x -1l a, y[n, a] -1l a) ∧ a ∈ x ∧ a ∈ y[n, a]), perm(x -1l a, y -1l y[n]), a ∈ x, n < # y, perm(y -1l y[n], x -1l a) ⊦ y = [], perm(x, y[n, a]) |
perm(y -1l y[n], x -1l a), n < # y, a ∈ x, perm(x -1l a, y -1l y[n]) ⊦ y = [], perm(x -1l a, y[n, a] -1l a), perm(x, y[n, a])
Used simplifier rules: sym-02: ⊦ ¬ perm(x, y) → ¬ perm(y, x);%sym-02: ⊦ ¬ perm(x, y) → ¬ perm(y, x);%put-in-02: ⊦ m < # x → a ∈ x[m, a]; from specification list-del