!$Author: wjr $
!$Date: 2012-03-30 09:46:26 -0500 (Fri, 30 Mar 2012) $
!$Revision: 12162 $
!$HeadURL: https://svn.weru.ksu.edu/weru/weps1/trunk/weps.src/src/inc/s1surf.inc $
!     ------------------------------------------------------------------
!     file 's1surf.inc'
!
!     This common block contains the state variables relating to
!     the surface soil properties and pm10 fractions in suspended soil
!
!     Parameter include files:  p1werm.inc, p1const.inc
!
!     + + + VARIABLE DECLARATIONS + + +

      real             asoilCrstThck(maxNumSubRegs)
      real             asoilCrstFrac(maxNumSubRegs)
      real             asoilLoosMass(maxNumSubRegs)
      real             asoilLoosCovFrac(maxNumSubRegs)
      real             asoilCrstDens(maxNumSubRegs)
      real             asoilCrstStab(maxNumSubRegs)
      real             asfald(maxNumSubRegs)
      real             asfalw(maxNumSubRegs)
      real             acoefAbraAgg(maxNumSubRegs)
      real           acoefAbraCrst(maxNumSubRegs)
      real             asoilPM10FracAbraSusp(maxNumSubRegs)
      real             asoilPM10FracEmitSusp(maxNumSubRegs)
      real             asoilPM10FracSaltBrkSusp(maxNumSubRegs)
      common / s1surf /                                                 &
     & asoilCrstThck, asoilCrstFrac, asoilLoosMass, asoilLoosCovFrac,   &
     & asoilCrstDens, asoilCrstStab, asfald, asfalw,                    &
     & acoefAbraAgg, acoefAbraCrst,asoilPM10FracAbraSusp,               &
     & asoilPM10FracEmitSusp, asoilPM10FracSaltBrkSusp

      save :: /s1surf/
!
!     + + + VARIABLE DEFINITIONS + + +
!
!     asoilCrstThck  - Soil crust thickness (mm)
!
!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------
!
!            - This variable contains the average soil surface crust
!              thickness value for each of the subregions.
!
!     asoilCrstFrac  - Fraction of soil surface covered by crust (m^2/m^2)
!
!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------
!
!            - This variable contains the fractional amount of soil
!              surface covered by crust for each of the subregions.
!
!     asoilLoosMass - Amount of loose erodible material on crusted fraction
!              of soil surface (kg/m^2)
!
!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------
!
!            - This variable contains the quantity of loose erodible
!              material residing on the soil surface crust for each
!              of the subregions.  If there is no crust present,
!              this variable has no valid value.  The units are
!              kg of loose erodible material per m^2 of crusted
!              surface area (not total surface area).
!
!     asoilLoosCovFrac - Fraction of crusted soil surface containing loose erodible
!              material surface (m^2/m^2)
!
!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------
!
!            - This variable contains the fraction of loose material
!              on the soil's crusted surface for each of the subregions.
!              If there is no crust present, this variable has no valid
!              value.  The units are m^2 of crusted surface area containing
!              loose erodible material per m^2 of crusted surface area
!              (not total surface area).
!
!     asoilCrstDens  - Soil crust density (Mg/m^2)
!
!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------

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

!     asoilCrstStab  - Soil crust stability (J/m^2)

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

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

!     asfald - Dry soil albedo

!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------
!
!            - This variable contains the dry soil albedo
!              value for each of the subregions.
!
!     asfalw - Wet soil albedo
!
!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------
!
!            - This variable contains the wet soil albedo
!              value for each of the subregions.
!
!     acoefAbraAgg - coeffienct of abrasion for aggregates (1/m)
!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------
!
!     acoefAbraCrst - coeffienct of abrasion for crust (1/m)
!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------
!
!     asoilPM10FracAbraSusp - soil fraction pm10 in abraded suspension
!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------
!
!     asoilPM10FracEmitSusp - soil fraction pm10 in emitted suspension
!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------
!     asoilPM10FracSaltBrkSusp - soil fraction pm10 in saltation breakage suspension
!              range values       min        max
!              ------------   ---------  ---------
!              fixed          fmin       fmax
!              typical        tmin       tmax
!              ------------   ---------  ---------
!
!     ------------------------------------------------------------------