| disj(x, y) ⊦ disj(y, a ' + x) ↔ ¬ a ∈ y |
∀ x, a. disj(x, y0) → (disj(y0, a ' + x) ↔ ¬ a ∈ y0), disj(x, a0 + y0) ⊦ disj(a0 + y0, a ' + x) ↔ ¬ a ∈ a0 + y0
Used simplifier rules: dis-empty: ⊦ disj([], x);%list freely generated by [], +;;%in-empty: ⊦ ¬ a ∈ []; from specification list