def Iso8601.dur.frac.dig
import bend-time-lib@0.4.0.1/iso8601.bend as Iso8601import Base
import bend-scanner@0.1.0.0/parse.bend as P
485def Iso8601.dur.frac.dig(
486 st: Iso8601.DurS, sec: U32, +acc: U32, left: Nat, +h: Char
487) -> Iso8601.DurC:
488 match left:
489 case 0n:
490 DurFail{Invalid{}}
491 case 1n++p:
492 DurCont{st, DFrac{sec, P.Parse.nacc(acc, h), p}}