def c6.words

bend-osdev-legacy-ciphers@0.1.0.0 · cast6.bend:162

import Base
import bend-osdev-legacy-ciphers@0.1.0.0/legacy_ciphers.bend as L

162# the eight key words of a key padded to 32 bytes
163def c6.words(xs: List<&2, U32>) -> List<&2, U32>:
164  match xs:
165    case Con{a, Con{b, Con{c, Con{d, t}}}}:
166      Con{L.lc.be(a, b, c, d), c6.words(t)}
167    case _:
168      Nil{}