sincos
extern void sincos(double, double *, double *);
(void) sincos(y, &S, &C);
(void) sincos(y, &s, &c);
sincos(y, &s, &c);
(void) sincos(y, &s, &c);
sincos(w1, &t1, &t2);
sincos(w2, &t3, &t4);
(void) sincos(y, &S, &C);
(void) sincos(y, &S, &C);
(void) sincos(y, &S, &C);