C*********************************************************************** C NC - TOTAL NUMBER OF GASES C NY - CALCULATED GASES NUMBER C MS - NUMBER OF FAMILIES C ND - LONG LIVED GASES NUMBER (DYNAMICALLY TRANSPORTED) C NHG- AIRCRAFT EMITTED GASES NUMBER C NUAD-NUMBER OF SHORT-LIVED GASES WHICH ARE WRITTEN ON DISK C NZ - NUMBER OF LONG-LIVED GASES WHICH ARE WRITTEN ON DISK C NTRDOL - NUMBER OF DYNAMICALLY ACTIVE GASES C*********************************************************************** PARAMETER(NC=76,NY=73,KFE=NC,NHG=4,NUAD=8,NZ=5,NCHE=8,KBE=NC+1) PARAMETER (NTRDOL=26) CHARACTER*8 AY COMMON/GAS/NYPR(NC),Y5(NY),PP(NY),DD(NY),SER(NC),WD(NC),NBN(NC), *KEN(NC),NCA(NY),NDA(NY),NCD(NY),DOX(6),POX(3),PAV(NY),DAV(NY), *AY(KFE),NOE(NC),NZIM(NC),AMOL(NC) COMMON/GNAM/NGEN,NGE(8),NOCLO,NCLONO,NNO3,NN2O5,KO3,KH2O,NNOY, *NCLY,NBRY,NCO,NCH4,NAR,NHNO3,NHCL,NO2,NH2SO4,NSOX,NSO2,NCO2,NO INCLUDE 'scfl.h'