Symbol Description Uses
num_ctdtclim 4



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 315 ECCO_COST_FINAL
          no_ctdtclim = no_ctdtclim + num_ctdtclim(bi,bj)
./pkg/ecco/ecco_cost.h 412 NO PROCEDURE
     &                num_ctdtclim,
./pkg/ecco/ecco_cost.h 463 NO PROCEDURE
      _RL  num_ctdtclim (nsx,nsy)
./pkg/ecco/ecco_cost_initvaria.F 150 ECCO_COST_INITVARIA
          num_ctdtclim(bi,bj) = 0. _d 0