| # lebs(avol0, 5, lptlebs(# lpt, LEB_SIZE)) = lptsize(# lpt, LEB_SIZE), # avol = # avol0, # avol0 = # lpt + 5 + 2 * lptlebs(# lpt, LEB_SIZE), avol[3] = mapped(mkbuf(0)), avol[1] = mapped(mkbuf(0)), avol0[0] = fill(mkavolume(# avol0), unmapped)[0], avol0[1] = mapped(mkbuf(0)), avol0[2] = fill(mkavolume(# avol0), unmapped)[2], avol0[3] = mapped(mkbuf(0)), avol0[4] = fill(mkavolume(# avol0), unmapped)[4], avol[0] = mapped(buf), ebm-vol-inv(avol), ebm-vol-inv(avol0), ebm-vol-inv(fill(mkavolume(# avol0), unmapped)[1, mapped(mkbuf(0))]), ebm-vol-inv(fill(mkavolume(# avol0), unmapped)), ebm-vol-inv(fill(mkavolume(# avol0), unmapped)[1, mapped(mkbuf(0))][3, mapped(mkbuf(0))]), id○(avol, avol0, 0), is-encoded(lpt, lebs(avol0, 5, lptlebs(# lpt, LEB_SIZE))), is-encoded(mksb(adr, m1, 1, 3, 0, 5, 5 + 2 * lptlebs(# lpt, LEB_SIZE)), buf), mapped-full?(avol0, 5, lptlebs(# lpt, LEB_SIZE)), range= (avol0, 5 + lptlebs(# lpt, LEB_SIZE), fill(mkavolume(# avol0), unmapped), 5 + lptlebs(# lpt, LEB_SIZE), lptlebs(# lpt, LEB_SIZE) + # lpt), 5 + lptlebs(# lpt, LEB_SIZE) ≤ # avol0, 5 ≤ # avol0, 5 + 2 * lptlebs(# lpt, LEB_SIZE) ≤ # avol0 ⊦ ∃ lpt0. 2 * lptlebs(# lpt, LEB_SIZE) = 2 * lptlebs(# lpt0, LEB_SIZE) ∧ (5 + 2 * lptlebs(# lpt, LEB_SIZE)) + # lpt0 = # avol0 ∧ mapped-full?(avol0, 5, lptlebs(# lpt0, LEB_SIZE)) ∧ is-encoded(lpt0, lebs(avol, 5, lptlebs(# lpt0, LEB_SIZE))) |
Used simplifier rules: a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic%n < m0, m0 + m1 ≤ # avol1 ⊦ id○(avol1, avol0, n) → lebs(avol1, m0, m1) = lebs(avol0, m0, m1); (s) Used terms: lpt