| x + a ' + y = a0 + y0 ⊦ x + a ' + y = [], a0 = (x + a ').head |
x + a ' + y = a0 ' + y0, a0 ∈ x ∨ a0 = a ∨ a0 ∈ y ⊦ a0 = (x + a ').head
Used simplifier rules: c: ⊦ a + x = a ' + x;%e-03: ⊦ x + a ' + y ≠ [];%a: ⊦ (x + y) + z = x + y + z;%in-14: ⊦ a ' + x = y → a ∈ y;%in-append: ⊦ a ∈ x + y ↔ a ∈ x ∨ a ∈ y;%in-17: ⊦ a ∈ b ' ↔ a = b;