def sp_lt8

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

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/legacy_ciphers.bend as L
import bend-osdev-legacy-ciphers@0.1.0.0/serpent.bend as P

1234def sp_lt8(s: M.CmBlock) -> {s == P.sp.ilt8(P.sp.lt8(s)) : M.CmBlock}:
1235  match s:
1236    case M.CmBlock{+x0, +x1, +x2, +x3}:
1237      %rot_27_5(x0) : {M.CmBlock{x0, x1, x2, x3} == M.CmBlock{_, x1, L.lc.rotl10.bits(L.lc.rotl22.bits(x2)), x3} : M.CmBlock}
1238      %rot_10_22(x2) : {M.CmBlock{x0, x1, x2, x3} == M.CmBlock{x0, x1, _, x3} : M.CmBlock}
1239      {==}