!$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/s1aggclass.inc $
!     This common block contains the variables representing the definitions
!     of soil aggregate distributions for each soil layer.

!     Parameter include files:  p1werm.inc

!     + + + VARIABLE DECLARATIONS + + +

      integer    nclass
      parameter (nclass = 30)

      real aggclass_size(0:nclass)
      real aggclass_mdia(nclass)
      real aggclass_frac(nclass, maxSoilLayr)
      real aggclass_cumul(0:nclass, maxSoilLayr)

      common / s1aggclass /                                             &
     & aggclass_size, aggclass_mdia, aggclass_frac, aggclass_cumul

      save :: /s1aggclass/

!     + + + VARIABLE DEFINITIONS + + +
!     nclass         - number of size classes
!     aggclass_size  - size of class divisions (mm)
!     aggclass_mdia  - geometric mean diameter of size classes (mm)
!     aggclass_frac  - mass fraction by size class and soil layer
!     aggclass_cumul - cummulative mass fraction by class and soil layer