File |
Line number |
Procedure |
Code |
./pkg/flt/exch_recv_get_vec.F |
186 |
EXCH_RECV_GET_VEC_X_RL |
spinCount = 0 |
./pkg/flt/exch_recv_get_vec.F |
191 |
EXCH_RECV_GET_VEC_X_RL |
& westRecvAck(1,bi,bj), eastRecvAck(1,bi,bj), spinCount |
./pkg/flt/exch_recv_get_vec.F |
194 |
EXCH_RECV_GET_VEC_X_RL |
CALL FOOL_THE_COMPILER( spinCount ) |
./pkg/flt/exch_recv_get_vec.F |
195 |
EXCH_RECV_GET_VEC_X_RL |
spinCount = spinCount+1 |
./pkg/flt/exch_recv_get_vec.F |
198 |
EXCH_RECV_GET_VEC_X_RL |
& westRecvAck(1,bi,bj), eastRecvAck(1,bi,bj), spinCount |
./pkg/flt/exch_recv_get_vec.F |
199 |
EXCH_RECV_GET_VEC_X_RL |
IF ( myThid.EQ.1 .AND. spinCount.GT. _EXCH_SPIN_LIMIT ) THEN |
./pkg/flt/exch_recv_get_vec.F |
268 |
EXCH_RECV_GET_VEC_Y_RL |
INTEGER spinCount |
./pkg/flt/exch_recv_get_vec.F |
374 |
EXCH_RECV_GET_VEC_Y_RL |
spinCount = 0 |
./pkg/flt/exch_recv_get_vec.F |
379 |
EXCH_RECV_GET_VEC_Y_RL |
& southRecvAck(1,bi,bj), northRecvAck(1,bi,bj), spinCount |
./pkg/flt/exch_recv_get_vec.F |
382 |
EXCH_RECV_GET_VEC_Y_RL |
CALL FOOL_THE_COMPILER( spinCount ) |
./pkg/flt/exch_recv_get_vec.F |
383 |
EXCH_RECV_GET_VEC_Y_RL |
spinCount = spinCount+1 |
./pkg/flt/exch_recv_get_vec.F |
386 |
EXCH_RECV_GET_VEC_Y_RL |
& southRecvAck(1,bi,bj), northRecvAck(1,bi,bj), spinCount |
./pkg/flt/exch_recv_get_vec.F |
387 |
EXCH_RECV_GET_VEC_Y_RL |
IF ( myThid.EQ.1 .AND. spinCount.GT. _EXCH_SPIN_LIMIT ) THEN |
./pkg/flt/exch_recv_get_vec.F |
64 |
EXCH_RECV_GET_VEC_X_RL |
INTEGER spinCount |
./eesupp/src/bar2.F |
102 |
BAR2 |
INTEGER spinCount |
./eesupp/src/bar2.F |
121 |
BAR2 |
spinCount = 0 |
./eesupp/src/bar2.F |
129 |
BAR2 |
spinCount = spinCount+1 |
./eesupp/src/bar2.F |
143 |
BAR2 |
spinCount = spinCount+1 |
./eesupp/src/bar2.F |
151 |
BAR2 |
BAR2_spinsCount(1,myThid) = BAR2_spinsCount(1,myThid)+spinCount |
./eesupp/src/bar2.F |
152 |
BAR2 |
BAR2_spinsMax (1,myThid) = MAX(BAR2_spinsMax(1,myThid),spinCount) |
./eesupp/src/bar2.F |
153 |
BAR2 |
BAR2_spinsMin (1,myThid) = MIN(BAR2_spinsMin(1,myThid),spinCount) |