Lines Matching refs:i__2
20 integer i__1, i__2, i__3, i__4, i__5;
194 i__2 = i__;
195 y[i__2].r = 0.f, y[i__2].i = 0.f;
201 i__2 = i__;
206 y[i__2].r = q__1.r, y[i__2].i = q__1.i;
215 i__2 = iy;
216 y[i__2].r = 0.f, y[i__2].i = 0.f;
223 i__2 = iy;
228 y[i__2].r = q__1.r, y[i__2].i = q__1.i;
246 i__2 = j;
247 q__1.r = alpha->r * x[i__2].r - alpha->i * x[i__2].i, q__1.i =
248 alpha->r * x[i__2].i + alpha->i * x[i__2].r;
252 i__2 = j - 1;
253 for (i__ = 1; i__ <= i__2; ++i__) {
271 i__2 = j;
280 y[i__2].r = q__1.r, y[i__2].i = q__1.i;
289 i__2 = jx;
290 q__1.r = alpha->r * x[i__2].r - alpha->i * x[i__2].i, q__1.i =
291 alpha->r * x[i__2].i + alpha->i * x[i__2].r;
296 i__2 = kk + j - 2;
297 for (k = kk; k <= i__2; ++k) {
316 i__2 = jy;
325 y[i__2].r = q__1.r, y[i__2].i = q__1.i;
339 i__2 = j;
340 q__1.r = alpha->r * x[i__2].r - alpha->i * x[i__2].i, q__1.i =
341 alpha->r * x[i__2].i + alpha->i * x[i__2].r;
344 i__2 = j;
350 y[i__2].r = q__1.r, y[i__2].i = q__1.i;
352 i__2 = *n;
353 for (i__ = j + 1; i__ <= i__2; ++i__) {
371 i__2 = j;
376 y[i__2].r = q__1.r, y[i__2].i = q__1.i;
385 i__2 = jx;
386 q__1.r = alpha->r * x[i__2].r - alpha->i * x[i__2].i, q__1.i =
387 alpha->r * x[i__2].i + alpha->i * x[i__2].r;
390 i__2 = jy;
396 y[i__2].r = q__1.r, y[i__2].i = q__1.i;
399 i__2 = kk + *n - j;
400 for (k = kk + 1; k <= i__2; ++k) {
419 i__2 = jy;
424 y[i__2].r = q__1.r, y[i__2].i = q__1.i;
