c     ------------------------------------------------------------------
c     file 's1surf.inc'

c     This common block contains the state variables relating to
c     the surface soil properties.

c     Parameter include files:  p1werm.inc, p1const.inc

c     + + + VARIABLE DECLARATIONS + + +

      real             aszcr(mnsub)
      real             asfcr(mnsub)
      real             asmlos(mnsub)
      real             asflos(mnsub)
      real             asdcr(mnsub)
      real             asecr(mnsub)
      real             asfald(mnsub)
      real             asfalw(mnsub)

      common / s1surf /
     r aszcr, asfcr, asmlos, asflos, asdcr, asecr, asfald, asfalw

c     + + + VARIABLE DEFINITIONS + + +

c     aszcr  - Soil crust thickness (mm)

c              range values       min        max
c              ------------   ---------  ---------
c              fixed          fmin       fmax
c              typical        tmin       tmax
c              ------------   ---------  ---------

c            - This variable contains the average soil surface crust
c              thickness value for each of the subregions.

c     asfcr  - Fraction of soil surface covered by crust (m^2/m^2)

c              range values       min        max
c              ------------   ---------  ---------
c              fixed          fmin       fmax
c              typical        tmin       tmax
c              ------------   ---------  ---------

c            - This variable contains the fractional amount of soil
c              surface covered by crust for each of the subregions.

c     asmlos - Amount of loose erodible material on crusted fraction
c              of soil surface (Mg/m^2)

c              range values       min        max
c              ------------   ---------  ---------
c              fixed          fmin       fmax
c              typical        tmin       tmax
c              ------------   ---------  ---------

c            - This variable contains the quantity of loose erodible
c              material residing on the soil surface crust for each
c              of the subregions.  If there is no crust present,
c              this variable has no valid value.  The units are
c              Mg of loose erodible material per m^2 of crusted
c              surface area (not total surface area).

c     asflos - Fraction of crusted soil surface containing loose erodible
c              material surface (m^2/m^2)

c              range values       min        max
c              ------------   ---------  ---------
c              fixed          fmin       fmax
c              typical        tmin       tmax
c              ------------   ---------  ---------

c            - This variable contains the fraction of loose material
c              on the soil's crusted surface for each of the subregions.
c              If there is no crust present, this variable has no valid
c              value.  The units are m^2 of crusted surface area containing
c              loose erodible material per m^2 of crusted surface area
c              (not total surface area).

c     asdcr  - Soil crust density (Mg/m^2)

c              range values       min        max
c              ------------   ---------  ---------
c              fixed          fmin       fmax
c              typical        tmin       tmax
c              ------------   ---------  ---------

c            - This variable contains the average soil surface crust
c              density value for each of the subregions.

c     asecr  - Soil crust stability (J/m^2)

c              range values       min        max
c              ------------   ---------  ---------
c              fixed          fmin       fmax
c              typical        tmin       tmax
c              ------------   ---------  ---------

c            - This variable contains the average soil surface crust
c              stability value for each of the subregions.

c     asfald - Dry soil albedo

c              range values       min        max
c              ------------   ---------  ---------
c              fixed          fmin       fmax
c              typical        tmin       tmax
c              ------------   ---------  ---------

c            - This variable contains the dry soil albedo
c              value for each of the subregions.

c     asfalw - Wet soil albedo

c              range values       min        max
c              ------------   ---------  ---------
c              fixed          fmin       fmax
c              typical        tmin       tmax
c              ------------   ---------  ---------

c            - This variable contains the wet soil albedo
c              value for each of the subregions.

c     ------------------------------------------------------------------