Symbol Description Uses
f_etan0 7



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1048 ECCO_COST_FINAL
     &     ' --> f_etan0   =',f_etan0
./pkg/ecco/ecco_cost_final.F 1353 ECCO_COST_FINAL
     &       'f_etan0 =', f_etan0, no_etan0
./pkg/ecco/ecco_cost_final.F 195 ECCO_COST_FINAL
      f_etan0 = 0. _d 0
./pkg/ecco/ecco_cost_final.F 557 ECCO_COST_FINAL
          f_etan0 = f_etan0 + objf_etan0(bi,bj)
./pkg/ecco/ecco_cost_final.F 815 ECCO_COST_FINAL
      _GLOBAL_SUM_RL( f_etan0, myThid )
./pkg/ecco/ecco_cost_final.F 84 ECCO_COST_FINAL
      _RL f_etan0, f_uvel0, f_vvel0