Lines Matching refs:i__4
20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5; in ctbmv_() local
252 i__4 = j - 1; in ctbmv_()
253 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) { in ctbmv_()
266 i__4 = j; in ctbmv_()
272 x[i__4].r = q__1.r, x[i__4].i = q__1.i; in ctbmv_()
281 i__4 = jx; in ctbmv_()
282 if (x[i__4].r != 0.f || x[i__4].i != 0.f) { in ctbmv_()
283 i__4 = jx; in ctbmv_()
284 temp.r = x[i__4].r, temp.i = x[i__4].i; in ctbmv_()
288 i__4 = 1, i__2 = j - *k; in ctbmv_()
290 for (i__ = max(i__4,i__2); i__ <= i__3; ++i__) { in ctbmv_()
291 i__4 = ix; in ctbmv_()
299 x[i__4].r = q__1.r, x[i__4].i = q__1.i; in ctbmv_()
305 i__4 = jx; in ctbmv_()
307 q__1.r = x[i__4].r * a[i__2].r - x[i__4].i * a[ in ctbmv_()
308 i__2].i, q__1.i = x[i__4].r * a[i__2].i + in ctbmv_()
309 x[i__4].i * a[i__2].r; in ctbmv_()
330 i__4 = j + 1; in ctbmv_()
331 for (i__ = min(i__1,i__3); i__ >= i__4; --i__) { in ctbmv_()
344 i__4 = j; in ctbmv_()
350 x[i__4].r = q__1.r, x[i__4].i = q__1.i; in ctbmv_()
359 i__4 = jx; in ctbmv_()
360 if (x[i__4].r != 0.f || x[i__4].i != 0.f) { in ctbmv_()
361 i__4 = jx; in ctbmv_()
362 temp.r = x[i__4].r, temp.i = x[i__4].i; in ctbmv_()
366 i__4 = *n, i__1 = j + *k; in ctbmv_()
368 for (i__ = min(i__4,i__1); i__ >= i__3; --i__) { in ctbmv_()
369 i__4 = ix; in ctbmv_()
377 x[i__4].r = q__1.r, x[i__4].i = q__1.i; in ctbmv_()
383 i__4 = jx; in ctbmv_()
385 q__1.r = x[i__4].r * a[i__1].r - x[i__4].i * a[ in ctbmv_()
386 i__1].i, q__1.i = x[i__4].r * a[i__1].i + in ctbmv_()
387 x[i__4].i * a[i__1].r; in ctbmv_()
419 i__4 = 1, i__1 = j - *k; in ctbmv_()
420 i__3 = max(i__4,i__1); in ctbmv_()
422 i__4 = l + i__ + j * a_dim1; in ctbmv_()
424 q__2.r = a[i__4].r * x[i__1].r - a[i__4].i * x[ in ctbmv_()
425 i__1].i, q__2.i = a[i__4].r * x[i__1].i + in ctbmv_()
426 a[i__4].i * x[i__1].r; in ctbmv_()
441 i__4 = 1, i__1 = j - *k; in ctbmv_()
442 i__3 = max(i__4,i__1); in ctbmv_()
445 i__4 = i__; in ctbmv_()
446 q__2.r = q__3.r * x[i__4].r - q__3.i * x[i__4].i, in ctbmv_()
447 q__2.i = q__3.r * x[i__4].i + q__3.i * x[ in ctbmv_()
448 i__4].r; in ctbmv_()
477 i__4 = 1, i__1 = j - *k; in ctbmv_()
478 i__3 = max(i__4,i__1); in ctbmv_()
480 i__4 = l + i__ + j * a_dim1; in ctbmv_()
482 q__2.r = a[i__4].r * x[i__1].r - a[i__4].i * x[ in ctbmv_()
483 i__1].i, q__2.i = a[i__4].r * x[i__1].i + in ctbmv_()
484 a[i__4].i * x[i__1].r; in ctbmv_()
500 i__4 = 1, i__1 = j - *k; in ctbmv_()
501 i__3 = max(i__4,i__1); in ctbmv_()
504 i__4 = ix; in ctbmv_()
505 q__2.r = q__3.r * x[i__4].r - q__3.i * x[i__4].i, in ctbmv_()
506 q__2.i = q__3.r * x[i__4].i + q__3.i * x[ in ctbmv_()
507 i__4].r; in ctbmv_()
525 i__4 = j; in ctbmv_()
526 temp.r = x[i__4].r, temp.i = x[i__4].i; in ctbmv_()
530 i__4 = j * a_dim1 + 1; in ctbmv_()
531 q__1.r = temp.r * a[i__4].r - temp.i * a[i__4].i, in ctbmv_()
532 q__1.i = temp.r * a[i__4].i + temp.i * a[ in ctbmv_()
533 i__4].r; in ctbmv_()
538 i__4 = min(i__1,i__2); in ctbmv_()
539 for (i__ = j + 1; i__ <= i__4; ++i__) { in ctbmv_()
560 i__4 = min(i__1,i__2); in ctbmv_()
561 for (i__ = j + 1; i__ <= i__4; ++i__) { in ctbmv_()
573 i__4 = j; in ctbmv_()
574 x[i__4].r = temp.r, x[i__4].i = temp.i; in ctbmv_()
581 i__4 = jx; in ctbmv_()
582 temp.r = x[i__4].r, temp.i = x[i__4].i; in ctbmv_()
588 i__4 = j * a_dim1 + 1; in ctbmv_()
589 q__1.r = temp.r * a[i__4].r - temp.i * a[i__4].i, in ctbmv_()
590 q__1.i = temp.r * a[i__4].i + temp.i * a[ in ctbmv_()
591 i__4].r; in ctbmv_()
596 i__4 = min(i__1,i__2); in ctbmv_()
597 for (i__ = j + 1; i__ <= i__4; ++i__) { in ctbmv_()
619 i__4 = min(i__1,i__2); in ctbmv_()
620 for (i__ = j + 1; i__ <= i__4; ++i__) { in ctbmv_()
633 i__4 = jx; in ctbmv_()
634 x[i__4].r = temp.r, x[i__4].i = temp.i; in ctbmv_()