c
c Include file containing basic timesproc parameters:
c
c nfhist = 30: tn,un,vn,o2,ox,n4s,noz,co,co2,h2o,h2,hox,o+,ch4,o21d,
c              no2,no,o3,o1,oh,ho2,h,n2d,ti,te,ne,o2+,w,z,n2
c ntimefld = 33: 30 fields of nfhist plus: o/o2, o/n2, o2/n2
c
      parameter (ntimefld=33,nfhist=30)
c
c Grid sizes:
      parameter (jmx=36,imx=73,kmx=45, imxp1=imx+1, imxp3=imx+3)
      parameter (glat1=-87.5, glon1=-180., zp1=-17.,
     +           dlat=5.,dlon=5.,dzp=0.5)
c
      parameter(mxvols=10,mxtms=241)
      character*24 histvol(mxvols)
      common/chinp/ histvol
      common/input/ iden,mtimes(3,mxtms),ntms,ut(mxtms),nhvols,luhist,
     +  ivol
      common/gcmgrid/ gcmlat(jmx),gcmlon(imx),gcmzp(kmx)
c
c Field labels:
      character*8 timeslab_short
      common/times/ timeslab_short(nfhist)
c
c paths:
      parameter(mxpath=10)
      character*32 unixdir
      common/cdfcomm/ nunixdir,unixdir
c