def q_start

bend-collections-laws-crypto@1.0.0.0 · src/math/w64.bend:315

import Base
import bend-collections-laws-crypto@1.0.0.0/src/math/u64.bend as W

315# floor(x / b) from an estimate q >= floor(x / b): down while q * b > x (at
316# most q steps, fuel q + 1)
317def q_start(+xl: W.U64, +xh: U32, +b: W.U64, +q: U32) -> U32:
318  q_fix(Nat.add(U32.to_nat(q), 1n), xl, xh, b, q, over96(xl, xh, mul_32_64(q, b)))