__log__D
u = __log__D(x);
lsine = __log__D(M_PI / z); /* = TRUNC(log(u)) + small */
struct Double __log__D(double);