Lines Matching refs:incx
16 integer *k, complex *a, integer *lda, complex *x, integer *incx,
147 /* ( 1 + ( n - 1 )*abs( INCX ) ). */
152 /* INCX - INTEGER. */
153 /* On entry, INCX specifies the increment for the elements of */
154 /* X. INCX must not be zero. */
207 } else if (*incx == 0) {
225 /* will be ( N - 1 )*INCX too small for descending loops. */
227 if (*incx <= 0) {
228 kx = 1 - (*n - 1) * *incx;
229 } else if (*incx != 1) {
242 if (*incx == 1) {
300 ix += *incx;
313 jx += *incx;
315 kx += *incx;
321 if (*incx == 1) {
356 kx += (*n - 1) * *incx;
378 ix -= *incx;
391 jx -= *incx;
393 kx -= *incx;
405 if (*incx == 1) {
460 kx += (*n - 1) * *incx;
465 kx -= *incx;
488 ix -= *incx;
511 ix -= *incx;
517 jx -= *incx;
522 if (*incx == 1) {
583 kx += *incx;
606 ix += *incx;
629 ix += *incx;
635 jx += *incx;
