c $Log: ECTRAC.f,v $
c Revision 1.2  2001/03/07 04:29:02  rot032
c Changes from LDR to bring sulfur cycle to run N63
c
c Revision 1.1  2000/06/20 02:22:22  rot032
c Initial revision
c
      real bigxt(ln2e,nl,ntrac,late),bigxtm(ln2e,nl,ntrac,late)
      common /ectrac/ bigxt, bigxtm

      real hxtg(ln2e,late,nl,3)
      common/ecstats/hxtg                   !Monthly means