Lines Matching refs:KI

249       INTEGER           I, J, KI, KN, KSIZE, LENX, LENY, MX, MY  local
380       DO 120 KI = 1, 4
381          INCX = INCXS(KI)
382          INCY = INCYS(KI)
399                CALL STEST1(SDOT(N,SX,INCX,SY,INCY),DT7(KN,KI),SSIZE1(KN)
405                   STY(J) = DT8(J,KN,KI)
411                   STY(I) = DT10Y(I,KN,KI)
419                   STX(I) = DT10X(I,KN,KI)
420                   STY(I) = DT10Y(I,KN,KI)
443       INTEGER           I, K, KI, KN, KSIZE, LENX, LENY, MX, MY  local
514       DO 60 KI = 1, 4
515          INCX = INCXS(KI)
516          INCY = INCYS(KI)
531                   STX(I) = DT9X(I,KN,KI)
532                   STY(I) = DT9Y(I,KN,KI)