!*==aa0032.spg  processed by SPAG 6.70Rc at 21:09 on  9 Dec 2012
      use c_s1dbc
      implicit none
!*--AA00324
!
!*** Start of declarations rewritten by SPAG
!
! Local variables
!
      integer :: mnsub,mnsz
!
!*** End of declarations rewritten by SPAG
!
 
!     + + + VARIABLE DEFINITIONS + + +
!     for each subregion, the following variables are defined as:
 
!     asdagd - Soil layer aggregate density (Mg/m^3)
!     aseags - Soil layer dry aggregate stability (J/m^2)
!     aslagm - Soil layer aggregate size geometric mean dia. (mm)
!     aslagn - Minimum aggregate size (mm)
!     aslagx - Maximum aggregate size (mm)
!     as0ags - Soil layer aggregate size geometric standard dev. (mm)
!     aseagm - soil layer mean aggregate stabillity (J/m^2)
!     aseagmn - soil layer minimum aggregate stability
!     aseagmx - soil layer maximum aggregate stability
!     k4d    - soil layer drying stability coefficient
!     aslmin - min values of geom. mean agg. diameter (eq. S-45, S-46)
!     aslmax - max values of geom. mean agg. diameter (eq. S-45, S-46)
!$Author: joelevin $
!$Date: 2012-03-30 10:14:38 -0500 (Fri, 30 Mar 2012) $
!$Revision: 12163 $
!$HeadURL: https://eweru-dev1.eweru.ksu.edu/svn/code/weps1/branches/WEPS_F90_update/weps.src/src/inc/s1dbc.inc $
!     ------------------------------------------------------------------
!     file 's1dbc.inc'
 
!     This common block contains the variables representing the soil
!     chemical properties in WERM for each soil layer.
 
!     Parameter include files:  p1werm.inc
 
!     + + + VARIABLE DECLARATIONS + + +