eldexp
eldexp( x2, -1L, x2 ); /* divide by 2 */
eldexp( y, i, y ); /* multiply by 2**i */
void eldexp(), efrexp(), eifrac(), ltoe();