Symbol Description Uses
no_ageos 6



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 187 ECCO_COST_FINAL
      no_ageos   = 0. _d 0
./pkg/ecco/ecco_cost_final.F 329 ECCO_COST_FINAL
          no_ageos = no_ageos + num_ageos(bi,bj)
./pkg/ecco/ecco_cost_final.F 441 ECCO_COST_FINAL
      _GLOBAL_SUM_R8( no_ageos , myThid )
./pkg/ecco/ecco_cost_final.F 612 ECCO_COST_FINAL
        write(ifc,*) 'f_ageos =', f_ageos, no_ageos
./pkg/ecco/ecco_cost_final.F 73 ECCO_COST_FINAL
      _RL no_ageos, no_curmtr