File |
Line number |
Procedure |
Code |
./pkg/flt/exch_recv_get_vec.F |
187 |
EXCH_RECV_GET_VEC_X_RL |
westCommMode = _tileCommModeW(bi,bj) |
./pkg/flt/exch_recv_get_vec.F |
60 |
EXCH_RECV_GET_VEC_X_RL |
INTEGER westCommMode |
./pkg/flt/exch_recv_get_vec.F |
87 |
EXCH_RECV_GET_VEC_X_RL |
westCommMode = _tileCommModeW(bi,bj) |
./pkg/flt/exch_recv_get_vec.F |
96 |
EXCH_RECV_GET_VEC_X_RL |
IF ( westCommMode .EQ. COMM_MSG ) THEN |
./pkg/flt/exch_send_put_vec.F |
112 |
EXCH_SEND_PUT_VEC_X_RL |
westCommMode = _tileCommModeW(bi,bj) |
./pkg/flt/exch_send_put_vec.F |
120 |
EXCH_SEND_PUT_VEC_X_RL |
IF ( westCommMode .EQ. COMM_MSG ) THEN |
./pkg/flt/exch_send_put_vec.F |
141 |
EXCH_SEND_PUT_VEC_X_RL |
ELSEIF ( westCommMode .EQ. COMM_PUT ) THEN |
./pkg/flt/exch_send_put_vec.F |
146 |
EXCH_SEND_PUT_VEC_X_RL |
ELSEIF ( westCommMode .NE. COMM_NONE ) THEN |
./pkg/flt/exch_send_put_vec.F |
205 |
EXCH_SEND_PUT_VEC_X_RL |
westCommMode = _tileCommModeW(bi,bj) |
./pkg/flt/exch_send_put_vec.F |
207 |
EXCH_SEND_PUT_VEC_X_RL |
IF ( westCommMode .EQ. COMM_PUT ) eastRecvAck(1,biW,bjW) = 1 |
./pkg/flt/exch_send_put_vec.F |
209 |
EXCH_SEND_PUT_VEC_X_RL |
IF ( westCommMode .EQ. COMM_GET ) eastRecvAck(1,biW,bjW) = 1 |
./pkg/flt/exch_send_put_vec.F |
66 |
EXCH_SEND_PUT_VEC_X_RL |
INTEGER westCommMode |