218 	long double ax,R,S,P,Q,s,y,z,r;  in erfl()  local
241 	    s = one+z*(qq1+z*(qq2+z*(qq3+z*(qq4+z*(qq5+z*qq6)))));  in erfl()
242 	    y = r/s;  in erfl()
246 	    s = ax-one;  in erfl()
247 	    P = pa0+s*(pa1+s*(pa2+s*(pa3+s*(pa4+s*(pa5+s*(pa6+s*pa7))))));  in erfl()
248 	    Q = one+s*(qa1+s*(qa2+s*(qa3+s*(qa4+s*(qa5+s*(qa6+s*qa7))))));  in erfl()
254 	s = one/(ax*ax);  in erfl()
256 	    R=ra0+s*(ra1+s*(ra2+s*(ra3+s*(ra4+s*(ra5+s*(ra6+s*(ra7+  in erfl()
257 		s*(ra8+s*ra9))))))));  in erfl()
258 	    S=one+s*(sa1+s*(sa2+s*(sa3+s*(sa4+s*(sa5+s*(sa6+s*(sa7+  in erfl()
259 		s*(sa8+s*sa9))))))));  in erfl()
261 	    R=rb0+s*(rb1+s*(rb2+s*(rb3+s*(rb4+s*(rb5+s*(rb6+s*rb7))))));  in erfl()
262 	    S=one+s*(sb1+s*(sb2+s*(sb3+s*(sb4+s*(sb5+s*(sb6+s*sb7))))));  in erfl()
272 	long double ax,R,S,P,Q,s,y,z,r;  in erfcl()  local
291 	    s = one+z*(qq1+z*(qq2+z*(qq3+z*(qq4+z*(qq5+z*qq6)))));  in erfcl()
292 	    y = r/s;  in erfcl()
302 	    s = ax-one;  in erfcl()
303 	    P = pa0+s*(pa1+s*(pa2+s*(pa3+s*(pa4+s*(pa5+s*(pa6+s*pa7))))));  in erfcl()
304 	    Q = one+s*(qa1+s*(qa2+s*(qa3+s*(qa4+s*(qa5+s*(qa6+s*qa7))))));  in erfcl()
313  	    s = one/(ax*ax);  in erfcl()
315 		R=ra0+s*(ra1+s*(ra2+s*(ra3+s*(ra4+s*(ra5+s*(ra6+s*(ra7+  in erfcl()
316 		    s*(ra8+s*ra9))))))));  in erfcl()
317 		S=one+s*(sa1+s*(sa2+s*(sa3+s*(sa4+s*(sa5+s*(sa6+s*(sa7+  in erfcl()
318 		    s*(sa8+s*sa9))))))));  in erfcl()
320 		R=rb0+s*(rb1+s*(rb2+s*(rb3+s*(rb4+s*(rb5+s*(rb6+s*rb7))))));  in erfcl()
321 		S=one+s*(sb1+s*(sb2+s*(sb3+s*(sb4+s*(sb5+s*(sb6+s*sb7))))));  in erfcl()
324 		R=rc0+s*(rc1+s*(rc2+s*(rc3+s*(rc4+s*rc5))));  in erfcl()
325 		S=one+s*(sc1+s*(sc2+s*(sc3+s*(sc4+s*sc5))));  in erfcl()