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*********************************************************************** INCLUDE 'gdim.h' 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) INCLUDE 'scfl.h'