Symbol Description Uses
objf_gencost 40



File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 228 ECCO_COST_INIT_VARIA
            objf_gencost(bi,bj,k)    = 0. _d 0
./pkg/ecco/cost_gencost_all.F 88 COST_GENCOST_ALL
     &     objf_gencost(1,1,k), num_gencost(1,1,k),
./pkg/ecco/cost_gencost_boxmean.F 145 COST_GENCOST_BOXMEAN
      objf_gencost(bi,bj,kgen)=objf_gencost(bi,bj,kgen)
./pkg/ecco/cost_gencost_boxmean.F 169 COST_GENCOST_BOXMEAN
      CALL GLOBAL_SUM_TILE_RL( objf_gencost(1,1,kgen),
./pkg/ecco/cost_gencost_bpv4.F 319 COST_GENCOST_BPV4
                   objf_gencost(kgen,bi,bj) = objf_gencost(kgen,bi,bj)
./pkg/ecco/cost_gencost_glbmean.F 265 COST_GENCOST_GLBMEAN
          objf_gencost(1,1,kgen) = objf_gencost(1,1,kgen)
./pkg/ecco/cost_gencost_seaicev4.F 139 COST_GENCOST_SEAICEV4
          objf_gencost(bi,bj,igen_conc) = 0. _d 0
./pkg/ecco/cost_gencost_seaicev4.F 142 COST_GENCOST_SEAICEV4
            objf_gencost(bi,bj,igen_deconc) = 0. _d 0
./pkg/ecco/cost_gencost_seaicev4.F 146 COST_GENCOST_SEAICEV4
            objf_gencost(bi,bj,igen_exconc) = 0. _d 0
./pkg/ecco/cost_gencost_seaicev4.F 293 COST_GENCOST_SEAICEV4
     O     objf_gencost(1,1,igen_conc),num_gencost(1,1,igen_conc),
./pkg/ecco/cost_gencost_seaicev4.F 314 COST_GENCOST_SEAICEV4
     O      objf_gencost(1,1,igen_deconc),num_gencost(1,1,igen_deconc),
./pkg/ecco/cost_gencost_seaicev4.F 336 COST_GENCOST_SEAICEV4
     O      objf_gencost(1,1,igen_exconc),num_gencost(1,1,igen_exconc),
./pkg/ecco/cost_gencost_sshv4.F 1179 COST_GENCOST_SSHV4
          objf_gencost(bi,bj,igen_lsc) = objf_gencost(bi,bj,igen_lsc)
./pkg/ecco/cost_gencost_sshv4.F 1207 COST_GENCOST_SSHV4
          objf_gencost(1,1,igen_gmsl) = objf_gencost(1,1,igen_gmsl)
./pkg/ecco/cost_gencost_sshv4.F 1351 COST_GENCOST_SSHV4
                objf_gencost(bi,bj,igen_tp) =
./pkg/ecco/cost_gencost_sshv4.F 1352 COST_GENCOST_SSHV4
     &              objf_gencost(bi,bj,igen_tp)+junk*junk*junkweight
./pkg/ecco/cost_gencost_sshv4.F 1361 COST_GENCOST_SSHV4
                objf_gencost(bi,bj,igen_ers) =
./pkg/ecco/cost_gencost_sshv4.F 1362 COST_GENCOST_SSHV4
     &               objf_gencost(bi,bj,igen_ers)+junk*junk*junkweight
./pkg/ecco/cost_gencost_sshv4.F 1371 COST_GENCOST_SSHV4
                objf_gencost(bi,bj,igen_gfo) =
./pkg/ecco/cost_gencost_sshv4.F 1372 COST_GENCOST_SSHV4
     &              objf_gencost(bi,bj,igen_gfo)+junk*junk*junkweight
./pkg/ecco/cost_gencost_sshv4.F 868 COST_GENCOST_SSHV4
       objf_gencost(bi,bj,igen_mdt) = objf_gencost(bi,bj,igen_mdt)
./pkg/ecco/cost_gencost_sstv4.F 331 COST_GENCOST_SSTV4
             objf_gencost(kgen_lsc,bi,bj) =
./pkg/ecco/cost_gencost_sstv4.F 332 COST_GENCOST_SSTV4
     &          objf_gencost(kgen_lsc,bi,bj)
./pkg/ecco/cost_gencost_sstv4.F 442 COST_GENCOST_SSTV4
             objf_gencost(kgen,bi,bj) =
./pkg/ecco/cost_gencost_sstv4.F 443 COST_GENCOST_SSTV4
     &          objf_gencost(kgen,bi,bj)+junk*junk*junkweight
./pkg/ecco/cost_gencost_transp.F 136 COST_GENCOST_TRANSP
            objf_gencost(bi,bj,kgen(icount))=0. _d 0
./pkg/ecco/cost_gencost_transp.F 285 COST_GENCOST_TRANSP
                objf_gencost(bi,bj,kgen(icount))=
./pkg/ecco/cost_gencost_transp.F 286 COST_GENCOST_TRANSP
     &             objf_gencost(bi,bj,kgen(icount))+tmpMeanTile(bi,bj)
./pkg/ecco/cost_gencost_transp.F 297 COST_GENCOST_TRANSP
              objf_gencost(bi,bj,kgen(icount))=
./pkg/ecco/cost_gencost_transp.F 298 COST_GENCOST_TRANSP
     &           objf_gencost(bi,bj,kgen(icount))*facCost
./pkg/ecco/ecco.h 228 NO PROCEDURE
     &       objf_gencost, num_gencost, mult_gencost, gencost_storefld,
./pkg/ecco/ecco.h 240 NO PROCEDURE
      _RL  objf_gencost(nsx,nsy,NGENCOST)
./pkg/ecco/ecco_cost_final.F 525 ECCO_COST_FINAL
     &            *objf_gencost(bi,bj,num_var)
./pkg/ecco/ecco_cost_final.F 658 ECCO_COST_FINAL
     &            +objf_gencost(bi,bj,num_var)