| lpt[n0] = mklp(m3, m4, lpf0, m5), lpt[m] = mklp(m0, m1, lpf, m2), m3 = 0, m < # lpt, n0 < # lpt, m ≤ n0, m < n0 → cleanup-lpt(lpt, n0)[m] = (m0 = 0 ∧ lpf ≠ LP_FREE ⊃ mklp(0, 0, LP_FREE, m2);mklp(m0, m1, lpf, m2)) ⊦ cleanup-lpt(lpt, n0)[n0, mklp(0, 0, LP_FREE, m5)][m] = (m0 = 0 ∧ lpf ≠ LP_FREE ⊃ mklp(0, 0, LP_FREE, m2);mklp(m0, m1, lpf, m2)), lpf0 = LP_FREE |
lpt[m] = mklp(m0, m1, lpf, m2), lpt[n0] = mklp(0, m4, lpf0, m5), n0 < # lpt, m < # lpt, m ≤ n0, m < n0 → cleanup-lpt(lpt, n0)[m] = (m0 = 0 ∧ lpf ≠ LP_FREE ⊃ mklp(0, 0, LP_FREE, m2);mklp(m0, m1, lpf, m2)) ⊦ cleanup-lpt(lpt, n0)[n0, mklp(0, 0, LP_FREE, m5)][m] = (m0 = 0 ∧ lpf ≠ LP_FREE ⊃ mklp(0, 0, LP_FREE, m2);mklp(m0, m1, lpf, m2)), lpf0 = LP_FREE