Lines Matching refs:JX
104 INTEGER I,INFO,IX,IY,J,JX,JY,K,KK,KX,KY
149 JX = KX
176 IF ((X(JX).NE.ZERO) .OR. (Y(JY).NE.ZERO)) THEN
178 TEMP2 = ALPHA*X(JX)
187 JX = JX + INCX
211 IF ((X(JX).NE.ZERO) .OR. (Y(JY).NE.ZERO)) THEN
213 TEMP2 = ALPHA*X(JX)
214 IX = JX
222 JX = JX + INCX
