| perm(x, y[n, a]), n < # y, perm(y[n, a], x) ⊦ perm(x -1l a, y -1l y[n]), y = [] |
perm(y[n, a], x), n < # y, perm(x, y[n, a]) ⊦ y = [], perm(x -1l a, y -1l y[n])
Used simplifier rules: sym-02: ⊦ ¬ perm(x, y) → ¬ perm(y, x);%sym-02: ⊦ ¬ perm(x, y) → ¬ perm(y, x);