Symbol Description Uses
no_ageos 6


File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 102 ECCO_COST_FINAL 
      _RL no_ageos, no_curmtr
./pkg/ecco/ecco_cost_final.F 1170 ECCO_COST_FINAL 
     &       'f_ageos =', f_ageos, no_ageos
./pkg/ecco/ecco_cost_final.F 291 ECCO_COST_FINAL 
      no_ageos   = 0. _d 0
./pkg/ecco/ecco_cost_final.F 571 ECCO_COST_FINAL 
          no_ageos = no_ageos + num_ageos(bi,bj)
./pkg/ecco/ecco_cost_final.F 766 ECCO_COST_FINAL 
      _GLOBAL_SUM_RL( no_ageos , myThid )