| File |
Line number |
Procedure |
Code |
|
./pkg/flt/exch2_recv_get_vec.F |
95 |
EXCH2_RL_RECV_GET_VEC |
IF ( W2_myCommFlag(nN,bi,bj) .EQ. 'M' ) THEN |
|
./pkg/flt/exch2_send_put_vec.F |
118 |
EXCH2_RL_SEND_PUT_VEC |
IF ( W2_myCommFlag(nN,bi,bj) .EQ. 'M' ) THEN |
|
./pkg/flt/exch2_send_put_vec.F |
141 |
EXCH2_RL_SEND_PUT_VEC |
ELSEIF ( W2_myCommFlag(nN,bi,bj) .EQ. 'P' ) THEN |
|
./pkg/flt/flt_exch2.F |
372 |
FLT_EXCH2 |
IF ( W2_myCommFlag(N,bi,bj) .EQ. 'M' ) THEN |
|
./pkg/flt/flt_exch2.F |
375 |
FLT_EXCH2 |
ELSEIF ( W2_myCommFlag(N,bi,bj) .EQ. 'P' ) THEN |
|
./pkg/exch2/W2_EXCH2_BUFFER.h |
44 |
NO PROCEDURE |
CHARACTER W2_myCommFlag( W2_maxNeighbours, nSx, nSy ) |
|
./pkg/exch2/W2_EXCH2_BUFFER.h |
45 |
NO PROCEDURE |
COMMON /W2_EXCH2_COMMFLAG/ W2_myCommFlag |
|
./pkg/exch2/w2_eeboot.F |
209 |
W2_EEBOOT |
W2_myCommFlag(J,bi,bj) = commFlag |