231def sm86ReplaceByteAt =
232 (lambda unrestricted index : Nat .
233 (lambda unrestricted replacement : Byte .
234 (nat-eliminate
235 (lambda unrestricted current : Nat . (pi unrestricted input : Bytes . Bytes))
236 (lambda unrestricted input : Bytes . (bytes-cons replacement (bytes-tail input)))
237 (lambda unrestricted predecessor : Nat .
238 (lambda unrestricted induction : (pi unrestricted input : Bytes . Bytes) .
239 (lambda unrestricted input : Bytes .
240 (bytes-cons (bytes-head input) (induction (bytes-tail input))))))
241 index)))The compiler supplied declaration spans and resolved links from this source snapshot. This page does not assert that this file belongs to a checked closure.