def val_pair
import bend-collections-laws-crypto@1.0.0.0/spec/math/random.bend as Randomimport Base
import bend-collections-laws-crypto@1.0.0.0/src/math/u64.bend as W
import bend-collections-laws-crypto@1.0.0.0/spec/math/w64.bend as SW
100def val_pair(-S: Data, r: W.U64 & S) -> Nat & S:
101 (x, s) = r
102 (SW.value(x), s)
Uses (5)
Used by (14)
- bend-collections-laws-crypto@1.0.0.0/proofs/math/random/bounded:fst_val
- bend-collections-laws-crypto@1.0.0.0/proofs/math/random/bounded:uint64n_lt
- bend-collections-laws-crypto@1.0.0.0/proofs/math/random/uint64n:first_case
- bend-collections-laws-crypto@1.0.0.0/proofs/math/random/uint64n:first_false
- bend-collections-laws-crypto@1.0.0.0/proofs/math/random/uint64n:loop
- …