Symbol Description Uses
f_swdownsmoo 7



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1110 ECCO_COST_FINAL
     &       'f_swdownsmoo =', f_swdownsmoo, no_swdown
./pkg/ecco/ecco_cost_final.F 173 ECCO_COST_FINAL
      f_swdownsmoo = 0. _d 0
./pkg/ecco/ecco_cost_final.F 457 ECCO_COST_FINAL
          f_swdownsmoo = f_swdownsmoo + objf_swdownsmoo(bi,bj)
./pkg/ecco/ecco_cost_final.F 652 ECCO_COST_FINAL
      _GLOBAL_SUM_RL( f_swdownsmoo , myThid )
./pkg/ecco/ecco_cost_final.F 67 ECCO_COST_FINAL
      _RL f_swfluxsmoo, f_swdownsmoo
./pkg/ecco/ecco_cost_final.F 889 ECCO_COST_FINAL
     &     ' --> f_swdownsmoo  =',f_swdownsmoo