c     -----------------------------------------------------------------
c     file 'w2wind.inc'

c     This block common is contains variables used for a simulation run
c     for EROSION. Included in sbwind and sberod; data sent to sbqout

c     + + + VARIABLE DECLARATIONS + + +

      real             wus   (0:mngdpt, 0:mngdpt)
      real             wust  (0:mngdpt, 0:mngdpt)
      real             wusp  (0:mngdpt, 0:mngdpt)



      common /w2wind/
     r                 wus, wust, wusp


c     + + + VARIABLE DEFINITIONS + + +

c     wus    - Soil surface friction velocity (m/s)

c              range values      min       max
c              ------------   ---------  ---------
c              fixed              0        1.5
c              typical            0.30     0.6
c              ------------   ---------  ---------

c


c     wust   - Soil surface threhold friction velocity for emission(m/s)


c              range values      min       max
c              ------------   ---------  ---------
c              fixed              0.35     1.75
c              typical            0.35     0.65
c              ------------   ---------  ---------

c


c     wusp   - Soil surface threshold friction velocity for transport
c              capacity (m/s)


c              range values       min        max
c              ------------   ---------  ---------
c              fixed              0.35     1.750
c              typical            0.35     0.65
c              ------------   ---------  ---------