| buf .len = 1 + n→i(# x), a ' + x = tolist(buf, i→n(buf .len)), inv(buf) ⊦ 〈head#(buf; b)〉 a = b |
buf .len = 1 + n→i(# x), a ' + x = tolist(buf, i→n(buf .len)), inv(buf) ⊦ 〈get#(buf .first, buf .data; a0)〉 a = a0
[[CONCRETESIMPRULES : ([CSIMPDECL : head# (buf; a) { get#(buf .first, buf .data; a) }])]]