Lines Matching refs:JX
93 INTEGER I,INFO,IX,J,JX,K,KK,KX151 JX = KX153 IF (X(JX).NE.ZERO) THEN154 TEMP = ALPHA*X(JX)161 JX = JX + INCX182 JX = KX184 IF (X(JX).NE.ZERO) THEN185 TEMP = ALPHA*X(JX)186 IX = JX192 JX = JX + INCX