def comb_go

bend-collections@1.0.0.0 · src/containers/bitset.bend:471

import Base
import bend-collections@1.0.0.0/src/containers/types/bitset.bend as E

471def comb_go(ok: Bool, +k: WordOp, +n: Nat, +d: Nat, a: Array<Wd>, +ys: List<&2, Bool>) -> Bitset & Result<&2, &2, E.Error, Unit>:
472  match ok:
473    case True{}:
474      drop_right(combine(k, BS{n, d, a}, from_bools(ys)))
475    case False{}:
476      (BS{n, d, a}, Fail{E.LengthMismatch{}})