Lines Matching refs:jx
90 * jx nx - 1
170 int jz,jx,jv,jp,jk,carry,n,iq[20],i,j,k,m,q0,ih;
177 /* determine jx,jv,q0, note that 3>q0 */
178 jx = nx-1;
182 /* set up f[0] to f[jx+jk] where f[jx+jk] = ipio2[jv+jk] */
183 j = jv-jx; m = jx+jk;
188 for(j=0,fw=0.0;j<=jx;j++) fw += x[j]*f[jx+i-j]; q[i] = fw;
246 f[jx+i] = (double) ipio2[jv+i];
247 for(j=0,fw=0.0;j<=jx;j++) fw += x[j]*f[jx+i-j];
