Symbol Description Uses
num_ctds 5


File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 187 ECCO_COST_INIT_VARIA 
          num_ctds(bi,bj)     = 0. _d 0
./pkg/ecco/cost_hyd.F 254 COST_HYD 
     &     0, ctdsfile, objf_ctds, num_ctds,
./pkg/ecco/ecco_cost.h 541 NO PROCEDURE 
     &                num_ctds,
./pkg/ecco/ecco_cost.h 624 NO PROCEDURE 
      _RL  num_ctds (nsx,nsy)
./pkg/ecco/ecco_cost_final.F 724 ECCO_COST_FINAL 
          no_ctds = no_ctds + num_ctds(bi,bj)