1 /*-
24 sincos(double x, double *sn, double *cs)  in sincos()  argument
33 	ix &= 0x7fffffff;  in sincos()
34 	if (ix <= 0x3fe921fb) {  in sincos()
35 		if (ix < 0x3e400000) {		/* |x| < 2**-27 */  in sincos()
36 			if ((int)x == 0) {	/* Generate inexact. */  in sincos()
38 				*cs = 1;  in sincos()
42 		__kernel_sincos(x, 0, 0, sn, cs);  in sincos()
47 	if (ix >= 0x7ff00000) {  in sincos()
48 		*sn = x - x;  in sincos()
49 		*cs = x - x;  in sincos()
57 	case 0:  in sincos()
58 		__kernel_sincos(y[0], y[1], 1, sn, cs);  in sincos()
61 		__kernel_sincos(y[0], y[1], 1, cs, sn);  in sincos()
62 		*cs = -*cs;  in sincos()
65 		__kernel_sincos(y[0], y[1], 1, sn, cs);  in sincos()
66 		*sn = -*sn;  in sincos()
67 		*cs = -*cs;  in sincos()
70 		__kernel_sincos(y[0], y[1], 1, cs, sn);  in sincos()
71 		*sn = -*sn;  in sincos()