Deleted Added
full compact
k_tanl.c (176386) k_tanl.c (176387)
1/* From: @(#)k_tan.c 1.5 04/04/22 SMI */
2
3/*
4 * ====================================================
5 * Copyright 2004 Sun Microsystems, Inc. All Rights Reserved.
6 * Copyright (c) 2008 Steven G. Kargl, David Schultz, Bruce D. Evans.
7 *
8 * Permission to use, copy, modify, and distribute this
9 * software is freely granted, provided that this notice
10 * is preserved.
11 * ====================================================
12 */
13
14#include <sys/cdefs.h>
1/* From: @(#)k_tan.c 1.5 04/04/22 SMI */
2
3/*
4 * ====================================================
5 * Copyright 2004 Sun Microsystems, Inc. All Rights Reserved.
6 * Copyright (c) 2008 Steven G. Kargl, David Schultz, Bruce D. Evans.
7 *
8 * Permission to use, copy, modify, and distribute this
9 * software is freely granted, provided that this notice
10 * is preserved.
11 * ====================================================
12 */
13
14#include <sys/cdefs.h>
15__FBSDID("$FreeBSD: head/lib/msun/ld80/k_tanl.c 176386 2008-02-18 14:09:41Z bde $");
15__FBSDID("$FreeBSD: head/lib/msun/ld80/k_tanl.c 176387 2008-02-18 15:39:52Z bde $");
16
17/*
18 * ld80 version of k_tan.c. See ../src/k_tan.c for most comments.
19 */
20
21#include "math.h"
22#include "math_private.h"
23

--- 21 unchanged lines hidden (view full) ---

45#define T7 ((long double)T7hi + T7lo)
46#define pio4 ((long double)pio4_hi + pio4_lo)
47#define pio4lo ((long double)pio4lo_hi + pio4lo_lo)
48#else
49static const long double
50T3 = 0.333333333333333333180L, /* 0xaaaaaaaaaaaaaaa5.0p-65 */
51T5 = 0.133333333333333372290L, /* 0x88888888888893c3.0p-66 */
52T7 = 0.0539682539682504975744L, /* 0xdd0dd0dd0dc13ba2.0p-68 */
16
17/*
18 * ld80 version of k_tan.c. See ../src/k_tan.c for most comments.
19 */
20
21#include "math.h"
22#include "math_private.h"
23

--- 21 unchanged lines hidden (view full) ---

45#define T7 ((long double)T7hi + T7lo)
46#define pio4 ((long double)pio4_hi + pio4_lo)
47#define pio4lo ((long double)pio4lo_hi + pio4lo_lo)
48#else
49static const long double
50T3 = 0.333333333333333333180L, /* 0xaaaaaaaaaaaaaaa5.0p-65 */
51T5 = 0.133333333333333372290L, /* 0x88888888888893c3.0p-66 */
52T7 = 0.0539682539682504975744L, /* 0xdd0dd0dd0dc13ba2.0p-68 */
53pio4 = 0.785398163397448309628, /* 0xc90fdaa22168c235.0p-64 */
54pio4lo = -1.25413940316708300586e-20; /* -0xece675d1fc8f8cbb.0p-130 */
53pio4 = 0.785398163397448309628L, /* 0xc90fdaa22168c235.0p-64 */
54pio4lo = -1.25413940316708300586e-20L; /* -0xece675d1fc8f8cbb.0p-130 */
55#endif
56
57static const double
58T9 = 0.021869488536312216, /* 0x1664f4882cc1c2.0p-58 */
59T11 = 0.0088632355256619590, /* 0x1226e355c17612.0p-59 */
60T13 = 0.0035921281113786528, /* 0x1d6d3d185d7ff8.0p-61 */
61T15 = 0.0014558334756312418, /* 0x17da354aa3f96b.0p-62 */
62T17 = 0.00059003538700862256, /* 0x13559358685b83.0p-63 */

--- 62 unchanged lines hidden ---
55#endif
56
57static const double
58T9 = 0.021869488536312216, /* 0x1664f4882cc1c2.0p-58 */
59T11 = 0.0088632355256619590, /* 0x1226e355c17612.0p-59 */
60T13 = 0.0035921281113786528, /* 0x1d6d3d185d7ff8.0p-61 */
61T15 = 0.0014558334756312418, /* 0x17da354aa3f96b.0p-62 */
62T17 = 0.00059003538700862256, /* 0x13559358685b83.0p-63 */

--- 62 unchanged lines hidden ---