| /external/eigen/blas/f2c/ |
| D | chpmv.c | 20 integer i__1, i__2, i__3, i__4, i__5; in chpmv_() local
194 i__2 = i__; in chpmv_()
195 y[i__2].r = 0.f, y[i__2].i = 0.f; in chpmv_()
201 i__2 = i__; in chpmv_()
206 y[i__2].r = q__1.r, y[i__2].i = q__1.i; in chpmv_()
215 i__2 = iy; in chpmv_()
216 y[i__2].r = 0.f, y[i__2].i = 0.f; in chpmv_()
223 i__2 = iy; in chpmv_()
228 y[i__2].r = q__1.r, y[i__2].i = q__1.i; in chpmv_()
246 i__2 = j; in chpmv_()
[all …]
|
| D | zhpmv.c | 20 integer i__1, i__2, i__3, i__4, i__5; in zhpmv_() local
194 i__2 = i__; in zhpmv_()
195 y[i__2].r = 0., y[i__2].i = 0.; in zhpmv_()
201 i__2 = i__; in zhpmv_()
206 y[i__2].r = z__1.r, y[i__2].i = z__1.i; in zhpmv_()
215 i__2 = iy; in zhpmv_()
216 y[i__2].r = 0., y[i__2].i = 0.; in zhpmv_()
223 i__2 = iy; in zhpmv_()
228 y[i__2].r = z__1.r, y[i__2].i = z__1.i; in zhpmv_()
246 i__2 = j; in zhpmv_()
[all …]
|
| D | chbmv.c | 20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5; in chbmv_() local
235 i__2 = i__; in chbmv_()
236 y[i__2].r = 0.f, y[i__2].i = 0.f; in chbmv_()
242 i__2 = i__; in chbmv_()
247 y[i__2].r = q__1.r, y[i__2].i = q__1.i; in chbmv_()
256 i__2 = iy; in chbmv_()
257 y[i__2].r = 0.f, y[i__2].i = 0.f; in chbmv_()
264 i__2 = iy; in chbmv_()
269 y[i__2].r = q__1.r, y[i__2].i = q__1.i; in chbmv_()
287 i__2 = j; 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
236 i__2 = i__; in zhbmv_()
237 y[i__2].r = 0., y[i__2].i = 0.; in zhbmv_()
243 i__2 = i__; in zhbmv_()
248 y[i__2].r = z__1.r, y[i__2].i = z__1.i; in zhbmv_()
257 i__2 = iy; in zhbmv_()
258 y[i__2].r = 0., y[i__2].i = 0.; in zhbmv_()
265 i__2 = iy; in zhbmv_()
270 y[i__2].r = z__1.r, y[i__2].i = z__1.i; in zhbmv_()
288 i__2 = j; in zhbmv_()
[all …]
|
| D | srotm.c | 24 integer i__1, i__2; in srotm_() local
116 i__2 = *incx; in srotm_()
117 for (i__ = 1; i__2 < 0 ? i__ >= i__1 : i__ <= i__1; i__ += i__2) { in srotm_()
128 i__2 = nsteps; in srotm_()
130 for (i__ = 1; i__1 < 0 ? i__ >= i__2 : i__ <= i__2; i__ += i__1) { in srotm_()
144 i__2 = *incx; in srotm_()
145 for (i__ = 1; i__2 < 0 ? i__ >= i__1 : i__ <= i__1; i__ += i__2) { in srotm_()
173 i__2 = *n; in srotm_()
174 for (i__ = 1; i__ <= i__2; ++i__) { in srotm_()
187 i__2 = *n; in srotm_()
[all …]
|
| D | drotm.c | 24 integer i__1, i__2; in drotm_() local
115 i__2 = *incx; in drotm_()
116 for (i__ = 1; i__2 < 0 ? i__ >= i__1 : i__ <= i__1; i__ += i__2) { in drotm_()
127 i__2 = nsteps; in drotm_()
129 for (i__ = 1; i__1 < 0 ? i__ >= i__2 : i__ <= i__2; i__ += i__1) { in drotm_()
143 i__2 = *incx; in drotm_()
144 for (i__ = 1; i__2 < 0 ? i__ >= i__1 : i__ <= i__1; i__ += i__2) { in drotm_()
172 i__2 = *n; in drotm_()
173 for (i__ = 1; i__ <= i__2; ++i__) { in drotm_()
186 i__2 = *n; in drotm_()
[all …]
|
| D | ztbmv.c | 20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4, i__5; in ztbmv_() local
245 i__2 = j; in ztbmv_()
246 if (x[i__2].r != 0. || x[i__2].i != 0.) { in ztbmv_()
247 i__2 = j; in ztbmv_()
248 temp.r = x[i__2].r, temp.i = x[i__2].i; in ztbmv_()
251 i__2 = 1, i__3 = j - *k; in ztbmv_()
253 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) { in ztbmv_()
254 i__2 = i__; in ztbmv_()
262 x[i__2].r = z__1.r, x[i__2].i = z__1.i; in ztbmv_()
267 i__2 = j; 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
245 i__2 = j; in ctbmv_()
246 if (x[i__2].r != 0.f || x[i__2].i != 0.f) { in ctbmv_()
247 i__2 = j; in ctbmv_()
248 temp.r = x[i__2].r, temp.i = x[i__2].i; in ctbmv_()
251 i__2 = 1, i__3 = j - *k; in ctbmv_()
253 for (i__ = max(i__2,i__3); i__ <= i__4; ++i__) { in ctbmv_()
254 i__2 = i__; in ctbmv_()
262 x[i__2].r = q__1.r, x[i__2].i = q__1.i; in ctbmv_()
267 i__2 = j; in ctbmv_()
[all …]
|
| D | dspmv.c | 20 integer i__1, i__2; in dspmv_() local
227 i__2 = j - 1; in dspmv_()
228 for (i__ = 1; i__ <= i__2; ++i__) { in dspmv_()
247 i__2 = kk + j - 2; in dspmv_()
248 for (k = kk; k <= i__2; ++k) { in dspmv_()
273 i__2 = *n; in dspmv_()
274 for (i__ = j + 1; i__ <= i__2; ++i__) { in dspmv_()
294 i__2 = kk + *n - j; in dspmv_()
295 for (k = kk + 1; k <= i__2; ++k) { in dspmv_()
|
| D | sspmv.c | 20 integer i__1, i__2; in sspmv_() local
227 i__2 = j - 1; in sspmv_()
228 for (i__ = 1; i__ <= i__2; ++i__) { in sspmv_()
247 i__2 = kk + j - 2; in sspmv_()
248 for (k = kk; k <= i__2; ++k) { in sspmv_()
273 i__2 = *n; in sspmv_()
274 for (i__ = j + 1; i__ <= i__2; ++i__) { in sspmv_()
294 i__2 = kk + *n - j; in sspmv_()
295 for (k = kk + 1; k <= i__2; ++k) { in sspmv_()
|
| D | ssbmv.c | 20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4; in ssbmv_() local
271 i__2 = 1, i__3 = j - *k; 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
269 i__2 = 1, i__3 = j - *k; 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_()
|
| D | stbmv.c | 20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4; in stbmv_() local
244 i__2 = 1, i__3 = j - *k; 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_()
387 i__1 = *n, i__2 = j + *k; in stbmv_()
388 i__4 = min(i__1,i__2); in stbmv_()
408 i__1 = *n, i__2 = j + *k; in stbmv_()
409 i__4 = min(i__1,i__2); in stbmv_()
|
| D | dtbmv.c | 20 integer a_dim1, a_offset, i__1, i__2, i__3, i__4; in dtbmv_() local
244 i__2 = 1, i__3 = j - *k; 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_()
387 i__1 = *n, i__2 = j + *k; in dtbmv_()
388 i__4 = min(i__1,i__2); in dtbmv_()
408 i__1 = *n, i__2 = j + *k; in dtbmv_()
409 i__4 = min(i__1,i__2); in dtbmv_()
|