| 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(x -1l a, y -1l a) ∧ a ∈ x ∧ a ∈ y → perm(x, y)
¬(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])
Used terms: a, y[n, a], x