Lines Matching refs:a_dim1
20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5;
178 a_dim1 = *lda;
179 a_offset = 1 + a_dim1;
299 i__5 = l + i__ + j * a_dim1;
305 r_cnjg(&q__3, &a[l + i__ + j * a_dim1]);
315 i__3 = kplus1 + j * a_dim1;
344 i__5 = l + i__ + j * a_dim1;
350 r_cnjg(&q__3, &a[l + i__ + j * a_dim1]);
362 i__2 = kplus1 + j * a_dim1;
393 i__2 = j * a_dim1 + 1;
405 i__5 = l + i__ + j * a_dim1;
411 r_cnjg(&q__3, &a[l + i__ + j * a_dim1]);
439 i__2 = j * a_dim1 + 1;
455 i__5 = l + i__ + j * a_dim1;
461 r_cnjg(&q__3, &a[l + i__ + j * a_dim1]);
