| subarray(buf, 0, EB_PAGE_SIZE) = emptypage, is-encoded(a, subarray(buf, 0, ENCODED_ELEM_SIZE)), EB_PAGE_SIZE ≤ # buf, ENCODED_ELEM_SIZE ≤ EB_PAGE_SIZE, ENCODED_ELEM_SIZE ≤ # buf ⊦ isempty(subarray(buf, 0, ENCODED_ELEM_SIZE)) |
subarray(buf, 0, EB_PAGE_SIZE) = emptypage, is-encoded(a, subarray(buf, 0, ENCODED_ELEM_SIZE)), ENCODED_ELEM_SIZE ≤ # buf, ENCODED_ELEM_SIZE ≤ EB_PAGE_SIZE, EB_PAGE_SIZE ≤ # buf ⊦ subarray(buf, 0, ENCODED_ELEM_SIZE) = mkempbuf(ENCODED_ELEM_SIZE)
Used simplifier rules: ⊦ # subarray(buf, m, n) = n; (s)% ⊦ isempty(buf) ↔ buf = mkempbuf(# buf); (s)