Symbol Description Uses
tmpRL 8


File Line number Procedure Code
./pkg/obcs/obcs_set_connect.F 244 OBCS_SET_CONNECT 
        tmpRL = maxConnect
./pkg/obcs/obcs_set_connect.F 245 OBCS_SET_CONNECT 
        _GLOBAL_MAX_RL( tmpRL, myThid )
./pkg/obcs/obcs_set_connect.F 246 OBCS_SET_CONNECT 
        maxConnect = NINT( tmpRL )
./pkg/obcs/obcs_set_connect.F 251 OBCS_SET_CONNECT 
          tmpRL = zeroRL
./pkg/obcs/obcs_set_connect.F 255 OBCS_SET_CONNECT 
             IF ( listLocal(n,bi,bj).EQ.j ) tmpRL = oneRL
./pkg/obcs/obcs_set_connect.F 259 OBCS_SET_CONNECT 
          _GLOBAL_MAX_RL( tmpRL, myThid )
./pkg/obcs/obcs_set_connect.F 260 OBCS_SET_CONNECT 
          IF ( tmpRL.EQ.oneRL ) THEN
./pkg/obcs/obcs_set_connect.F 51 OBCS_SET_CONNECT 
      _RL tmpRL