Lines Matching refs:ss
89 double z, s,c,ss,cc,r,u,v,y; in j1() local
98 ss = -s-c; in j1()
102 if ((s*c)>zero) cc = z/ss; in j1()
103 else ss = z/cc; in j1()
112 z = invsqrtpi*(u*cc-v*ss)/sqrt(y); in j1()
145 double z, s,c,ss,cc,u,v; in y1() local
162 ss = -s-c; in y1()
166 if ((s*c)>zero) cc = z/ss; in y1()
167 else ss = z/cc; in y1()
180 if(ix>0x48000000) z = (invsqrtpi*ss)/sqrt(x); in y1()
183 z = invsqrtpi*(u*ss+v*cc)/sqrt(x); in y1()