| 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]) |
⊦ perm(x, y) ∧ perm(y, z) → perm(x, z)
Used simplifier rules: sym-02: ⊦ ¬ perm(x, y) → ¬ perm(y, x);%perm-put-del1: ⊦ n < # y → perm(y[n, a] -1l a, y -1l y[n]); Used terms: y -1l y[n], y[n, a] -1l a, x -1l a