Lines Matching refs:s
179 double_t s,P,Q; in erfc1() local
181 s = fabs(x) - 1; in erfc1()
182 P = pa0+s*(pa1+s*(pa2+s*(pa3+s*(pa4+s*(pa5+s*pa6))))); in erfc1()
183 Q = 1+s*(qa1+s*(qa2+s*(qa3+s*(qa4+s*(qa5+s*qa6))))); in erfc1()
189 double_t s,R,S; in erfc2() local
196 s = 1/(x*x); in erfc2()
198 R = ra0+s*(ra1+s*(ra2+s*(ra3+s*(ra4+s*( in erfc2()
199 ra5+s*(ra6+s*ra7)))))); in erfc2()
200 S = 1.0+s*(sa1+s*(sa2+s*(sa3+s*(sa4+s*( in erfc2()
201 sa5+s*(sa6+s*(sa7+s*sa8))))))); in erfc2()
203 R = rb0+s*(rb1+s*(rb2+s*(rb3+s*(rb4+s*( in erfc2()
204 rb5+s*rb6))))); in erfc2()
205 S = 1.0+s*(sb1+s*(sb2+s*(sb3+s*(sb4+s*( in erfc2()
206 sb5+s*(sb6+s*sb7)))))); in erfc2()
215 double r,s,z,y; in erf() local
233 s = 1.0+z*(qq1+z*(qq2+z*(qq3+z*(qq4+z*qq5)))); in erf()
234 y = r/s; in erf()
246 double r,s,z,y; in erfc() local
262 s = 1.0+z*(qq1+z*(qq2+z*(qq3+z*(qq4+z*qq5)))); in erfc()
263 y = r/s; in erfc()