Lines Matching refs:i__3
20 integer i__1, i__2, i__3, i__4, i__5;
202 i__3 = i__;
203 z__1.r = beta->r * y[i__3].r - beta->i * y[i__3].i,
204 z__1.i = beta->r * y[i__3].i + beta->i * y[i__3]
224 i__3 = iy;
225 z__1.r = beta->r * y[i__3].r - beta->i * y[i__3].i,
226 z__1.i = beta->r * y[i__3].i + beta->i * y[i__3]
254 i__3 = i__;
261 y[i__3].r = z__1.r, y[i__3].i = z__1.i;
263 i__3 = i__;
264 z__2.r = z__3.r * x[i__3].r - z__3.i * x[i__3].i, z__2.i =
265 z__3.r * x[i__3].i + z__3.i * x[i__3].r;
272 i__3 = j;
276 z__2.r = y[i__3].r + z__3.r, z__2.i = y[i__3].i + z__3.i;
298 i__3 = iy;
305 y[i__3].r = z__1.r, y[i__3].i = z__1.i;
307 i__3 = ix;
308 z__2.r = z__3.r * x[i__3].r - z__3.i * x[i__3].i, z__2.i =
309 z__3.r * x[i__3].i + z__3.i * x[i__3].r;
317 i__3 = jy;
321 z__2.r = y[i__3].r + z__3.r, z__2.i = y[i__3].i + z__3.i;
345 i__3 = j;
349 z__1.r = y[i__3].r + z__2.r, z__1.i = y[i__3].i + z__2.i;
354 i__3 = i__;
361 y[i__3].r = z__1.r, y[i__3].i = z__1.i;
363 i__3 = i__;
364 z__2.r = z__3.r * x[i__3].r - z__3.i * x[i__3].i, z__2.i =
365 z__3.r * x[i__3].i + z__3.i * x[i__3].r;
372 i__3 = j;
375 z__1.r = y[i__3].r + z__2.r, z__1.i = y[i__3].i + z__2.i;
391 i__3 = jy;
395 z__1.r = y[i__3].r + z__2.r, z__1.i = y[i__3].i + z__2.i;
403 i__3 = iy;
410 y[i__3].r = z__1.r, y[i__3].i = z__1.i;
412 i__3 = ix;
413 z__2.r = z__3.r * x[i__3].r - z__3.i * x[i__3].i, z__2.i =
414 z__3.r * x[i__3].i + z__3.i * x[i__3].r;
420 i__3 = jy;
423 z__1.r = y[i__3].r + z__2.r, z__1.i = y[i__3].i + z__2.i;
