Lines Matching defs:cc
80 GENERIC z, s,c,ss,cc,r,u,v;
103 cc = s+c;
106 cc = -cosl(x+x)/ss;
108 cc = s + c;
109 ss = -cosl(x+x)/cc;
112 * j0(x) = 1/sqrt(pi) * (P(0,x)*cc - Q(0,x)*ss) / sqrt(x)
113 * y0(x) = 1/sqrt(pi) * (P(0,x)*ss + Q(0,x)*cc) / sqrt(x)
115 if (x>1.0e120L) return (invsqrtpi*cc)/sqrtl(x);
117 return invsqrtpi*(u*cc-v*ss)/sqrtl(x);
155 GENERIC z, s,c,ss,cc,u,v;
187 cc = s+c;
190 cc = -cosl(x+x)/ss;
192 cc = s + c;
193 ss = -cosl(x+x)/cc;
196 * j0(x) = 1/sqrt(pi*x) * (P(0,x)*cc - Q(0,x)*ss)
197 * y0(x) = 1/sqrt(pi*x) * (P(0,x)*ss + Q(0,x)*cc)
200 return invsqrtpi*(pzero(x)*ss+qzero(x)*cc)/sqrtl(x);