| buf0 = buf, EB_PAGE_SIZE ≤ # buf ⊦ ⟪encode_pagesize#(EB_PAGE_SIZE, a; buf; err)⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ # buf = # buf0 ∧ (err = ESUCCESS → is-encoded-pagesize(a, subarray(buf, 0, EB_PAGE_SIZE)))) |
⊦
buf0 = buf, n = EB_PAGE_SIZE, EB_PAGE_SIZE ≤ # buf ⊦ ⟪if ENCODED_ELEM_SIZE ≤ n then encode_nonempty#(a, 0; buf; err) else err := EINVAL⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ # buf = # buf0 ∧ (err = ESUCCESS → is-encoded-pagesize(a, subarray(buf, 0, EB_PAGE_SIZE))))
Used simplifier rules: encode: ⊦ ;