| # buf1 = EB_PAGE_SIZE, # lpt = # avol, LEB_SIZE = n0 + # buf2, avol[m3] = mapped(buf2), m3 < # avol, ebm-vol-inv(avol), wbuf-cons(mkwbuf(buf1, m5, m4), mapped(buf2), rofs), m5 ≤ LEB_SIZE, m0 ≤ m5 + m4, m5 ≤ m0 + n, m0 + n ≤ LEB_SIZE, n ≤ # buf, # buf2 ≤ LEB_SIZE, (m0 ≤ m5 ⊃ m5 - m0;0) ≤ n, ¬ m0 ≤ m5 → m5 ≤ m0 ⊦ (m0 ≤ m5 ⊃ 0;m0 - m5) + min(n - (m0 ≤ m5 ⊃ m5 - m0;0), m4 - (m0 ≤ m5 ⊃ 0;m0 - m5)) ≤ EB_PAGE_SIZE ∧ (m0 ≤ m5 ⊃ m5 - m0;0) + min(n - (m0 ≤ m5 ⊃ m5 - m0;0), m4 - (m0 ≤ m5 ⊃ 0;m0 - m5)) ≤ # buf ∧ (m0 ≤ m5 ⊃ m5 - m0;0) ≤ n ∧ (m0 ≤ m5 ⊃ 0;m0 - m5) ≤ m4 |
# lpt = # avol, # buf1 = EB_PAGE_SIZE, LEB_SIZE = n0 + # buf2, avol[m3] = mapped(buf2), m3 < # avol, ebm-vol-inv(avol), wbuf-cons(mkwbuf(buf1, m5, m4), mapped(buf2), rofs), (m0 ≤ m5 ⊃ m5 - m0;0) ≤ n, # buf2 ≤ LEB_SIZE, n ≤ # buf, m0 + n ≤ LEB_SIZE, m5 ≤ m0 + n, m0 ≤ m5 + m4, m5 ≤ LEB_SIZE, (m0 ≤ m5 ⊃ m5 - m0;0) ≤ # buf, ¬ m0 ≤ m5 → m5 ≤ m0 ⊦ (m0 ≤ m5 ⊃ 0;m0 - m5) + min(n - (m0 ≤ m5 ⊃ m5 - m0;0), m4 - (m0 ≤ m5 ⊃ 0;m0 - m5)) ≤ EB_PAGE_SIZE ∧ (m0 ≤ m5 ⊃ m5 - m0;0) + min(n - (m0 ≤ m5 ⊃ m5 - m0;0), m4 - (m0 ≤ m5 ⊃ 0;m0 - m5)) ≤ # buf ∧ (m0 ≤ m5 ⊃ 0;m0 - m5) ≤ m4
Used simplifier rules: let: ⊦ n ≤ n0 ∧ n0 ≤ n1 → n ≤ n1; (forward) from specification nat