def cam_run_unrun

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

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/camellia.bend as C

386def cam_run_unrun(os: List<&2, C.LcCamOp>, +s: M.CmBlock) -> {s == C.cam.run(os, C.cam.unrun(os, s)) : M.CmBlock}:
387  match os:
388    case Nil{}:
389      {==}
390    case Con{+o, +t}:
391      %cam_op_unop(o, C.cam.unrun(t, s)) : {s == C.cam.run(t, _) : M.CmBlock}
392      cam_run_unrun(t, s)