41def naturalSelect =
42 (lambda unrestricted condition : Nat .
43 (lambda unrestricted whenTrue : Nat .
44 (lambda unrestricted whenFalse : Nat .
45 (nat-eliminate
46 (lambda unrestricted current : Nat . Nat)
47 whenFalse
48 (lambda unrestricted predecessor : Nat . (lambda unrestricted induction : Nat . whenTrue))
49 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.