Lines Matching refs:INCX

1       SUBROUTINE DROTM(N,DX,INCX,DY,INCY,DPARAM)  argument
3       INTEGER INCX,INCY,N  local
65       IF (.NOT. (INCX.EQ.INCY.AND.INCX.GT.0)) GO TO 70
67       NSTEPS = N*INCX
72       DO 20 I = 1,NSTEPS,INCX
82       DO 40 I = 1,NSTEPS,INCX
94       DO 60 I = 1,NSTEPS,INCX
104       IF (INCX.LT.0) KX = 1 + (1-N)*INCX
116           KX = KX + INCX
128           KX = KX + INCX
142           KX = KX + INCX