| lpt0 = lpt, nx0 = nx, valid-indices(lpt, nx), ¬ dups(nx) ⊦ ⟪persistence_replay_log#(LEB_SIZE; nx, lpt)⟫ (lpt = replay-log(lpt0, nx0)) |
log0 = nx, lpt0 = lpt, m = LEB_SIZE, nx0 = nx, valid-indices(lpt, nx) ⊦ ⟪while log0 ≠ [] do {/* (prepost-replay-log : invariant ∃ log. log0` = log + log0 ∧ lpt = replay-log(lpt`, log) ∧ valid-indices(lpt, log0`) ∧ ¬ dups(log0`) wfbound # log0) */; let n = log0.head in {lpt[n].flags := LP_GROUP_NODES; lpt[n].size := m; log0 := log0.tail}}⟫ (lpt = replay-log(lpt0, nx0)), dups(nx)
Used simplifier rules: replay-log: ⊦ ;