| lpt[n] = mklp(m0, m1, lpf0, m2), gch = bin-heap(kar, m), n < # lpt ⊦ m ≤ # kar ∧ no-dups-idx(kar, m) ∧ valid-idx(kar, lpt[n, mklp(n0, n1, lpf1, m2)], m) ∧ 2exp-size(# kar) ∧ heap-order(kar, m) ↔ bin-heap-inv(gch, lpt) |
lpt[n] = mklp(m0, m1, lpf0, m2), n < # lpt ⊦ m ≤ # kar ∧ no-dups-idx(kar, m) ∧ valid-idx(kar, lpt[n, mklp(n0, n1, lpf1, m2)], m) ∧ 2exp-size(# kar) ∧ heap-order(kar, m) ↔ bin-heap-inv(bin-heap(kar, m), lpt)