Source/Packages

Compiler.DependentCore

packages/compiler/src/Compiler/DependentCore.alpha

12,943 lines498 declarations489.0 KiBSHA-256 ef207b0de796

def · lines 992–999

naturalMaximum

Full file
992def naturalMaximum : (pi unrestricted left : Nat . (pi unrestricted right : Nat . Nat)) =
993  (lambda unrestricted left : Nat .
994    (lambda unrestricted right : Nat .
995      (nat-eliminate
996        (lambda unrestricted condition : Nat . Nat)
997        left
998        (lambda unrestricted predecessor : Nat . (lambda unrestricted induction : Nat . right))
999        (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.