| lpt.mapIndices(ns, λ lp. lp.size:= LEB_SIZE)[m4] = mklp(m1, m2, lpf, m3), kar[m0] = key-index(natkey, m4), 2exp-size(# kar), m0 < m, m0 < # kar, heap-order(kar, m), no-dups-idx(kar, m), valid-idx(kar, lpt, m), m ≤ # kar ⊦ m4 < # lpt ∧ m3 = m0 |
kar[m0] = key-index(natkey, m4), lpt.mapIndices(ns, λ lp. lp.size:= LEB_SIZE)[m4] = mklp(m1, m2, lpf, m3), 2exp-size(# kar), m4 < # lpt, m0 < # kar, m0 < m, heap-order(kar, m), no-dups-idx(kar, m), valid-idx(kar, lpt, m), m ≤ # kar ⊦ m3 = m0
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic%m < m0 ⊦ kar[m] = key-index(natkey, n) ∧ valid-idx(kar, lpt, m0) → ¬ # lpt ≤ n; (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)