Lines Matching refs:INCY
1 SUBROUTINE ZHPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP)
4 INTEGER INCX,INCY,N
58 * ( 1 + ( n - 1 )*abs( INCY ) ).
63 * INCY - INTEGER.
64 * On entry, INCY specifies the increment for the elements of
65 * Y. INCY must not be zero.
129 ELSE IF (INCY.EQ.0) THEN
144 IF ((INCX.NE.1) .OR. (INCY.NE.1)) THEN
150 IF (INCY.GT.0) THEN
153 KY = 1 - (N-1)*INCY
167 IF ((INCX.EQ.1) .AND. (INCY.EQ.1)) THEN
194 IY = IY + INCY
202 JY = JY + INCY
210 IF ((INCX.EQ.1) .AND. (INCY.EQ.1)) THEN
238 IY = IY + INCY
245 JY = JY + INCY