Lines Matching refs:INCY
1 SUBROUTINE DSPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) argument
4 INTEGER INCX,INCY,N local
123 ELSE IF (INCY.EQ.0) THEN
138 IF ((INCX.NE.1) .OR. (INCY.NE.1)) THEN
144 IF (INCY.GT.0) THEN
147 KY = 1 - (N-1)*INCY
161 IF ((INCX.EQ.1) .AND. (INCY.EQ.1)) THEN
184 IY = IY + INCY
188 JY = JY + INCY
196 IF ((INCX.EQ.1) .AND. (INCY.EQ.1)) THEN
219 IY = IY + INCY
223 JY = JY + INCY