Symbol Description Uses
wti 32


File Line number Procedure Code
./pkg/ecco/ecco_cost_weights.F 106 ECCO_COST_WEIGHTS 
         wti(k) = 0. _d 0
./pkg/ecco/ecco_cost_weights.F 251 ECCO_COST_WEIGHTS 
          read(gwunit,*) wti(k), wsi(k)
./pkg/ecco/ecco_cost_weights.F 280 ECCO_COST_WEIGHTS 
            wtheta(k,bi,bj)   = wti(k)
./pkg/ecco/ecco_cost_weights.F 287 ECCO_COST_WEIGHTS 
            wobcsn(k,1) = wti(k)
./pkg/ecco/ecco_cost_weights.F 289 ECCO_COST_WEIGHTS 
            wobcsn(k,3) = wti(k)*0.02
./pkg/ecco/ecco_cost_weights.F 290 ECCO_COST_WEIGHTS 
            wobcsn(k,4) = wti(k)*0.02
./pkg/ecco/ecco_cost_weights.F 293 ECCO_COST_WEIGHTS 
            wobcss(k,1) = wti(k)
./pkg/ecco/ecco_cost_weights.F 295 ECCO_COST_WEIGHTS 
            wobcss(k,3) = wti(k)*0.02
./pkg/ecco/ecco_cost_weights.F 296 ECCO_COST_WEIGHTS 
            wobcss(k,4) = wti(k)*0.02
./pkg/ecco/ecco_cost_weights.F 299 ECCO_COST_WEIGHTS 
            wobcsw(k,1) = wti(k)
./pkg/ecco/ecco_cost_weights.F 301 ECCO_COST_WEIGHTS 
            wobcsw(k,3) = wti(k)*0.02
./pkg/ecco/ecco_cost_weights.F 302 ECCO_COST_WEIGHTS 
            wobcsw(k,4) = wti(k)*0.02
./pkg/ecco/ecco_cost_weights.F 305 ECCO_COST_WEIGHTS 
            wobcse(k,1) = wti(k)
./pkg/ecco/ecco_cost_weights.F 307 ECCO_COST_WEIGHTS 
            wobcse(k,3) = wti(k)*0.02
./pkg/ecco/ecco_cost_weights.F 308 ECCO_COST_WEIGHTS 
            wobcse(k,4) = wti(k)*0.02
./pkg/ecco/ecco_cost_weights.F 60 ECCO_COST_WEIGHTS 
      _RL wti(nr)
./verification/global1x1_tot/code/ecco_cost_weights.F 106 ECCO_COST_WEIGHTS 
         wti(k) = 0. _d 0
./verification/global1x1_tot/code/ecco_cost_weights.F 254 ECCO_COST_WEIGHTS 
          read(gwunit,*) wti(k), wsi(k)
./verification/global1x1_tot/code/ecco_cost_weights.F 284 ECCO_COST_WEIGHTS 
            wtheta(k,bi,bj)   = wti(k)
./verification/global1x1_tot/code/ecco_cost_weights.F 291 ECCO_COST_WEIGHTS 
            wobcsn(k,1) = wti(k)
./verification/global1x1_tot/code/ecco_cost_weights.F 293 ECCO_COST_WEIGHTS 
            wobcsn(k,3) = wti(k)*0.02
./verification/global1x1_tot/code/ecco_cost_weights.F 294 ECCO_COST_WEIGHTS 
            wobcsn(k,4) = wti(k)*0.02
./verification/global1x1_tot/code/ecco_cost_weights.F 297 ECCO_COST_WEIGHTS 
            wobcss(k,1) = wti(k)
./verification/global1x1_tot/code/ecco_cost_weights.F 299 ECCO_COST_WEIGHTS 
            wobcss(k,3) = wti(k)*0.02
./verification/global1x1_tot/code/ecco_cost_weights.F 300 ECCO_COST_WEIGHTS 
            wobcss(k,4) = wti(k)*0.02
./verification/global1x1_tot/code/ecco_cost_weights.F 303 ECCO_COST_WEIGHTS 
            wobcsw(k,1) = wti(k)
./verification/global1x1_tot/code/ecco_cost_weights.F 305 ECCO_COST_WEIGHTS 
            wobcsw(k,3) = wti(k)*0.02
./verification/global1x1_tot/code/ecco_cost_weights.F 306 ECCO_COST_WEIGHTS 
            wobcsw(k,4) = wti(k)*0.02
./verification/global1x1_tot/code/ecco_cost_weights.F 309 ECCO_COST_WEIGHTS 
            wobcse(k,1) = wti(k)
./verification/global1x1_tot/code/ecco_cost_weights.F 311 ECCO_COST_WEIGHTS 
            wobcse(k,3) = wti(k)*0.02
./verification/global1x1_tot/code/ecco_cost_weights.F 312 ECCO_COST_WEIGHTS 
            wobcse(k,4) = wti(k)*0.02
./verification/global1x1_tot/code/ecco_cost_weights.F 60 ECCO_COST_WEIGHTS 
      _RL wti(nr)