Lines Matching refs:INCX
9 INTEGER ICASE, INCX, INCY, MODE, N
17 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
26 * Initialize PASS, INCX, INCY, and MODE for a new case.
27 * The value 9999 for INCX, INCY or MODE will appear in the
32 INCX = 9999
53 INTEGER ICASE, INCX, INCY, MODE, N
58 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
83 INTEGER ICASE, INCX, INCY, MODE, N
103 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
200 DO 60 INCX = 1, 2
206 CX(I) = CV(I,NP1,INCX)
210 CALL STEST1(DZNRM2TEST(N,CX,INCX),STRUE2(NP1),
214 CALL STEST1(DZASUMTEST(N,CX,INCX),STRUE4(NP1),
218 CALL ZSCALTEST(N,CA,CX,INCX)
219 CALL CTEST(LEN,CX,CTRUE5(1,NP1,INCX),CTRUE5(1,NP1,INCX),
223 CALL ZDSCALTEST(N,SA,CX,INCX)
224 CALL CTEST(LEN,CX,CTRUE6(1,NP1,INCX),CTRUE6(1,NP1,INCX),
228 CALL ITEST1(IZAMAXTEST(N,CX,INCX),ITRUE3(NP1))
237 INCX = 1
246 CALL ZSCALTEST(5,CA,CX,INCX)
256 CALL ZDSCALTEST(5,SA,CX,INCX)
264 CALL ZDSCALTEST(5,SA,CX,INCX)
272 CALL ZDSCALTEST(5,SA,CX,INCX)
284 INTEGER ICASE, INCX, INCY, MODE, N
301 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
475 INCX = INCXS(KI)
477 MX = ABS(INCX)
492 CALL ZDOTCTEST(N,CX,INCX,CY,INCY,ZTEMP)
497 CALL ZDOTUTEST(N,CX,INCX,CY,INCY,ZTEMP)
502 CALL ZAXPYTEST(N,CA,CX,INCX,CY,INCY)
506 CALL ZCOPYTEST(N,CX,INCX,CY,INCY)
510 CALL ZSWAPTEST(N,CX,INCX,CY,INCY)
540 INTEGER ICASE, INCX, INCY, MODE, N
551 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
566 20 WRITE (NOUT,99997) ICASE, N, INCX, INCY, MODE, I, SCOMP(I),
572 99998 FORMAT (/' CASE N INCX INCY MODE I ',
656 INTEGER ICASE, INCX, INCY, MODE, N
661 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
673 WRITE (NOUT,99997) ICASE, N, INCX, INCY, MODE, ICOMP, ITRUE, ID
678 99998 FORMAT (/' CASE N INCX INCY MODE ',
