Symbol Description Uses
f_hfluxmm 11



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 104 ECCO_COST_FINAL
      f_hfluxmm = 0. _d 0 
./pkg/ecco/ecco_cost_final.F 258 ECCO_COST_FINAL
          f_hfluxmm = f_hfluxmm + objf_hfluxmm(bi,bj)   
./pkg/ecco/ecco_cost_final.F 356 ECCO_COST_FINAL
      _GLOBAL_SUM_R8( f_hfluxmm , myThid )
./pkg/ecco/ecco_cost_final.F 357 ECCO_COST_FINAL
       f_hfluxmm = f_hfluxmm*f_hfluxmm/float(npx*npy)
./pkg/ecco/ecco_cost_final.F 477 ECCO_COST_FINAL
     &     ' --> f_hflux   =',f_hfluxmm
./pkg/ecco/ecco_cost_final.F 51 ECCO_COST_FINAL
      _RL f_hfluxmm, f_sfluxmm 
./pkg/ecco/ecco_cost_final.F 557 ECCO_COST_FINAL
        fc = fc + 0.*mult_hflux*f_hfluxmm
./pkg/ecco/ecco_cost_final.F 579 ECCO_COST_FINAL
        write(ifc,*) 'f_hfluxmm =', f_hfluxmm, no_hfluxmm