Lines Matching defs:hxs
114 /* Scaled Q's: Qn_here = 2**n * Qn_above, for R(2*z) where z = hxs = x*x/2: */
123 double_t y,hi,lo,c,t,e,hxs,hfx,r1,twopk;
169 hxs = x*hfx;
170 r1 = 1.0+hxs*(Q1+hxs*(Q2+hxs*(Q3+hxs*(Q4+hxs*Q5))));
172 e = hxs*((r1-t)/(6.0 - x*t));
174 return x - (x*e-hxs);
176 e -= hxs;