c***********************************************************************
c
c include file: htheta.kom
c
c***********************************************************************
c
c must include 'p1werm.inc'
c
c***********************************************************************
c
c global hydro variables (local to hydro submodel)
c
c***********************************************************************

c                    surface soil water content (m^3/m^3) (theta(0))
c                    soil layer water content (m^3/m^3)
      real theta(0:mnsz)
c-----------------------------------------------------------------------
c                    soil water content at saturation (m^3/m^3)
      real thetas(mnsz)
c                    effective saturated water contet (m^3/m^3)
      real thetes(mnsz)
c                    soil water content at field capacity (m^3/m^3)
      real thetaf(mnsz)
c                    residual soil water cotent (m^3/m^3)
      real thetar(mnsz)
c                    soil water content at wilting point (m^3/m^3)
      real thetaw(mnsz)
c-----------------------------------------------------------------------
c                    soil layer water content (mm)
c      real wc(mnsz)
c                    soil profile water content (mm)
      real swc
c                    initial soil profile water content (mm)
      real swci
c                    last days soil profile water content (mm)
      real lswc
c-----------------------------------------------------------------------
c                    soil water matric head (mm)
c      real swm(mnsz)
c                    soil water matric potential (j/kg)
c      real potm(mnsz)
c                    exponent of campbell's unsaturated hydraulic
c                    conductivity model
c      real cm(mnsz)
c-----------------------------------------------------------------------
      common /stheta/ theta, thetas, thetaf, thetaw,
c     &       thetes, thetar, wc, swc, swci, lswc, swm, potm, cm
     &       thetes, thetar, swc, swci, lswc