| lpt[n] = mklp(m0, m1, LP_FREE, m2), n < # lpt, m ≤ # lpt ⊦ gc-heap(lpt[n, lp], nx + n ', m) = gc-heap(lpt, nx, m) |
lpt[n] = mklp(m0, m1, LP_FREE, m2), n < # lpt, m ≤ # lpt ⊦ gc-heap(lpt[n, lp], nx + n ', m) = gc-heap(lpt, nx, m)
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic