| ⊦ (ax + (a × d)' + ax0)[a, d0] = ax + (a × d0)' + ax0, a ∈ ax |
∀ a, d, ax0, d0. (ax1 + (a × d)' + ax0)[a, d0] = ax1 + (a × d0)' + ax0 ∨ a ∈ ax1 ⊦ ((p + ax1) + (a × d)' + ax0)[a, d0] = (p + ax1) + (a × d0)' + ax0, a ∈ p + ax1
Used simplifier rules: put-yes: ⊦ ((a × d0)' + ax)[a, d] = (a × d)' + ax;%assoclist freely generated by [], +;;%Nil: ⊦ [] + ax = ax; from specification list[assoclista]%a: ⊦ (ax + ax0) + ax1 = ax + ax0 + ax1; from specification list[assoclista]%app-08: ⊦ p ' + ax = p ' + ax0 ↔ ax = ax0; from specification list[assoclista]