Lines Matching refs:ICASE
51 INTEGER ICASE, INCX, INCY, MODE, N variable
59 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
65 ICASE = IC
77 IF (ICASE.LE.5) THEN
79 ELSE IF (ICASE.GE.6) THEN
95 INTEGER ICASE, INCX, INCY, MODE, N local
100 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
113 WRITE (NOUT,99999) ICASE, L(ICASE)
125 INTEGER ICASE, INCX, INCY, MODE, N local
145 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
250 IF (ICASE.EQ.6) THEN
254 ELSE IF (ICASE.EQ.7) THEN
258 ELSE IF (ICASE.EQ.8) THEN
263 ELSE IF (ICASE.EQ.9) THEN
268 ELSE IF (ICASE.EQ.10) THEN
280 IF (ICASE.EQ.8) THEN
290 ELSE IF (ICASE.EQ.9) THEN
326 INTEGER ICASE, INCX, INCY, MODE, N local
344 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
533 IF (ICASE.EQ.1) THEN
537 ELSE IF (ICASE.EQ.2) THEN
541 ELSE IF (ICASE.EQ.3) THEN
545 ELSE IF (ICASE.EQ.4) THEN
549 ELSE IF (ICASE.EQ.5) THEN
582 INTEGER ICASE, INCX, INCY, MODE, N local
593 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
608 20 WRITE (NOUT,99997) ICASE, N, INCX, INCY, MODE, I, SCOMP(I),
698 INTEGER ICASE, INCX, INCY, MODE, N local
703 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
715 WRITE (NOUT,99997) ICASE, N, INCX, INCY, MODE, ICOMP, ITRUE, ID