3 #if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4 long double cosl(long double x
) {
7 #elif (LDBL_MANT_DIG == 64 || LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
8 long double cosl(long double x
)
10 union ldshape u
= {x
};
12 long double y
[2], hi
, lo
;
19 if (u
.i
.se
< 0x3fff - LDBL_MANT_DIG
)
20 /* raise inexact if x!=0 */
24 n
= __rem_pio2l(x
, y
);
29 return __cosl(hi
, lo
);
31 return -__sinl(hi
, lo
, 1);
33 return -__cosl(hi
, lo
);
36 return __sinl(hi
, lo
, 1);