85def modelWord64Select =
86 (lambda unrestricted condition : Nat .
87 (lambda unrestricted whenTrue : (family ModelWord64) .
88 (lambda unrestricted whenFalse : (family ModelWord64) .
89 (nat-eliminate
90 (lambda unrestricted current : Nat . (family ModelWord64))
91 whenFalse
92 (lambda unrestricted predecessor : Nat .
93 (lambda unrestricted induction : (family ModelWord64) . whenTrue))
94 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.