| ⊦ datasize(buf + mkempbuf(n)) = datasize(buf) |
⊦ datasize(buf) = datasize(buf, # buf)
[Concretesimprules((Csimpnamedseq(datasize,,, ⊦ datasize(buf) = datasize(buf, # buf)) Csimpnamedseq(array-splice,buffer,append-a, ⊦ (buf + buf0) + buf1 = buf + buf0 + buf1) Csimpnamedseq(array-splice,buffer,emparray-len, ⊦ # mkempbuf(n) = n) Csimpnamedseq(array-splice,buffer,append-len, ⊦ #(buf + buf0) = # buf + # buf0)))]