def Uint32.value

bend-collections-laws-math@1.0.0.0 · spec/math/random.bend:134

import Base
import bend-collections-laws-math@1.0.0.0/spec/lib/common.bend as C
import bend-collections-laws-math@1.0.0.0/src/math/u64.bend as W
import bend-collections-laws-math@1.0.0.0/src/math/random/rand.bend as R

134def Uint32.value(~S: Data, ~next: S -> W.U64 & S, +s: S) -> Type:
135  {U32.to_nat(R.fst(U32, S, R.uint32(~S, ~next, s))) == C.high(32n, x0(~S, ~next, s)) : Nat}