| lpt.map(λ lp. (lp.ref-size = 0 ∧ lp.flags ≠ LP_FREE ⊃ mklp(0, 0, LP_FREE, lp.gcheapidx);lp))[n] = mklp(m, m0, lpf, m1), lpt[n] = mklp(m2, m3, lpf0, m4), n < # lpt, LEB_SIZE < m0, m3 < m0, m3 ≤ LEB_SIZE, ∀ n. n < # lpt → lpt[n].size ≤ LEB_SIZE ⊦ |
⊦ lpt.map(lptfun)[n] = (n < # lpt ⊃ lptfun(lpt[n]);lpt[n])
(n < # lpt ⊃ (lpt[n].ref-size = 0 ∧ lpt[n].flags ≠ LP_FREE ⊃ mklp(0, 0, LP_FREE, lpt[n].gcheapidx);lpt[n]);lpt[n]) = mklp(m, m0, lpf, m1), lpt[n] = mklp(m2, m3, lpf0, m4), m3 < m0, LEB_SIZE < m0, n < # lpt, m3 ≤ LEB_SIZE, ∀ n. n < # lpt → lpt[n].size ≤ LEB_SIZE ⊦
Used terms: n, λ lp. (lp.ref-size = 0 ∧ lp.flags ≠ LP_FREE ⊃ mklp(0, 0, LP_FREE, lp.gcheapidx) ;lp ), lpt