| log-group-block(nx, lpt) ⊦ log-group-block(nx, remove-wbufs(ns, lpt)) |
n ∈ nx, ∀ n. n ∈ nx → n < # lpt ∧ lpt[n].flags = LP_GROUP_NODES ⊦ n < # lpt ∧ lpt.mapIndices(ns, λ lp. lp.size:= LEB_SIZE)[n].flags = LP_GROUP_NODES
Used simplifier rules: log-group-block: ⊦ log-group-block(nx, lpt) ↔ (∀ n. n ∈ nx → n < # lpt ∧ lpt[n].flags = LP_GROUP_NODES);%remove-wbufs: ⊦ remove-wbufs(ns, lpt) = lpt.mapIndices(ns, λ lp. lp.size:= LEB_SIZE);% ⊦ # lpt.mapIndices(ns, lptfun) = # lpt; (s)