Used simplifier rules: bapp: ⊦ y ≠ [] → (x + y).butlast = x + y.butlast;% ⊦ x + y = x + z ↔ y = z; (s)%a: ⊦ (x + y) + z = x + y + z; from specification list