Lines Matching defs:a0
357 double a0 = -s*ri, a1 = (s - 2*c1*itheta)*ri, a2 = c1*itheta;360 J[i*9+k] = a0*I[k] + a1*rrt[k] + a2*drrt[i*9+k] +
