c
c Header file for flxproc with ccm related parameters:
c ccmf(ngcmlon,ngcmlat,nccmlev,nccmfld) (pointer pccmf is in /ccm/ below)
c
      parameter(nlat_t21=32,	! number of latitudes at T21 resolution
     +          nlat_maccm=64,	! number of latitudes at maccm resolution
     +           mxccmf=10)	! max number of ccm fields (for dim)
      character*80 ccmlsd
      character*16 ccmres
      character*8 ccmflab8
      pointer (pccmlon,ccmlon(1)), (pccmlat,ccmlat(1)),
     +        (pccmlev_mb,ccmlev_mb(1)), (pccmf,ccmf(1)),
     +        (pccmlev_zp,ccmlev_zp(1))
      common/ccm/
     +  ccmlsd,			! mss path to lsd save file made by ccmproc
     +  glat_t21(nlat_t21),	! t21 latitudes
     +  glat_maccm(nlat_maccm),	! maccm latitudes
     +  luccm,			! logical unit for ccmlsd
     +  nccmlon,nccmlat,	! number of ccm lons, lats
     +  nccmlev,		! number of ccm pressure levels
     +  nccmfld,		! number of ccm fields
     +  pccmlon,pccmlat,	! pointers to ccm lon and lat arrays
     +  pccmlev_mb,		! pointer to ccm levels (mb)
     +  pccmlev_zp,		! pointer to ccm levels (zp)
     +  pccmf,			! pointer to ccm fields
     +  ccmres,			! char*16 = "CCM2(T21)" or "CCM2(MACCM)"
     +  ccmday,			! ccm proc day
     +  ccmflab8(mxccmf),	! char*8 ccm field names
     +  ixz2			! index to Z2 hts in ccmf