| n0 + n < # buf, ¬ n < n → subarray(buf, n0, n + 1)[n] = mkempbuf(n + 1)[n], ∀ buf, n0. subarray(buf, n0, n) = mkempbuf(n) ∧ n0 + n ≤ # buf → datasize(buf, n0 + n) = datasize(buf, n0) ⊦ (n0 + n) + 1 = datasize(buf, n0), buf[n0 + n] = empty |
subarray(buf, n0, n + 1)[n] = mkempbuf(n + 1)[n], n0 + n < # buf, ∀ buf, n0. subarray(buf, n0, n) = mkempbuf(n) ∧ n0 + n ≤ # buf → datasize(buf, n0 + n) = datasize(buf, n0) ⊦ (n0 + n) + 1 = datasize(buf, n0), buf[n0 + n] = empty
Used simplifier rules: ⊦ ¬ n < n; (s)