| ¬ b ≠ a0, ordered≤(a0 ' + x0), ∀ a1, b0. ins≤(a1, x0 -1l b0) = ins≤(a1, x0) -1l b0 ∨ a1 = b0 ⊦ a = b, ins≤(a, (a0 ' + x0) -1l b) = a ' + ((a0 ' + x0) -1l b), a0 < a |
ordered≤(a0 ' + x0), a < a0, ∀ a1, b0. ins≤(a1, x0 -1l b0) = ins≤(a1, x0) -1l b0 ∨ a1 = b0 ⊦ a = a0, ins≤(a, x0) = a ' + x0
Used simplifier rules: sls: ⊦ a ≠ b → (¬ a < b ↔ b < a); from specification oelem%a: ⊦ (x + y) + z = x + y + z; from specification list%del1-y: ⊦ (a ' + x) -1l a = x; from specification list-del