Symbol Description Uses
num_kapgm 3



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 331 ECCO_COST_FINAL
          no_kapgm = no_kapgm + num_kapgm(bi,bj)
./pkg/ecco/ecco_cost.h 488 NO PROCEDURE
      _RL  num_kapgm(nsx,nsy)
./pkg/ecco/ecco_cost_initvaria.F 175 ECCO_COST_INITVARIA
          num_kapgm(bi,bj)    = 0. _d 0