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