| ¬(y ≠ [] ∧ y.first < a), a0 ' + ins≤(a, x0) = ins≤(a, y), a0 < a, a0 ∈ ins≤(a, y), ∀ a, y. ins≤(a, x0) = ins≤(a, y) → x0 = y ⊦ a0 ' + x0 = y |
a0 ' + ins≤(a, x0) = ins≤(a, y), a0 ∈ ins≤(a, y), a0 < a, ∀ a, y. ins≤(a, x0) = ins≤(a, y) → x0 = y ⊦ a0 ' + x0 = y, y = [], y.first < a
Used simplifier rules: ins-e: ⊦ ins≤(a, []) = a ';%empty: ⊦ ins≤(a, x) ≠ [];%a: ⊦ (x + y) + z = x + y + z; from specification list%c-03: ⊦ a ' = b ' + x ↔ a = b ∧ x = []; from specification list