def cont

bend-collections-laws-crypto@1.0.0.0 · proofs/math/random/uint64n.bend:135

import Base
import bend-collections-laws-crypto@1.0.0.0/spec/math/random/rand.bend as SR
import bend-collections-laws-crypto@1.0.0.0/src/math/u64.bend as WU

135# the specification's bounded draw after a draw of x with state s
136def cont(~S: Data, ~next: S -> WU.U64 & S, f: Nat, +n: Nat, +x: Nat, +s: S) -> Nat & S:
137  SR.below_go(~S, ~next, f, n, SR.draw(64n, x, n), x, s)