def bind

bend-kit-property@0.4.0.0 · generate.bend:155

import Base
import bend-kit-random@0.1.0.1/random.bend as Rand

155# gen's value picks the next generator: bind(~Nat, ~List<&2, U32>, ~(r => Gen.nat(8, r)), ~(n => r => Gen.list.of(~U32, ~Gen.u32, n, r)), r).
156def bind(~A: Type, ~B: Type, ~gen: Rand.Rng -> A & Rand.Rng, ~k: A -> Rand.Rng -> B & Rand.Rng, r: Rand.Rng) -> B & Rand.Rng:
157  bind.fin(~A, ~B, ~k, gen(r))