Lines Matching refs:F
3831 # (3) Line F (4 word stack frame) #
3857 # if the F-Line instruction is an "fmovecr" w/ a non-zero <ea>. if
3858 # so, convert the F-Line exception stack frame to an FP Unimplemented
3860 # point for the F-Line exception handler.
5609 fmov.x %fp0,INARG(%a6) # +-2**K * F, 1 <= F < 2
6164 # Define F = sgn * 2**k * 1.xxxx1, i.e. the first 5 #
6166 # bit position. Define u to be u = (X-F) / (1 + X*F). #
6170 # Step 4. Return arctan(F) + poly, arctan(F) is fetched from a #
6382 #--ARE ONLY 8 TIMES 16 = 2^7 = 128 |F|'S. SINCE ATAN(-|F|) IS
6383 #-- -ATAN(|F|), WE NEED TO STORE ONLY ATAN(|F|).
6389 mov.l &0x00000000,XFRACLO(%a6) # LOCATION OF X IS NOW F
6392 fmul.x X(%a6),%fp1 # FP1 IS X*F, NOTE THAT X*F > 0
6393 fsub.x X(%a6),%fp0 # FP0 IS X-F
6394 fadd.s &0x3F800000,%fp1 # FP1 IS 1 + X*F
6395 fdiv.x %fp1,%fp0 # FP0 IS U = (X-F)/(1+X*F)
6397 #--WHILE THE DIVISION IS TAKING ITS TIME, WE FETCH ATAN(|F|)
6398 #--CREATE ATAN(F) AND STORE IT IN ATANF, AND
6403 and.l &0x00007800,%d1 # 4 VARYING BITS OF F'S FRACTION
8117 # 1/F are also tabulated so that the division in (Y-F)/F #
8121 # the value Y-F has to be calculated carefully when #
8310 set F,FP_SCR1
8311 set FFRAC,F+4
14327 neg.l (%sp) # S.F. = scale1 - scale2