!*==aa0036.spg  processed by SPAG 6.70Rc at 21:09 on  9 Dec 2012
      use c_s1psd
      implicit none
!*--AA00364
!
!*** Start of declarations rewritten by SPAG
!
! Local variables
!
      integer :: mnsub,mnsz
!
!*** End of declarations rewritten by SPAG
!
 
!     + + + VARIABLE DEFINITIONS + + +
 
!     asdblk  - Soil layer bulk density for each subregion (Mg/m^3)
 
!     asdsblk - Soil layer settled bulk density (Mg/m^3)
 
!     asdwblk - Soil layer bulk density at 1/3 bar for each
!               subregion (Mg/m^3)
 
!     asdblk0 - Soil layer bulk density from previous day
!               for use in hydro to update parameters based on bulk density changes
 
!     asdpart - Soil layer particle density adjusted from mineral only
!               to include organic matter content
 
!     restrict_depth - depth to impermeable layer/restricting zone (mm)
 
!     bedrock_depth - depth to bedrock (mm)
!$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/s1psd.inc $
!     ------------------------------------------------------------------
!     file 's1psd.inc'
!
!     This common block contains the variables representing the soil
!     particle distribution parameters for each soil layer.
!
!     Parameter include files:  p1werm.inc
!
!     + + + VARIABLE DECLARATIONS + + +
!
!
!     + + + VARIABLE DEFINITIONS + + +
!