Lines Matching refs:J
5233 #--LET J BE THE LEAST SIG. BIT OF D0, LET SGN := (-1)**J.
7000 # 2.2 Calculate J = N mod 64; so J = 0,1,2,..., #
7002 # 2.3 Calculate M = (N - J)/64; so N = 64M + J. #
7004 # 2^(J/64). #
7033 # Step 5. Compute 2^(J/64)*p by #
7035 # where T and t are the stored values for 2^(J/64). #
7036 # Notes: 2^(J/64) is stored as T and t where T+t approximates #
7037 # 2^(J/64) to roughly 85 bits; T is in extended precision #
7047 # exp(X)-1 = 2^M * ( 2^(J/64) + p - 2^(-M) ). #
9129 #--D0 IS M WHERE N = 64(M+M') + J. NOTE THAT |M| <= 16140 BY DESIGN.
9226 #--D0 IS M WHERE N = 64(M+M') + J. NOTE THAT |M| <= 16140 BY DESIGN.
9255 #--ADJFACT CONTAINS 2**(M'), FACT1 + FACT2 = 2**(M) * 2**(J/64).