Home | History | Annotate | Download | only in dist

Lines Matching refs:SIN

5021 #	fp0 = sin(X) or cos(X) 						#
5024 # fp0 = sin(X) #
5035 # SIN and COS: #
5036 # 1. If SIN is invoked, set AdjN := 0; otherwise, set AdjN := 1. #
5052 # 6. (k is even) Set j := k/2, sgn := (-1)**j. Return sgn*sin(r) #
5053 # where sin(r) is approximated by an odd polynomial in r #
5059 # 8. (|X|<2**(-40)) If SIN is invoked, return X; #
5076 # SIN(X) = sgn1 * cos(r) and COS(X) = sgn2*sin(r) where #
5077 # sin(r) and cos(r) are computed as odd and even #
5081 # SIN(X) = sgn1 * sin(r) and COS(X) = sgn1*cos(r) where #
5082 # sin(r) and cos(r) are computed as odd and even #
5087 # 7. (|X|<2**(-40)) SIN(X) = X and COS(X) = 1. Exit. #
5182 #--GET N+ADJN AND SEE IF SIN(R) OR COS(R) IS NEEDED
5190 #--THEN WE RETURN SGN*SIN(R). SGN*SIN(R) IS COMPUTED BY
5234 fmul.x %fp1,%fp0 # SIN(R')-R'
5336 #--SIN(X) = X FOR DENORMALIZED X
5468 fadd.s POSNEG1(%a6),%fp0 # SIN(X)
5541 fadd.x RPRIME(%a6),%fp0 # SIN(X)
5567 #--SIN AND COS OF X FOR DENORMALIZED X
10657 fmov.s &0x80000000,%fp0 # return sin result in fp0
10661 fmov.s &0x00000000,%fp0 # return sin result in fp0