| lpt[n1] = mklp(m, m0, lpf, m1), n ≤ # lpt ⊦ key-index(n0, n1) ∈ gc-heap(lpt, nx, n) ↔ n1 < n ∧ ¬ n1 ∈ nx ∧ m = n0 ∧ lpf = LP_GROUP_NODES |
lpt[n1] = mklp(m, m0, lpf, m1), n2 +1 ≤ # lpt, ∀ lpt, n1, m, m0, lpf, m1, n0, nx. lpt[n1] = mklp(m, m0, lpf, m1) ∧ n2 ≤ # lpt → (key-index(n0, n1) ∈ gc-heap(lpt, nx, n2) ↔ n1 < n2 ∧ ¬ n1 ∈ nx ∧ m = n0 ∧ lpf = LP_GROUP_NODES) ⊦ key-index(n0, n1) ∈ gc-heap(lpt, nx, n2 +1) ↔ n1 < n2 +1 ∧ ¬ n1 ∈ nx ∧ m = n0 ∧ lpf = LP_GROUP_NODES
Used simplifier rules: gc-heap-base: ⊦ gc-heap(lpt, nx, 0) = ∅;%nat freely generated by 0, +1;;% ⊦ ¬ ki ∈ ∅; (s)% ⊦ ¬ m < 0; (s)