Lines Matching defs:a1
599 double a0 = -s*ri, a1 = (s - 2*c1*itheta)*ri, a2 = c1*itheta;
602 J[i*9+k] = a0*I[k] + a1*rrt[k] + a2*drrt[i*9+k] +
967 double r2, r4, r6, a1, a2, a3, cdist;
976 a1 = 2*x*y;
980 xd = x*cdist + k[2]*a1 + k[3]*a2;
981 yd = y*cdist + k[2]*a3 + k[3]*a1;
1021 dpdk_p[2] = fx*a1;
1024 dpdk_p[dpdk_step+3] = fy*a1;