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 crust (Mg/m^2)

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

c            - This variable contains the amount of loose erodible
c              material residing on the soil surface crust for each
c              of the subregions.

c     asflos - Fraction of loose material on soil 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 surface for each of the subregions.

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     ------------------------------------------------------------------