Searched defs:a_dim1 (Results 1 - 8 of 8) sorted by relevance

/external/eigen/blas/f2c/
H A Dchbmv.c20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5; local
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
[all...]
H A Dctbmv.c20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5; local
184 a_dim1 = *lda;
185 a_offset = 1 + a_dim1;
256 i__5 = l + i__ + j * a_dim1;
268 i__3 = kplus1 + j * a_dim1;
293 i__5 = l + i__ + j * a_dim1;
306 i__2 = kplus1 + j * a_dim1;
334 i__2 = l + i__ + j * a_dim1;
346 i__3 = j * a_dim1 + 1;
371 i__2 = l + i__ + j * a_dim1;
[all...]
H A Ddsbmv.c20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4; local
169 a_dim1 = *lda;
170 a_offset = 1 + a_dim1;
272 y[i__] += temp1 * a[l + i__ + j * a_dim1];
273 temp2 += a[l + i__ + j * a_dim1] * x[i__];
276 y[j] = y[j] + temp1 * a[kplus1 + j * a_dim1] + *alpha * temp2;
293 y[iy] += temp1 * a[l + i__ + j * a_dim1];
294 temp2 += a[l + i__ + j * a_dim1] * x[ix];
299 y[jy] = y[jy] + temp1 * a[kplus1 + j * a_dim1] + *alpha *
319 y[j] += temp1 * a[j * a_dim1
[all...]
H A Ddtbmv.c20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4; local
180 a_dim1 = *lda;
181 a_offset = 1 + a_dim1;
247 x[i__] += temp * a[l + i__ + j * a_dim1];
251 x[j] *= a[kplus1 + j * a_dim1];
268 x[ix] += temp * a[l + i__ + j * a_dim1];
273 x[jx] *= a[kplus1 + j * a_dim1];
293 x[i__] += temp * a[l + i__ + j * a_dim1];
297 x[j] *= a[j * a_dim1 + 1];
314 x[ix] += temp * a[l + i__ + j * a_dim1];
[all...]
H A Dssbmv.c20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4; local
171 a_dim1 = *lda;
172 a_offset = 1 + a_dim1;
274 y[i__] += temp1 * a[l + i__ + j * a_dim1];
275 temp2 += a[l + i__ + j * a_dim1] * x[i__];
278 y[j] = y[j] + temp1 * a[kplus1 + j * a_dim1] + *alpha * temp2;
295 y[iy] += temp1 * a[l + i__ + j * a_dim1];
296 temp2 += a[l + i__ + j * a_dim1] * x[ix];
301 y[jy] = y[jy] + temp1 * a[kplus1 + j * a_dim1] + *alpha *
321 y[j] += temp1 * a[j * a_dim1
[all...]
H A Dstbmv.c20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4; local
180 a_dim1 = *lda;
181 a_offset = 1 + a_dim1;
247 x[i__] += temp * a[l + i__ + j * a_dim1];
251 x[j] *= a[kplus1 + j * a_dim1];
268 x[ix] += temp * a[l + i__ + j * a_dim1];
273 x[jx] *= a[kplus1 + j * a_dim1];
293 x[i__] += temp * a[l + i__ + j * a_dim1];
297 x[j] *= a[j * a_dim1 + 1];
314 x[ix] += temp * a[l + i__ + j * a_dim1];
[all...]
H A Dzhbmv.c21 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5; local
179 a_dim1 = *lda;
180 a_offset = 1 + a_dim1;
300 i__5 = l + i__ + j * a_dim1;
306 d_cnjg(&z__3, &a[l + i__ + j * a_dim1]);
316 i__3 = kplus1 + j * a_dim1;
345 i__5 = l + i__ + j * a_dim1;
351 d_cnjg(&z__3, &a[l + i__ + j * a_dim1]);
363 i__2 = kplus1 + j * a_dim1;
394 i__2 = j * a_dim1
[all...]
H A Dztbmv.c20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5; local
184 a_dim1 = *lda;
185 a_offset = 1 + a_dim1;
256 i__5 = l + i__ + j * a_dim1;
268 i__3 = kplus1 + j * a_dim1;
293 i__5 = l + i__ + j * a_dim1;
306 i__2 = kplus1 + j * a_dim1;
334 i__2 = l + i__ + j * a_dim1;
346 i__3 = j * a_dim1 + 1;
371 i__2 = l + i__ + j * a_dim1;
[all...]

Completed in 82 milliseconds