48 	double_t ax, ax2h, ax2l, axh, axl, ay, ay2h, ay2l, ayh, ayl, sh, sl, t;  in clog()  local
57 	ax = fabs(x);  in clog()
59 	if (ax < ay) {  in clog()
60 		t = ax;  in clog()
61 		ax = ay;  in clog()
65 	GET_HIGH_WORD(hax, ax);  in clog()
75 	if (ax == 1) {  in clog()
83 		return (CMPLX(log(ax), v));  in clog()
102 	t = (double)(ax * (0x1p27 + 1));  in clog()
103 	axh = (double)(ax - t) + t;  in clog()
104 	axl = ax - axh;  in clog()
105 	ax2h = ax * ax;  in clog()