Symbol Description Uses
objf_hmean 10


File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 346 ECCO_COST_INIT_VARIA 
        objf_hmean   = 0. _d 0
./pkg/ecco/cost_ssh.F 250 COST_SSH 
      objf_hmean = 0. _d 0
./pkg/ecco/cost_ssh.F 256 COST_SSH 
              objf_hmean = objf_hmean + junk*junk
./pkg/ecco/cost_ssh.F 264 COST_SSH 
      CALL GLOBAL_SUM_R8 (  objf_hmean,  mythid  )
./pkg/ecco/ecco_cost.h 366 NO PROCEDURE 
     &     objf_hmean,
./pkg/ecco/ecco_cost.h 420 NO PROCEDURE 
      _RL  objf_hmean
./pkg/ecco/ecco_cost_final.F 1283 ECCO_COST_FINAL 
     &          + mult_hmean*objf_hmean
./pkg/ecco/ecco_cost_final.F 1323 ECCO_COST_FINAL 
     &           ' --> objf_hmean           =',objf_hmean
./pkg/ecco/ecco_cost_final.F 1479 ECCO_COST_FINAL 
     &       'objf_hmean =', objf_hmean, no_hmean