| ⊦ lpt-free-unref(remove-wbufs(ns, lpt)) ↔ lpt-free-unref(lpt) |
⊦ (∀ n. n < # lpt ∧ lpt.mapIndices(ns, λ lp. lp.size:= LEB_SIZE)[n].flags = LP_FREE → lpt.mapIndices(ns, λ lp. lp.size:= LEB_SIZE)[n].ref-size = 0) ↔ (∀ n. n < # lpt ∧ lpt[n].flags = LP_FREE → lpt[n].ref-size = 0)
Used simplifier rules: remove-wbufs: ⊦ remove-wbufs(ns, lpt) = lpt.mapIndices(ns, λ lp. lp.size:= LEB_SIZE);%lpt-free-unref: ⊦ lpt-free-unref(lpt) ↔ (∀ n. n < # lpt ∧ lpt[n].flags = LP_FREE → lpt[n].ref-size = 0);% ⊦ # lpt.mapIndices(ns, lptfun) = # lpt; (s)