Symbol Description Uses
no_kapgm 6



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 104 ECCO_COST_FINAL
      _RL no_kapgm, no_kapredi, no_diffkr
./pkg/ecco/ecco_cost_final.F 1172 ECCO_COST_FINAL
     &       'f_kapgm =', f_kapgm, no_kapgm
./pkg/ecco/ecco_cost_final.F 293 ECCO_COST_FINAL
      no_kapgm   = 0. _d 0
./pkg/ecco/ecco_cost_final.F 572 ECCO_COST_FINAL
          no_kapgm = no_kapgm + num_kapgm(bi,bj)
./pkg/ecco/ecco_cost_final.F 767 ECCO_COST_FINAL
      _GLOBAL_SUM_RL( no_kapgm , myThid )