Lines Matching defs:hxs
123 /* Scaled Q's: Qn_here = 2**n * Qn_above, for R(2*z) where z = hxs = x*x/2: */
135 double y,hi,lo,c,t,e,hxs,hfx,r1,twopk;
185 hxs = x*hfx;
186 r1 = one+hxs*(Q1+hxs*(Q2+hxs*(Q3+hxs*(Q4+hxs*Q5))));
188 e = hxs*((r1-t)/(6.0 - x*t));
189 if(k==0) return x - (x*e-hxs); /* c is 0 */
193 e -= hxs;