| # lpt2 = # avol0, # avol = # avol0, # lpt3 = # avol0, avol1 = avol, keyset(gch1) = gc-heap(lpt2, log2), lpt = replay-log(lpt3, log2), awbuf-inv(avol0, bleb1), bin-heap-inv(gch1, lpt2), buf-ro-rw-mode(isbuf1, bleb1, lpt2, avol0), bufs-log-only(bleb1, log2, lpt2), freelist-cons(lpt2, log5), log-group-block(log2, lpt2), lpt-free-unref(lpt3), lpt-free-unref(lpt2), lpt-leb-size(lpt3), lpt-leb-size(lpt2), lpt-ram-flash(lpt2, lpt3, log2), synced(avol), synced(avol0), valid-indices(lpt3, log2), avol ↓ avol0 ⊦ ∀ lpt, avol. lpt = replay-lpt(replay-log(lpt3, log2), log2, # avol0) ∧ awbuf-inv(avol, nobuffer) ∧ avol-replay-lpt-unchanged(avol1, avol, replay-log(lpt3, log2), log2) → ⟪persistence_create_freelist#(replay-lpt(replay-log(lpt3, log2), log2, # avol0); freelist); lpt := replay-lpt(replay-log(lpt3, log2), log2, # avol0); persistence_create_gcheap#(log2; lpt, gch)⟫ ( freelist-cons(replay-lpt(replay-log(lpt3, log2), log2, # avol0), freelist) ∧ bin-heap-inv(gch, lpt) ∧ keyset(gch) = gc-heap(replay-lpt(replay-log(lpt3, log2), log2, # avol0), log2) ∧ # lpt = # avol ∧ log-group-block(log2, lpt) ∧ lpt-leb-size(replay-lpt(replay-log(lpt3, log2), log2, # avol0)) ∧ lpt-ram-flash(lpt, lpt3, log2) ∧ # avol = # avol0 ∧ id-idx(replay-lpt(replay-log(lpt3, log2), log2, # avol0), lpt)), dups(log2) |
# avol2 = # avol0, # lpt2 = # avol0, # avol = # avol0, # lpt3 = # avol0, keyset(gch1) = gc-heap(lpt2, log2), avol-replay-lpt-unchanged(avol, avol2, replay-log(lpt3, log2), log2), awbuf-inv(avol0, bleb1), awbuf-inv(avol2, nobuffer), bin-heap-inv(gch1, lpt2), buf-ro-rw-mode(isbuf1, bleb1, lpt2, avol0), bufs-log-only(bleb1, log2, lpt2), freelist-cons(lpt2, log5), log-group-block(log2, lpt2), lpt-free-unref(lpt3), lpt-free-unref(lpt2), lpt-leb-size(lpt3), lpt-leb-size(lpt2), lpt-ram-flash(lpt2, lpt3, log2), synced(avol), synced(avol0), valid-indices(lpt3, log2), avol ↓ avol0, ¬ dups(log2) ⊦ ⟪persistence_create_freelist#(replay-lpt(replay-log(lpt3, log2), log2, # avol0); freelist); lpt0 := replay-lpt(replay-log(lpt3, log2), log2, # avol0); persistence_create_gcheap#(log2; lpt0, gch)⟫ ( freelist-cons(replay-lpt(replay-log(lpt3, log2), log2, # avol0), freelist) ∧ bin-heap-inv(gch, lpt0) ∧ keyset(gch) = gc-heap(replay-lpt(replay-log(lpt3, log2), log2, # avol0), log2) ∧ # lpt0 = # avol2 ∧ log-group-block(log2, lpt0) ∧ lpt-leb-size(replay-lpt(replay-log(lpt3, log2), log2, # avol0)) ∧ lpt-ram-flash(lpt0, lpt3, log2) ∧ id-idx(replay-lpt(replay-log(lpt3, log2), log2, # avol0), lpt0))
Used simplifier rules: ⊦ avol1 ↓ avol0 ∧ # avol1 = n → (n = # avol0 ↔ true); (ss)%avol-replay-lpt-unchanged-size: ⊦ avol-replay-lpt-unchanged(avol0, avol1, lpt, nx) → # avol1 = # avol0; (forward) from specification persistence-base