Symbol Description Uses
f_temp0smoo 7



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 123 ECCO_COST_FINAL
      f_temp0smoo = 0. _d 0
./pkg/ecco/ecco_cost_final.F 352 ECCO_COST_FINAL
          f_temp0smoo = f_temp0smoo + objf_temp0smoo(bi,bj)
./pkg/ecco/ecco_cost_final.F 506 ECCO_COST_FINAL
      _GLOBAL_SUM_R8( f_temp0smoo, myThid )
./pkg/ecco/ecco_cost_final.F 53 ECCO_COST_FINAL
      _RL f_temp0, f_salt0, f_temp0smoo, f_salt0smoo
./pkg/ecco/ecco_cost_final.F 662 ECCO_COST_FINAL
     &     ' --> f_temp0smoo =',f_temp0smoo
./pkg/ecco/ecco_cost_final.F 845 ECCO_COST_FINAL
        write(ifc,*) 'f_temp0smoo =', f_temp0smoo, no_temp0