| ∀ a, d. ¬(a ∈ ax0 ∧ unique_al(ax0 + (a × d)') ∧ unique_al(ax0)), a ∈ p + ax0, unique_al((p + ax0) + (a × d)'), unique_al(p + ax0) ⊦ |
unique_al((p ' + ax0) + (a × d)'), unique_al(p ' + ax0), a ∈ p ' ∨ a ∈ ax0, ∀ a0, d0. ¬ a0 ∈ ax0 ∨ ¬ unique_al(ax0 + (a0 × d0)') ∨ ¬ unique_al(ax0) ⊦
Used simplifier rules: inapp: ⊦ a ∈ ax + ay ↔ ¬ ¬(a ∈ ax ∨ a ∈ ay);%unique: ⊦ unique_al(ax + p ') → unique_al(ax);%a: ⊦ (ax + ax0) + ax1 = ax + ax0 + ax1; from specification list[assoclista]%c: ⊦ p + ax = p ' + ax; from specification list[assoclista]