def c6_run_unrun

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

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/cast6.bend as C6

1709def c6_run_unrun(os: List<&2, C6.LcCast6Op>, +s: M.CmBlock) -> {s == C6.c6.run(os, C6.c6.unrun(os, s)) : M.CmBlock}:
1710  match os:
1711    case Nil{}:
1712      {==}
1713    case Con{+o, +t}:
1714      %c6_op_unop(o, C6.c6.unrun(t, s)) : {s == C6.c6.run(t, _) : M.CmBlock}
1715      c6_run_unrun(t, s)