      double precision CONLDL(NPX,NCHEM), INTINL(NPX,NPX,NCHEM)
     &,                TOTKL(NPX,NCHEM),  YIELDL(NCHEM,NCHEM,NPX)
      real ALPHA(32,NPX,NCHEM), BIOLKL(NPX,NCHEM), BIOTOL(NPX)
     &, EXPOKL(NPX,NCHEM), HYDRKL(NPX,NCHEM), OXIDKL(NPX,NCHEM)
     &, PHOTKL(NPX,NCHEM), REDKL(NPX,NCHEM),  S1O2KL(NPX,NCHEM)
     &, SEDCOL(NPX), SEDMSL(NPX), VOLKL(NPX,NCHEM), WATVOL(NPX)
     &, YSATL(7,NPX,NCHEM)
      common /SECTR1/ CONLDL, INTINL, TOTKL,  YIELDL
     &, ALPHA,  BIOLKL, BIOTOL, EXPOKL, HYDRKL, OXIDKL
     &, PHOTKL, REDKL,  S1O2KL, SEDCOL, SEDMSL, VOLKL
     &, WATVOL, YSATL
      real TOTLDL(NPX,NCHEM), YMONCT, YSUM(NPX,NCHEM)
      integer FRSTYR, KEQN, LASREC
      common /SECTR2/ TOTLDL, YMONCT, YSUM, FRSTYR, KEQN, LASREC
      real FLUXCT, YBIOS(NCHEM), YBIOW(NCHEM), YCOUNT, YEXPO(NCHEM)
     &,    YGWAT(NCHEM), YHYDR(NCHEM), YOXID(NCHEM), YPHOT(NCHEM)
     &,    YRED(NCHEM),  YS1O2(NCHEM), YSUMS(32,NPX,NCHEM)
     &,    YTEST(3,10,NPX,NCHEM), YTOT(3,NPX,NCHEM), YVOLK(NCHEM)
      real YMIN96(10,NCHEM), YMIN21(10,NCHEM), YMINLT(10,NCHEM)
     &,    YBAR96(10,NCHEM), YBAR21(10,NCHEM), YBARLT(10,NCHEM)
     &,    PEAK96(10,NCHEM), PEAK21(10,NCHEM), PEAKLT(10,NCHEM)
     &,    STKBEG(0:23,10,NPX,NCHEM), STKEND(21,10,NPX,NCHEM)
      integer MAXSEG(10,NCHEM), MINSEG(10,NCHEM)
      common /STATS/ FLUXCT, YBIOS, YBIOW, YCOUNT, YEXPO, YGWAT, YHYDR
     &, YOXID,YPHOT,YRED,YS1O2,YSUMS,YTEST,YTOT,YVOLK,MAXSEG,MINSEG
     &, YMIN96,YMIN21,YMINLT,YBAR96,YBAR21,YBARLT,PEAK96,PEAK21,PEAKLT
     &, STKBEG,STKEND
