1 /* Declarations for sinl, cosl, tanl internal functions. -*- coding: utf-8 -*-
2 Contributed by Paolo Bonzini
4 Copyright 2002-2003, 2009-2018 Free Software Foundation, Inc.
6 This file is part of gnulib.
8 This program is free software: you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <https://www.gnu.org/licenses/>. */
21 /* Decompose x into x = k * π/2 + r
22 where k is an integer and abs(r) <= π/4.
23 Store r in y[0] and y[1] (main part in y[0], small additional part in
24 y[1], r = y[0] + y[1]).
26 extern int ieee754_rem_pio2l (long double x
, long double *y
);
28 /* Compute and return sinl (x + y), where x is the main part and y is the
29 small additional part of a floating-point number.
30 iy is 0 when y is known to be 0.0, otherwise iy is 1. */
31 extern long double kernel_sinl (long double x
, long double y
, int iy
);
33 /* Compute and return cosl (x + y), where x is the main part and y is the
34 small additional part of a floating-point number. */
35 extern long double kernel_cosl (long double x
, long double y
);