Home | History | Annotate | Download | only in f2c

Lines Matching refs:i__2

20     integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5;
235 i__2 = i__;
236 y[i__2].r = 0.f, y[i__2].i = 0.f;
242 i__2 = i__;
247 y[i__2].r = q__1.r, y[i__2].i = q__1.i;
256 i__2 = iy;
257 y[i__2].r = 0.f, y[i__2].i = 0.f;
264 i__2 = iy;
269 y[i__2].r = q__1.r, y[i__2].i = q__1.i;
287 i__2 = j;
288 q__1.r = alpha->r * x[i__2].r - alpha->i * x[i__2].i, q__1.i =
289 alpha->r * x[i__2].i + alpha->i * x[i__2].r;
294 i__2 = 1, i__3 = j - *k;
296 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) {
297 i__2 = i__;
304 y[i__2].r = q__1.r, y[i__2].i = q__1.i;
306 i__2 = i__;
307 q__2.r = q__3.r * x[i__2].r - q__3.i * x[i__2].i, q__2.i =
308 q__3.r * x[i__2].i + q__3.i * x[i__2].r;
314 i__2 = j;
318 q__2.r = y[i__2].r + q__3.r, q__2.i = y[i__2].i + q__3.i;
339 i__4 = 1, i__2 = j - *k;
341 for (i__ = max(i__4,i__2); i__ <= i__3; ++i__) {
343 i__2 = iy;
348 q__1.r = y[i__2].r + q__2.r, q__1.i = y[i__2].i + q__2.i;
362 i__2 = kplus1 + j * a_dim1;
363 r__1 = a[i__2].r;
393 i__2 = j * a_dim1 + 1;
394 r__1 = a[i__2].r;
400 i__4 = *n, i__2 = j + *k;
401 i__3 = min(i__4,i__2);
404 i__2 = i__;
409 q__1.r = y[i__2].r + q__2.r, q__1.i = y[i__2].i + q__2.i;
439 i__2 = j * a_dim1 + 1;
440 r__1 = a[i__2].r;
448 i__4 = *n, i__2 = j + *k;
449 i__3 = min(i__4,i__2);
454 i__2 = iy;
459 q__1.r = y[i__2].r + q__2.r, q__1.i = y[i__2].i + q__2.i;