def cam_run_unrun

bend-osdev-camellia@0.1.0.0 · PROOF.bend:121

import Base
import bend-osdev-mode-core@0.1.0.0/mode_core.bend as M
import bend-osdev-camellia@0.1.0.0/camellia.bend as C

121def cam_run_unrun(os: List<&2, C.LcCamOp>, +s: M.CmBlock) -> {s == C.cam.run(os, C.cam.unrun(os, s)) : M.CmBlock}:
122  match os:
123    case Nil{}:
124      {==}
125    case Con{+o, +t}:
126      %cam_op_unop(o, C.cam.unrun(t, s)) : {s == C.cam.run(t, _) : M.CmBlock}
127      cam_run_unrun(t, s)