c     -----------------------------------------------------------------
c     file 's2surf.inc'

c     This block common is contains variables used for a simulation run
c     for EROSION.

c     + + + VARIABLE DECLARATIONS + + +

      real             szcr (0:mngdpt, 0:mngdpt)
      real             sfcr (0:mngdpt, 0:mngdpt)
      real             smlos(0:mngdpt, 0:mngdpt)
      real             sflos(0:mngdpt, 0:mngdpt)



      common /s2urf/
     r                 szcr,  sfcr,
     r                 smlos, sflos

c     + + + VARIABLE DEFINITIONS + + +

c     szcr   - Consolidated (crust) thickness (mm)

c              range values      min       max
c              ------------   ---------  ---------
c              fixed              0        50
c              typical            0        20
c              ------------   ---------  ---------

c


c     sfcr   - soil fraction with crust cover (decimal)

c              range values      min       max
c              ------------   ---------  ---------
c              fixed              0.0       1.0
c              typical            0.1       1.0
c              ------------   ---------  ---------

c


c     smlos  - mass of loose erodible soil on crust (kg/m^2)

c              range values       min        max
c              ------------   ---------  ---------
c              fixed              0          10
c              typical            0.2         2
c              ------------   ---------  ---------

c

c     sflos  - soil fraction covered with loose erodible soil
c              on the crusted area

c              range values       min        max
c              ------------   ---------  ---------
c              fixed               0         1.0
c              typical             0         sfcr
c              ------------   ---------  ---------