Symbol Description Uses
num_bottomdrag 5


File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 215 ECCO_COST_INIT_VARIA 
          num_bottomdrag(bi,bj)    = 0. _d 0
./pkg/ecco/cost_internal_params.F 112 COST_INTERNAL_PARAMS 
     &     dodimensionalcost2D, num_bottomdrag, objf_bottomdrag,
./pkg/ecco/ecco_cost.h 589 NO PROCEDURE 
     &                num_bottomdrag,
./pkg/ecco/ecco_cost.h 672 NO PROCEDURE 
      _RL  num_bottomdrag(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 746 ECCO_COST_FINAL 
          no_bottomdrag = no_bottomdrag + num_bottomdrag(bi,bj)