def Int.udivmod.rec
import bend-kit-int@0.2.0.0/int.bend as Intimport Base
116def Int.udivmod.rec(-p: Nat, a0: Bool, +n: Nat, +b: Word(n),
117 qr: Word(p) & Word(n)) -> Word(1n+p) & Word(n):
118 (q, r) = qr
119 Int.udivmod.shl(p, q, n, b, Word.shl.out(n, a0, r))