Lines Matching refs:incx
15 /* Subroutine */ int srotm_(integer *n, real *sx, integer *incx, real *sy, in srotm_() argument
100 if (! (*incx == *incy && *incx > 0)) { in srotm_()
104 nsteps = *n * *incx; in srotm_()
116 i__2 = *incx; in srotm_()
129 i__1 = *incx; in srotm_()
144 i__2 = *incx; in srotm_()
156 if (*incx < 0) { in srotm_()
157 kx = (1 - *n) * *incx + 1; in srotm_()
179 kx += *incx; in srotm_()
193 kx += *incx; in srotm_()
209 kx += *incx; in srotm_()