Lines Matching defs:s_h
209 double ss,s2,s_h,s_l,t_h,t_l;223 /* compute ss = s_h+s_l = (x-1)/(x+1) or (x-1.5)/(x+1.5) */227 s_h = ss;228 __LO(s_h) = 0;233 s_l = v*((u-s_h*t_h)-s_h*t_l);237 r += s_l*(s_h+ss);238 s2 = s_h*s_h;243 u = s_h*t_h;