1/* e_atan2f.c -- float version of e_atan2.c. 2 * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com. 3 */ 4 5/* 6 * ==================================================== 7 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 8 * 9 * Developed at SunPro, a Sun Microsystems, Inc. business. 10 * Permission to use, copy, modify, and distribute this 11 * software is freely granted, provided that this notice 12 * is preserved. 13 * ==================================================== 14 */ 15 16#ifndef lint
| 1/* e_atan2f.c -- float version of e_atan2.c. 2 * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com. 3 */ 4 5/* 6 * ==================================================== 7 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 8 * 9 * Developed at SunPro, a Sun Microsystems, Inc. business. 10 * Permission to use, copy, modify, and distribute this 11 * software is freely granted, provided that this notice 12 * is preserved. 13 * ==================================================== 14 */ 15 16#ifndef lint
|
17static char rcsid[] = "$FreeBSD: head/lib/msun/src/e_atan2f.c 97407 2002-05-28 17:03:12Z alfred $";
| 17static char rcsid[] = "$FreeBSD: head/lib/msun/src/e_atan2f.c 130003 2004-06-02 17:09:05Z bde $";
|
18#endif 19 20#include "math.h" 21#include "math_private.h" 22 23static const float 24tiny = 1.0e-30, 25zero = 0.0, 26pi_o_4 = 7.8539818525e-01, /* 0x3f490fdb */ 27pi_o_2 = 1.5707963705e+00, /* 0x3fc90fdb */
| 18#endif 19 20#include "math.h" 21#include "math_private.h" 22 23static const float 24tiny = 1.0e-30, 25zero = 0.0, 26pi_o_4 = 7.8539818525e-01, /* 0x3f490fdb */ 27pi_o_2 = 1.5707963705e+00, /* 0x3fc90fdb */
|
28pi = 3.1415925026e+00, /* 0x40490fda */ 29pi_lo = 1.5099578832e-07; /* 0x34222168 */
| 28pi = 3.1415927410e+00, /* 0x40490fdb */ 29pi_lo = -8.7422776573e-08; /* 0xb3bbbd2e */
|
30 31float 32__ieee754_atan2f(float y, float x) 33{ 34 float z; 35 int32_t k,m,hx,hy,ix,iy; 36 37 GET_FLOAT_WORD(hx,x);
--- 60 unchanged lines hidden --- | 30 31float 32__ieee754_atan2f(float y, float x) 33{ 34 float z; 35 int32_t k,m,hx,hy,ix,iy; 36 37 GET_FLOAT_WORD(hx,x);
--- 60 unchanged lines hidden --- |