Symbol Description Uses
uVel_bar 5


File Line number Procedure Code
./pkg/cost/cost_atlantic_heat.F 145 COST_ATLANTIC_HEAT 
           uVel_bar(k) = 0.0
./pkg/cost/cost_atlantic_heat.F 153 COST_ATLANTIC_HEAT 
             uVel_bar(k) = uVel_bar(k)
./pkg/cost/cost_atlantic_heat.F 175 COST_ATLANTIC_HEAT 
     &            + uVel_bar(k) * theta_bar(k) * drF(k)
./pkg/cost/cost_atlantic_heat.F 36 COST_ATLANTIC_HEAT 
      _RL     uVel_bar(Nr), vVel_bar(Nr), theta_bar(Nr)