Lines Matching refs:p_l

58 	float z,ax,z_h,z_l,p_h,p_l;
191 	    p_l = v-(p_h-u);
193 	    z_l = cp_l*p_h+p_l*cp+dp_l[k];
205 	p_l = (y-y1)*t1+y*t2;
207 	z = p_l+p_h;
212 	    if(p_l+ovt>z-p_h) return sn*huge*huge;	/* overflow */
217 	    if(p_l<=z-p_h) return sn*tiny*tiny;		/* underflow */
220      * compute 2**(p_h+p_l)
233 	t = p_l+p_h;
237 	v = (p_l-(t-p_h))*lg2+t*lg2_l;