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 --- |