Lines Matching refs:i__4
20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5;
295 i__4 = j - 1;
296 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) {
313 i__4 = j;
322 y[i__4].r = q__1.r, y[i__4].i = q__1.i;
330 i__4 = jx;
331 q__1.r = alpha->r * x[i__4].r - alpha->i * x[i__4].i, q__1.i =
332 alpha->r * x[i__4].i + alpha->i * x[i__4].r;
339 i__4 = 1, i__2 = j - *k;
341 for (i__ = max(i__4,i__2); i__ <= i__3; ++i__) {
342 i__4 = iy;
349 y[i__4].r = q__1.r, y[i__4].i = q__1.i;
351 i__4 = ix;
352 q__2.r = q__3.r * x[i__4].r - q__3.i * x[i__4].i, q__2.i =
353 q__3.r * x[i__4].i + q__3.i * x[i__4].r;
361 i__4 = jy;
365 q__2.r = y[i__4].r + q__3.r, q__2.i = y[i__4].i + q__3.i;
392 i__4 = j;
396 q__1.r = y[i__4].r + q__2.r, q__1.i = y[i__4].i + q__2.i;
400 i__4 = *n, i__2 = j + *k;
401 i__3 = min(i__4,i__2);
403 i__4 = i__;
410 y[i__4].r = q__1.r, y[i__4].i = q__1.i;
412 i__4 = i__;
413 q__2.r = q__3.r * x[i__4].r - q__3.i * x[i__4].i, q__2.i =
414 q__3.r * x[i__4].i + q__3.i * x[i__4].r;
420 i__4 = j;
423 q__1.r = y[i__4].r + q__2.r, q__1.i = y[i__4].i + q__2.i;
438 i__4 = jy;
442 q__1.r = y[i__4].r + q__2.r, q__1.i = y[i__4].i + q__2.i;
448 i__4 = *n, i__2 = j + *k;
449 i__3 = min(i__4,i__2);
453 i__4 = iy;
460 y[i__4].r = q__1.r, y[i__4].i = q__1.i;
462 i__4 = ix;
463 q__2.r = q__3.r * x[i__4].r - q__3.i * x[i__4].i, q__2.i =
464 q__3.r * x[i__4].i + q__3.i * x[i__4].r;
470 i__4 = jy;
473 q__1.r = y[i__4].r + q__2.r, q__1.i = y[i__4].i + q__2.i;
