def Short.digit
import bend-kit-fmt@0.1.0.0/fmt.bend as Fmtimport Base
255def Short.digit(+even: Bool, st: St) -> Dig:
256 match st:
257 case St{r, s, mp, mm}:
258 +s1 = {s : List<&2, U32>}
259 +r10 = {Big.mul(r, 10, 0) : List<&2, U32>}
260 Short.digit.fin(even,
261 Big.divsmall(10n, Cmp.is_ge(Big.cmp(r10, s1)), 0, r10, s1), s1,
262 Big.mul(mp, 10, 0), Big.mul(mm, 10, 0))