| 1 | /* Compute sine and cosine of argument. |
|---|
| 2 | Copyright (C) 2018-2022 Free Software Foundation, Inc. |
|---|
| 3 | This file is part of the GNU C Library. |
|---|
| 4 | |
|---|
| 5 | The GNU C Library is free software; you can redistribute it and/or |
|---|
| 6 | modify it under the terms of the GNU Lesser General Public |
|---|
| 7 | License as published by the Free Software Foundation; either |
|---|
| 8 | version 2.1 of the License, or (at your option) any later version. |
|---|
| 9 | |
|---|
| 10 | The GNU C Library is distributed in the hope that it will be useful, |
|---|
| 11 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
|---|
| 12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
|---|
| 13 | Lesser General Public License for more details. |
|---|
| 14 | |
|---|
| 15 | You should have received a copy of the GNU Lesser General Public |
|---|
| 16 | License along with the GNU C Library; if not, see |
|---|
| 17 | <https://www.gnu.org/licenses/>. */ |
|---|
| 18 | |
|---|
| 19 | #include <stdint.h> |
|---|
| 20 | #include <math.h> |
|---|
| 21 | #include "math_config.h" |
|---|
| 22 | #include "s_sincosf.h" |
|---|
| 23 | |
|---|
| 24 | /* The constants and polynomials for sine and cosine. The 2nd entry |
|---|
| 25 | computes -cos (x) rather than cos (x) to get negation for free. */ |
|---|
| 26 | const sincos_t __sincosf_table[2] = |
|---|
| 27 | { |
|---|
| 28 | { |
|---|
| 29 | { 1.0, -1.0, -1.0, 1.0 }, |
|---|
| 30 | #if TOINT_INTRINSICS |
|---|
| 31 | 0x1.45F306DC9C883p-1, |
|---|
| 32 | #else |
|---|
| 33 | 0x1.45F306DC9C883p+23, |
|---|
| 34 | #endif |
|---|
| 35 | 0x1.921FB54442D18p0, |
|---|
| 36 | 0x1p0, |
|---|
| 37 | -0x1.ffffffd0c621cp-2, |
|---|
| 38 | 0x1.55553e1068f19p-5, |
|---|
| 39 | -0x1.6c087e89a359dp-10, |
|---|
| 40 | 0x1.99343027bf8c3p-16, |
|---|
| 41 | -0x1.555545995a603p-3, |
|---|
| 42 | 0x1.1107605230bc4p-7, |
|---|
| 43 | -0x1.994eb3774cf24p-13 |
|---|
| 44 | }, |
|---|
| 45 | { |
|---|
| 46 | { 1.0, -1.0, -1.0, 1.0 }, |
|---|
| 47 | #if TOINT_INTRINSICS |
|---|
| 48 | 0x1.45F306DC9C883p-1, |
|---|
| 49 | #else |
|---|
| 50 | 0x1.45F306DC9C883p+23, |
|---|
| 51 | #endif |
|---|
| 52 | 0x1.921FB54442D18p0, |
|---|
| 53 | -0x1p0, |
|---|
| 54 | 0x1.ffffffd0c621cp-2, |
|---|
| 55 | -0x1.55553e1068f19p-5, |
|---|
| 56 | 0x1.6c087e89a359dp-10, |
|---|
| 57 | -0x1.99343027bf8c3p-16, |
|---|
| 58 | -0x1.555545995a603p-3, |
|---|
| 59 | 0x1.1107605230bc4p-7, |
|---|
| 60 | -0x1.994eb3774cf24p-13 |
|---|
| 61 | } |
|---|
| 62 | }; |
|---|
| 63 | |
|---|
| 64 | /* Table with 4/PI to 192 bit precision. To avoid unaligned accesses |
|---|
| 65 | only 8 new bits are added per entry, making the table 4 times larger. */ |
|---|
| 66 | const uint32_t __inv_pio4[24] = |
|---|
| 67 | { |
|---|
| 68 | 0xa2, 0xa2f9, 0xa2f983, 0xa2f9836e, |
|---|
| 69 | 0xf9836e4e, 0x836e4e44, 0x6e4e4415, 0x4e441529, |
|---|
| 70 | 0x441529fc, 0x1529fc27, 0x29fc2757, 0xfc2757d1, |
|---|
| 71 | 0x2757d1f5, 0x57d1f534, 0xd1f534dd, 0xf534ddc0, |
|---|
| 72 | 0x34ddc0db, 0xddc0db62, 0xc0db6295, 0xdb629599, |
|---|
| 73 | 0x6295993c, 0x95993c43, 0x993c4390, 0x3c439041 |
|---|
| 74 | }; |
|---|
| 75 | |
|---|
