Lines Matching refs:s
272 double R,S,P,Q,ax,s,y,z,r,fabs(),exp(); variable
292 s = fabs(x)-one;
293 P = pa0+s*(pa1+s*(pa2+s*(pa3+s*(pa4+s*(pa5+s*pa6)))));
294 Q = one+s*(qa1+s*(qa2+s*(qa3+s*(qa4+s*(qa5+s*qa6)))));
308 s = -one/z;
310 R = rc0+s*(rc1+s*(rc2+s*(rc3+s*(rc4+s*(rc5+
311 s*(rc6+s*(rc7+s*(rc8+s*(rc9+s*rc10)))))))));
312 S = one+s*(sc1+s*(sc2+s*sc3));
314 R = rb0+s*(rb1+s*(rb2+s*(rb3+s*(rb4+s*(rb5+
315 s*(rb6+s*(rb7+s*(rb8+s*(rb9+s*rb10)))))))));
316 S = one+s*(sb1+s*(sb2+s*sb3));
318 y = (R/S -.5*s) - lsqrtPI_hi;
330 double R,S,P,Q,s,ax,y,z,r,fabs(),__exp__D(); variable
356 s = ax-one;
357 P = pa0+s*(pa1+s*(pa2+s*(pa3+s*(pa4+s*(pa5+s*pa6)))));
358 Q = one+s*(qa1+s*(qa2+s*(qa3+s*(qa4+s*(qa5+s*qa6)))));
374 s = one/(-z-y); /* 1/(x*x) */
376 R = s*(rd1+s*(rd2+s*(rd3+s*(rd4+s*(rd5+
377 s*(rd6+s*(rd7+s*(rd8+s*(rd9+s*(rd10
378 +s*(rd11+s*(rd12+s*rd13))))))))))));
381 R = rb0+s*(rb1+s*(rb2+s*(rb3+s*(rb4+s*(rb5+
382 s*(rb6+s*(rb7+s*(rb8+s*(rb9+s*rb10)))))))));
383 S = one+s*(sb1+s*(sb2+s*sb3));
385 R = -.5*s;
387 R = rc0+s*(rc1+s*(rc2+s*(rc3+s*(rc4+s*(rc5+
388 s*(rc6+s*(rc7+s*(rc8+s*(rc9+s*rc10)))))))));
389 S = one+s*(sc1+s*(sc2+s*sc3));
391 R = -.5*s;
394 s = ((R + y) - lsqrtPI_hi) + z;
395 y = (((z-s) - lsqrtPI_hi) + R) + y;
396 r = __exp__D(s, y)/x;