Symbol Description Uses
f_swfluxm 7



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1124 ECCO_COST_FINAL
     &     ' --> f_swfluxm  =',f_swfluxm
./pkg/ecco/ecco_cost_final.F 1419 ECCO_COST_FINAL
     &       'f_swfluxm  =', f_swfluxm, no_swfluxm
./pkg/ecco/ecco_cost_final.F 228 ECCO_COST_FINAL
      f_swfluxm = 0. _d 0
./pkg/ecco/ecco_cost_final.F 584 ECCO_COST_FINAL
          f_swfluxm  = f_swfluxm + objf_swfluxm(bi,bj)
./pkg/ecco/ecco_cost_final.F 843 ECCO_COST_FINAL
      _GLOBAL_SUM_RL( f_swfluxm , myThid )
./pkg/ecco/ecco_cost_final.F 92 ECCO_COST_FINAL
      _RL f_swfluxm, f_swdownm