Symbol Description Uses
wvi 8


File Line number Procedure Code
./pkg/ecco/ecco_cost_weights.F 109 ECCO_COST_WEIGHTS 
         wvi(k) = 0. _d 0
./pkg/ecco/ecco_cost_weights.F 253 ECCO_COST_WEIGHTS 
     &               , wvi(k)
./pkg/ecco/ecco_cost_weights.F 282 ECCO_COST_WEIGHTS 
            wcurrent(k,bi,bj) = wvi(k)
./pkg/ecco/ecco_cost_weights.F 63 ECCO_COST_WEIGHTS 
      _RL wvi(nr)
./verification/global1x1_tot/code/ecco_cost_weights.F 109 ECCO_COST_WEIGHTS 
         wvi(k) = 0. _d 0
./verification/global1x1_tot/code/ecco_cost_weights.F 257 ECCO_COST_WEIGHTS 
     &               , wvi(k)
./verification/global1x1_tot/code/ecco_cost_weights.F 286 ECCO_COST_WEIGHTS 
            wcurrent(k,bi,bj) = wvi(k)
./verification/global1x1_tot/code/ecco_cost_weights.F 63 ECCO_COST_WEIGHTS 
      _RL wvi(nr)