Symbol Description Uses
f_uvel0 7


File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1050 ECCO_COST_FINAL 
     &     ' --> f_uvel0   =',f_uvel0
./pkg/ecco/ecco_cost_final.F 1355 ECCO_COST_FINAL 
     &       'f_uvel0 =', f_uvel0, no_uvel0
./pkg/ecco/ecco_cost_final.F 196 ECCO_COST_FINAL 
      f_uvel0 = 0. _d 0
./pkg/ecco/ecco_cost_final.F 558 ECCO_COST_FINAL 
          f_uvel0 = f_uvel0 + objf_uvel0(bi,bj)
./pkg/ecco/ecco_cost_final.F 816 ECCO_COST_FINAL 
      _GLOBAL_SUM_RL( f_uvel0, myThid )
./pkg/ecco/ecco_cost_final.F 84 ECCO_COST_FINAL 
      _RL f_etan0, f_uvel0, f_vvel0