Symbol Description Uses
f_sfluxmm 11



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 107 ECCO_COST_FINAL
      f_sfluxmm  = 0. _d 0
./pkg/ecco/ecco_cost_final.F 261 ECCO_COST_FINAL
          f_sfluxmm = f_sfluxmm + objf_sfluxmm(bi,bj)  
./pkg/ecco/ecco_cost_final.F 360 ECCO_COST_FINAL
      _GLOBAL_SUM_R8( f_sfluxmm , myThid )
./pkg/ecco/ecco_cost_final.F 361 ECCO_COST_FINAL
       f_sfluxmm = f_sfluxmm*f_sfluxmm/float(npx*npy)
./pkg/ecco/ecco_cost_final.F 483 ECCO_COST_FINAL
     &     ' --> f_sflux   =',f_sfluxmm
./pkg/ecco/ecco_cost_final.F 51 ECCO_COST_FINAL
      _RL f_hfluxmm, f_sfluxmm 
./pkg/ecco/ecco_cost_final.F 558 ECCO_COST_FINAL
        fc = fc + 0.*mult_sflux*f_sfluxmm
./pkg/ecco/ecco_cost_final.F 582 ECCO_COST_FINAL
        write(ifc,*) 'f_sfluxmm =', f_sfluxmm, no_sfluxmm