Symbol Description Uses
num_kapredi 4



File Line number Procedure Code
./pkg/ecco/ecco_cost.h 614 NO PROCEDURE
     &                num_kapredi,
./pkg/ecco/ecco_cost.h 696 NO PROCEDURE
      _RL  num_kapredi(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 573 ECCO_COST_FINAL
          no_kapredi = no_kapredi + num_kapredi(bi,bj)
./pkg/ecco/ecco_cost_init_varia.F 203 ECCO_COST_INIT_VARIA
          num_kapredi(bi,bj)    = 0. _d 0