Lines Matching refs:M
83 | 2.4 Calculate M = (N - J)/64; so N = 64M + J.
85 | 2.6 Create the value Scale = 2^M.
153 | exp(X) = 2^M * 2^(J/64) * exp(R).
159 | |M| <= 16380, and Scale = 2^M. Moreover, exp(X) will
162 | X = (M1+M)log2 + Jlog2/64 + R, |M1+M| >= 16380.
165 | approximately M. Thus 6.2 will never cause over/underflow.
190 | 8.4 K := (N-J)/64, M1 := truncate(K/2), M = K-M1, AdjFlag := 1.
192 | 8.6 Create the values Scale = 2^M, AdjScale = 2^M1.
496 asrl #6,%d0 | ...D0 is M
497 addiw #0x3FFF,%d0 | ...biased expo. of 2^(M)
503 |--a0 points to 2^(J/64), D0 is biased expo. of 2^(M)
531 movew %d0,SCALE(%a6) | ...SCALE is 2^(M) in extended
551 |--EXP(X) = 2^M * ( 2^(J/64) + 2^(J/64)*(EXP(R)-1) )
567 fmulx SCALE(%a6),%fp0 | ...multiply 2^(M)
599 subl %d0,L_SCR1(%a6) | ...a1 is M
605 movel L_SCR1(%a6),%d0 | ...D0 is M
606 addiw #0x3FFF,%d0 | ...biased expo. of 2^(M)
663 asrl #6,%d0 | ...D0 is M
664 movel %d0,L_SCR1(%a6) | ...save a copy of M
669 |--a0 points to 2^(J/64), D0 and a1 both contain M
676 addiw #0x3FFF,%d0 | ...D0 is biased expo. of 2^M
696 movew %d0,SC(%a6) | ...SC is 2^(M) in extended
702 movel L_SCR1(%a6),%d0 | ...D0 is M
703 negw %d0 | ...D0 is -M
705 addiw #0x3FFF,%d0 | ...biased expo. of 2^(-M)
710 oriw #0x8000,%d0 | ...signed/expo. of -2^(-M)
711 movew %d0,ONEBYSC(%a6) | ...OnebySc is -2^(-M)
733 movel L_SCR1(%a6),%d0 | ...retrieve M
736 |--Step 6.2 M >= 64
743 |--Step 6.3 M <= 63
747 |--Step 6.4 M <= -4
753 |--Step 6.5 -3 <= M <= 63