DZERO
yd0 = DZERO;
yd0 = DZERO;
*pz = DZERO; \
double DZERO = ((double*)LCONST)[7]; /* 0.0 */
yd0 = DZERO;
yd1 = DZERO;
yd2 = DZERO;
yd0 = DZERO;
yd1 = DZERO;
yd2 = DZERO;
yd0 = DZERO;
yd0 = DZERO;
yd0 = DZERO;
yd0 = DZERO;
*pz = (sx) ? DZERO / DZERO : DONE; \
*pz = DZERO; \
y0 = DZERO; \
RETURN (I, DZERO / DZERO) /* NaN */ \
double DZERO = ((double*)LCONST)[7]; /* 0.0 */
yd0 = DZERO;
yd1 = DZERO;
yd2 = DZERO;
yd0 = DZERO;
yd1 = DZERO;
yd2 = DZERO;
yd0 = DZERO;
yd0 = DZERO;