File |
Line number |
Procedure |
Code |
./pkg/flt/exch_send_put_vec.F |
239 |
EXCH_RL_SEND_PUT_VEC_Y |
INTEGER northCommMode |
./pkg/flt/exch_send_put_vec.F |
271 |
EXCH_RL_SEND_PUT_VEC_Y |
northCommMode = _tileCommModeN(bi,bj) |
./pkg/flt/exch_send_put_vec.F |
309 |
EXCH_RL_SEND_PUT_VEC_Y |
IF ( northCommMode .EQ. COMM_MSG ) THEN |
./pkg/flt/exch_send_put_vec.F |
330 |
EXCH_RL_SEND_PUT_VEC_Y |
ELSEIF ( northCommMode .EQ. COMM_PUT ) THEN |
./pkg/flt/exch_send_put_vec.F |
334 |
EXCH_RL_SEND_PUT_VEC_Y |
ELSEIF ( northCommMode .NE. COMM_NONE |
./pkg/flt/exch_send_put_vec.F |
335 |
EXCH_RL_SEND_PUT_VEC_Y |
& .AND. northCommMode .NE. COMM_GET ) THEN |
./pkg/flt/exch_send_put_vec.F |
358 |
EXCH_RL_SEND_PUT_VEC_Y |
northCommMode = _tileCommModeN(bi,bj) |
./pkg/flt/exch_send_put_vec.F |
360 |
EXCH_RL_SEND_PUT_VEC_Y |
IF ( northCommMode .EQ. COMM_PUT ) southRecvAck(1,biN,bjN) = 1. |
./pkg/flt/exch_send_put_vec.F |
362 |
EXCH_RL_SEND_PUT_VEC_Y |
IF ( northCommMode .EQ. COMM_GET ) southRecvAck(1,biN,bjN) = 1. |
./pkg/flt/exch_recv_get_vec.F |
246 |
EXCH_RL_RECV_GET_VEC_Y |
INTEGER northCommMode |
./pkg/flt/exch_recv_get_vec.F |
268 |
EXCH_RL_RECV_GET_VEC_Y |
northCommMode = _tileCommModeN(bi,bj) |
./pkg/flt/exch_recv_get_vec.F |
290 |
EXCH_RL_RECV_GET_VEC_Y |
IF ( northCommMode .EQ. COMM_MSG ) THEN |
./pkg/flt/exch_recv_get_vec.F |
321 |
EXCH_RL_RECV_GET_VEC_Y |
northCommMode = _tileCommModeN(bi,bj) |
./pkg/flt/exch_recv_get_vec.F |
366 |
EXCH_RL_RECV_GET_VEC_Y |
northCommMode = _tileCommModeN(bi,bj) |