Stream.cr.ks.xs: def of bend-osdev-crypto@0.1.0.0
Import: import bend-osdev-crypto@0.1.0.0/stream.bend as Stream
Lines 61-68 of bend-osdev-crypto@0.1.0.0/stream.bend: https://jend.leeeet.dev/read.txt?path=bend-osdev-crypto@0.1.0.0/stream.bend&start_line=61&end_line=68

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

# The structural forms the proofs reason about: the data, byte by byte, and
# the state after it
def cr.ks.xs(~S: Data, ~next: S -> CrKsStep<S>, ys: List<&2, U32>, +s: S) -> List<&2, U32>:
  match ys:
    case Nil{}:
      Nil{}
    case Con{x, t}:
      Con{B.byte(U32.xor(x, CrKsStep.k(~S, next(s)))), cr.ks.xs(~S, ~next, t, CrKsStep.st(~S, next(s)))}

Uses (7):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.xor
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-bytes@0.1.1.0/bytes.bend&name=byte
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-crypto@0.1.0.0/stream.bend&name=CrKsStep
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-crypto@0.1.0.0/stream.bend&name=CrKsStep.k
  https://jend.leeeet.dev/definition.txt?path=bend-osdev-crypto@0.1.0.0/stream.bend&name=CrKsStep.st