| gc-heap(lpt, log, n) = keyset(gch), gch0 = bin-heap(mkkeyarray(1), 0), log = nx, lpt = lpt1, lpt0 = lpt2, n = n0, n1 = 0, n < # lpt, bin-heap-inv(gch, lpt), id-idx(lpt2, lpt), n ≤ # lpt ⊦ ⟪n := n + 1⟫ ((n ≤ # lpt ∧ bin-heap-inv(gch, lpt) ∧ gc-heap(lpt, log, n) = keyset(gch) ∧ id-idx(lpt2, lpt)) ∧ # lpt - n < # lpt1 - n0), lpt[n].flags = LP_GROUP_NODES ∧ ¬ n ∈ log |
gc-heap(lpt, log, n) = keyset(gch), gch0 = bin-heap(mkkeyarray(1), 0), log = nx, lpt = lpt1, lpt0 = lpt2, n = n0, n1 = 0, n < # lpt, bin-heap-inv(gch, lpt), id-idx(lpt2, lpt), n ≤ # lpt ⊦ lpt[n].flags = LP_GROUP_NODES ∧ ¬ n ∈ log, (n + 1 ≤ # lpt ∧ bin-heap-inv(gch, lpt) ∧ gc-heap(lpt, log, n + 1) = keyset(gch) ∧ id-idx(lpt2, lpt)) ∧ # lpt - n + 1 < # lpt1 - n0