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.LE.5) THEN
37 ELSE IF (ICASE.GE.6) THEN
53 INTEGER ICASE, INCX, INCY, MODE, N local
58 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
71 WRITE (NOUT,99999) ICASE, L(ICASE)
83 INTEGER ICASE, INCX, INCY, MODE, N local
103 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
208 IF (ICASE.EQ.6) THEN
212 ELSE IF (ICASE.EQ.7) THEN
216 ELSE IF (ICASE.EQ.8) THEN
221 ELSE IF (ICASE.EQ.9) THEN
226 ELSE IF (ICASE.EQ.10) THEN
238 IF (ICASE.EQ.8) THEN
248 ELSE IF (ICASE.EQ.9) THEN
284 INTEGER ICASE, INCX, INCY, MODE, N local
301 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
490 IF (ICASE.EQ.1) THEN
495 ELSE IF (ICASE.EQ.2) THEN
500 ELSE IF (ICASE.EQ.3) THEN
504 ELSE IF (ICASE.EQ.4) THEN
508 ELSE IF (ICASE.EQ.5) THEN
540 INTEGER ICASE, INCX, INCY, MODE, N local
551 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
566 20 WRITE (NOUT,99997) ICASE, N, INCX, INCY, MODE, I, SCOMP(I),
656 INTEGER ICASE, INCX, INCY, MODE, N local
661 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS local
673 WRITE (NOUT,99997) ICASE, N, INCX, INCY, MODE, ICOMP, ITRUE, ID