| 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(kar, m).size ≤ # bin-heap(kar, m).ar ∧ no-dups-idx(bin-heap(kar, m).ar, bin-heap(kar, m).size) ∧ valid-idx(bin-heap(kar, m).ar, lpt, bin-heap(kar, m).size) ∧ 2exp-size(# bin-heap(kar, m).ar) ∧ heap-order(bin-heap(kar, m).ar, bin-heap(kar, m).size) |
lpt[n] = mklp(m0, m1, lpf0, m2), 2exp-size(# kar), n < # lpt, heap-order(kar, m), no-dups-idx(kar, m), m ≤ # kar ⊦ valid-idx(kar, lpt[n, mklp(n0, n1, lpf1, m2)], m) ↔ valid-idx(kar, lpt, m)
Used simplifier rules: ⊦ bin-heap(kar, m).ar = kar; (s)% ⊦ bin-heap(kar, m).size = m; (s)