Lines Matching refs:incy
16 real *x, integer *incx, real *beta, real *y, integer *incy, ftnlen
99 /* ( 1 + ( n - 1 )*abs( INCY ) ). */
104 /* INCY - INTEGER. */
105 /* On entry, INCY specifies the increment for the elements of */
106 /* Y. INCY must not be zero. */
147 } else if (*incy == 0) {
168 if (*incy > 0) {
171 ky = 1 - (*n - 1) * *incy;
180 if (*incy == 1) {
200 iy += *incy;
207 iy += *incy;
221 if (*incx == 1 && *incy == 1) {
252 iy += *incy;
257 jy += *incy;
266 if (*incx == 1 && *incy == 1) {
297 iy += *incy;
304 jy += *incy;
