cosl
long double cosl(long double);
extern long double cosl(long double);
cc = -cosl(x+x)/ss;
ss = -cosl(x+x)/cc;
c = cosl(x);
cc = -cosl(x+x)/ss;
ss = -cosl(x+x)/cc;
c = cosl(x);
ss = cosl(x+x)/cc;
cc = cosl(x+x)/ss;
c = cosl(x);
ss = cosl(x+x)/cc;
cc = cosl(x+x)/ss;
c = cosl(x);
temp = cosl(x)+sinl(x);
temp = -cosl(x)+sinl(x);
temp = -cosl(x)-sinl(x);
temp = cosl(x)-sinl(x);
temp = sinl(x)-cosl(x);
temp = -sinl(x)-cosl(x);
temp = -sinl(x)+cosl(x);
temp = sinl(x)+cosl(x);
extern long double cosl(long double);
cc = -cosl(x+x)/ss;
ss = -cosl(x+x)/cc;
c = cosl(x);
cc = -cosl(x+x)/ss;
ss = -cosl(x+x)/cc;
c = cosl(x);
ss = cosl(x+x)/cc;
cc = cosl(x+x)/ss;
c = cosl(x);
ss = cosl(x+x)/cc;
cc = cosl(x+x)/ss;
c = cosl(x);
temp = cosl(x)+sinl(x);
temp = -cosl(x)+sinl(x);
temp = -cosl(x)-sinl(x);
temp = cosl(x)-sinl(x);
temp = sinl(x)-cosl(x);
temp = -sinl(x)-cosl(x);
temp = -sinl(x)+cosl(x);
temp = sinl(x)+cosl(x);
extern long double cosl(long double);