Lines Matching refs:SIGN
431 set q_sn_bit, 0x7 # sign bit of quotient byte
502 set sign_bit, 0x7 # sign bit
5043 sign
5105 # ...LEAST SIG. BIT OF D0 IN SIGN POSITION
5159 # ...LEAST SIG. BIT OF D0 IN SIGN POSITION
5496 ftest.x %fp0 # test sign of argument
5531 #--CREATE 2**(-L) * (2/PI), SIGN(INARG)*2**(63),
5547 #--(SIGN(INARG)*2**63 + FP2) - SIGN(INARG)*2**63 WILL GIVE
5552 or.l &0x5F000000,%d2 # d2 = SIGN(INARG)*2**63 IN SGL
5927 ftest.x %fp0 # test sign of argument
5962 #--CREATE 2**(-L) * (2/PI), SIGN(INARG)*2**(63),
5978 #--(SIGN(INARG)*2**63 + FP2) - SIGN(INARG)*2**63 WILL GIVE
5983 or.l &0x5F000000,%d2 # d2 = SIGN(INARG)*2**63 IN SGL
6082 # Arctan(X) = sign(X)*Pi/2 + arctan(X'). Exit. #
6317 mov.l X(%a6),%d1 # LOAD SIGN AND EXPO. AGAIN
6318 and.l &0x80000000,%d1 # SIGN(F)
6319 or.l %d1,ATANF(%a6) # ATANF IS NOW SIGN(F)*ATAN(|F|)
6414 #--IF |X| > 2^(100), RETURN SIGN(X)*(PI/2 - TINY). OTHERWISE,
6415 #--RETURN SIGN(X)*PI/2 + ATAN(-1/X).
6474 #--RETURN SIGN(X)*(PIBY2 - TINY) = SIGN(X)*PIBY2 - SIGN(X)*TINY
6524 # 4. (|X| = 1) sgn := sign(X), return asin(X) := sgn * Pi/2. Exit.#
6577 and.l &0x80000000,%d1 # SIGN BIT OF X
6579 mov.l %d1,-(%sp) # push SIGN(X) IN SGL-FMT
6715 # Step 2. Return ans := ans + sign(X)*2^(-126). Exit. #
6731 # are the sign and biased exponent field of |X|; the #
6873 # X's sign. "Huge" and "Tiny" are respectively large/tiny #
7264 ori.l &0x00800000,(%sp) # sign(X)*2^(-126)
7527 bclr &0xf,%d0 # clear the sign bit
7603 # cosh(X) = sign(X) * exp(|X|)/2. #
7614 # the appropriate sign. Huge is the largest finite number #
7710 # y = |X|, sgn = sign(X), and z = expm1(Y), #
7717 # sinh(X) = sign(X) * exp(|X|)/2. #
7721 # sgn := sign(X) #
7728 # sign(X)*Huge*Huge to generate overflow and an infinity with #
7729 # the appropriate sign. Huge is the largest finite number in #
7746 #--Y = |X|, Z = EXPM1(Y), SINH(X) = SIGN(X)*(1/2)*( Z + Z/(1+Z) )
7828 # sgn := sign(X), y := 2|X|, z := expm1(Y), and #
7838 # sgn := sign(X), y := 2|X|, z := exp(Y), #
7844 # sgn := sign(X), Tiny := 2**(-126), #
7874 #--Y = 2|X|, Z = EXPM1(Y), TANH(X) = SIGN(X) * Z / (Z+2).
7910 #--TANH(X) = 1 - (2/[EXP(2X)+1]). LET Y = 2|X|, SGN = SIGN(X),
7932 eor.l &0xC0000000,%d1 # -SIGN(X)*2
7933 fmov.s %d1,%fp1 # -SIGN(X)*2 IN SGL FMT
7934 fdiv.x %fp0,%fp1 # -SIGN(X)2 / [EXP(Y)+1 ]
7958 eor.l &0x80800000,%d1 # -SIGN(X)*EPS
8589 # sgn := sign(X) #
8597 # 4. (|X| = 1) Generate infinity with an appropriate sign and #
8599 # sgn := sign(X) #
8617 #--Y = |X|, Z = 2Y/(1-Y), ATANH(X) = SIGN(X) * (1/2) * LOG1P(Z).
8627 or.l &0x3F000000,%d1 # SIGN(X)*HALF
9227 set SIGN, L_SCR1
9234 smi.b SIGN(%a6) # use SIGN to hold dst sign
9235 andi.l &0x00007fff,%d1 # strip sign from dst exp
9238 andi.w &0x7fff,%d0 # clr src sign bit
9321 # Source is outside of 2^14 range. Test the sign and branch
9366 # Step 1. Save and strip signs of X and Y: signX := sign(X), #
9367 # signY := sign(Y), X := |X|, Y := |Y|, #
9441 #..Save sign of X and Y
9493 mov.w %d1,SignQ(%a6) # sign(Q) obtained
9682 #..Get sign of X
9691 mov.w SignQ(%a6),%d6 # D6 is sign(Q)
9695 or.l %d6,%d3 # sign and bits of Q
9783 andi.w &0x7fff, %d0 # strip off sign
9857 tst.b SRC_EX(%a0) # check sign for neg or pos
9858 bpl.b dz_pinf # branch if pos sign
9975 # and two very small numbers of appropriate sign so that the operating #
10032 # and two very lareg numbers of appropriate sign so that the operating #
10469 # src_zero(): Return signed zero according to sign of src operand. #
10473 tst.b SRC_EX(%a0) # get sign of src operand
10493 # dst_zero(): Return signed zero according to sign of dst operand. #
10497 tst.b DST_EX(%a1) # get sign of dst operand
10502 # src_inf(): Return signed inf according to sign of src operand. #
10506 tst.b SRC_EX(%a0) # get sign of src operand
10528 # dst_inf(): Return signed inf according to sign of dst operand. #
10532 tst.b DST_EX(%a1) # get sign of dst operand
10543 tst.b SRC_EX(%a0) # check sign of source
10554 tst.b SRC_EX(%a0) # check sign of source
10565 tst.b SRC_EX(%a0) # check sign of source
10570 # src_one(): Return signed one according to sign of src operand. #
10574 tst.b SRC_EX(%a0) # check sign of source
10599 # spi_2(): Return signed PI/2 according to sign of src operand. #
10603 tst.b SRC_EX(%a0) # check sign of source
10630 # cosine register and return a ZERO in fp0 w/ the same sign
10636 tst.b SRC_EX(%a0) # test sign
10707 mov.b SRC_EX(%a0),%d1 # get src sign
10708 mov.b DST_EX(%a1),%d0 # get dst sign
10709 eor.b %d0,%d1 # get qbyte sign
10720 mov.b SRC_EX(%a0),%d1 # get src sign
10721 mov.b DST_EX(%a1),%d0 # get dst sign
10722 eor.b %d0,%d1 # get qbyte sign
10937 and.w &0x8000, %d0 # save old sign
Indexes created Thu Oct 23 22:10:10 GMT 2025