def bf_run_unrun

bend-osdev-blowfish@0.1.0.0 · PROOF.bend:49

import Base
import bend-osdev-cipher-core@0.1.0.0/cipher_core.bend as L
import bend-osdev-blowfish@0.1.0.0/blowfish.bend as BF

49def bf_run_unrun(os: List<&2, BF.LcBfOp>, +b: L.LcBlock64) -> {b == BF.bf.run(os, BF.bf.unrun(os, b)) : L.LcBlock64}:
50  match os:
51    case Nil{}:
52      {==}
53    case Con{+o, +t}:
54      %bf_op_unop(o, BF.bf.unrun(t, b)) : {b == BF.bf.run(t, _) : L.LcBlock64}
55      bf_run_unrun(t, b)