AlphaGitHub
Source/Packages

Std.Fin

packages/foundation/standard/src/Std/Fin.alpha

55 lines10 declarations1.9 KiBSHA-256 56ed5c139b6d
Download exact fileView at revisionbcc11a4e7647d31628

def · lines 25–33

stdFinToNatural

Full file
The index as an ordinary natural.
25def stdFinToNatural =
26  (lambda erased bound : Nat .
27    (lambda unrestricted index : (family StdFin bound) .
28      (eliminate StdFin
29        (lambda erased motiveBound : Nat .
30          (lambda unrestricted value : (family StdFin motiveBound) . Nat))
31        index
32        (branch StdFinZero zeroBound . zero)
33        (branch StdFinNext nextBound predecessor induction . (succ induction)))))

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.