Lines Matching defs:p_l
59 float z,ax,z_h,z_l,p_h,p_l;
189 p_l = v-(p_h-u);
191 z_l = cp_l*p_h+p_l*cp+dp_l[k];
203 p_l = (y-y1)*t1+y*t2;
205 z = p_l+p_h;
210 if(p_l+ovt>z-p_h) return sn*huge*huge; /* overflow */
215 if(p_l<=z-p_h) return sn*tiny*tiny; /* underflow */
218 * compute 2**(p_h+p_l)
231 t = p_l+p_h;
235 v = (p_l-(t-p_h))*lg2+t*lg2_l;
