Symbol Description Uses
f_hflux 7



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 102 ECCO_COST_FINAL
      f_hflux = 0. _d 0 
./pkg/ecco/ecco_cost_final.F 256 ECCO_COST_FINAL
          f_hflux= f_hflux + objf_hflux(bi,bj)   
./pkg/ecco/ecco_cost_final.F 354 ECCO_COST_FINAL
      _GLOBAL_SUM_R8( f_hflux , myThid )
./pkg/ecco/ecco_cost_final.F 473 ECCO_COST_FINAL
     &     ' --> f_hflux   =',f_hflux
./pkg/ecco/ecco_cost_final.F 49 ECCO_COST_FINAL
      _RL f_tauu, f_tauv, f_hflux, f_sflux 
./pkg/ecco/ecco_cost_final.F 577 ECCO_COST_FINAL
        write(ifc,*) 'f_hflux =', f_hflux, no_hflux