AlphaGitHub
Source/Packages

Data.JSON

packages/foundation/standard/src/Data/JSON.alpha

2,617 lines251 declarations113.9 KiBSHA-256 bd63da5ed186
Download exact fileView at revision426597bda5753d86c4

def · lines 1871–1878

jsonNaturalMaximum

Full file
1871def jsonNaturalMaximum =
1872  (lambda unrestricted left : Nat .
1873    (lambda unrestricted right : Nat .
1874      (nat-eliminate
1875        (lambda unrestricted leftSmaller : Nat . Nat)
1876        left
1877        (lambda unrestricted predecessor : Nat . (lambda unrestricted induction : Nat . right))
1878        (nat-less-than left right))))

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.