sincospil
extern void sincospil(long double, long double *, long double *);
extern void sincospil(long double, long double *, long double *);
sincospil(u, &s, &c);
sincospil(t * u, &s, &c);
sincospil(t * u, &s, &c);
sincospil(t * u, &s, &c);
sincospil(w1, &t1, &t2);
sincospil(w2, &t3, &t4);