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