def sp_lt4

bend-osdev-legacy-ciphers@0.1.0.0 · PROOF.bend:1202

import Base
import bend-osdev-cipher-modes@0.1.0.0/cipher_modes.bend as M
import bend-osdev-legacy-ciphers@0.1.0.0/serpent.bend as P

1202def sp_lt4(s: M.CmBlock) -> {s == P.sp.lt4(P.sp.lt4(s)) : M.CmBlock}:
1203  match s:
1204    case M.CmBlock{+x0, +x1, +x2, +x3}:
1205      %u32_xx(x3, U32.xor(x2, U32.shln(x0, 3n))) : {M.CmBlock{x0, x1, x2, x3} == M.CmBlock{x0, x1, x2, _} : M.CmBlock}
1206      {==}