Symbol Description Uses
no_ctds 6



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 168 ECCO_COST_FINAL
      no_ctds = 0. _d 0
./pkg/ecco/ecco_cost_final.F 314 ECCO_COST_FINAL
          no_ctds = no_ctds + num_ctds(bi,bj) 
./pkg/ecco/ecco_cost_final.F 422 ECCO_COST_FINAL
      _GLOBAL_SUM_R8( no_ctds , myThid ) 
./pkg/ecco/ecco_cost_final.F 593 ECCO_COST_FINAL
        write(ifc,*) 'f_ctds =', f_ctds, no_ctds
./pkg/ecco/ecco_cost_final.F 68 ECCO_COST_FINAL
      _RL no_sst, no_tmi, no_sss, no_atl, no_ctdt, no_ctds