| a0 < a, ∀ a, y. sort(ins≤(a, x0) + y) = ins≤(a, sort(x0 + y)) ⊦ sort(ins≤(a, a0 ' + x0) + y) = ins≤(a, ins≤(a0, sort(x0 + y))) |
a0 < a, ∀ a, y. sort(ins≤(a, x0) + y) = ins≤(a, sort(x0 + y)) ⊦ ins≤(a0, sort(ins≤(a, x0) + y)) = ins≤(a, ins≤(a0, sort(x0 + y)))
Used simplifier rules: rec: ⊦ sort(a ' + x) = ins≤(a, sort(x));%a: ⊦ (x + y) + z = x + y + z; from specification list% ⊦ a + x = a ' + x; (s)% ⊦ b < a → ins≤(a, b ' + x) = b + ins≤(a, x); (s)