33def nativePhysicalTrainingShiftLeftWord =
34 (lambda unrestricted value : (family ModelWord64) .
35 (lambda unrestricted count : Nat .
36 (nat-eliminate
37 (lambda unrestricted current : Nat . (family ModelWord64))
38 value
39 (lambda unrestricted predecessor : Nat .
40 (lambda unrestricted induction : (family ModelWord64) .
41 (app modelWord64ShiftLeftOne induction)))
42 count)))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.