Symbol Description Uses
no_uwindm 6


File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1084 ECCO_COST_FINAL 
     &       'f_uwindm   =', f_uwindm, no_uwindm
./pkg/ecco/ecco_cost_final.F 255 ECCO_COST_FINAL 
      no_uwindm  = 0. _d 0
./pkg/ecco/ecco_cost_final.F 545 ECCO_COST_FINAL 
          no_uwindm  = no_uwindm + num_uwindm(bi,bj)
./pkg/ecco/ecco_cost_final.F 730 ECCO_COST_FINAL 
      _GLOBAL_SUM_RL( no_uwindm , myThid )
./pkg/ecco/ecco_cost_final.F 91 ECCO_COST_FINAL 
      _RL no_uwindm, no_vwindm