| # avol = # avol0, # buf3 = lptsize(# lpt, LEB_SIZE), # lpt0 = # lpt, # buf3 = lptlebs(# lpt, LEB_SIZE) * LEB_SIZE, # avol0 = n0 + 5 + lptlebs(# lpt, LEB_SIZE), (5 + 2 * lptlebs(# lpt, LEB_SIZE)) + # lpt = # avol0, avol[0] = mapped(buf2), avol[1] = mapped(mkbuf(0)), avol[2] = mapped(buf1), avol[3] = mapped(buf), avol[4] = mapped(buf0), avol0[0] = mapped(buf2), avol0[4] = mapped(buf0), avol0[2] = mapped(buf1), 3 < # avol0, ebm-vol-inv(avol), ebm-vol-inv(avol0[1, mapped(mkbuf(0))]), ebm-vol-inv(avol0), ebm-vol-inv(avol0[1, mapped(mkbuf(0))][3, mapped(buf)]), is-encoded(lpt, buf3), is-encoded(log, buf1), is-encoded(lpt0, lebs(avol0, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# lpt, LEB_SIZE))), is-encoded(mksb(adr0, m2, 2, 4, m6, 5 + lptlebs(# lpt, LEB_SIZE), 5 + 2 * lptlebs(# lpt, LEB_SIZE)), buf2), is-encoded-pad(orphans0, m6, buf0), is-encoded-pad(orphans, # orphans, buf), mapped-full?(avol0, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# lpt, LEB_SIZE)), range=(avol, 5 + lptlebs(# lpt, LEB_SIZE), avol0, 5 + lptlebs(# lpt, LEB_SIZE), n0), 5 ≤ # avol0, 5 + lptlebs(# lpt, LEB_SIZE) ≤ # avol0, 5 + 2 * lptlebs(# lpt, LEB_SIZE) ≤ # avol0, ⌊err⌋ , logoff ≠ LEB_SIZE → # buf1 = logoff ⊦ (∃ lpt1. lptlebs(# lpt, LEB_SIZE) = lptlebs(# lpt1, LEB_SIZE) ∧ 2 * lptlebs(# lpt, LEB_SIZE) = 2 * lptlebs(# lpt1, LEB_SIZE) ∧ (5 + 2 * lptlebs(# lpt, LEB_SIZE)) + # lpt1 = # avol0 ∧ mapped-full?(avol, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# lpt1, LEB_SIZE)) ∧ is-encoded(lpt1, lebs(avol, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# lpt1, LEB_SIZE)))) ∧ lebs(avol, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# avol0 - 5 + 2 * lptlebs(# lpt, LEB_SIZE), LEB_SIZE)) = lebs(avol0, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# avol0 - 5 + 2 * lptlebs(# lpt, LEB_SIZE), LEB_SIZE)) ∧ subarray(avol, 5 + 2 * lptlebs(# lpt, LEB_SIZE), # avol0 - 5 + 2 * lptlebs(# lpt, LEB_SIZE)) = subarray(avol0, 5 + 2 * lptlebs(# lpt, LEB_SIZE), # avol0 - 5 + 2 * lptlebs(# lpt, LEB_SIZE)) |
# buf3 = lptlebs(# lpt, LEB_SIZE) * LEB_SIZE, # lpt0 = # lpt, # buf3 = lptsize(# lpt, LEB_SIZE), # avol = # avol0, (5 + 2 * lptlebs(# lpt, LEB_SIZE)) + # lpt = # avol0, avol0[2] = mapped(buf1), avol0[4] = mapped(buf0), avol0[0] = mapped(buf2), avol[4] = mapped(buf0), avol[3] = mapped(buf), avol[2] = mapped(buf1), avol[1] = mapped(mkbuf(0)), avol[0] = mapped(buf2), 3 < # avol0, ebm-vol-inv(avol0[1, mapped(mkbuf(0))][3, mapped(buf)]), ebm-vol-inv(avol0), ebm-vol-inv(avol0[1, mapped(mkbuf(0))]), ebm-vol-inv(avol), is-encoded(mksb(adr0, m2, 2, 4, m6, 5 + lptlebs(# lpt, LEB_SIZE), 5 + 2 * lptlebs(# lpt, LEB_SIZE)), buf2), is-encoded(lpt0, lebs(avol0, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# lpt, LEB_SIZE))), is-encoded(log, buf1), is-encoded(lpt, buf3), is-encoded-pad(orphans, # orphans, buf), is-encoded-pad(orphans0, m6, buf0), mapped-full?(avol0, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# lpt, LEB_SIZE)), range=(avol, 5 + lptlebs(# lpt, LEB_SIZE), avol0, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# lpt, LEB_SIZE) + # lpt), 5 + 2 * lptlebs(# lpt, LEB_SIZE) ≤ # avol0, 5 + lptlebs(# lpt, LEB_SIZE) ≤ # avol0, 5 ≤ # avol0, ⌊err⌋ , logoff ≠ LEB_SIZE → # buf1 = logoff ⊦ (∃ lpt1. lptlebs(# lpt, LEB_SIZE) = lptlebs(# lpt1, LEB_SIZE) ∧ 2 * lptlebs(# lpt, LEB_SIZE) = 2 * lptlebs(# lpt1, LEB_SIZE) ∧ (5 + 2 * lptlebs(# lpt, LEB_SIZE)) + # lpt1 = # avol0 ∧ mapped-full?(avol, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# lpt1, LEB_SIZE)) ∧ is-encoded(lpt1, lebs(avol, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# lpt1, LEB_SIZE)))) ∧ lebs(avol, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# avol0 - 5 + 2 * lptlebs(# lpt, LEB_SIZE), LEB_SIZE)) = lebs(avol0, 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# avol0 - 5 + 2 * lptlebs(# lpt, LEB_SIZE), LEB_SIZE)) ∧ subarray(avol, 5 + 2 * lptlebs(# lpt, LEB_SIZE), # avol0 - 5 + 2 * lptlebs(# lpt, LEB_SIZE)) = subarray(avol0, 5 + 2 * lptlebs(# lpt, LEB_SIZE), # avol0 - 5 + 2 * lptlebs(# lpt, LEB_SIZE))
Used simplifier rules: ⊦ m + m = 2 * m; (s)%n < n0 ⊦ (* n) < m0 + (* n0); (s)%mult-c: ⊦ m * n = n * m; from specification nat-mult%mult-a: ⊦ m0 * m * n = (m0 * m) * n; from specification nat-mult% ⊦ m0 * 1 = m0; (s)%m2 ≠ 0 ⊦ (* m2) * m + n = m + n0 ↔ (m2 - 1) * m + n = n0; (s)%lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic%eqs: ⊦ m = n + n0 ∧ m = n + n1 → n0 = n1; (forward) from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic