Lines Matching refs:of
22 | A1. Set RM and size ext; Set SIGMA = sign of input.
31 | ILOG is the log base 10 of the input value. It is
44 | LEN is the number of digits to be displayed. The
45 | k-factor can dictate either the total number of digits,
46 | if it is a positive number, or the number of digits
54 | of decimal places needed to insure LEN integer digits
56 | sign of ISCALE, used in A9. Fp1 contains
58 | function of the original rounding mode and the signs
59 | of ISCALE and X. A table is given in the code.
68 | The mantissa is scaled to the desired number of
75 | the lsb of Y.
96 | such that the decimal point is to the left of bit 63.
103 | Test the length of the final exponent string. If the
114 | d2: upper 32-bits of mantissa for binstr
115 | d3: scratch;lower 32-bits of mantissa for binstr
187 andiw #0x7fff,%d0 |strip sign of normalized exp
203 andiw #0x7fff,%d0 |strip sign of normalized exp
217 | ILOG is the log base 10 of the input value. It is approx-
240 | L_SCR2:first word of X packed/Unchanged
266 fmovel #0,%FPSR |zero all of fpsr - nothing needed
271 | loop entry A6. The lower word of d5 is used for ICTR.
277 | LEN is the number of digits to be displayed. The k-factor
278 | can dictate either the total number of digits, if it is
279 | a positive number, or the number of digits after the
303 | L_SCR2:first word of X packed/Unchanged
306 tstl %d7 |branch on sign of k
315 tstl %d4 |LEN check: branch on sign of LEN
330 | of decimal places needed to insure LEN integer digits
332 | of ISCALE, used in A9. Fp1 contains 10^^(abs(ISCALE)) using
335 | of opposite sign in bindec.sa from Coonen).
375 | L_SCR2:first word of X packed/Unchanged
378 tstl %d7 |test sign of k
387 swap %d5 |use upper word of d5 for LAMBDA
390 tstl %d0 |test sign of ISCALE
398 negl %d0 |and take abs of ISCALE
405 tstl L_SCR2(%a6) |test sign of original x
451 | The mantissa is scaled to the desired number of significant
480 | L_SCR2:first word of X packed/Unchanged
485 tstw %d5 |LAMBDA is in lower word of d5
521 | for by 'or-ing' in the INEX2 flag to the lsb of Y.
545 oril #1,8(%a2) |or in 1 to lsb of mantissa
583 | L_SCR2:first word of X packed/Unchanged
591 tstl L_SCR2(%a6) |test sign of original operand
611 | the mantissa by 10. The calculation of 10^LEN cannot
612 | be inexact, since all powers of ten up to 10^27 are exact
613 | in extended precision, so the use of a previous power-of-ten
629 | fp0: int portion of Y/abs(YINT) adjusted
635 | L_SCR2:first word of X packed/Unchanged
638 swap %d5 |put ICTR in lower word of d5
662 fabsx %fp0 |take abs of YINT
668 fabsx %fp0 |take abs of YINT
720 | such that the decimal point is to the left of bit 63.
729 | d2: x/ms 32-bits of mant of abs(YINT)
730 | d3: x/ls 32-bits of mant of abs(YINT)
739 | fp0: int portion of Y/abs(YINT) adjusted
745 | L_SCR2:first word of X packed/Unchanged
752 movel 4(%a0),%d2 |move 2nd word of FP_RES to d2
753 movel 8(%a0),%d3 |move 3rd word of FP_RES to d3
754 clrl 4(%a0) |zero word 2 of FP_RES
755 clrl 8(%a0) |zero word 3 of FP_RES
765 roxrl #1,%d3 |the number of places
768 tstl %d2 |check for mantissa of zero
802 | d2: x/ms 32-bits of exp fraction/scratch
803 | d3: x/ls 32-bits of exp fraction
817 | L_SCR2:first word of X packed/Unchanged
825 fabsx %fp0 |get abs of ILOG
828 tstl %d7 |check sign of the k-factor
834 fabsx %fp0 |get abs of ILOG
843 fabsx %fp0 |get abs of ILOG
855 roxrl #1,%d3 |the number of places
877 | Sigma is bit 31 of initial value; RHO is bit 31 of d6 (ILOG).
897 | L_SCR2:first word of X packed/Unchanged
900 clrl %d0 |clr d0 for collection of signs
901 andib #0x0f,FP_SCR1(%a6) |clear first nibble of FP_SCR1
902 tstl L_SCR2(%a6) |check sign of original mantissa
906 tstl %d6 |check sign of ILOG