def cam_unrun_run

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

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

113def cam_unrun_run(os: List<&2, C.LcCamOp>, +s: M.CmBlock) -> {s == C.cam.unrun(os, C.cam.run(os, s)) : M.CmBlock}:
114  match os:
115    case Nil{}:
116      {==}
117    case Con{+o, +t}:
118      %cam_unrun_run(t, C.cam.op(o, s)) : {s == C.cam.unop(o, _) : M.CmBlock}
119      cam_unop_op(o, s)