Symbol Description Uses
wvi 12



File Line number Procedure Code
./pkg/ecco/ecco_cost_weights.F 123 ECCO_COST_WEIGHTS
         wvi(k) = 0. _d 0
./pkg/ecco/ecco_cost_weights.F 298 ECCO_COST_WEIGHTS
     &               , wvi(k)
./pkg/ecco/ecco_cost_weights.F 330 ECCO_COST_WEIGHTS
            wcurrent(k,bi,bj) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 349 ECCO_COST_WEIGHTS
            wobcsn(k,3) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 350 ECCO_COST_WEIGHTS
            wobcsn(k,4) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 355 ECCO_COST_WEIGHTS
            wobcss(k,3) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 356 ECCO_COST_WEIGHTS
            wobcss(k,4) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 361 ECCO_COST_WEIGHTS
            wobcsw(k,3) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 362 ECCO_COST_WEIGHTS
            wobcsw(k,4) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 367 ECCO_COST_WEIGHTS
            wobcse(k,3) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 368 ECCO_COST_WEIGHTS
            wobcse(k,4) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 74 ECCO_COST_WEIGHTS
      _RL wvi(nr)