Symbol Description Uses
wudrift 7



File Line number Procedure Code
./verification/global1x1_tot/code/ecco_cost_weights.F 128 ECCO_COST_WEIGHTS
              wudrift (i,j,bi,bj) = 0. _d 0
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 126 ECCO_COST_WEIGHTS
              wudrift (i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_drifter.F 182 COST_DRIFTER
         call MDSREADFIELD( udrifterrfile, 32, 'RL', 1, wudrift, 1,
./pkg/ecco/cost_drifter.F 279 COST_DRIFTER
              wud(i,j,bi,bj) = 1e4*max(wudrift(i,j,bi,bj),5.D0)**(-2)
./pkg/ecco/ecco_cost.h 1029 NO PROCEDURE
     &                      wudrift,wvdrift,
./pkg/ecco/ecco_cost.h 1078 NO PROCEDURE
      _RL wudrift (1-olx:snx+olx,1-oly:sny+oly,   nsx,nsy)
./pkg/ecco/ecco_cost_weights.F 147 ECCO_COST_WEIGHTS
              wudrift (i,j,bi,bj) = 0. _d 0