__log__D
struct Double __log__D(double);
u = __log__D(x);
lsine = __log__D(M_PI/z); /* = TRUNC(log(u)) + small */
u = __log__D(x);
rr = __log__D(z);
default: rr = __log__D(x);
rr = __log__D(z);
case 0: rr = __log__D(x);
default: rr = __log__D(x);
s = __log__D(x);
u = __log__D(x);
lsine = __log__D(M_PI/z); /* = TRUNC(log(u)) + small */
struct Double __log__D(double);