Lines Matching refs:p_h
68 let mut p_h: f32;
293 p_h = u + v;
294 is = p_h.to_bits() as i32;
295 p_h = f32::from_bits(is as u32 & 0xfffff000);
296 p_l = v - (p_h - u);
297 z_h = CP_H * p_h; /* cp_h+cp_l = 2/(3*log2) */
298 z_l = CP_L * p_h + p_l * CP + i!(DP_L, k as usize);
311 p_h = y1 * t1;
312 z = p_l + p_h;
319 if p_l + OVT > z - p_h {
328 && p_l <= z - p_h
334 * compute 2**(p_h+p_l)
348 p_h -= t;
350 t = p_l + p_h;
354 v = (p_l - (t - p_h)) * LG2 + t * LG2_L;
865 let p_h: f64 = with_set_low_word(u + v, 0);
866 let p_l = v - (p_h - u);
867 let z_h: f64 = CP_H * p_h; /* cp_h+cp_l = 2/(3*log2) */
868 let z_l: f64 = CP_L * p_h + p_l * CP + i!(DP_L, k as usize);
879 let mut p_h: f64 = y1 * t1;
880 let z: f64 = p_l + p_h;
892 if p_l + OVT > z - p_h {
904 if p_l <= z - p_h {
909 /* compute 2**(p_h+p_l) */
923 p_h -= t;
926 let t: f64 = with_set_low_word(p_l + p_h, 0);
928 let v: f64 = (p_l - (t - p_h)) * LG2 + t * LG2_L;