Symbol Description Uses
objf_ctdsclim 7


File Line number Procedure Code
./pkg/ecco/cost_ctdsclim.F 207 COST_CTDSCLIM 
            objf_ctdsclim(bi,bj) = objf_ctdsclim(bi,bj) + fctile
./pkg/ecco/ecco_cost.h 409 NO PROCEDURE 
     &     objf_ctdtclim,  objf_ctdsclim,
./pkg/ecco/ecco_cost.h 471 NO PROCEDURE 
      _RL  objf_ctdsclim (nsx,nsy)
./pkg/ecco/ecco_cost_final.F 352 ECCO_COST_FINAL 
     &         + mult_ctdsclim* objf_ctdsclim(bi,bj)
./pkg/ecco/ecco_cost_final.F 470 ECCO_COST_FINAL 
          f_ctdsclim = f_ctdsclim + objf_ctdsclim(bi,bj)
./pkg/ecco/ecco_cost_init_varia.F 107 ECCO_COST_INIT_VARIA 
          objf_ctdsclim(bi,bj) = 0. _d 0