Lines Matching refs:ICASE
9 INTEGER ICASE, INCX, INCY, MODE, N variable
17 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
23 ICASE = IC
35 IF (ICASE.EQ.3) THEN
37 ELSE IF (ICASE.EQ.7 .OR. ICASE.EQ.8 .OR. ICASE.EQ.9 .OR.
38 + ICASE.EQ.10) THEN
40 ELSE IF (ICASE.EQ.1 .OR. ICASE.EQ.2 .OR. ICASE.EQ.5 .OR.
41 + ICASE.EQ.6) THEN
43 ELSE IF (ICASE.EQ.4) THEN
59 INTEGER ICASE, INCX, INCY, MODE, N local
64 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
77 WRITE (NOUT,99999) ICASE, L(ICASE)
89 INTEGER ICASE, INCX, INCY, MODE, N local
100 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
126 IF (ICASE.EQ.3) THEN
150 INTEGER ICASE, INCX, INCY, MODE, N local
167 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
211 IF (ICASE.EQ.7) THEN
215 ELSE IF (ICASE.EQ.8) THEN
219 ELSE IF (ICASE.EQ.9) THEN
226 ELSE IF (ICASE.EQ.10) THEN
244 INTEGER ICASE, INCX, INCY, MODE, N local
263 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
357 IF (ICASE.EQ.1) THEN
361 ELSE IF (ICASE.EQ.2) THEN
368 ELSE IF (ICASE.EQ.5) THEN
375 ELSE IF (ICASE.EQ.6) THEN
399 INTEGER ICASE, INCX, INCY, MODE, N local
417 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
485 IF (ICASE.EQ.4) THEN
616 INTEGER ICASE, INCX, INCY, MODE, N local
627 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
642 20 WRITE (NOUT,99997) ICASE, N, INCX, INCY, MODE, I, SCOMP(I),
701 INTEGER ICASE, INCX, INCY, MODE, N local
706 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
719 WRITE (NOUT,99997) ICASE, N, INCX, INCY, MODE, ICOMP, ITRUE, ID