!$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/h1balance.inc $

!     variables defined to track cumulative water balance
!     so it can be periodically reported (works only with one subregion)

!     Parameter include files:  p1werm.inc

      real cumprecip(maxNumSubRegs), cumrunoff(maxNumSubRegs), cumevap(maxNumSubRegs)
      real cumtrans(maxNumSubRegs), cumdrain(maxNumSubRegs)
      real initswc(maxNumSubRegs), initsnow(maxNumSubRegs), initday(maxNumSubRegs)
      real presswc(maxNumSubRegs), pressnow(maxNumSubRegs), presday(maxNumSubRegs)

      integer hprevrotation(maxNumSubRegs)

      common /balance/                                                  &
     &     cumprecip, cumrunoff, cumevap,                               &
     &     cumtrans, cumdrain,                                          &
     &     initswc, initsnow, initday,                                  &
     &     presswc, pressnow, presday,                                  &
     &     hprevrotation

      save :: /balance/

!     + + + LOCAL DEFINITIONS + + +

!     cumprecip - accumulation of rainfall (mm)
!     cumrunoff - accumulation of runoff (mm) (mm)
!     cumevap   - accumulation of evaporation (mm)
!     cumtrans  - accumulation of transpiration (mm)
!     cumdrain  - accumulation of drainage (mm)
!     initswc   - initial soil water content (mm)
!     initsnow  - initial snow water content (mm)
!     initday   - initial day
!     presswc   - present soil water content (mm)
!     pressnow  - present snow water content (mm)
!     presday   - present day
!     hprevrotation - rotation count number of previously printed hydro balance