| m0 < # lpt1, id-idx(lpt0, lpt1), ∀ lpt0, lpt1, nx. id-idx(lpt0, lpt1) ∧ m0 ≤ # lpt1 → gc-heap(lpt1, nx, m0) = gc-heap(lpt0, nx, m0) ⊦ gc-heap(lpt1, nx, m0) ∪ (¬ m0 ∈ nx ∧ lpt1[m0].flags = LP_GROUP_NODES ⊃ ∅ ++ key-index(lpt1[m0].ref-size, m0);∅) = gc-heap(lpt0, nx, m0 + 1) |
lpt1[m0] = mklp(m, m1, lpf, m2), m0 < # lpt1, id-idx(lpt0, lpt1), ∀ lpt0, lpt1, nx. id-idx(lpt0, lpt1) ∧ m0 ≤ # lpt1 → gc-heap(lpt1, nx, m0) = gc-heap(lpt0, nx, m0) ⊦ gc-heap(lpt1, nx, m0) ∪ (¬ m0 ∈ nx ∧ lpf = LP_GROUP_NODES ⊃ ∅ ++ key-index(m, m0);∅) = gc-heap(lpt0, nx, m0 + 1)
Used simplifier rules: ⊦ ((m = lp.ref-size ∧ m0 = lp.size) ∧ lpf = lp.flags) ∧ m1 = lp.gcheapidx ↔ lp = mklp(m, m0, lpf, m1); (elim) Used terms: lpt1[m0], m, m1, lpf, m2