Symbol Description Uses
f_eddytau 7



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 194 ECCO_COST_FINAL
      f_eddytau = 0. _d 0
./pkg/ecco/ecco_cost_final.F 418 ECCO_COST_FINAL
          f_eddytau = f_eddytau + objf_eddytau(bi,bj) 
./pkg/ecco/ecco_cost_final.F 575 ECCO_COST_FINAL
      _GLOBAL_SUM_R8( f_eddytau , myThid )
./pkg/ecco/ecco_cost_final.F 77 ECCO_COST_FINAL
      _RL f_eddytau
./pkg/ecco/ecco_cost_final.F 798 ECCO_COST_FINAL
     &     ' --> f_eddytau =', f_eddytau
./pkg/ecco/ecco_cost_final.F 916 ECCO_COST_FINAL
        write(ifc,*) 'f_eddytau =', f_eddytau, no_eddytau