Symbol Description Uses
f_swdownsmoo 7



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1146 ECCO_COST_FINAL
     &     ' --> f_swdownsmoo  =',f_swdownsmoo
./pkg/ecco/ecco_cost_final.F 1441 ECCO_COST_FINAL
     &       'f_swdownsmoo =', f_swdownsmoo, no_swdown
./pkg/ecco/ecco_cost_final.F 238 ECCO_COST_FINAL
      f_swdownsmoo = 0. _d 0
./pkg/ecco/ecco_cost_final.F 594 ECCO_COST_FINAL
          f_swdownsmoo = f_swdownsmoo + objf_swdownsmoo(bi,bj)
./pkg/ecco/ecco_cost_final.F 853 ECCO_COST_FINAL
      _GLOBAL_SUM_RL( f_swdownsmoo , myThid )
./pkg/ecco/ecco_cost_final.F 96 ECCO_COST_FINAL
      _RL f_swfluxsmoo, f_swdownsmoo