Symbol Description Uses
spinCount Temp. for doing statistics on how many 25



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)