Symbol Description Uses
no_kapredi 6


File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1499 ECCO_COST_FINAL 
     &       'f_kapredi =', f_kapredi, no_kapredi
./pkg/ecco/ecco_cost_final.F 149 ECCO_COST_FINAL 
      _RL no_kapgm, no_kapredi, no_diffkr
./pkg/ecco/ecco_cost_final.F 380 ECCO_COST_FINAL 
      no_kapredi   = 0. _d 0
./pkg/ecco/ecco_cost_final.F 741 ECCO_COST_FINAL 
          no_kapredi = no_kapredi + num_kapredi(bi,bj)
./pkg/ecco/ecco_cost_final.F 990 ECCO_COST_FINAL 
      _GLOBAL_SUM_RL( no_kapredi , myThid )