Lines Matching defs:PASS
10 LOGICAL PASS
17 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
26 * Initialize PASS, INCX, INCY, and MODE for a new case.
31 PASS = .TRUE.
41 IF (PASS) WRITE (NOUT,99998)
46 99998 FORMAT (' ----- PASS -----')
54 LOGICAL PASS
58 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
84 LOGICAL PASS
103 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
285 LOGICAL PASS
302 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
540 LOGICAL PASS
550 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
560 IF ( .NOT. PASS) GO TO 20
562 PASS = .FALSE.
656 LOGICAL PASS
660 COMMON /COMBLA/ICASE, N, INCX, INCY, MODE, PASS
666 IF ( .NOT. PASS) GO TO 20
668 PASS = .FALSE.
