Symbol | Description | Uses |
key3 | 8 |
File | Line number | Procedure | Code |
./eesupp/src/barrier.F | 232 | BARRIER |
IF ( key3(1,myThid) .EQ. VALID ) THEN |
./eesupp/src/barrier.F | 238 | BARRIER |
key3(1,myThid) = VALID |
./eesupp/src/barrier.F | 244 | BARRIER |
if ( key3(1,I) .EQ. VALID ) nDone = nDone+1 |
./eesupp/src/barrier.F | 246 | BARRIER |
CALL FOOL_THE_COMPILER( key3(1,1) ) |
./eesupp/src/barrier.F | 256 | BARRIER |
key3(1,myThid) = INVALID |
./eesupp/src/barrier.F | 38 | BARRIER_INIT |
key3(1,I) = INVALID |
./eesupp/inc/BARRIER.h | 39 | NO PROCEDURE |
COMMON / BARRIER_COMMON / key1, key2, key3, |
./eesupp/inc/BARRIER.h | 44 | NO PROCEDURE |
INTEGER key3(lShare4,MAX_NO_THREADS) |