Symbol Description Uses
num_gencost 19



File Line number Procedure Code
./pkg/ecco/cost_gencost_all.F 77 COST_GENCOST_ALL
     &        objf_gencost(1,1,k), num_gencost(1,1,k),
./pkg/ecco/cost_gencost_sshv4.F 612 COST_GENCOST_SSHV4
       if ( junkweight .ne. 0. ) num_gencost(igen_mdt,bi,bj) = 
./pkg/ecco/cost_gencost_sshv4.F 613 COST_GENCOST_SSHV4
     &      num_gencost(igen_mdt,bi,bj) + 1. _d 0
./pkg/ecco/cost_gencost_sshv4.F 835 COST_GENCOST_SSHV4
     &         num_gencost(igen_lsc,bi,bj) = 
./pkg/ecco/cost_gencost_sshv4.F 836 COST_GENCOST_SSHV4
     &         num_gencost(igen_lsc,bi,bj) + 1. _d 0 /ndaysaveRL
./pkg/ecco/cost_gencost_sshv4.F 954 COST_GENCOST_SSHV4
     &              num_gencost(igen_tp,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 955 COST_GENCOST_SSHV4
     &              num_gencost(igen_tp,bi,bj) + 1. _d 0
./pkg/ecco/cost_gencost_sshv4.F 967 COST_GENCOST_SSHV4
     &              num_gencost(igen_ers,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 968 COST_GENCOST_SSHV4
     &              num_gencost(igen_ers,bi,bj) + 1. _d 0
./pkg/ecco/cost_gencost_sshv4.F 980 COST_GENCOST_SSHV4
     &              num_gencost(igen_gfo,bi,bj) =
./pkg/ecco/cost_gencost_sshv4.F 981 COST_GENCOST_SSHV4
     &              num_gencost(igen_gfo,bi,bj) + 1. _d 0
./pkg/ecco/cost_gencost_sstv4.F 286 COST_GENCOST_SSTV4
     &          num_gencost(igen_amsre_lsc,bi,bj) = 
./pkg/ecco/cost_gencost_sstv4.F 287 COST_GENCOST_SSTV4
     &          num_gencost(igen_amsre_lsc,bi,bj) + 1. _d 0 /ndaysaveRL
./pkg/ecco/cost_gencost_sstv4.F 380 COST_GENCOST_SSTV4
     &          num_gencost(igen_amsre,bi,bj) =
./pkg/ecco/cost_gencost_sstv4.F 381 COST_GENCOST_SSTV4
     &          num_gencost(igen_amsre,bi,bj) + 1. _d 0
./pkg/ecco/ecco_cost.h 63 NO PROCEDURE
     &       objf_gencost, num_gencost, mult_gencost,
./pkg/ecco/ecco_cost.h 67 NO PROCEDURE
      _RL  num_gencost(nsx,nsy,NGENCOST)
./pkg/ecco/ecco_cost_final.F 590 ECCO_COST_FINAL
     &            +num_gencost(bi,bj,num_var)
./pkg/ecco/ecco_cost_init_varia.F 208 ECCO_COST_INIT_VARIA
            num_gencost(bi,bj,k)    = 0. _d 0