Lines Matching refs:incx
15 /* Subroutine */ int srotm_(integer *n, real *sx, integer *incx, real *sy,
46 /* SX(LX+I*INCX), I = 0 TO N-1, WHERE LX = 1 IF INCX .GE. 0, ELSE */
47 /* LX = (-INCX)*N, AND SIMILARLY FOR SY USING USING LY AND INCY. */
67 /* INCX (input) INTEGER */
100 if (! (*incx == *incy && *incx > 0)) {
104 nsteps = *n * *incx;
116 i__2 = *incx;
129 i__1 = *incx;
144 i__2 = *incx;
156 if (*incx < 0) {
157 kx = (1 - *n) * *incx + 1;
179 kx += *incx;
193 kx += *incx;
209 kx += *incx;
