13 #if defined(LIBM_SCCS) && !defined(lint)
14 static const char rcsid[] =
15 "$NetBSD: k_cos.c,v 1.8 1995/05/10 20:46:22 jtc Exp $";
61 one = 1.00000000000000000000e+00,
62 C1 = 4.16666666666666019037e-02,
63 C2 = -1.38888888888741095749e-03,
64 C3 = 2.48015872894767294178e-05,
65 C4 = -2.75573143513906633035e-07,
66 C5 = 2.08757232129817482790e-09,
67 C6 = -1.13596475577881948265e-11;
78 double a, hz,
z,
r, qx;
82 if (ix < 0x3e400000) {
87 r = z * (
C1 + z * (
C2 + z * (
C3 + z * (
C4 + z * (
C5 + z *
C6)))));
89 return one - (0.5 * z - (z * r - x *
y));
91 if (ix > 0x3fe90000) {
98 return a - (hz - (z * r - x *
y));
#define GET_HIGH_WORD(i, d)
GLdouble GLdouble GLdouble r
GLint GLint GLint GLint GLint x
#define INSERT_WORDS(d, ix0, ix1)
GLint GLint GLint GLint GLint GLint y
GLboolean GLboolean GLboolean GLboolean a
double attribute_hidden __kernel_cos(double x, double y)