1
2/*
3 * IBM Accurate Mathematical Library
4 * Written by International Business Machines Corp.
5 * Copyright (C) 2001-2021 Free Software Foundation, Inc.
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU Lesser General Public License as published by
9 * the Free Software Foundation; either version 2.1 of the License, or
10 * (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU Lesser General Public License for more details.
16 *
17 * You should have received a copy of the GNU Lesser General Public License
18 * along with this program; if not, see <https://www.gnu.org/licenses/>.
19 */
20
21/************************************************************************/
22/* MODULE_NAME: dosincos.h */
23/* */
24/* */
25/* common data and variables definition for BIG or LITTLE ENDIAN */
26/************************************************************************/
27
28
29
30#ifndef DOSINCOS_H
31#define DOSINCOS_H
32
33
34#ifdef BIG_ENDI
35static const mynumber
36/**/ s3 = {{0xBFC55555, 0x55555555}},/* -0.16666666666666666 */
37/**/ ss3 = {{0xBC6553AA, 0xE77EE482}},/* -9.2490366677784492e-18 */
38/**/ s5 = {{0x3F811111, 0x11110F15}},/* 0.008333333333332452 */
39/**/ ss5 = {{0xBC21AC06, 0xDA488820}},/* -4.7899996586987931e-19 */
40/**/ s7 = {{0xBF2A019F, 0x5816C78D}},/* -0.00019841261022928957 */
41/**/ ss7 = {{0x3BCDCEC9, 0x6A18BF2A}},/* 1.2624077757871259e-20 */
42/**/ c2 = {{0x3FE00000, 0x00000000}},/* 0.5 */
43/**/ cc2 = {{0xBA282FD8, 0x00000000}},/* -1.5264073330037701e-28 */
44/**/ c4 = {{0xBFA55555, 0x55555555}},/* -0.041666666666666664 */
45/**/ cc4 = {{0xBC4554BC, 0x2FFF257E}},/* -2.312711276085743e-18 */
46/**/ c6 = {{0x3F56C16C, 0x16C16A96}},/* 0.0013888888888888055 */
47/**/ cc6 = {{0xBBD2E846, 0xE6346F14}},/* -1.6015133010194884e-20 */
48/**/ c8 = {{0xBEFA019F, 0x821D5987}},/* -2.480157866754367e-05 */
49/**/ cc8 = {{0x3B7AB71E, 0x72FFE5CC}},/* 3.5357416224857556e-22 */
50
51/**/ big = {{0x42c80000, 0x00000000}}, /* 52776558133248 */
52
53/**/ hp0 = {{0x3FF921FB, 0x54442D18}}, /* PI / 2 */
54/**/ hp1 = {{0x3C91A626, 0x33145C07}}; /* 6.123233995736766e-17 */
55#else
56#ifdef LITTLE_ENDI
57static const mynumber
58/**/ s3 = {{0x55555555, 0xBFC55555}},/* -0.16666666666666666 */
59/**/ ss3 = {{0xE77EE482, 0xBC6553AA}},/* -9.2490366677784492e-18 */
60/**/ s5 = {{0x11110F15, 0x3F811111}},/* 0.008333333333332452 */
61/**/ ss5 = {{0xDA488820, 0xBC21AC06}},/* -4.7899996586987931e-19 */
62/**/ s7 = {{0x5816C78D, 0xBF2A019F}},/* -0.00019841261022928957 */
63/**/ ss7 = {{0x6A18BF2A, 0x3BCDCEC9}},/* 1.2624077757871259e-20 */
64/**/ c2 = {{0x00000000, 0x3FE00000}},/* 0.5 */
65/**/ cc2 = {{0x00000000, 0xBA282FD8}},/* -1.5264073330037701e-28 */
66/**/ c4 = {{0x55555555, 0xBFA55555}},/* -0.041666666666666664 */
67/**/ cc4 = {{0x2FFF257E, 0xBC4554BC}},/* -2.312711276085743e-18 */
68/**/ c6 = {{0x16C16A96, 0x3F56C16C}},/* 0.0013888888888888055 */
69/**/ cc6 = {{0xE6346F14, 0xBBD2E846}},/* -1.6015133010194884e-20 */
70/**/ c8 = {{0x821D5987, 0xBEFA019F}},/* -2.480157866754367e-05 */
71/**/ cc8 = {{0x72FFE5CC, 0x3B7AB71E}},/* 3.5357416224857556e-22 */
72
73/**/ big = {{0x00000000, 0x42c80000}}, /* 52776558133248 */
74
75/**/ hp0 = {{0x54442D18, 0x3FF921FB}}, /* PI / 2 */
76/**/ hp1 = {{0x33145C07, 0x3C91A626}}; /* 6.123233995736766e-17 */
77#endif
78#endif
79
80#endif
81