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
308def saRescaleFactor = (lambda unrestricted h : Nat . (lambda unrestricted tail : (family SM86Program) .
309 (saFmax (saTmp h) (saTmp h) (saM h) saWaitNone
310 (saFneg (saTmp (naturalAdd 6 h)) (saTmp h)
311 (saFadd (saTmp (naturalAdd 4 h)) (saM h) (saTmp (naturalAdd 6 h)) saWaitNone
312 (saEx2 (saTmp (naturalAdd 4 h)) (saTmp (naturalAdd 4 h)) saWaitNone
313 (saOp (constructor SM86InstructionBody SM86IntegerAddThreeImmediate (saR (saM h)) (saR (saTmp h)) (saU 0) saPlain)
314 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.