Random.take1: def of bend-collections-laws-crypto@1.0.0.0
Import: import bend-collections-laws-crypto@1.0.0.0/src/crypto/random.bend as Random
Lines 111-119 of bend-collections-laws-crypto@1.0.0.0/src/crypto/random.bend: https://jend.leeeet.dev/read.txt?path=bend-collections-laws-crypto@1.0.0.0/src/crypto/random.bend&start_line=111&end_line=119

import Base
import bend-collections-laws-crypto@1.0.0.0/src/math/random/chacha8.bend as C8

# one byte: the next pending byte, or the first byte of a fresh word
def take1(f: Fill) -> Fill:
  match f:
    case FS{acc, c, p}:
      match p:
        case Con{b, rest}:
          FS{Con{b, acc}, c, rest}
        case Nil{}:
          split(acc, C8.next(c))

Uses (4):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=bend-collections-laws-crypto@1.0.0.0/src/crypto/random.bend&name=Fill
  https://jend.leeeet.dev/definition.txt?path=bend-collections-laws-crypto@1.0.0.0/src/crypto/random.bend&name=split
  https://jend.leeeet.dev/definition.txt?path=bend-collections-laws-crypto@1.0.0.0/src/math/random/chacha8.bend&name=next