Lines Matching refs:i__
27 integer i__, j, l, ix, jx, kx, info;
253 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) {
254 i__2 = i__;
255 i__3 = i__;
256 i__5 = l + i__ + j * a_dim1;
290 for (i__ = max(i__4,i__2); i__ <= i__3; ++i__) {
293 i__5 = l + i__ + j * a_dim1;
331 for (i__ = min(i__1,i__3); i__ >= i__4; --i__) {
332 i__1 = i__;
333 i__3 = i__;
334 i__2 = l + i__ + j * a_dim1;
368 for (i__ = min(i__4,i__1); i__ >= i__3; --i__) {
371 i__2 = l + i__ + j * a_dim1;
421 for (i__ = j - 1; i__ >= i__3; --i__) {
422 i__4 = l + i__ + j * a_dim1;
423 i__1 = i__;
443 for (i__ = j - 1; i__ >= i__3; --i__) {
444 d_cnjg(&z__3, &a[l + i__ + j * a_dim1]);
445 i__4 = i__;
479 for (i__ = j - 1; i__ >= i__3; --i__) {
480 i__4 = l + i__ + j * a_dim1;
502 for (i__ = j - 1; i__ >= i__3; --i__) {
503 d_cnjg(&z__3, &a[l + i__ + j * a_dim1]);
539 for (i__ = j + 1; i__ <= i__4; ++i__) {
540 i__1 = l + i__ + j * a_dim1;
541 i__2 = i__;
561 for (i__ = j + 1; i__ <= i__4; ++i__) {
562 d_cnjg(&z__3, &a[l + i__ + j * a_dim1]);
563 i__1 = i__;
597 for (i__ = j + 1; i__ <= i__4; ++i__) {
598 i__1 = l + i__ + j * a_dim1;
620 for (i__ = j + 1; i__ <= i__4; ++i__) {
621 d_cnjg(&z__3, &a[l + i__ + j * a_dim1]);
