def g_zeros

bend-osdev-bytes@0.1.1.0 · PROOF.bend:322

import Base
import bend-osdev-bytes@0.1.1.0/bytes.bend as B

322def g_zeros(+n: Nat, +acc: List<&2, B.OctByte>) -> {B.w8s.zeros.go(n, acc) == List.append(&2, B.OctByte, B.w8s.zeros(n), acc) : List<&2, B.OctByte>}:
323  match n:
324    case 0n:
325      {==}
326    case 1n+p:
327      Equal.trans(List<&2, B.OctByte>, B.w8s.zeros.go(p, Con{B.oct.zero(), acc}), List.append(&2, B.OctByte, B.w8s.zeros(p), Con{B.oct.zero(), acc}), Con{B.oct.zero(), List.append(&2, B.OctByte, B.w8s.zeros(p), acc)},
328        g_zeros(p, Con{B.oct.zero(), acc}), zeros_cons(p, acc))