Lines Matching refs:p_l

99 	double z,ax,z_h,z_l,p_h,p_l;
246 	    p_l = v-(p_h-u);
248 	    z_l = cp_l*p_h+p_l*cp+dp_l[k];
259 	p_l = (y-y1)*t1+y*t2;
261 	z = p_l+p_h;
267 		if(p_l+ovt>z-p_h) return s*huge*huge;	/* overflow */
273 		if(p_l<=z-p_h) return s*tiny*tiny;	/* underflow */
277      * compute 2**(p_h+p_l)
291 	t = p_l+p_h;
294 	v = (p_l-(t-p_h))*lg2+t*lg2_l;