| /external/eigen/blas/f2c/ |
| D | ztbmv.c | 20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5; in ztbmv_() local
252 i__4 = j - 1; in ztbmv_()
253 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) { in ztbmv_()
266 i__4 = j; in ztbmv_()
272 x[i__4].r = z__1.r, x[i__4].i = z__1.i; in ztbmv_()
281 i__4 = jx; in ztbmv_()
282 if (x[i__4].r != 0. || x[i__4].i != 0.) { in ztbmv_()
283 i__4 = jx; in ztbmv_()
284 temp.r = x[i__4].r, temp.i = x[i__4].i; in ztbmv_()
288 i__4 = 1, i__2 = j - *k; in ztbmv_()
[all …]
|
| D | ctbmv.c | 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_()
[all …]
|
| D | chbmv.c | 20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5; in chbmv_() local
295 i__4 = j - 1; in chbmv_()
296 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) { in chbmv_()
313 i__4 = j; in chbmv_()
322 y[i__4].r = q__1.r, y[i__4].i = q__1.i; in chbmv_()
330 i__4 = jx; in chbmv_()
331 q__1.r = alpha->r * x[i__4].r - alpha->i * x[i__4].i, q__1.i = in chbmv_()
332 alpha->r * x[i__4].i + alpha->i * x[i__4].r; in chbmv_()
339 i__4 = 1, i__2 = j - *k; in chbmv_()
341 for (i__ = max(i__4,i__2); i__ <= i__3; ++i__) { in chbmv_()
[all …]
|
| D | zhbmv.c | 21 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5; in zhbmv_() local
296 i__4 = j - 1; in zhbmv_()
297 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) { in zhbmv_()
314 i__4 = j; in zhbmv_()
323 y[i__4].r = z__1.r, y[i__4].i = z__1.i; in zhbmv_()
331 i__4 = jx; in zhbmv_()
332 z__1.r = alpha->r * x[i__4].r - alpha->i * x[i__4].i, z__1.i = in zhbmv_()
333 alpha->r * x[i__4].i + alpha->i * x[i__4].r; in zhbmv_()
340 i__4 = 1, i__2 = j - *k; in zhbmv_()
342 for (i__ = max(i__4,i__2); i__ <= i__3; ++i__) { in zhbmv_()
[all …]
|
| D | stbmv.c | 20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4; in stbmv_() local
245 i__4 = j - 1; in stbmv_()
246 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) { in stbmv_()
265 i__4 = 1, i__2 = j - *k; in stbmv_()
267 for (i__ = max(i__4,i__2); i__ <= i__3; ++i__) { in stbmv_()
291 i__4 = j + 1; in stbmv_()
292 for (i__ = min(i__1,i__3); i__ >= i__4; --i__) { in stbmv_()
311 i__4 = *n, i__1 = j + *k; in stbmv_()
313 for (i__ = min(i__4,i__1); i__ >= i__3; --i__) { in stbmv_()
344 i__4 = 1, i__1 = j - *k; in stbmv_()
[all …]
|
| D | dtbmv.c | 20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4; in dtbmv_() local
245 i__4 = j - 1; in dtbmv_()
246 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) { in dtbmv_()
265 i__4 = 1, i__2 = j - *k; in dtbmv_()
267 for (i__ = max(i__4,i__2); i__ <= i__3; ++i__) { in dtbmv_()
291 i__4 = j + 1; in dtbmv_()
292 for (i__ = min(i__1,i__3); i__ >= i__4; --i__) { in dtbmv_()
311 i__4 = *n, i__1 = j + *k; in dtbmv_()
313 for (i__ = min(i__4,i__1); i__ >= i__3; --i__) { in dtbmv_()
344 i__4 = 1, i__1 = j - *k; in dtbmv_()
[all …]
|
| D | chpmv.c | 20 integer i__1, i__2, i__3, i__4, i__5; in chpmv_() local
255 i__4 = i__; in chpmv_()
260 q__1.r = y[i__4].r + q__2.r, q__1.i = y[i__4].i + q__2.i; in chpmv_()
273 i__4 = kk + j - 1; in chpmv_()
274 r__1 = ap[i__4].r; in chpmv_()
299 i__4 = iy; in chpmv_()
304 q__1.r = y[i__4].r + q__2.r, q__1.i = y[i__4].i + q__2.i; in chpmv_()
318 i__4 = kk + j - 1; in chpmv_()
319 r__1 = ap[i__4].r; in chpmv_()
346 i__4 = kk; in chpmv_()
[all …]
|
| D | zhpmv.c | 20 integer i__1, i__2, i__3, i__4, i__5; in zhpmv_() local
255 i__4 = i__; in zhpmv_()
260 z__1.r = y[i__4].r + z__2.r, z__1.i = y[i__4].i + z__2.i; in zhpmv_()
273 i__4 = kk + j - 1; in zhpmv_()
274 d__1 = ap[i__4].r; in zhpmv_()
299 i__4 = iy; in zhpmv_()
304 z__1.r = y[i__4].r + z__2.r, z__1.i = y[i__4].i + z__2.i; in zhpmv_()
318 i__4 = kk + j - 1; in zhpmv_()
319 d__1 = ap[i__4].r; in zhpmv_()
346 i__4 = kk; in zhpmv_()
[all …]
|
| D | ssbmv.c | 20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4; in ssbmv_() local
272 i__4 = j - 1; in ssbmv_()
273 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) { in ssbmv_()
292 i__4 = 1, i__2 = j - *k; in ssbmv_()
294 for (i__ = max(i__4,i__2); i__ <= i__3; ++i__) { in ssbmv_()
324 i__4 = *n, i__2 = j + *k; in ssbmv_()
325 i__3 = min(i__4,i__2); in ssbmv_()
346 i__4 = *n, i__2 = j + *k; in ssbmv_()
347 i__3 = min(i__4,i__2); in ssbmv_()
|
| D | dsbmv.c | 20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4; in dsbmv_() local
270 i__4 = j - 1; in dsbmv_()
271 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) { in dsbmv_()
290 i__4 = 1, i__2 = j - *k; in dsbmv_()
292 for (i__ = max(i__4,i__2); i__ <= i__3; ++i__) { in dsbmv_()
322 i__4 = *n, i__2 = j + *k; in dsbmv_()
323 i__3 = min(i__4,i__2); in dsbmv_()
344 i__4 = *n, i__2 = j + *k; in dsbmv_()
345 i__3 = min(i__4,i__2); in dsbmv_()
|