Lines Matching defs:s_h
147 float s2,s_h,s_l,t_h,t_l;
161 /* compute s = s_h+s_l = (x-1)/(x+1) or (x-1.5)/(x+1.5) */
165 s_h = s;
166 GET_FLOAT_WORD(is,s_h);
167 SET_FLOAT_WORD(s_h,is&0xfffff000);
172 s_l = v*((u-s_h*t_h)-s_h*t_l);
176 r += s_l*(s_h+s);
177 s2 = s_h*s_h;
183 u = s_h*t_h;
