Symbol Description Uses
f_bottomdrag 7


File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1110 ECCO_COST_FINAL 
     &     ' --> f_bottomdrag =', f_bottomdrag
./pkg/ecco/ecco_cost_final.F 1389 ECCO_COST_FINAL 
     &       'f_bottomdrag =', f_bottomdrag, no_bottomdrag
./pkg/ecco/ecco_cost_final.F 250 ECCO_COST_FINAL 
      f_bottomdrag = 0. _d 0
./pkg/ecco/ecco_cost_final.F 579 ECCO_COST_FINAL 
          f_bottomdrag = f_bottomdrag + objf_bottomdrag(bi,bj)
./pkg/ecco/ecco_cost_final.F 817 ECCO_COST_FINAL 
      _GLOBAL_SUM_RL( f_bottomdrag , myThid )
./pkg/ecco/ecco_cost_final.F 99 ECCO_COST_FINAL 
      _RL f_eddytau, f_bottomdrag