Symbol Description Uses
objf_theta_ini_fin 7


File Line number Procedure Code
./pkg/ecco/cost_theta_ini_fin.F 118 COST_THETA_INI_FIN 
            objf_theta_ini_fin(bi,bj) =
./pkg/ecco/cost_theta_ini_fin.F 119 COST_THETA_INI_FIN 
     &           objf_theta_ini_fin(bi,bj) + fctile
./pkg/ecco/ecco_cost.h 433 NO PROCEDURE 
     &     objf_theta_ini_fin, objf_salt_ini_fin,
./pkg/ecco/ecco_cost.h 533 NO PROCEDURE 
      _RL  objf_theta_ini_fin(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 387 ECCO_COST_FINAL 
     &         + mult_ini_fin *(objf_theta_ini_fin(bi,bj) +
./pkg/ecco/ecco_cost_final.F 488 ECCO_COST_FINAL 
     &         objf_theta_ini_fin(bi,bj) + objf_salt_ini_fin(bi,bj)
./pkg/ecco/ecco_cost_init_varia.F 135 ECCO_COST_INIT_VARIA 
          objf_theta_ini_fin(bi,bj) = 0. _d 0