| # buf1 = # buf2, # buf2 = n4 + n3 + n2, avols[default-volid][m2] = mapped(buf, n1), m2 < # avols[default-volid], ebm-cons(avols), ebm-vol-inv(abs(avols[default-volid])), range=(buf1, n3 + n2, buf2, n3 + n2, n4), range=(buf1, 0, buf2, 0, n3), default-volid ∈ avols, n3 + n2 ≤ # buf2, m1 + n2 ≤ LEB_SIZE, ⌊err0⌋ ⊦ ⟨fail_or_success#(; ; err); if err = ESUCCESS then buf2 := copy(abs(avols[default-volid])[m2].data + mkempbuf(LEB_SIZE - # abs(avols[default-volid])[m2].data), m1, buf2, n3, n2) else choose buf with # buf = # buf2 ∧ range=(buf2, 0, buf, 0, n3) ∧ range=(buf2, n3 + n2, buf, n3 + n2, # buf2 - n3 + n2) in buf2 := buf⟩ (buf1 = buf2 ∧ err0 = err) |
# buf2 = n4 + n3 + n2, # buf1 = # buf2, avols[default-volid][m2] = mapped(buf, n1), m2 < # avols[default-volid], ebm-cons(avols), ebm-vol-inv(abs(avols[default-volid])), range=(buf1, 0, buf2, 0, n3), range=(buf1, n3 + n2, buf2, n3 + n2, n4), default-volid ∈ avols, m1 + n2 ≤ LEB_SIZE, n3 + n2 ≤ # buf2, ⌊err0⌋ ⊦ ⟨choose err0 with ⌊err0⌋ ∨ err0 = ESUCCESS in err := err0; if err = ESUCCESS then buf2 := copy(abs(avols[default-volid])[m2].data + mkempbuf(LEB_SIZE - # abs(avols[default-volid])[m2].data), m1, buf2, n3, n2) else choose buf with # buf = # buf2 ∧ range=(buf2, 0, buf, 0, n3) ∧ range=(buf2, n3 + n2, buf, n3 + n2, # buf2 - n3 + n2) in buf2 := buf⟩ (buf1 = buf2 ∧ err0 = err)
Used simplifier rules: fail_or_success#(; ; ERR) {choose ERR0 with ⌊ERR0⌋ ∨ ERR0 = ESUCCESS in ERR := ERR0};