AlphaGitHub
Source/Packages

Compiler.IntegerLiteral

packages/compiler/src/Compiler/IntegerLiteral.alpha

903 lines95 declarations31.8 KiBSHA-256 578f5c4899f4
Download exact fileView at revisionf5034773ad4bb52133

def · lines 332–341

integerLiteralChoose

Full file
332def integerLiteralChoose =
333  (lambda unrestricted condition : Nat .
334    (lambda unrestricted whenTrue : (family IntegerLiteralDigitResult) .
335      (lambda unrestricted whenFalse : (family IntegerLiteralDigitResult) .
336        (nat-eliminate
337          (lambda unrestricted current : Nat . (family IntegerLiteralDigitResult))
338          whenFalse
339          (lambda unrestricted predecessor : Nat .
340            (lambda unrestricted induction : (family IntegerLiteralDigitResult) . whenTrue))
341          condition))))

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.