Lines Matching +full:hi +full:- +full:z
1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause
53 union IEEEl2bits z; in tanl() local
56 long double hi, lo; in tanl() local
58 z.e = x; in tanl()
59 s = z.bits.sign; in tanl()
60 z.bits.sign = 0; in tanl()
62 /* If x = +-0 or x is subnormal, then tan(x) = x. */ in tanl()
63 if (z.bits.exp == 0) in tanl()
67 if (z.bits.exp == 32767) in tanl()
68 return ((x - x) / (x - x)); in tanl()
73 if (z.e < M_PI_4) { in tanl()
74 hi = __kernel_tanl(z.e, 0, 0); in tanl()
75 RETURNI(s ? -hi : hi); in tanl()
79 hi = y[0]; in tanl()
85 hi = __kernel_tanl(hi, lo, 0); in tanl()
89 hi = __kernel_tanl(hi, lo, 1); in tanl()
93 RETURNI(hi); in tanl()