| disj(x, y0), ∀ x, a. disj(x, y0) → (disj(y0, a ' + x) ↔ ¬ a ∈ y0) ⊦ disj(a0 ' + y0, a ') ∧ disj(a0 ' + y0, x) ↔ a ≠ a0 ∧ ¬ a ∈ y0, a0 ∈ x |
disj(x, y0), ∀ x, a. disj(x, y0) → (disj(y0, a ' + x) ↔ ¬ a ∈ y0) ⊦ a = a0, a0 ∈ x, disj(y0, x), a ∈ y0
Used simplifier rules: one-01: ⊦ disj(x, a ') ↔ ¬ a ∈ x;%first-01: ⊦ ¬ a ∈ x → (disj(a ' + y, x) ↔ disj(y, x));%in-01: ⊦ a ≠ b → (a ∈ b ' + x ↔ a ∈ x); from specification list%a: ⊦ (x + y) + z = x + y + z; from specification list%in-rec: ⊦ a ∈ b ' + x ↔ ¬ ¬(a = b ∨ a ∈ x); from specification list