| # buf1 = EB_PAGE_SIZE, # lpt0 = # avol1, # avol0 = # avol1, n + m2 = 0, rofs ↔ false, avol0[m4] = mapped(buf2), align↓(m2 + n3, EB_PAGE_SIZE) = n + m2, err = err0, err = ESUCCESS, wbuf = mkwbuf(buf1, # buf2, m2), m4 < # avol1, m2 < EB_PAGE_SIZE, abs(avol1, buffered(m4), mkwbuf(buf1, # buf2, m2), avol0, false), awbuf-inv(avol1, buffered(m4)), ebm-vol-inv(avol0), is-aligned(# buf2, EB_PAGE_SIZE), is-aligned(n + m2, EB_PAGE_SIZE), # buf2 + n + m2 ≤ LEB_SIZE, n ≤ # buf3, # buf2 + m2 + n3 ≤ LEB_SIZE, EB_PAGE_SIZE ≤ m2 + n3, n3 ≤ # buf3, # avol1[m4].data + n3 ≤ LEB_SIZE, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪wbuf.content := copy(buf3, n, wbuf.content, 0, (m2 + n3) % EB_PAGE_SIZE); wbuf.offset := wbuf.offset + align↓(m2 + n3, EB_PAGE_SIZE); wbuf.nbytes := (m2 + n3) % EB_PAGE_SIZE⟫ ⟨rofs0 := false; awbuf_write_buf#(n3, buf3, adr0, m3, plog0, lpt0, ns0, buffered(m4); avol1, rofs0; err1)⟩ (abs(avol1, buffered(m4), wbuf, avol0, rofs) ∧ (rofs0 ↔ rofs) ∧ err = err1), n3 = 0 |
Used simplifier rules: ⊦ m + n = 0 ↔ m = 0 ∧ n = 0; (ws)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic% ⊦ EB_PAGE_SIZE ≠ 0; (s)%n ≠ 0 ⊦ is-aligned(0, n); (s)%m ≠ 0, is-aligned(n1, m) ⊦ is-aligned(n0 + n1, m) ↔ is-aligned(n0, m); (s)% ⊦ ¬ ⌊ESUCCESS⌋ ; (s)% ⊦ n + 0 = n; (s)% ⊦ mkwbuf(buf, m, m0).content = buf; (s)%lf-02: ⊦ m < n ∧ m = n0 → n0 < n; (forward) from specification nat-basic%n ≠ 0 ⊦ align↓(m, n) = 0 ↔ m < n; (s)% ⊦ 0 < m ↔ m ≠ 0; (s)% ⊦ m < n → (n ≤ m ↔ false); (s)% ⊦ mkwbuf(buf, m, m0).content:= buf0 = mkwbuf(buf0, m, m0); (s)% ⊦ mkwbuf(buf, m, m0).offset:= m1 = mkwbuf(buf, m1, m0); (s)%let: ⊦ n ≤ n0 ∧ n0 ≤ n1 → n ≤ n1; (forward) from specification nat% ⊦ m < n → m % n = m; (s)% ⊦ m ≤ m; (s)% ⊦ m < n → m ≤ n; (s)