211def modelWord32ShiftRight =
212 (lambda unrestricted value : (family ModelWord32) .
213 (lambda unrestricted amount : Nat .
214 (nat-eliminate
215 (lambda unrestricted current : Nat . (family ModelWord32))
216 value
217 (lambda unrestricted predecessor : Nat .
218 (lambda unrestricted induction : (family ModelWord32) .
219 (modelWord32ShiftRightOne induction)))
220 amount)))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.