| # lpt3 = # lpt4, # avol1 = # lpt4, keyset(gch) = gc-heap(cleanup-lpt(lpt4, n0), []), keyset(gch0) = gc-heap(lpt4, []), n0 < # lpt4, avol-cleanup-lpt-unchanged(avol1, avol, lpt4), awbuf-inv(avol, nobuffer), awbuf-inv(avol1, nobuffer), bin-heap-inv(gch, lpt3), bin-heap-inv(gch0, lpt4), freelist-cons(cleanup-lpt(lpt4, n0), freelist), freelist-cons(lpt4, freelist0), id-idx(cleanup-lpt(lpt4, n0), lpt3), synced(avol), synced(avol1) ⊦ id-idx ((lpt4[n0].ref-size = 0 ∧ lpt4[n0].flags ≠ LP_FREE ⊃ cleanup-lpt(lpt4, n0)[n0, mklp(0, 0, LP_FREE, lpt4[n0].gcheapidx)];cleanup-lpt(lpt4, n0)), lpt3) ∧ freelist-cons ((lpt4[n0].ref-size = 0 ∧ lpt4[n0].flags ≠ LP_FREE ⊃ cleanup-lpt(lpt4, n0)[n0, mklp(0, 0, LP_FREE, lpt4[n0].gcheapidx)];cleanup-lpt(lpt4, n0)), freelist) ∧ keyset(gch) = gc-heap ((lpt4[n0].ref-size = 0 ∧ lpt4[n0].flags ≠ LP_FREE ⊃ cleanup-lpt(lpt4, n0)[n0, mklp(0, 0, LP_FREE, lpt4[n0].gcheapidx)];cleanup-lpt(lpt4, n0)), []), lpt3[n0].ref-size = 0 ∧ lpt3[n0].flags ≠ LP_FREE |
# avol1 = # lpt4, # lpt3 = # lpt4, lpt4[n0] = mklp(m, m0, lpf, m1), keyset(gch0) = gc-heap(lpt4, []), keyset(gch) = gc-heap(cleanup-lpt(lpt4, n0), []), n0 < # lpt4, avol-cleanup-lpt-unchanged(avol1, avol, lpt4), awbuf-inv(avol1, nobuffer), awbuf-inv(avol, nobuffer), bin-heap-inv(gch0, lpt4), bin-heap-inv(gch, lpt3), freelist-cons(lpt4, freelist0), freelist-cons(cleanup-lpt(lpt4, n0), freelist), id-idx(cleanup-lpt(lpt4, n0), lpt3), synced(avol1), synced(avol) ⊦ lpt3[n0].ref-size = 0 ∧ lpt3[n0].flags ≠ LP_FREE, id-idx((m = 0 ∧ lpf ≠ LP_FREE ⊃ cleanup-lpt(lpt4, n0)[n0, mklp(0, 0, LP_FREE, m1)];cleanup-lpt(lpt4, n0)), lpt3) ∧ freelist-cons((m = 0 ∧ lpf ≠ LP_FREE ⊃ cleanup-lpt(lpt4, n0)[n0, mklp(0, 0, LP_FREE, m1)];cleanup-lpt(lpt4, n0)), freelist) ∧ keyset(gch) = gc-heap((m = 0 ∧ lpf ≠ LP_FREE ⊃ cleanup-lpt(lpt4, n0)[n0, mklp(0, 0, LP_FREE, m1)];cleanup-lpt(lpt4, n0)), [])
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: lpt4[n0], m, m0, lpf, m1