Symbol Description Uses
wvi 12



File Line number Procedure Code
./pkg/ecco/ecco_cost_weights.F 114 ECCO_COST_WEIGHTS
         wvi(k) = 0. _d 0
./pkg/ecco/ecco_cost_weights.F 285 ECCO_COST_WEIGHTS
     &               , wvi(k)
./pkg/ecco/ecco_cost_weights.F 313 ECCO_COST_WEIGHTS
            wcurrent(k,bi,bj) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 331 ECCO_COST_WEIGHTS
            wobcsn(k,3) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 332 ECCO_COST_WEIGHTS
            wobcsn(k,4) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 337 ECCO_COST_WEIGHTS
            wobcss(k,3) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 338 ECCO_COST_WEIGHTS
            wobcss(k,4) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 343 ECCO_COST_WEIGHTS
            wobcsw(k,3) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 344 ECCO_COST_WEIGHTS
            wobcsw(k,4) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 349 ECCO_COST_WEIGHTS
            wobcse(k,3) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 350 ECCO_COST_WEIGHTS
            wobcse(k,4) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 65 ECCO_COST_WEIGHTS
      _RL wvi(nr)