| lpt[n] = mklp(m2, m3, lpf0, m4), lpf = LP_FREE, n < # lpt, n < # lpt ∧ lpf0 = LP_FREE → m2 = 0, ∀ n. n < # lpt ∧ lpt[n].flags = LP_FREE → lpt[n].ref-size = 0, ∀ n0. n0 < # lpt ∧ lpt[n, mklp(m, m0, lpf, m1)][n0].flags = LP_FREE → lpt[n, mklp(m, m0, lpf, m1)][n0].ref-size = 0 ⊦ m = 0 |
lpt[n] = mklp(m2, m3, lpf0, m4), n < # lpt, lpf0 = LP_FREE → m2 = 0, ∀ n. n < # lpt ∧ lpt[n].flags = LP_FREE → lpt[n].ref-size = 0, ∀ n0. n0 < # lpt ∧ lpt[n, mklp(m, m0, LP_FREE, m1)][n0].flags = LP_FREE → lpt[n, mklp(m, m0, LP_FREE, m1)][n0].ref-size = 0 ⊦ m = 0
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic