!$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/s1layr.inc $
!     ------------------------------------------------------------------
!     file 's1layr.inc'

!     This common block contains the state variables relating to
!     the WERM soil layer properties.

!     Parameter include files:  p1werm.inc

!     + + + VARIABLE DECLARATIONS + + +

      integer          nslay(maxNumSubRegs)
      real             aszlyt(maxSoilLayr+1, maxNumSubRegs)
      real             aszlyd(maxSoilLayr, maxNumSubRegs)
      real             asfcle(maxSoilLayr, maxNumSubRegs)
      real             watertable_depth(maxNumSubRegs)   ! Not used right now

      common / s1layr /                                                 &
     &                  nslay,                                          &
     &                  aszlyt,                                         &
     &                  aszlyd,                                         &
     &                  asfcle,                                         &
     &                  watertable_depth

      save :: /s1layr/

!     + + + VARIABLE DEFINITIONS + + +

!     nslay  - Number of soil layers being used for each subregion.

!              range values       min        max
!              ------------   ---------  ---------
!              fixed          1          maxSoilLayr
!              typical        1          maxSoilLayr
!              ------------   ---------  ---------

!            - This variable maintains the number of active soil layers
!              for each subregion.

!     aszlyt - Soil layer thicknesses for each subregion (mm)
!     aszlyd - Depth to bottom of each soil layer for each subregion (mm)

!      asfcle - Linear extensibility ((Mg/m^3)/(Mg/m^3))

!              range values       min        max
!              ------------   ---------  ---------
!              fixed          0.0        1.0
!              typical        0.0        1.0
!              ------------   ---------  ---------

!      watertable_depth - depth to watertable (mm)
!     ------------------------------------------------------------------