c  ****************************************
      Block Data ISO_2002
c  ****************************************
      implicit DOUBLE PRECISION (a-h,o-z)
c
      INCLUDE 'Species_2002.cmn'
      INCLUDE 'Isotops_2002.cmn'
c
c    The number of isotopes for a particular molecule:
      DATA (ISONM(I),I=1,NMOL)/
c     H2O, CO2, O3, N2O, CO, CH4, O2,
     +  6,   9,  18,   5,  6,   3,  3,
c      NO, SO2, NO2, NH3, HNO3, OH, HF, HCl, HBr, HI,
     +  3,   2,   1,   2,    1,  3,  1,   2,   2,  1,
c     ClO, OCS, H2CO, HOCl, N2, HCN, CH3Cl, H2O2, C2H2, C2H6, PH3
     +  2,   5,    3,    2,  1,   3,     2,    1,    2,    1,   1,       4/24/97
c     COF2, SF6, H2S, HCOOH, HO2, O, ClONO2,  NO+, HOBr, C2H4
     +   1,   1,   3,     1,   1, 1,      2,    1,    2,    2/
c

c       H2O
      DATA (ISO82(1,J),J=1,6)/
     +  161,181,171,162,182,172/

      DATA (ISO82(2,J),J=1,9)/
c       CO2
     +  626,636,628,627,638,637,828,728,727/
c       O3
      DATA (ISO82(3,J),J=1,18)/
     +  666,668,686,667,676,886,868,678,768,
     +  786,776,767,888,887,878,778,787,777/

      DATA (ISO82(4,J),J=1,5)/
c       N2O
     +  446,456,546,448,447/

      DATA (ISO82(5,J),J=1,6)/
c       CO,                 
     +  26,36,28,27,38,37/  

      DATA (ISO82(6,J),J=1,3)/
c       CH4
     +  211,311,212/

      DATA (ISO82(7,J),J=1,3)/
c       O2        
     +  66,68,67/  

      DATA (ISO82(8,J),J=1,3)/
c       NO
     +  46,56,48/

      DATA (ISO82(9,J),J=1,2)/
c       SO2
     +  626,646/

      DATA (ISO82(10,J),J=1,1)/
c      NO2 
     + 646/  

      DATA (ISO82(11,J),J=1,2)/
c       NH3
     +  4111,5111/

      DATA (ISO82(12,J),J=1,1)/
c       HNO3
     +  146/

      DATA (ISO82(13,J),J=1,3)/
c       OH
     +  61,81,62/

      DATA (ISO82(14,J),J=1,1)/
c       HF
     +  19/

      DATA (ISO82(15,J),J=1,2)/
c       HCl
     +  15,17/

      DATA (ISO82(16,J),J=1,2)/
c       HBr
     +  19,11/

      DATA (ISO82(17,J),J=1,1)/
c       HI
     +  17/

      DATA (ISO82(18,J),J=1,2)/
c       ClO,  
     +  56,76/

      DATA (ISO82(19,J),J=1,5)/
c       OCS              
     +  622,624,632,623,822/

      DATA (ISO82(20,J),J=1,3)/
c       H2CO
     +  126,136,128/

      DATA (ISO82(21,J),J=1,2)/
c       HOCl,    
     +  165,167/

      DATA (ISO82(22,J),J=1,1)/
c       N2
     +  44/

      DATA (ISO82(23,J),J=1,3)/
c       HCN
     +  124,134,125/

      DATA (ISO82(24,J),J=1,2)/
c       CH3Cl
     +  215,217/

      DATA (ISO82(25,J),J=1,1)/
c       H2O2
     +  1661/

      DATA (ISO82(26,J),J=1,2)/
c       C2H2       
     +  1221,1231/

      DATA (ISO82(27,J),J=1,1)/
c       C2H6
     +  1221/ 

      DATA (ISO82(28,J),J=1,1)/
c       PH3
     =  1111/

      DATA (ISO82(29,J),J=1,1)/
c     COF2
     + 269/ 

      DATA (ISO82(30,J),J=1,1)/
c       SF6
     +  29/

      DATA (ISO82(31,J),J=1,3)/
c       H2S         
     +  121,141,131/

      DATA (ISO82(32,J),J=1,1)/
c       HCOOH 
     +  126/

      DATA (ISO82(33,J),J=1,1)/
c       HO2
     +  166/

      DATA (ISO82(34,J),J=1,1)/
c       O  
     +  6/

      DATA (ISO82(35,J),J=1,2)/
c       ClONO2     
     +  5646,7646/

      DATA (ISO82(36,J),J=1,1)/
c       NO+
     +  46/

      DATA (ISO82(37,J),J=1,2)/
c      HOBr
     + 169,161/

      DATA (ISO82(38,J),J=1,2)/
c       C2H4
     +  221,231/

      end
