Lines Matching refs:cc
89 double z, s,c,ss,cc,r,u,v;
100 cc = s+c;
103 if ((s*c)<zero) cc = z/ss;
104 else ss = z/cc;
107 * j0(x) = 1/sqrt(pi) * (P(0,x)*cc - Q(0,x)*ss) / sqrt(x)
108 * y0(x) = 1/sqrt(pi) * (P(0,x)*ss + Q(0,x)*cc) / sqrt(x)
110 if(ix>0x48000000) z = (invsqrtpi*cc)/sqrt(x);
113 z = invsqrtpi*(u*cc-v*ss)/sqrt(x);
150 double z, s,c,ss,cc,u,v;
174 cc = s+c;
176 * j0(x) = 1/sqrt(pi) * (P(0,x)*cc - Q(0,x)*ss) / sqrt(x)
177 * y0(x) = 1/sqrt(pi) * (P(0,x)*ss + Q(0,x)*cc) / sqrt(x)
181 if ((s*c)<zero) cc = z/ss;
182 else ss = z/cc;
187 z = invsqrtpi*(u*ss+v*cc)/sqrt(x);