419def magnitudeSuccessorChecked =
420 (lambda unrestricted digits : Bytes .
421 (eliminate
422 NaturalMagnitudeResult
423 (lambda unrestricted current : (family NaturalMagnitudeResult) .
424 (family NaturalMagnitudeResult))
425 (magnitudeDecodeCanonical digits)
426 (branch
427 NaturalMagnitudeAccepted
428 value
429 .
430 (magnitudeAdmitNormalized (magnitudeSuccessor value)))
431 (branch
432 NaturalMagnitudeRejected
433 error
434 .
435 (constructor NaturalMagnitudeResult NaturalMagnitudeRejected error))))The compiler supplied declaration spans and resolved links from this source snapshot. This page does not assert that this file belongs to a checked closure.