Lines Matching +full:cs +full:- +full:0
1 /*-
2 * Copyright (c) 2007, 2010-2013 Steven G. Kargl
47 sincosl(long double x, long double *sn, long double *cs) in sincosl() argument
54 z.bits.sign = 0; in sincosl()
61 * If x = +-0 or x is a subnormal number, then sin(x) = x and in sincosl()
64 if (z.bits.exp == 0) { in sincosl()
66 *cs = 1; in sincosl()
68 __kernel_sincosl(x, 0, 0, sn, cs); in sincosl()
74 *sn = x - x; in sincosl()
75 *cs = x - x; in sincosl()
83 case 0: in sincosl()
84 __kernel_sincosl(y[0], y[1], 1, sn, cs); in sincosl()
87 __kernel_sincosl(y[0], y[1], 1, cs, sn); in sincosl()
88 *cs = -*cs; in sincosl()
91 __kernel_sincosl(y[0], y[1], 1, sn, cs); in sincosl()
92 *sn = -*sn; in sincosl()
93 *cs = -*cs; in sincosl()
96 __kernel_sincosl(y[0], y[1], 1, cs, sn); in sincosl()
97 *sn = -*sn; in sincosl()