Symbol Description Uses
no_etan0 6



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 132 ECCO_COST_FINAL
      _RL no_etan0, no_uvel0, no_vvel0
./pkg/ecco/ecco_cost_final.F 1353 ECCO_COST_FINAL
     &       'f_etan0 =', f_etan0, no_etan0
./pkg/ecco/ecco_cost_final.F 317 ECCO_COST_FINAL
      no_etan0 = 0. _d 0
./pkg/ecco/ecco_cost_final.F 685 ECCO_COST_FINAL
          no_etan0 = no_etan0 + num_etan0(bi,bj)
./pkg/ecco/ecco_cost_final.F 933 ECCO_COST_FINAL
      _GLOBAL_SUM_RL( no_etan0, myThid )