c
c     d1geom.inc
c
c     common block of variables containing geometry information
c     used by the Decomp model.  Variables specified in
c     WEPS Global Blocks.

      real adrsai(mnsub)
      real adrsaz(5,mnsub)
      real adffcv(mnsub)
      real adfscv(mnsub)

      common / d1gen /
     r adrsai, adrsaz, adffcv, adfscv


c   + + + VARIABLE DEFINEITIONS + + +

c     adrsai(mnsub)  above ground stem area index
c
c     adrsaz(5,mnsub) total cover on the soil surface
c     adffcv(mnsub)    cover from flat residue
c     adfscv(mnsub)    cover from standing residue