m' = max(m, the row's maximum) in tmp h; alpha = 2^(m - m') in tmp 4 + h;
m = m'; -m' in tmp 6 + h
293def saRescaleFactor = (lambda unrestricted h : Nat . (lambda unrestricted tail : (family SM86Program) .
294 (saFmax (saTmp h) (saTmp h) (saM h) saWaitNone
295 (saFneg (saTmp (naturalAdd 6 h)) (saTmp h)
296 (saFadd (saTmp (naturalAdd 4 h)) (saM h) (saTmp (naturalAdd 6 h)) saWaitNone
297 (saEx2 (saTmp (naturalAdd 4 h)) (saTmp (naturalAdd 4 h)) saWaitNone
298 (saOp (constructor SM86InstructionBody SM86IntegerAddThreeImmediate (saR (saM h)) (saR (saTmp h)) (saU 0) saPlain)
299 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.