| perm(y[n, a], x), n < # y, perm(x, y[n, a]) ⊦ y = [], perm(x -1l a, y -1l y[n]) |
⊦ perm(x, y) → (perm(x -1l a, z) ↔ perm(y -1l a, z))
Used simplifier rules: perm-put-del1: ⊦ n < # y → perm(y[n, a] -1l a, y -1l y[n]); Used terms: y[n, a], y -1l y[n], a, x