0.76484218728448842626L, CHOOSE(3e-17L, 2e-16, 0));
0.76484218728448842626L, CHOOSE(3e-17L, 2e-16, 6e-8));
sincos_test (void){  MATHTYPE sin_res, cos_res;  fenv_t fenv;  FUNC(sincos) (0, &sin_res, &cos_res);  fegetenv (&fenv);  check ("sincos (+0, &sin, &cos) puts +0 in sin", sin_res, 0);  fesetenv (&fenv);  check ("sincos (+0, &sin, &cos) puts 1 in cos", cos_res, 1);  FUNC(sincos) (minus_zero, &sin_res, &cos_res);  fegetenv (&fenv);  check ("sincos (-0, &sin, &cos) puts -0 in sin", sin_res, minus_zero);  fesetenv (&fenv);  check ("sincos (-0, &sin, &cos) puts 1 in cos", cos_res, 1);  FUNC(sincos) (plus_infty, &sin_res, &cos_res);  fegetenv (&fenv);  check_isnan_exc ("sincos (+inf, &sin, &cos) puts NaN in sin plus invalid exception",                   sin_res, INVALID_EXCEPTION);  fesetenv (&fenv);  check_isnan_exc ("sincos (+inf, &sin, &cos) puts NaN in cos plus invalid exception",                   cos_res, INVALID_EXCEPTION);  FUNC(sincos) (minus_infty, &sin_res, &cos_res);  fegetenv (&fenv);  check_isnan_exc ("sincos (-inf,&sin, &cos) puts NaN in sin plus invalid exception",		   sin_res, INVALID_EXCEPTION);  fesetenv (&fenv);  check_isnan_exc ("sincos (-inf,&sin, &cos) puts NaN in cos plus invalid exception",		   cos_res, INVALID_EXCEPTION);  FUNC(sincos) (M_PI_2l, &sin_res, &cos_res);  fegetenv (&fenv);  check ("sincos (pi/2, &sin, &cos) puts 1 in sin", sin_res, 1);  fesetenv (&fenv);  check_eps ("sincos (pi/2, &sin, &cos) puts 0 in cos", cos_res, 0,	     CHOOSE (1e-18L, 1e-16, 1e-7));  FUNC(sincos) (M_PI_6l, &sin_res, &cos_res);  check_eps ("sincos (pi/6, &sin, &cos) puts 0.5 in sin", sin_res, 0.5,	     CHOOSE (5e-18L, 0, 0));  FUNC(sincos) (M_PI_6l*2.0, &sin_res, &cos_res);  check_eps ("sincos (pi/3, &sin, &cos) puts 0.5 in cos", cos_res, 0.5,	     CHOOSE (5e-18L, 1e-15, 1e-7));  FUNC(sincos) (0.7, &sin_res, &cos_res);  check_eps ("sincos (0.7, &sin, &cos) puts 0.6442176872... in sin", sin_res,	     0.64421768723769105367L, CHOOSE(4e-17L, 0, 0));  check_eps ("sincos (0.7, &sin, &cos) puts 0.7648421872... in cos", cos_res,	     0.76484218728448842626L, CHOOSE(3e-17L, 2e-16, 0));}