one row half h: its sixteen scores, scaled to base 2 (the products have
finished: the first multiply waits for them)
260def saScaleRow = (lambda unrestricted h : Nat . (lambda unrestricted tail : (family SM86Program) .
261 (saFor 16 (lambda unrestricted i : Nat .
262 (let unrestricted e = (saElem (saS (naturalDivideUnchecked i 2)) h (naturalModuloUnchecked i 2)) in
263 (saFmul e e saScale saWaitNone)))
264 tail)))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.