Lines Matching refs:FP1
5026 #--SAVE FPCR, FP1. CHECK IF |X| IS TOO SMALL OR LARGE
5092 fmul.x %fp1,%fp1 # FP1 IS T
5145 fmul.x %fp1,%fp1 # FP1 IS T
5501 #--Intermeditate remainder is 66-bit long; (R,r) in (FP0,FP1)
5545 fadd.s TWOTO63(%a6),%fp2 # THE FRACTIONAL PART OF FP1 IS ROUNDED
5932 #--Intermeditate remainder is 66-bit long; (R,r) in (FP0,FP1)
5976 fadd.s TWOTO63(%a6),%fp2 # THE FRACTIONAL PART OF FP1 IS ROUNDED
6285 fmov.x %fp0,%fp1 # FP1 IS X
6286 fmul.x X(%a6),%fp1 # FP1 IS X*F, NOTE THAT X*F > 0
6288 fadd.s &0x3F800000,%fp1 # FP1 IS 1 + X*F
6335 fadd.x %fp1,%fp0 # ATAN(U), FP1 RELEASED
6344 #--|X| IS IN d0 IN COMPACT FORM. FP1, d0 SAVED.
6365 fmul.x %fp1,%fp1 # FP1 IS Z = Y*Y
6418 fdiv.x %fp0,%fp1 # FP1 IS -1/X
6427 fmul.x %fp1,%fp1 # FP1 IS Z = Y*Y
8273 #--SUMMARY: FP0 IS Y-F, A0 IS ADDRESS OF 1/F, FP1 IS K
8274 #--REGISTERS SAVED: FPCR, FP1, FP2
8282 fmov.x %fp1,KLOG2(%a6) # PUT K*LOG2 IN MEMEORY, FREE FP1
8327 #--REGISTERS SAVED: FPCR, FP1. FP0 CONTAINS THE INPUT.
8329 fsub.s one(%pc),%fp1 # FP1 IS X-1
8331 fadd.x %fp1,%fp1 # FP1 IS 2(X-1)
8333 #--IN U, U = 2(X-1)/(X+1) = FP1/FP0
8337 fdiv.x %fp0,%fp1 # FP1 IS U
8339 #--REGISTERS SAVED ARE NOW FPCR,FP1,FP2,FP3
8345 fmov.x %fp1,SAVEU(%a6) # STORE U IN MEMORY, FREE FP1
8347 fmul.x %fp1,%fp1 # FP1 IS W
8454 fmov.x %fp0,%fp1 # FP1 IS INPUT Z
8479 fadd.x %fp1,%fp1 # FP1 IS 2Z
8481 #--U = FP1/FP0
8491 #--ON RETURNING TO LP1CONT1, WE MUST HAVE K IN FP1, ADDRESS OF
8515 fmov.s negone(%pc),%fp1 # FP1 IS K = -1
8532 fmov.s zero(%pc),%fp1 # FP1 IS K = 0
9025 #--REGISTERS SAVED SO FAR ARE (IN ORDER) FPCR, D0, FP1, a1, AND FP2.
9122 #--REGISTERS SAVED SO FAR ARE (IN ORDER) FPCR, D0, FP1, a1, AND FP2.
9154 fmul.x %fp1,%fp1 # FP1 IS S = R*R