Symbol Description Uses
num_ctds 6


File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 314 ECCO_COST_FINAL 
          no_ctds = no_ctds + num_ctds(bi,bj)
./pkg/ecco/ecco_cost.h 411 NO PROCEDURE 
     &                num_ctds,
./pkg/ecco/ecco_cost.h 462 NO PROCEDURE 
      _RL  num_ctds (nsx,nsy)
./pkg/ecco/cost_ctds.F 184 COST_CTDS 
     &                    num_ctds(bi,bj) = num_ctds(bi,bj) + 1. _d 0
./pkg/ecco/ecco_cost_initvaria.F 149 ECCO_COST_INITVARIA 
          num_ctds(bi,bj)     = 0. _d 0