Symbol Description Uses
f_uvel0 7


File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1227 ECCO_COST_FINAL 
     &       'f_uvel0 =', f_uvel0, no_uvel0
./pkg/ecco/ecco_cost_final.F 170 ECCO_COST_FINAL 
      f_uvel0 = 0. _d 0
./pkg/ecco/ecco_cost_final.F 505 ECCO_COST_FINAL 
          f_uvel0 = f_uvel0 + objf_uvel0(bi,bj)
./pkg/ecco/ecco_cost_final.F 72 ECCO_COST_FINAL 
      _RL f_etan0, f_uvel0, f_vvel0
./pkg/ecco/ecco_cost_final.F 741 ECCO_COST_FINAL 
      _GLOBAL_SUM_RL( f_uvel0, myThid )
./pkg/ecco/ecco_cost_final.F 958 ECCO_COST_FINAL 
     &     ' --> f_uvel0   =',f_uvel0