def tea_unrun_run

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

import Base
import bend-osdev-legacy-ciphers@0.1.0.0/legacy_ciphers.bend as L
import bend-osdev-legacy-ciphers@0.1.0.0/tea.bend as TE

1542def tea_unrun_run(os: List<&2, TE.LcTeaOp>, +b: L.LcBlock64) -> {b == TE.tea.unrun(os, TE.tea.run(os, b)) : L.LcBlock64}:
1543  match os:
1544    case Nil{}:
1545      {==}
1546    case Con{+o, +t}:
1547      %tea_unrun_run(t, TE.tea.op(o, b)) : {b == TE.tea.unop(o, _) : L.LcBlock64}
1548      tea_unop_op(o, b)