Symbol Description Uses
Ar_T 21


File Line number Procedure Code
./pkg/obcs/obcs_calc.F 207 OBCS_CALC 
        Ar_T = 0. _d 0
./pkg/obcs/obcs_calc.F 213 OBCS_CALC 
              Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 218 OBCS_CALC 
        _GLOBAL_SUM_R8( Ar_T , myThid )
./pkg/obcs/obcs_calc.F 220 OBCS_CALC 
        Tr_T = (0. - Tr_T)/Ar_T
./pkg/obcs/obcs_calc.F 234 OBCS_CALC 
        Ar_T = 0. _d 0
./pkg/obcs/obcs_calc.F 240 OBCS_CALC 
              Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 245 OBCS_CALC 
        _GLOBAL_SUM_R8( Ar_T , myThid )
./pkg/obcs/obcs_calc.F 247 OBCS_CALC 
        Tr_T = (0. - Tr_T)/Ar_T
./pkg/obcs/obcs_calc.F 261 OBCS_CALC 
        Ar_T = 0. _d 0
./pkg/obcs/obcs_calc.F 267 OBCS_CALC 
              Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 272 OBCS_CALC 
        _GLOBAL_SUM_R8( Ar_T , myThid )
./pkg/obcs/obcs_calc.F 274 OBCS_CALC 
        Tr_T = (0. - Tr_T)/Ar_T
./pkg/obcs/obcs_calc.F 288 OBCS_CALC 
        Ar_T = 0. _d 0
./pkg/obcs/obcs_calc.F 294 OBCS_CALC 
              Ar_T = Ar_T + Ar
./pkg/obcs/obcs_calc.F 299 OBCS_CALC 
        _GLOBAL_SUM_R8( Ar_T , myThid )
./pkg/obcs/obcs_calc.F 301 OBCS_CALC 
        Tr_T = (0. - Tr_T)/Ar_T
./pkg/obcs/obcs_calc.F 40 OBCS_CALC 
      _RL Tr_T, Ar_T, Tr, Ar