LCOV - code coverage report
Current view: top level - chemistry/pp_trop_strat_mam5_vbsext - mo_rxt_rates_conv.F90 (source / functions) Hit Total Coverage
Test: coverage.info Lines: 562 562 100.0 %
Date: 2025-03-14 01:21:06 Functions: 1 1 100.0 %

          Line data    Source code
       1             : module mo_rxt_rates_conv
       2             :   use shr_kind_mod, only : r8 => shr_kind_r8
       3             :   implicit none
       4             :   private
       5             :   public :: set_rates
       6             : contains
       7      145920 :    subroutine set_rates( rxt_rates, sol, ncol )
       8             :       real(r8), intent(inout) :: rxt_rates(:,:,:)
       9             :       real(r8), intent(in) :: sol(:,:,:)
      10             :       integer, intent(in) :: ncol
      11    72055296 :       rxt_rates(:ncol,:,     1) = rxt_rates(:ncol,:,     1)*sol(:ncol,:,   263)                                                ! rate_const*H2O
      12    72055296 :       rxt_rates(:ncol,:,     2) = rxt_rates(:ncol,:,     2)*sol(:ncol,:,   263)                                                ! rate_const*H2O
      13    72055296 :       rxt_rates(:ncol,:,     3) = rxt_rates(:ncol,:,     3)*sol(:ncol,:,   263)                                                ! rate_const*H2O
      14    72055296 :       rxt_rates(:ncol,:,     4) = rxt_rates(:ncol,:,     4)*sol(:ncol,:,    81)                                                ! rate_const*H2O2
      15             :                                                                                                                                ! rate_const*O2
      16             :                                                                                                                                ! rate_const*O2
      17    72055296 :       rxt_rates(:ncol,:,     7) = rxt_rates(:ncol,:,     7)*sol(:ncol,:,   140)                                                ! rate_const*O3
      18    72055296 :       rxt_rates(:ncol,:,     8) = rxt_rates(:ncol,:,     8)*sol(:ncol,:,   140)                                                ! rate_const*O3
      19    72055296 :       rxt_rates(:ncol,:,     9) = rxt_rates(:ncol,:,     9)*sol(:ncol,:,    91)                                                ! rate_const*HNO3
      20    72055296 :       rxt_rates(:ncol,:,    10) = rxt_rates(:ncol,:,    10)*sol(:ncol,:,    92)                                                ! rate_const*HO2NO2
      21    72055296 :       rxt_rates(:ncol,:,    11) = rxt_rates(:ncol,:,    11)*sol(:ncol,:,    92)                                                ! rate_const*HO2NO2
      22    72055296 :       rxt_rates(:ncol,:,    12) = rxt_rates(:ncol,:,    12)*sol(:ncol,:,   120)                                                ! rate_const*N2O
      23    72055296 :       rxt_rates(:ncol,:,    13) = rxt_rates(:ncol,:,    13)*sol(:ncol,:,   121)                                                ! rate_const*N2O5
      24    72055296 :       rxt_rates(:ncol,:,    14) = rxt_rates(:ncol,:,    14)*sol(:ncol,:,   121)                                                ! rate_const*N2O5
      25    72055296 :       rxt_rates(:ncol,:,    15) = rxt_rates(:ncol,:,    15)*sol(:ncol,:,   129)                                                ! rate_const*NO
      26    72055296 :       rxt_rates(:ncol,:,    16) = rxt_rates(:ncol,:,    16)*sol(:ncol,:,   130)                                                ! rate_const*NO2
      27    72055296 :       rxt_rates(:ncol,:,    17) = rxt_rates(:ncol,:,    17)*sol(:ncol,:,   131)                                                ! rate_const*NO3
      28    72055296 :       rxt_rates(:ncol,:,    18) = rxt_rates(:ncol,:,    18)*sol(:ncol,:,   131)                                                ! rate_const*NO3
      29    72201216 :       rxt_rates(:ncol,:,    19) = rxt_rates(:ncol,:,    19)*sol(:ncol,:,     1)                                                ! rate_const*ALKNIT
      30    72055296 :       rxt_rates(:ncol,:,    20) = rxt_rates(:ncol,:,    20)*sol(:ncol,:,     2)                                                ! rate_const*ALKOOH
      31    72055296 :       rxt_rates(:ncol,:,    21) = rxt_rates(:ncol,:,    21)*sol(:ncol,:,    10)                                                ! rate_const*BENZOOH
      32    72055296 :       rxt_rates(:ncol,:,    22) = rxt_rates(:ncol,:,    22)*sol(:ncol,:,    11)                                                ! rate_const*BEPOMUC
      33    72055296 :       rxt_rates(:ncol,:,    23) = rxt_rates(:ncol,:,    23)*sol(:ncol,:,    12)                                                ! rate_const*BIGALD
      34    72055296 :       rxt_rates(:ncol,:,    24) = rxt_rates(:ncol,:,    24)*sol(:ncol,:,    13)                                                ! rate_const*BIGALD1
      35    72055296 :       rxt_rates(:ncol,:,    25) = rxt_rates(:ncol,:,    25)*sol(:ncol,:,    14)                                                ! rate_const*BIGALD2
      36    72055296 :       rxt_rates(:ncol,:,    26) = rxt_rates(:ncol,:,    26)*sol(:ncol,:,    15)                                                ! rate_const*BIGALD3
      37    72055296 :       rxt_rates(:ncol,:,    27) = rxt_rates(:ncol,:,    27)*sol(:ncol,:,    16)                                                ! rate_const*BIGALD4
      38    72055296 :       rxt_rates(:ncol,:,    28) = rxt_rates(:ncol,:,    28)*sol(:ncol,:,    25)                                                ! rate_const*BZOOH
      39    72055296 :       rxt_rates(:ncol,:,    29) = rxt_rates(:ncol,:,    29)*sol(:ncol,:,    29)                                                ! rate_const*C2H5OOH
      40    72055296 :       rxt_rates(:ncol,:,    30) = rxt_rates(:ncol,:,    30)*sol(:ncol,:,    32)                                                ! rate_const*C3H7OOH
      41    72055296 :       rxt_rates(:ncol,:,    31) = rxt_rates(:ncol,:,    31)*sol(:ncol,:,    34)                                                ! rate_const*C6H5OOH
      42    72055296 :       rxt_rates(:ncol,:,    32) = rxt_rates(:ncol,:,    32)*sol(:ncol,:,    44)                                                ! rate_const*CH2O
      43    72055296 :       rxt_rates(:ncol,:,    33) = rxt_rates(:ncol,:,    33)*sol(:ncol,:,    44)                                                ! rate_const*CH2O
      44    72055296 :       rxt_rates(:ncol,:,    34) = rxt_rates(:ncol,:,    34)*sol(:ncol,:,    47)                                                ! rate_const*CH3CHO
      45    72055296 :       rxt_rates(:ncol,:,    35) = rxt_rates(:ncol,:,    35)*sol(:ncol,:,    50)                                                ! rate_const*CH3COCH3
      46    72055296 :       rxt_rates(:ncol,:,    36) = rxt_rates(:ncol,:,    36)*sol(:ncol,:,    51)                                                ! rate_const*CH3COCHO
      47    72055296 :       rxt_rates(:ncol,:,    37) = rxt_rates(:ncol,:,    37)*sol(:ncol,:,    53)                                                ! rate_const*CH3COOOH
      48    72055296 :       rxt_rates(:ncol,:,    38) = rxt_rates(:ncol,:,    38)*sol(:ncol,:,    55)                                                ! rate_const*CH3OOH
      49    72055296 :       rxt_rates(:ncol,:,    39) = rxt_rates(:ncol,:,    39)*sol(:ncol,:,    56)                                                ! rate_const*CH4
      50    72055296 :       rxt_rates(:ncol,:,    40) = rxt_rates(:ncol,:,    40)*sol(:ncol,:,    56)                                                ! rate_const*CH4
      51    72055296 :       rxt_rates(:ncol,:,    41) = rxt_rates(:ncol,:,    41)*sol(:ncol,:,    65)                                                ! rate_const*CO2
      52    72055296 :       rxt_rates(:ncol,:,    42) = rxt_rates(:ncol,:,    42)*sol(:ncol,:,    74)                                                ! rate_const*EOOH
      53    72055296 :       rxt_rates(:ncol,:,    43) = rxt_rates(:ncol,:,    43)*sol(:ncol,:,    76)                                                ! rate_const*GLYALD
      54    72055296 :       rxt_rates(:ncol,:,    44) = rxt_rates(:ncol,:,    44)*sol(:ncol,:,    77)                                                ! rate_const*GLYOXAL
      55    72055296 :       rxt_rates(:ncol,:,    45) = rxt_rates(:ncol,:,    45)*sol(:ncol,:,    95)                                                ! rate_const*HONITR
      56    72055296 :       rxt_rates(:ncol,:,    46) = rxt_rates(:ncol,:,    46)*sol(:ncol,:,    96)                                                ! rate_const*HPALD
      57    72055296 :       rxt_rates(:ncol,:,    47) = rxt_rates(:ncol,:,    47)*sol(:ncol,:,    97)                                                ! rate_const*HYAC
      58    72055296 :       rxt_rates(:ncol,:,    48) = rxt_rates(:ncol,:,    48)*sol(:ncol,:,   104)                                                ! rate_const*ISOPNOOH
      59    72055296 :       rxt_rates(:ncol,:,    49) = rxt_rates(:ncol,:,    49)*sol(:ncol,:,   106)                                                ! rate_const*ISOPOOH
      60    72055296 :       rxt_rates(:ncol,:,    50) = rxt_rates(:ncol,:,    50)*sol(:ncol,:,   111)                                                ! rate_const*MACR
      61    72055296 :       rxt_rates(:ncol,:,    51) = rxt_rates(:ncol,:,    51)*sol(:ncol,:,   111)                                                ! rate_const*MACR
      62    72055296 :       rxt_rates(:ncol,:,    52) = rxt_rates(:ncol,:,    52)*sol(:ncol,:,   113)                                                ! rate_const*MEK
      63    72055296 :       rxt_rates(:ncol,:,    53) = rxt_rates(:ncol,:,    53)*sol(:ncol,:,   114)                                                ! rate_const*MEKOOH
      64    72055296 :       rxt_rates(:ncol,:,    54) = rxt_rates(:ncol,:,    54)*sol(:ncol,:,   115)                                                ! rate_const*MPAN
      65    72055296 :       rxt_rates(:ncol,:,    55) = rxt_rates(:ncol,:,    55)*sol(:ncol,:,   118)                                                ! rate_const*MVK
      66    72055296 :       rxt_rates(:ncol,:,    56) = rxt_rates(:ncol,:,    56)*sol(:ncol,:,   123)                                                ! rate_const*NC4CHO
      67    72055296 :       rxt_rates(:ncol,:,    57) = rxt_rates(:ncol,:,    57)*sol(:ncol,:,   132)                                                ! rate_const*NOA
      68    72055296 :       rxt_rates(:ncol,:,    58) = rxt_rates(:ncol,:,    58)*sol(:ncol,:,   133)                                                ! rate_const*NTERPOOH
      69    72055296 :       rxt_rates(:ncol,:,    59) = rxt_rates(:ncol,:,    59)*sol(:ncol,:,   144)                                                ! rate_const*ONITR
      70    72055296 :       rxt_rates(:ncol,:,    60) = rxt_rates(:ncol,:,    60)*sol(:ncol,:,   145)                                                ! rate_const*PAN
      71    72055296 :       rxt_rates(:ncol,:,    61) = rxt_rates(:ncol,:,    61)*sol(:ncol,:,   149)                                                ! rate_const*PHENOOH
      72    72055296 :       rxt_rates(:ncol,:,    62) = rxt_rates(:ncol,:,    62)*sol(:ncol,:,   154)                                                ! rate_const*POOH
      73    72055296 :       rxt_rates(:ncol,:,    63) = rxt_rates(:ncol,:,    63)*sol(:ncol,:,   155)                                                ! rate_const*ROOH
      74    72055296 :       rxt_rates(:ncol,:,    64) = rxt_rates(:ncol,:,    64)*sol(:ncol,:,   212)                                                ! rate_const*TEPOMUC
      75    72055296 :       rxt_rates(:ncol,:,    65) = rxt_rates(:ncol,:,    65)*sol(:ncol,:,   213)                                                ! rate_const*TERP2OOH
      76    72055296 :       rxt_rates(:ncol,:,    66) = rxt_rates(:ncol,:,    66)*sol(:ncol,:,   214)                                                ! rate_const*TERPNIT
      77    72055296 :       rxt_rates(:ncol,:,    67) = rxt_rates(:ncol,:,    67)*sol(:ncol,:,   215)                                                ! rate_const*TERPOOH
      78    72055296 :       rxt_rates(:ncol,:,    68) = rxt_rates(:ncol,:,    68)*sol(:ncol,:,   216)                                                ! rate_const*TERPROD1
      79    72055296 :       rxt_rates(:ncol,:,    69) = rxt_rates(:ncol,:,    69)*sol(:ncol,:,   217)                                                ! rate_const*TERPROD2
      80    72055296 :       rxt_rates(:ncol,:,    70) = rxt_rates(:ncol,:,    70)*sol(:ncol,:,   218)                                                ! rate_const*TOLOOH
      81    72055296 :       rxt_rates(:ncol,:,    71) = rxt_rates(:ncol,:,    71)*sol(:ncol,:,   221)                                                ! rate_const*XOOH
      82    72055296 :       rxt_rates(:ncol,:,    72) = rxt_rates(:ncol,:,    72)*sol(:ncol,:,   223)                                                ! rate_const*XYLENOOH
      83    72055296 :       rxt_rates(:ncol,:,    73) = rxt_rates(:ncol,:,    73)*sol(:ncol,:,   226)                                                ! rate_const*XYLOLOOH
      84    72055296 :       rxt_rates(:ncol,:,    74) = rxt_rates(:ncol,:,    74)*sol(:ncol,:,    20)                                                ! rate_const*BRCL
      85    72055296 :       rxt_rates(:ncol,:,    75) = rxt_rates(:ncol,:,    75)*sol(:ncol,:,    21)                                                ! rate_const*BRO
      86    72055296 :       rxt_rates(:ncol,:,    76) = rxt_rates(:ncol,:,    76)*sol(:ncol,:,    22)                                                ! rate_const*BRONO2
      87    72055296 :       rxt_rates(:ncol,:,    77) = rxt_rates(:ncol,:,    77)*sol(:ncol,:,    22)                                                ! rate_const*BRONO2
      88    72055296 :       rxt_rates(:ncol,:,    78) = rxt_rates(:ncol,:,    78)*sol(:ncol,:,    35)                                                ! rate_const*CCL4
      89    72055296 :       rxt_rates(:ncol,:,    79) = rxt_rates(:ncol,:,    79)*sol(:ncol,:,    36)                                                ! rate_const*CF2CLBR
      90    72055296 :       rxt_rates(:ncol,:,    80) = rxt_rates(:ncol,:,    80)*sol(:ncol,:,    37)                                                ! rate_const*CF3BR
      91    72055296 :       rxt_rates(:ncol,:,    81) = rxt_rates(:ncol,:,    81)*sol(:ncol,:,    38)                                                ! rate_const*CFC11
      92    72055296 :       rxt_rates(:ncol,:,    82) = rxt_rates(:ncol,:,    82)*sol(:ncol,:,    39)                                                ! rate_const*CFC113
      93    72055296 :       rxt_rates(:ncol,:,    83) = rxt_rates(:ncol,:,    83)*sol(:ncol,:,    40)                                                ! rate_const*CFC114
      94    72055296 :       rxt_rates(:ncol,:,    84) = rxt_rates(:ncol,:,    84)*sol(:ncol,:,    41)                                                ! rate_const*CFC115
      95    72055296 :       rxt_rates(:ncol,:,    85) = rxt_rates(:ncol,:,    85)*sol(:ncol,:,    42)                                                ! rate_const*CFC12
      96    72055296 :       rxt_rates(:ncol,:,    86) = rxt_rates(:ncol,:,    86)*sol(:ncol,:,    43)                                                ! rate_const*CH2BR2
      97    72055296 :       rxt_rates(:ncol,:,    87) = rxt_rates(:ncol,:,    87)*sol(:ncol,:,    45)                                                ! rate_const*CH3BR
      98    72055296 :       rxt_rates(:ncol,:,    88) = rxt_rates(:ncol,:,    88)*sol(:ncol,:,    46)                                                ! rate_const*CH3CCL3
      99    72055296 :       rxt_rates(:ncol,:,    89) = rxt_rates(:ncol,:,    89)*sol(:ncol,:,    48)                                                ! rate_const*CH3CL
     100    72055296 :       rxt_rates(:ncol,:,    90) = rxt_rates(:ncol,:,    90)*sol(:ncol,:,    57)                                                ! rate_const*CHBR3
     101    72055296 :       rxt_rates(:ncol,:,    91) = rxt_rates(:ncol,:,    91)*sol(:ncol,:,    59)                                                ! rate_const*CL2
     102    72055296 :       rxt_rates(:ncol,:,    92) = rxt_rates(:ncol,:,    92)*sol(:ncol,:,    60)                                                ! rate_const*CL2O2
     103    72055296 :       rxt_rates(:ncol,:,    93) = rxt_rates(:ncol,:,    93)*sol(:ncol,:,    61)                                                ! rate_const*CLO
     104    72055296 :       rxt_rates(:ncol,:,    94) = rxt_rates(:ncol,:,    94)*sol(:ncol,:,    62)                                                ! rate_const*CLONO2
     105    72055296 :       rxt_rates(:ncol,:,    95) = rxt_rates(:ncol,:,    95)*sol(:ncol,:,    62)                                                ! rate_const*CLONO2
     106    72055296 :       rxt_rates(:ncol,:,    96) = rxt_rates(:ncol,:,    96)*sol(:ncol,:,    66)                                                ! rate_const*COF2
     107    72055296 :       rxt_rates(:ncol,:,    97) = rxt_rates(:ncol,:,    97)*sol(:ncol,:,    67)                                                ! rate_const*COFCL
     108    72055296 :       rxt_rates(:ncol,:,    98) = rxt_rates(:ncol,:,    98)*sol(:ncol,:,    80)                                                ! rate_const*H2402
     109    72055296 :       rxt_rates(:ncol,:,    99) = rxt_rates(:ncol,:,    99)*sol(:ncol,:,    83)                                                ! rate_const*HBR
     110    72055296 :       rxt_rates(:ncol,:,   100) = rxt_rates(:ncol,:,   100)*sol(:ncol,:,    84)                                                ! rate_const*HCFC141B
     111    72055296 :       rxt_rates(:ncol,:,   101) = rxt_rates(:ncol,:,   101)*sol(:ncol,:,    85)                                                ! rate_const*HCFC142B
     112    72055296 :       rxt_rates(:ncol,:,   102) = rxt_rates(:ncol,:,   102)*sol(:ncol,:,    86)                                                ! rate_const*HCFC22
     113    72055296 :       rxt_rates(:ncol,:,   103) = rxt_rates(:ncol,:,   103)*sol(:ncol,:,    87)                                                ! rate_const*HCL
     114    72055296 :       rxt_rates(:ncol,:,   104) = rxt_rates(:ncol,:,   104)*sol(:ncol,:,    90)                                                ! rate_const*HF
     115    72055296 :       rxt_rates(:ncol,:,   105) = rxt_rates(:ncol,:,   105)*sol(:ncol,:,    93)                                                ! rate_const*HOBR
     116    72055296 :       rxt_rates(:ncol,:,   106) = rxt_rates(:ncol,:,   106)*sol(:ncol,:,    94)                                                ! rate_const*HOCL
     117    72055296 :       rxt_rates(:ncol,:,   107) = rxt_rates(:ncol,:,   107)*sol(:ncol,:,   142)                                                ! rate_const*OCLO
     118    72055296 :       rxt_rates(:ncol,:,   108) = rxt_rates(:ncol,:,   108)*sol(:ncol,:,   157)                                                ! rate_const*SF6
     119    72055296 :       rxt_rates(:ncol,:,   109) = rxt_rates(:ncol,:,   109)*sol(:ncol,:,    82)                                                ! rate_const*H2SO4
     120    72055296 :       rxt_rates(:ncol,:,   110) = rxt_rates(:ncol,:,   110)*sol(:ncol,:,   143)                                                ! rate_const*OCS
     121    72055296 :       rxt_rates(:ncol,:,   111) = rxt_rates(:ncol,:,   111)*sol(:ncol,:,   158)                                                ! rate_const*SO
     122    72055296 :       rxt_rates(:ncol,:,   112) = rxt_rates(:ncol,:,   112)*sol(:ncol,:,   159)                                                ! rate_const*SO2
     123    72055296 :       rxt_rates(:ncol,:,   113) = rxt_rates(:ncol,:,   113)*sol(:ncol,:,   160)                                                ! rate_const*SO3
     124    72055296 :       rxt_rates(:ncol,:,   114) = rxt_rates(:ncol,:,   114)*sol(:ncol,:,   165)                                                ! rate_const*soabb1_a1
     125    72055296 :       rxt_rates(:ncol,:,   115) = rxt_rates(:ncol,:,   115)*sol(:ncol,:,   166)                                                ! rate_const*soabb1_a2
     126    72055296 :       rxt_rates(:ncol,:,   116) = rxt_rates(:ncol,:,   116)*sol(:ncol,:,   167)                                                ! rate_const*soabb2_a1
     127    72055296 :       rxt_rates(:ncol,:,   117) = rxt_rates(:ncol,:,   117)*sol(:ncol,:,   168)                                                ! rate_const*soabb2_a2
     128    72055296 :       rxt_rates(:ncol,:,   118) = rxt_rates(:ncol,:,   118)*sol(:ncol,:,   169)                                                ! rate_const*soabb3_a1
     129    72055296 :       rxt_rates(:ncol,:,   119) = rxt_rates(:ncol,:,   119)*sol(:ncol,:,   170)                                                ! rate_const*soabb3_a2
     130    72055296 :       rxt_rates(:ncol,:,   120) = rxt_rates(:ncol,:,   120)*sol(:ncol,:,   171)                                                ! rate_const*soabb4_a1
     131    72055296 :       rxt_rates(:ncol,:,   121) = rxt_rates(:ncol,:,   121)*sol(:ncol,:,   172)                                                ! rate_const*soabb4_a2
     132    72055296 :       rxt_rates(:ncol,:,   122) = rxt_rates(:ncol,:,   122)*sol(:ncol,:,   173)                                                ! rate_const*soabb5_a1
     133    72055296 :       rxt_rates(:ncol,:,   123) = rxt_rates(:ncol,:,   123)*sol(:ncol,:,   174)                                                ! rate_const*soabb5_a2
     134    72055296 :       rxt_rates(:ncol,:,   124) = rxt_rates(:ncol,:,   124)*sol(:ncol,:,   175)                                                ! rate_const*soabg1_a1
     135    72055296 :       rxt_rates(:ncol,:,   125) = rxt_rates(:ncol,:,   125)*sol(:ncol,:,   176)                                                ! rate_const*soabg1_a2
     136    72055296 :       rxt_rates(:ncol,:,   126) = rxt_rates(:ncol,:,   126)*sol(:ncol,:,   177)                                                ! rate_const*soabg2_a1
     137    72055296 :       rxt_rates(:ncol,:,   127) = rxt_rates(:ncol,:,   127)*sol(:ncol,:,   178)                                                ! rate_const*soabg2_a2
     138    72055296 :       rxt_rates(:ncol,:,   128) = rxt_rates(:ncol,:,   128)*sol(:ncol,:,   179)                                                ! rate_const*soabg3_a1
     139    72055296 :       rxt_rates(:ncol,:,   129) = rxt_rates(:ncol,:,   129)*sol(:ncol,:,   180)                                                ! rate_const*soabg3_a2
     140    72055296 :       rxt_rates(:ncol,:,   130) = rxt_rates(:ncol,:,   130)*sol(:ncol,:,   181)                                                ! rate_const*soabg4_a1
     141    72055296 :       rxt_rates(:ncol,:,   131) = rxt_rates(:ncol,:,   131)*sol(:ncol,:,   182)                                                ! rate_const*soabg4_a2
     142    72055296 :       rxt_rates(:ncol,:,   132) = rxt_rates(:ncol,:,   132)*sol(:ncol,:,   183)                                                ! rate_const*soabg5_a1
     143    72055296 :       rxt_rates(:ncol,:,   133) = rxt_rates(:ncol,:,   133)*sol(:ncol,:,   184)                                                ! rate_const*soabg5_a2
     144    72055296 :       rxt_rates(:ncol,:,   134) = rxt_rates(:ncol,:,   134)*sol(:ncol,:,   185)                                                ! rate_const*soaff1_a1
     145    72055296 :       rxt_rates(:ncol,:,   135) = rxt_rates(:ncol,:,   135)*sol(:ncol,:,   186)                                                ! rate_const*soaff1_a2
     146    72055296 :       rxt_rates(:ncol,:,   136) = rxt_rates(:ncol,:,   136)*sol(:ncol,:,   187)                                                ! rate_const*soaff2_a1
     147    72055296 :       rxt_rates(:ncol,:,   137) = rxt_rates(:ncol,:,   137)*sol(:ncol,:,   188)                                                ! rate_const*soaff2_a2
     148    72055296 :       rxt_rates(:ncol,:,   138) = rxt_rates(:ncol,:,   138)*sol(:ncol,:,   189)                                                ! rate_const*soaff3_a1
     149    72055296 :       rxt_rates(:ncol,:,   139) = rxt_rates(:ncol,:,   139)*sol(:ncol,:,   190)                                                ! rate_const*soaff3_a2
     150    72055296 :       rxt_rates(:ncol,:,   140) = rxt_rates(:ncol,:,   140)*sol(:ncol,:,   191)                                                ! rate_const*soaff4_a1
     151    72055296 :       rxt_rates(:ncol,:,   141) = rxt_rates(:ncol,:,   141)*sol(:ncol,:,   192)                                                ! rate_const*soaff4_a2
     152    72055296 :       rxt_rates(:ncol,:,   142) = rxt_rates(:ncol,:,   142)*sol(:ncol,:,   193)                                                ! rate_const*soaff5_a1
     153    72055296 :       rxt_rates(:ncol,:,   143) = rxt_rates(:ncol,:,   143)*sol(:ncol,:,   194)                                                ! rate_const*soaff5_a2
     154    72055296 :       rxt_rates(:ncol,:,   144) = rxt_rates(:ncol,:,   144)*sol(:ncol,:,   252)*sol(:ncol,:,    79)                            ! rate_const*O1D*H2
     155    72055296 :       rxt_rates(:ncol,:,   145) = rxt_rates(:ncol,:,   145)*sol(:ncol,:,   252)*sol(:ncol,:,   263)                            ! rate_const*O1D*H2O
     156    72055296 :       rxt_rates(:ncol,:,   146) = rxt_rates(:ncol,:,   146)*sol(:ncol,:,   252)                                                ! rate_const*N2*O1D
     157    72055296 :       rxt_rates(:ncol,:,   147) = rxt_rates(:ncol,:,   147)*sol(:ncol,:,   252)                                                ! rate_const*O2*O1D
     158    72055296 :       rxt_rates(:ncol,:,   148) = rxt_rates(:ncol,:,   148)*sol(:ncol,:,   252)*sol(:ncol,:,   140)                            ! rate_const*O1D*O3
     159    72055296 :       rxt_rates(:ncol,:,   149) = rxt_rates(:ncol,:,   149)*sol(:ncol,:,   139)*sol(:ncol,:,   140)                            ! rate_const*O*O3
     160    72055296 :       rxt_rates(:ncol,:,   150) = rxt_rates(:ncol,:,   150)*sol(:ncol,:,   139)*sol(:ncol,:,   139)                            ! rate_const*M*O*O
     161    72055296 :       rxt_rates(:ncol,:,   151) = rxt_rates(:ncol,:,   151)*sol(:ncol,:,   139)                                                ! rate_const*O2*M*O
     162    72055296 :       rxt_rates(:ncol,:,   152) = rxt_rates(:ncol,:,   152)*sol(:ncol,:,    79)*sol(:ncol,:,   139)                            ! rate_const*H2*O
     163    72055296 :       rxt_rates(:ncol,:,   153) = rxt_rates(:ncol,:,   153)*sol(:ncol,:,    81)*sol(:ncol,:,   139)                            ! rate_const*H2O2*O
     164    72055296 :       rxt_rates(:ncol,:,   154) = rxt_rates(:ncol,:,   154)*sol(:ncol,:,    78)*sol(:ncol,:,   242)                            ! rate_const*H*HO2
     165    72055296 :       rxt_rates(:ncol,:,   155) = rxt_rates(:ncol,:,   155)*sol(:ncol,:,    78)*sol(:ncol,:,   242)                            ! rate_const*H*HO2
     166    72055296 :       rxt_rates(:ncol,:,   156) = rxt_rates(:ncol,:,   156)*sol(:ncol,:,    78)*sol(:ncol,:,   242)                            ! rate_const*H*HO2
     167    72055296 :       rxt_rates(:ncol,:,   157) = rxt_rates(:ncol,:,   157)*sol(:ncol,:,    78)                                                ! rate_const*O2*M*H
     168    72055296 :       rxt_rates(:ncol,:,   158) = rxt_rates(:ncol,:,   158)*sol(:ncol,:,   242)*sol(:ncol,:,   139)                            ! rate_const*HO2*O
     169    72055296 :       rxt_rates(:ncol,:,   159) = rxt_rates(:ncol,:,   159)*sol(:ncol,:,   242)*sol(:ncol,:,   140)                            ! rate_const*HO2*O3
     170    72055296 :       rxt_rates(:ncol,:,   160) = rxt_rates(:ncol,:,   160)*sol(:ncol,:,    78)*sol(:ncol,:,   140)                            ! rate_const*H*O3
     171    72055296 :       rxt_rates(:ncol,:,   161) = rxt_rates(:ncol,:,   161)*sol(:ncol,:,   253)*sol(:ncol,:,    79)                            ! rate_const*OH*H2
     172    72055296 :       rxt_rates(:ncol,:,   162) = rxt_rates(:ncol,:,   162)*sol(:ncol,:,   253)*sol(:ncol,:,    81)                            ! rate_const*OH*H2O2
     173    72055296 :       rxt_rates(:ncol,:,   163) = rxt_rates(:ncol,:,   163)*sol(:ncol,:,   253)*sol(:ncol,:,   242)                            ! rate_const*OH*HO2
     174    72055296 :       rxt_rates(:ncol,:,   164) = rxt_rates(:ncol,:,   164)*sol(:ncol,:,   253)*sol(:ncol,:,   139)                            ! rate_const*OH*O
     175    72055296 :       rxt_rates(:ncol,:,   165) = rxt_rates(:ncol,:,   165)*sol(:ncol,:,   253)*sol(:ncol,:,   140)                            ! rate_const*OH*O3
     176    72055296 :       rxt_rates(:ncol,:,   166) = rxt_rates(:ncol,:,   166)*sol(:ncol,:,   253)*sol(:ncol,:,   253)                            ! rate_const*OH*OH
     177    72055296 :       rxt_rates(:ncol,:,   167) = rxt_rates(:ncol,:,   167)*sol(:ncol,:,   253)*sol(:ncol,:,   253)                            ! rate_const*M*OH*OH
     178    72055296 :       rxt_rates(:ncol,:,   168) = rxt_rates(:ncol,:,   168)*sol(:ncol,:,   242)*sol(:ncol,:,   242)                            ! rate_const*HO2*HO2
     179    72055296 :       rxt_rates(:ncol,:,   169) = rxt_rates(:ncol,:,   169)*sol(:ncol,:,    92)*sol(:ncol,:,   253)                            ! rate_const*HO2NO2*OH
     180    72055296 :       rxt_rates(:ncol,:,   170) = rxt_rates(:ncol,:,   170)*sol(:ncol,:,   119)*sol(:ncol,:,   129)                            ! rate_const*N*NO
     181    72055296 :       rxt_rates(:ncol,:,   171) = rxt_rates(:ncol,:,   171)*sol(:ncol,:,   119)*sol(:ncol,:,   130)                            ! rate_const*N*NO2
     182    72055296 :       rxt_rates(:ncol,:,   172) = rxt_rates(:ncol,:,   172)*sol(:ncol,:,   119)*sol(:ncol,:,   130)                            ! rate_const*N*NO2
     183    72055296 :       rxt_rates(:ncol,:,   173) = rxt_rates(:ncol,:,   173)*sol(:ncol,:,   119)*sol(:ncol,:,   130)                            ! rate_const*N*NO2
     184    72055296 :       rxt_rates(:ncol,:,   174) = rxt_rates(:ncol,:,   174)*sol(:ncol,:,   119)                                                ! rate_const*O2*N
     185    72055296 :       rxt_rates(:ncol,:,   175) = rxt_rates(:ncol,:,   175)*sol(:ncol,:,   130)*sol(:ncol,:,   139)                            ! rate_const*NO2*O
     186    72055296 :       rxt_rates(:ncol,:,   176) = rxt_rates(:ncol,:,   176)*sol(:ncol,:,   130)*sol(:ncol,:,   140)                            ! rate_const*NO2*O3
     187    72055296 :       rxt_rates(:ncol,:,   177) = rxt_rates(:ncol,:,   177)*sol(:ncol,:,   130)*sol(:ncol,:,   139)                            ! rate_const*M*NO2*O
     188    72055296 :       rxt_rates(:ncol,:,   178) = rxt_rates(:ncol,:,   178)*sol(:ncol,:,   131)*sol(:ncol,:,   242)                            ! rate_const*NO3*HO2
     189    72055296 :       rxt_rates(:ncol,:,   179) = rxt_rates(:ncol,:,   179)*sol(:ncol,:,   131)*sol(:ncol,:,   129)                            ! rate_const*NO3*NO
     190    72055296 :       rxt_rates(:ncol,:,   180) = rxt_rates(:ncol,:,   180)*sol(:ncol,:,   131)*sol(:ncol,:,   139)                            ! rate_const*NO3*O
     191    72055296 :       rxt_rates(:ncol,:,   181) = rxt_rates(:ncol,:,   181)*sol(:ncol,:,   131)*sol(:ncol,:,   253)                            ! rate_const*NO3*OH
     192    72055296 :       rxt_rates(:ncol,:,   182) = rxt_rates(:ncol,:,   182)*sol(:ncol,:,   119)*sol(:ncol,:,   253)                            ! rate_const*N*OH
     193    72055296 :       rxt_rates(:ncol,:,   183) = rxt_rates(:ncol,:,   183)*sol(:ncol,:,   129)*sol(:ncol,:,   242)                            ! rate_const*NO*HO2
     194    72055296 :       rxt_rates(:ncol,:,   184) = rxt_rates(:ncol,:,   184)*sol(:ncol,:,   129)*sol(:ncol,:,   140)                            ! rate_const*NO*O3
     195    72055296 :       rxt_rates(:ncol,:,   185) = rxt_rates(:ncol,:,   185)*sol(:ncol,:,   129)*sol(:ncol,:,   139)                            ! rate_const*M*NO*O
     196    72055296 :       rxt_rates(:ncol,:,   186) = rxt_rates(:ncol,:,   186)*sol(:ncol,:,   252)*sol(:ncol,:,   120)                            ! rate_const*O1D*N2O
     197    72055296 :       rxt_rates(:ncol,:,   187) = rxt_rates(:ncol,:,   187)*sol(:ncol,:,   252)*sol(:ncol,:,   120)                            ! rate_const*O1D*N2O
     198    72055296 :       rxt_rates(:ncol,:,   188) = rxt_rates(:ncol,:,   188)*sol(:ncol,:,   130)*sol(:ncol,:,   242)                            ! rate_const*M*NO2*HO2
     199    72055296 :       rxt_rates(:ncol,:,   189) = rxt_rates(:ncol,:,   189)*sol(:ncol,:,   130)*sol(:ncol,:,   131)                            ! rate_const*M*NO2*NO3
     200    72055296 :       rxt_rates(:ncol,:,   190) = rxt_rates(:ncol,:,   190)*sol(:ncol,:,   130)*sol(:ncol,:,   253)                            ! rate_const*M*NO2*OH
     201    72055296 :       rxt_rates(:ncol,:,   191) = rxt_rates(:ncol,:,   191)*sol(:ncol,:,    91)*sol(:ncol,:,   253)                            ! rate_const*HNO3*OH
     202    72055296 :       rxt_rates(:ncol,:,   192) = rxt_rates(:ncol,:,   192)*sol(:ncol,:,    92)                                                ! rate_const*M*HO2NO2
     203    72055296 :       rxt_rates(:ncol,:,   193) = rxt_rates(:ncol,:,   193)*sol(:ncol,:,   121)                                                ! rate_const*M*N2O5
     204    72055296 :       rxt_rates(:ncol,:,   194) = rxt_rates(:ncol,:,   194)*sol(:ncol,:,    58)*sol(:ncol,:,    44)                            ! rate_const*CL*CH2O
     205    72055296 :       rxt_rates(:ncol,:,   195) = rxt_rates(:ncol,:,   195)*sol(:ncol,:,    58)*sol(:ncol,:,    56)                            ! rate_const*CL*CH4
     206    72055296 :       rxt_rates(:ncol,:,   196) = rxt_rates(:ncol,:,   196)*sol(:ncol,:,    58)*sol(:ncol,:,    79)                            ! rate_const*CL*H2
     207    72055296 :       rxt_rates(:ncol,:,   197) = rxt_rates(:ncol,:,   197)*sol(:ncol,:,    58)*sol(:ncol,:,    81)                            ! rate_const*CL*H2O2
     208    72055296 :       rxt_rates(:ncol,:,   198) = rxt_rates(:ncol,:,   198)*sol(:ncol,:,    58)*sol(:ncol,:,   242)                            ! rate_const*CL*HO2
     209    72055296 :       rxt_rates(:ncol,:,   199) = rxt_rates(:ncol,:,   199)*sol(:ncol,:,    58)*sol(:ncol,:,   242)                            ! rate_const*CL*HO2
     210    72055296 :       rxt_rates(:ncol,:,   200) = rxt_rates(:ncol,:,   200)*sol(:ncol,:,    58)*sol(:ncol,:,   140)                            ! rate_const*CL*O3
     211    72055296 :       rxt_rates(:ncol,:,   201) = rxt_rates(:ncol,:,   201)*sol(:ncol,:,    61)*sol(:ncol,:,   237)                            ! rate_const*CLO*CH3O2
     212    72055296 :       rxt_rates(:ncol,:,   202) = rxt_rates(:ncol,:,   202)*sol(:ncol,:,    61)*sol(:ncol,:,    61)                            ! rate_const*CLO*CLO
     213    72055296 :       rxt_rates(:ncol,:,   203) = rxt_rates(:ncol,:,   203)*sol(:ncol,:,    61)*sol(:ncol,:,    61)                            ! rate_const*CLO*CLO
     214    72055296 :       rxt_rates(:ncol,:,   204) = rxt_rates(:ncol,:,   204)*sol(:ncol,:,    61)*sol(:ncol,:,    61)                            ! rate_const*CLO*CLO
     215    72055296 :       rxt_rates(:ncol,:,   205) = rxt_rates(:ncol,:,   205)*sol(:ncol,:,    61)*sol(:ncol,:,   242)                            ! rate_const*CLO*HO2
     216    72055296 :       rxt_rates(:ncol,:,   206) = rxt_rates(:ncol,:,   206)*sol(:ncol,:,    61)*sol(:ncol,:,   129)                            ! rate_const*CLO*NO
     217    72055296 :       rxt_rates(:ncol,:,   207) = rxt_rates(:ncol,:,   207)*sol(:ncol,:,    62)*sol(:ncol,:,    58)                            ! rate_const*CLONO2*CL
     218    72055296 :       rxt_rates(:ncol,:,   208) = rxt_rates(:ncol,:,   208)*sol(:ncol,:,    61)*sol(:ncol,:,   130)                            ! rate_const*M*CLO*NO2
     219    72055296 :       rxt_rates(:ncol,:,   209) = rxt_rates(:ncol,:,   209)*sol(:ncol,:,    62)*sol(:ncol,:,   139)                            ! rate_const*CLONO2*O
     220    72055296 :       rxt_rates(:ncol,:,   210) = rxt_rates(:ncol,:,   210)*sol(:ncol,:,    62)*sol(:ncol,:,   253)                            ! rate_const*CLONO2*OH
     221    72055296 :       rxt_rates(:ncol,:,   211) = rxt_rates(:ncol,:,   211)*sol(:ncol,:,    61)*sol(:ncol,:,   139)                            ! rate_const*CLO*O
     222    72055296 :       rxt_rates(:ncol,:,   212) = rxt_rates(:ncol,:,   212)*sol(:ncol,:,    61)*sol(:ncol,:,   253)                            ! rate_const*CLO*OH
     223    72055296 :       rxt_rates(:ncol,:,   213) = rxt_rates(:ncol,:,   213)*sol(:ncol,:,    61)*sol(:ncol,:,   253)                            ! rate_const*CLO*OH
     224    72055296 :       rxt_rates(:ncol,:,   214) = rxt_rates(:ncol,:,   214)*sol(:ncol,:,    87)*sol(:ncol,:,   139)                            ! rate_const*HCL*O
     225    72055296 :       rxt_rates(:ncol,:,   215) = rxt_rates(:ncol,:,   215)*sol(:ncol,:,    87)*sol(:ncol,:,   253)                            ! rate_const*HCL*OH
     226    72055296 :       rxt_rates(:ncol,:,   216) = rxt_rates(:ncol,:,   216)*sol(:ncol,:,    94)*sol(:ncol,:,    58)                            ! rate_const*HOCL*CL
     227    72055296 :       rxt_rates(:ncol,:,   217) = rxt_rates(:ncol,:,   217)*sol(:ncol,:,    94)*sol(:ncol,:,   139)                            ! rate_const*HOCL*O
     228    72055296 :       rxt_rates(:ncol,:,   218) = rxt_rates(:ncol,:,   218)*sol(:ncol,:,    94)*sol(:ncol,:,   253)                            ! rate_const*HOCL*OH
     229    72055296 :       rxt_rates(:ncol,:,   219) = rxt_rates(:ncol,:,   219)*sol(:ncol,:,   252)*sol(:ncol,:,    35)                            ! rate_const*O1D*CCL4
     230    72055296 :       rxt_rates(:ncol,:,   220) = rxt_rates(:ncol,:,   220)*sol(:ncol,:,   252)*sol(:ncol,:,    36)                            ! rate_const*O1D*CF2CLBR
     231    72055296 :       rxt_rates(:ncol,:,   221) = rxt_rates(:ncol,:,   221)*sol(:ncol,:,   252)*sol(:ncol,:,    38)                            ! rate_const*O1D*CFC11
     232    72055296 :       rxt_rates(:ncol,:,   222) = rxt_rates(:ncol,:,   222)*sol(:ncol,:,   252)*sol(:ncol,:,    39)                            ! rate_const*O1D*CFC113
     233    72055296 :       rxt_rates(:ncol,:,   223) = rxt_rates(:ncol,:,   223)*sol(:ncol,:,   252)*sol(:ncol,:,    40)                            ! rate_const*O1D*CFC114
     234    72055296 :       rxt_rates(:ncol,:,   224) = rxt_rates(:ncol,:,   224)*sol(:ncol,:,   252)*sol(:ncol,:,    41)                            ! rate_const*O1D*CFC115
     235    72055296 :       rxt_rates(:ncol,:,   225) = rxt_rates(:ncol,:,   225)*sol(:ncol,:,   252)*sol(:ncol,:,    42)                            ! rate_const*O1D*CFC12
     236    72055296 :       rxt_rates(:ncol,:,   226) = rxt_rates(:ncol,:,   226)*sol(:ncol,:,   252)*sol(:ncol,:,    87)                            ! rate_const*O1D*HCL
     237    72055296 :       rxt_rates(:ncol,:,   227) = rxt_rates(:ncol,:,   227)*sol(:ncol,:,   252)*sol(:ncol,:,    87)                            ! rate_const*O1D*HCL
     238    72055296 :       rxt_rates(:ncol,:,   228) = rxt_rates(:ncol,:,   228)*sol(:ncol,:,    61)*sol(:ncol,:,    61)                            ! rate_const*M*CLO*CLO
     239    72055296 :       rxt_rates(:ncol,:,   229) = rxt_rates(:ncol,:,   229)*sol(:ncol,:,    60)                                                ! rate_const*M*CL2O2
     240    72055296 :       rxt_rates(:ncol,:,   230) = rxt_rates(:ncol,:,   230)*sol(:ncol,:,    19)*sol(:ncol,:,    44)                            ! rate_const*BR*CH2O
     241    72055296 :       rxt_rates(:ncol,:,   231) = rxt_rates(:ncol,:,   231)*sol(:ncol,:,    19)*sol(:ncol,:,   242)                            ! rate_const*BR*HO2
     242    72055296 :       rxt_rates(:ncol,:,   232) = rxt_rates(:ncol,:,   232)*sol(:ncol,:,    19)*sol(:ncol,:,   140)                            ! rate_const*BR*O3
     243    72055296 :       rxt_rates(:ncol,:,   233) = rxt_rates(:ncol,:,   233)*sol(:ncol,:,    21)*sol(:ncol,:,    21)                            ! rate_const*BRO*BRO
     244    72055296 :       rxt_rates(:ncol,:,   234) = rxt_rates(:ncol,:,   234)*sol(:ncol,:,    21)*sol(:ncol,:,    61)                            ! rate_const*BRO*CLO
     245    72055296 :       rxt_rates(:ncol,:,   235) = rxt_rates(:ncol,:,   235)*sol(:ncol,:,    21)*sol(:ncol,:,    61)                            ! rate_const*BRO*CLO
     246    72055296 :       rxt_rates(:ncol,:,   236) = rxt_rates(:ncol,:,   236)*sol(:ncol,:,    21)*sol(:ncol,:,    61)                            ! rate_const*BRO*CLO
     247    72055296 :       rxt_rates(:ncol,:,   237) = rxt_rates(:ncol,:,   237)*sol(:ncol,:,    21)*sol(:ncol,:,   242)                            ! rate_const*BRO*HO2
     248    72055296 :       rxt_rates(:ncol,:,   238) = rxt_rates(:ncol,:,   238)*sol(:ncol,:,    21)*sol(:ncol,:,   129)                            ! rate_const*BRO*NO
     249    72055296 :       rxt_rates(:ncol,:,   239) = rxt_rates(:ncol,:,   239)*sol(:ncol,:,    21)*sol(:ncol,:,   130)                            ! rate_const*M*BRO*NO2
     250    72055296 :       rxt_rates(:ncol,:,   240) = rxt_rates(:ncol,:,   240)*sol(:ncol,:,    22)*sol(:ncol,:,   139)                            ! rate_const*BRONO2*O
     251    72055296 :       rxt_rates(:ncol,:,   241) = rxt_rates(:ncol,:,   241)*sol(:ncol,:,    21)*sol(:ncol,:,   139)                            ! rate_const*BRO*O
     252    72055296 :       rxt_rates(:ncol,:,   242) = rxt_rates(:ncol,:,   242)*sol(:ncol,:,    21)*sol(:ncol,:,   253)                            ! rate_const*BRO*OH
     253    72055296 :       rxt_rates(:ncol,:,   243) = rxt_rates(:ncol,:,   243)*sol(:ncol,:,    83)*sol(:ncol,:,   139)                            ! rate_const*HBR*O
     254    72055296 :       rxt_rates(:ncol,:,   244) = rxt_rates(:ncol,:,   244)*sol(:ncol,:,    83)*sol(:ncol,:,   253)                            ! rate_const*HBR*OH
     255    72055296 :       rxt_rates(:ncol,:,   245) = rxt_rates(:ncol,:,   245)*sol(:ncol,:,    93)*sol(:ncol,:,   139)                            ! rate_const*HOBR*O
     256    72055296 :       rxt_rates(:ncol,:,   246) = rxt_rates(:ncol,:,   246)*sol(:ncol,:,   252)*sol(:ncol,:,    37)                            ! rate_const*O1D*CF3BR
     257    72055296 :       rxt_rates(:ncol,:,   247) = rxt_rates(:ncol,:,   247)*sol(:ncol,:,   252)*sol(:ncol,:,    57)                            ! rate_const*O1D*CHBR3
     258    72055296 :       rxt_rates(:ncol,:,   248) = rxt_rates(:ncol,:,   248)*sol(:ncol,:,   252)*sol(:ncol,:,    80)                            ! rate_const*O1D*H2402
     259    72055296 :       rxt_rates(:ncol,:,   249) = rxt_rates(:ncol,:,   249)*sol(:ncol,:,   252)*sol(:ncol,:,    83)                            ! rate_const*O1D*HBR
     260    72055296 :       rxt_rates(:ncol,:,   250) = rxt_rates(:ncol,:,   250)*sol(:ncol,:,   252)*sol(:ncol,:,    83)                            ! rate_const*O1D*HBR
     261    72055296 :       rxt_rates(:ncol,:,   251) = rxt_rates(:ncol,:,   251)*sol(:ncol,:,    75)*sol(:ncol,:,    56)                            ! rate_const*F*CH4
     262    72055296 :       rxt_rates(:ncol,:,   252) = rxt_rates(:ncol,:,   252)*sol(:ncol,:,    75)*sol(:ncol,:,    79)                            ! rate_const*F*H2
     263    72055296 :       rxt_rates(:ncol,:,   253) = rxt_rates(:ncol,:,   253)*sol(:ncol,:,    75)*sol(:ncol,:,   263)                            ! rate_const*F*H2O
     264    72055296 :       rxt_rates(:ncol,:,   254) = rxt_rates(:ncol,:,   254)*sol(:ncol,:,    75)*sol(:ncol,:,    91)                            ! rate_const*F*HNO3
     265    72055296 :       rxt_rates(:ncol,:,   255) = rxt_rates(:ncol,:,   255)*sol(:ncol,:,   252)*sol(:ncol,:,    66)                            ! rate_const*O1D*COF2
     266    72055296 :       rxt_rates(:ncol,:,   256) = rxt_rates(:ncol,:,   256)*sol(:ncol,:,   252)*sol(:ncol,:,    67)                            ! rate_const*O1D*COFCL
     267    72055296 :       rxt_rates(:ncol,:,   257) = rxt_rates(:ncol,:,   257)*sol(:ncol,:,    43)*sol(:ncol,:,    58)                            ! rate_const*CH2BR2*CL
     268    72055296 :       rxt_rates(:ncol,:,   258) = rxt_rates(:ncol,:,   258)*sol(:ncol,:,    43)*sol(:ncol,:,   253)                            ! rate_const*CH2BR2*OH
     269    72055296 :       rxt_rates(:ncol,:,   259) = rxt_rates(:ncol,:,   259)*sol(:ncol,:,    45)*sol(:ncol,:,    58)                            ! rate_const*CH3BR*CL
     270    72055296 :       rxt_rates(:ncol,:,   260) = rxt_rates(:ncol,:,   260)*sol(:ncol,:,    45)*sol(:ncol,:,   253)                            ! rate_const*CH3BR*OH
     271    72055296 :       rxt_rates(:ncol,:,   261) = rxt_rates(:ncol,:,   261)*sol(:ncol,:,    46)*sol(:ncol,:,   253)                            ! rate_const*CH3CCL3*OH
     272    72055296 :       rxt_rates(:ncol,:,   262) = rxt_rates(:ncol,:,   262)*sol(:ncol,:,    48)*sol(:ncol,:,    58)                            ! rate_const*CH3CL*CL
     273    72055296 :       rxt_rates(:ncol,:,   263) = rxt_rates(:ncol,:,   263)*sol(:ncol,:,    48)*sol(:ncol,:,   253)                            ! rate_const*CH3CL*OH
     274    72055296 :       rxt_rates(:ncol,:,   264) = rxt_rates(:ncol,:,   264)*sol(:ncol,:,    57)*sol(:ncol,:,    58)                            ! rate_const*CHBR3*CL
     275    72055296 :       rxt_rates(:ncol,:,   265) = rxt_rates(:ncol,:,   265)*sol(:ncol,:,    57)*sol(:ncol,:,   253)                            ! rate_const*CHBR3*OH
     276    72055296 :       rxt_rates(:ncol,:,   266) = rxt_rates(:ncol,:,   266)*sol(:ncol,:,    84)*sol(:ncol,:,   253)                            ! rate_const*HCFC141B*OH
     277    72055296 :       rxt_rates(:ncol,:,   267) = rxt_rates(:ncol,:,   267)*sol(:ncol,:,    85)*sol(:ncol,:,   253)                            ! rate_const*HCFC142B*OH
     278    72055296 :       rxt_rates(:ncol,:,   268) = rxt_rates(:ncol,:,   268)*sol(:ncol,:,    86)*sol(:ncol,:,   253)                            ! rate_const*HCFC22*OH
     279    72055296 :       rxt_rates(:ncol,:,   269) = rxt_rates(:ncol,:,   269)*sol(:ncol,:,   252)*sol(:ncol,:,    43)                            ! rate_const*O1D*CH2BR2
     280    72055296 :       rxt_rates(:ncol,:,   270) = rxt_rates(:ncol,:,   270)*sol(:ncol,:,   252)*sol(:ncol,:,    45)                            ! rate_const*O1D*CH3BR
     281    72055296 :       rxt_rates(:ncol,:,   271) = rxt_rates(:ncol,:,   271)*sol(:ncol,:,   252)*sol(:ncol,:,    84)                            ! rate_const*O1D*HCFC141B
     282    72055296 :       rxt_rates(:ncol,:,   272) = rxt_rates(:ncol,:,   272)*sol(:ncol,:,   252)*sol(:ncol,:,    85)                            ! rate_const*O1D*HCFC142B
     283    72055296 :       rxt_rates(:ncol,:,   273) = rxt_rates(:ncol,:,   273)*sol(:ncol,:,   252)*sol(:ncol,:,    86)                            ! rate_const*O1D*HCFC22
     284    72055296 :       rxt_rates(:ncol,:,   274) = rxt_rates(:ncol,:,   274)*sol(:ncol,:,    44)*sol(:ncol,:,   242)                            ! rate_const*CH2O*HO2
     285    72055296 :       rxt_rates(:ncol,:,   275) = rxt_rates(:ncol,:,   275)*sol(:ncol,:,    44)*sol(:ncol,:,   131)                            ! rate_const*CH2O*NO3
     286    72055296 :       rxt_rates(:ncol,:,   276) = rxt_rates(:ncol,:,   276)*sol(:ncol,:,    44)*sol(:ncol,:,   139)                            ! rate_const*CH2O*O
     287    72055296 :       rxt_rates(:ncol,:,   277) = rxt_rates(:ncol,:,   277)*sol(:ncol,:,    44)*sol(:ncol,:,   253)                            ! rate_const*CH2O*OH
     288    72055296 :       rxt_rates(:ncol,:,   278) = rxt_rates(:ncol,:,   278)*sol(:ncol,:,   237)*sol(:ncol,:,   237)                            ! rate_const*CH3O2*CH3O2
     289    72055296 :       rxt_rates(:ncol,:,   279) = rxt_rates(:ncol,:,   279)*sol(:ncol,:,   237)*sol(:ncol,:,   237)                            ! rate_const*CH3O2*CH3O2
     290    72055296 :       rxt_rates(:ncol,:,   280) = rxt_rates(:ncol,:,   280)*sol(:ncol,:,   237)*sol(:ncol,:,   242)                            ! rate_const*CH3O2*HO2
     291    72055296 :       rxt_rates(:ncol,:,   281) = rxt_rates(:ncol,:,   281)*sol(:ncol,:,   237)*sol(:ncol,:,   129)                            ! rate_const*CH3O2*NO
     292    72055296 :       rxt_rates(:ncol,:,   282) = rxt_rates(:ncol,:,   282)*sol(:ncol,:,    54)*sol(:ncol,:,   253)                            ! rate_const*CH3OH*OH
     293    72055296 :       rxt_rates(:ncol,:,   283) = rxt_rates(:ncol,:,   283)*sol(:ncol,:,    55)*sol(:ncol,:,   253)                            ! rate_const*CH3OOH*OH
     294    72055296 :       rxt_rates(:ncol,:,   284) = rxt_rates(:ncol,:,   284)*sol(:ncol,:,    56)*sol(:ncol,:,   253)                            ! rate_const*CH4*OH
     295    72055296 :       rxt_rates(:ncol,:,   285) = rxt_rates(:ncol,:,   285)*sol(:ncol,:,    88)*sol(:ncol,:,   253)                            ! rate_const*M*HCN*OH
     296    72055296 :       rxt_rates(:ncol,:,   286) = rxt_rates(:ncol,:,   286)*sol(:ncol,:,    89)*sol(:ncol,:,   253)                            ! rate_const*HCOOH*OH
     297    72055296 :       rxt_rates(:ncol,:,   287) = rxt_rates(:ncol,:,   287)*sol(:ncol,:,   243)*sol(:ncol,:,   242)                            ! rate_const*HOCH2OO*HO2
     298    72055296 :       rxt_rates(:ncol,:,   288) = rxt_rates(:ncol,:,   288)*sol(:ncol,:,   243)                                                ! rate_const*HOCH2OO
     299    72055296 :       rxt_rates(:ncol,:,   289) = rxt_rates(:ncol,:,   289)*sol(:ncol,:,   243)*sol(:ncol,:,   129)                            ! rate_const*HOCH2OO*NO
     300    72055296 :       rxt_rates(:ncol,:,   290) = rxt_rates(:ncol,:,   290)*sol(:ncol,:,   252)*sol(:ncol,:,    56)                            ! rate_const*O1D*CH4
     301    72055296 :       rxt_rates(:ncol,:,   291) = rxt_rates(:ncol,:,   291)*sol(:ncol,:,   252)*sol(:ncol,:,    56)                            ! rate_const*O1D*CH4
     302    72055296 :       rxt_rates(:ncol,:,   292) = rxt_rates(:ncol,:,   292)*sol(:ncol,:,   252)*sol(:ncol,:,    56)                            ! rate_const*O1D*CH4
     303    72055296 :       rxt_rates(:ncol,:,   293) = rxt_rates(:ncol,:,   293)*sol(:ncol,:,   252)*sol(:ncol,:,    88)                            ! rate_const*O1D*HCN
     304    72055296 :       rxt_rates(:ncol,:,   294) = rxt_rates(:ncol,:,   294)*sol(:ncol,:,    64)*sol(:ncol,:,   253)                            ! rate_const*CO*OH
     305    72055296 :       rxt_rates(:ncol,:,   295) = rxt_rates(:ncol,:,   295)*sol(:ncol,:,    26)*sol(:ncol,:,    58)                            ! rate_const*M*C2H2*CL
     306    72055296 :       rxt_rates(:ncol,:,   296) = rxt_rates(:ncol,:,   296)*sol(:ncol,:,    26)*sol(:ncol,:,   253)                            ! rate_const*M*C2H2*OH
     307    72055296 :       rxt_rates(:ncol,:,   297) = rxt_rates(:ncol,:,   297)*sol(:ncol,:,    27)*sol(:ncol,:,    58)                            ! rate_const*M*C2H4*CL
     308    72055296 :       rxt_rates(:ncol,:,   298) = rxt_rates(:ncol,:,   298)*sol(:ncol,:,    27)*sol(:ncol,:,   140)                            ! rate_const*C2H4*O3
     309    72055296 :       rxt_rates(:ncol,:,   299) = rxt_rates(:ncol,:,   299)*sol(:ncol,:,   233)*sol(:ncol,:,   233)                            ! rate_const*C2H5O2*C2H5O2
     310    72055296 :       rxt_rates(:ncol,:,   300) = rxt_rates(:ncol,:,   300)*sol(:ncol,:,   233)*sol(:ncol,:,   237)                            ! rate_const*C2H5O2*CH3O2
     311    72055296 :       rxt_rates(:ncol,:,   301) = rxt_rates(:ncol,:,   301)*sol(:ncol,:,   233)*sol(:ncol,:,   242)                            ! rate_const*C2H5O2*HO2
     312    72055296 :       rxt_rates(:ncol,:,   302) = rxt_rates(:ncol,:,   302)*sol(:ncol,:,   233)*sol(:ncol,:,   129)                            ! rate_const*C2H5O2*NO
     313    72055296 :       rxt_rates(:ncol,:,   303) = rxt_rates(:ncol,:,   303)*sol(:ncol,:,    28)*sol(:ncol,:,   253)                            ! rate_const*C2H5OH*OH
     314    72055296 :       rxt_rates(:ncol,:,   304) = rxt_rates(:ncol,:,   304)*sol(:ncol,:,    29)*sol(:ncol,:,   253)                            ! rate_const*C2H5OOH*OH
     315    72055296 :       rxt_rates(:ncol,:,   305) = rxt_rates(:ncol,:,   305)*sol(:ncol,:,    30)*sol(:ncol,:,    58)                            ! rate_const*C2H6*CL
     316    72055296 :       rxt_rates(:ncol,:,   306) = rxt_rates(:ncol,:,   306)*sol(:ncol,:,    30)*sol(:ncol,:,   253)                            ! rate_const*C2H6*OH
     317    72055296 :       rxt_rates(:ncol,:,   307) = rxt_rates(:ncol,:,   307)*sol(:ncol,:,    47)*sol(:ncol,:,   131)                            ! rate_const*CH3CHO*NO3
     318    72055296 :       rxt_rates(:ncol,:,   308) = rxt_rates(:ncol,:,   308)*sol(:ncol,:,    47)*sol(:ncol,:,   253)                            ! rate_const*CH3CHO*OH
     319    72055296 :       rxt_rates(:ncol,:,   309) = rxt_rates(:ncol,:,   309)*sol(:ncol,:,    49)*sol(:ncol,:,   253)                            ! rate_const*CH3CN*OH
     320    72055296 :       rxt_rates(:ncol,:,   310) = rxt_rates(:ncol,:,   310)*sol(:ncol,:,   236)*sol(:ncol,:,   236)                            ! rate_const*CH3CO3*CH3CO3
     321    72055296 :       rxt_rates(:ncol,:,   311) = rxt_rates(:ncol,:,   311)*sol(:ncol,:,   236)*sol(:ncol,:,   237)                            ! rate_const*CH3CO3*CH3O2
     322    72055296 :       rxt_rates(:ncol,:,   312) = rxt_rates(:ncol,:,   312)*sol(:ncol,:,   236)*sol(:ncol,:,   242)                            ! rate_const*CH3CO3*HO2
     323    72055296 :       rxt_rates(:ncol,:,   313) = rxt_rates(:ncol,:,   313)*sol(:ncol,:,   236)*sol(:ncol,:,   129)                            ! rate_const*CH3CO3*NO
     324    72055296 :       rxt_rates(:ncol,:,   314) = rxt_rates(:ncol,:,   314)*sol(:ncol,:,    52)*sol(:ncol,:,   253)                            ! rate_const*CH3COOH*OH
     325    72055296 :       rxt_rates(:ncol,:,   315) = rxt_rates(:ncol,:,   315)*sol(:ncol,:,    53)*sol(:ncol,:,   253)                            ! rate_const*CH3COOOH*OH
     326    72055296 :       rxt_rates(:ncol,:,   316) = rxt_rates(:ncol,:,   316)*sol(:ncol,:,   241)*sol(:ncol,:,   242)                            ! rate_const*EO2*HO2
     327    72055296 :       rxt_rates(:ncol,:,   317) = rxt_rates(:ncol,:,   317)*sol(:ncol,:,   241)*sol(:ncol,:,   129)                            ! rate_const*EO2*NO
     328    72055296 :       rxt_rates(:ncol,:,   318) = rxt_rates(:ncol,:,   318)*sol(:ncol,:,   240)                                                ! rate_const*EO
     329    72055296 :       rxt_rates(:ncol,:,   319) = rxt_rates(:ncol,:,   319)*sol(:ncol,:,   240)                                                ! rate_const*O2*EO
     330    72055296 :       rxt_rates(:ncol,:,   320) = rxt_rates(:ncol,:,   320)*sol(:ncol,:,    76)*sol(:ncol,:,   253)                            ! rate_const*GLYALD*OH
     331    72055296 :       rxt_rates(:ncol,:,   321) = rxt_rates(:ncol,:,   321)*sol(:ncol,:,    77)*sol(:ncol,:,   253)                            ! rate_const*GLYOXAL*OH
     332    72055296 :       rxt_rates(:ncol,:,   322) = rxt_rates(:ncol,:,   322)*sol(:ncol,:,   145)*sol(:ncol,:,   253)                            ! rate_const*PAN*OH
     333    72055296 :       rxt_rates(:ncol,:,   323) = rxt_rates(:ncol,:,   323)*sol(:ncol,:,    27)*sol(:ncol,:,   253)                            ! rate_const*M*C2H4*OH
     334    72055296 :       rxt_rates(:ncol,:,   324) = rxt_rates(:ncol,:,   324)*sol(:ncol,:,   236)*sol(:ncol,:,   130)                            ! rate_const*M*CH3CO3*NO2
     335    72055296 :       rxt_rates(:ncol,:,   325) = rxt_rates(:ncol,:,   325)*sol(:ncol,:,   145)                                                ! rate_const*M*PAN
     336    72055296 :       rxt_rates(:ncol,:,   326) = rxt_rates(:ncol,:,   326)*sol(:ncol,:,    31)*sol(:ncol,:,   131)                            ! rate_const*C3H6*NO3
     337    72055296 :       rxt_rates(:ncol,:,   327) = rxt_rates(:ncol,:,   327)*sol(:ncol,:,    31)*sol(:ncol,:,   140)                            ! rate_const*C3H6*O3
     338    72055296 :       rxt_rates(:ncol,:,   328) = rxt_rates(:ncol,:,   328)*sol(:ncol,:,   234)*sol(:ncol,:,   237)                            ! rate_const*C3H7O2*CH3O2
     339    72055296 :       rxt_rates(:ncol,:,   329) = rxt_rates(:ncol,:,   329)*sol(:ncol,:,   234)*sol(:ncol,:,   242)                            ! rate_const*C3H7O2*HO2
     340    72055296 :       rxt_rates(:ncol,:,   330) = rxt_rates(:ncol,:,   330)*sol(:ncol,:,   234)*sol(:ncol,:,   129)                            ! rate_const*C3H7O2*NO
     341    72055296 :       rxt_rates(:ncol,:,   331) = rxt_rates(:ncol,:,   331)*sol(:ncol,:,    32)*sol(:ncol,:,   253)                            ! rate_const*C3H7OOH*OH
     342    72055296 :       rxt_rates(:ncol,:,   332) = rxt_rates(:ncol,:,   332)*sol(:ncol,:,    33)*sol(:ncol,:,   253)                            ! rate_const*C3H8*OH
     343    72055296 :       rxt_rates(:ncol,:,   333) = rxt_rates(:ncol,:,   333)*sol(:ncol,:,    51)*sol(:ncol,:,   131)                            ! rate_const*CH3COCHO*NO3
     344    72055296 :       rxt_rates(:ncol,:,   334) = rxt_rates(:ncol,:,   334)*sol(:ncol,:,    51)*sol(:ncol,:,   253)                            ! rate_const*CH3COCHO*OH
     345    72055296 :       rxt_rates(:ncol,:,   335) = rxt_rates(:ncol,:,   335)*sol(:ncol,:,    97)*sol(:ncol,:,   253)                            ! rate_const*HYAC*OH
     346    72055296 :       rxt_rates(:ncol,:,   336) = rxt_rates(:ncol,:,   336)*sol(:ncol,:,   132)*sol(:ncol,:,   253)                            ! rate_const*NOA*OH
     347    72055296 :       rxt_rates(:ncol,:,   337) = rxt_rates(:ncol,:,   337)*sol(:ncol,:,   255)*sol(:ncol,:,   242)                            ! rate_const*PO2*HO2
     348    72055296 :       rxt_rates(:ncol,:,   338) = rxt_rates(:ncol,:,   338)*sol(:ncol,:,   255)*sol(:ncol,:,   129)                            ! rate_const*PO2*NO
     349    72055296 :       rxt_rates(:ncol,:,   339) = rxt_rates(:ncol,:,   339)*sol(:ncol,:,   154)*sol(:ncol,:,   253)                            ! rate_const*POOH*OH
     350    72055296 :       rxt_rates(:ncol,:,   340) = rxt_rates(:ncol,:,   340)*sol(:ncol,:,   256)*sol(:ncol,:,   237)                            ! rate_const*RO2*CH3O2
     351    72055296 :       rxt_rates(:ncol,:,   341) = rxt_rates(:ncol,:,   341)*sol(:ncol,:,   256)*sol(:ncol,:,   242)                            ! rate_const*RO2*HO2
     352    72055296 :       rxt_rates(:ncol,:,   342) = rxt_rates(:ncol,:,   342)*sol(:ncol,:,   256)*sol(:ncol,:,   129)                            ! rate_const*RO2*NO
     353    72055296 :       rxt_rates(:ncol,:,   343) = rxt_rates(:ncol,:,   343)*sol(:ncol,:,   155)*sol(:ncol,:,   253)                            ! rate_const*ROOH*OH
     354    72055296 :       rxt_rates(:ncol,:,   344) = rxt_rates(:ncol,:,   344)*sol(:ncol,:,    31)*sol(:ncol,:,   253)                            ! rate_const*M*C3H6*OH
     355    72055296 :       rxt_rates(:ncol,:,   345) = rxt_rates(:ncol,:,   345)*sol(:ncol,:,    50)*sol(:ncol,:,   253)                            ! rate_const*CH3COCH3*OH
     356    72055296 :       rxt_rates(:ncol,:,   346) = rxt_rates(:ncol,:,   346)*sol(:ncol,:,    18)*sol(:ncol,:,   131)                            ! rate_const*BIGENE*NO3
     357    72055296 :       rxt_rates(:ncol,:,   347) = rxt_rates(:ncol,:,   347)*sol(:ncol,:,    18)*sol(:ncol,:,   253)                            ! rate_const*BIGENE*OH
     358    72055296 :       rxt_rates(:ncol,:,   348) = rxt_rates(:ncol,:,   348)*sol(:ncol,:,   239)*sol(:ncol,:,   129)                            ! rate_const*ENEO2*NO
     359    72055296 :       rxt_rates(:ncol,:,   349) = rxt_rates(:ncol,:,   349)*sol(:ncol,:,   239)*sol(:ncol,:,   129)                            ! rate_const*ENEO2*NO
     360    72055296 :       rxt_rates(:ncol,:,   350) = rxt_rates(:ncol,:,   350)*sol(:ncol,:,    95)*sol(:ncol,:,   253)                            ! rate_const*HONITR*OH
     361    72055296 :       rxt_rates(:ncol,:,   351) = rxt_rates(:ncol,:,   351)*sol(:ncol,:,   246)*sol(:ncol,:,   236)                            ! rate_const*MACRO2*CH3CO3
     362    72055296 :       rxt_rates(:ncol,:,   352) = rxt_rates(:ncol,:,   352)*sol(:ncol,:,   246)*sol(:ncol,:,   237)                            ! rate_const*MACRO2*CH3O2
     363    72055296 :       rxt_rates(:ncol,:,   353) = rxt_rates(:ncol,:,   353)*sol(:ncol,:,   246)*sol(:ncol,:,   242)                            ! rate_const*MACRO2*HO2
     364    72055296 :       rxt_rates(:ncol,:,   354) = rxt_rates(:ncol,:,   354)*sol(:ncol,:,   246)*sol(:ncol,:,   131)                            ! rate_const*MACRO2*NO3
     365    72055296 :       rxt_rates(:ncol,:,   355) = rxt_rates(:ncol,:,   355)*sol(:ncol,:,   246)*sol(:ncol,:,   129)                            ! rate_const*MACRO2*NO
     366    72055296 :       rxt_rates(:ncol,:,   356) = rxt_rates(:ncol,:,   356)*sol(:ncol,:,   246)*sol(:ncol,:,   129)                            ! rate_const*MACRO2*NO
     367    72055296 :       rxt_rates(:ncol,:,   357) = rxt_rates(:ncol,:,   357)*sol(:ncol,:,   111)*sol(:ncol,:,   140)                            ! rate_const*MACR*O3
     368    72055296 :       rxt_rates(:ncol,:,   358) = rxt_rates(:ncol,:,   358)*sol(:ncol,:,   111)*sol(:ncol,:,   253)                            ! rate_const*MACR*OH
     369    72055296 :       rxt_rates(:ncol,:,   359) = rxt_rates(:ncol,:,   359)*sol(:ncol,:,   112)*sol(:ncol,:,   253)                            ! rate_const*MACROOH*OH
     370    72055296 :       rxt_rates(:ncol,:,   360) = rxt_rates(:ncol,:,   360)*sol(:ncol,:,   248)*sol(:ncol,:,   236)                            ! rate_const*MCO3*CH3CO3
     371    72055296 :       rxt_rates(:ncol,:,   361) = rxt_rates(:ncol,:,   361)*sol(:ncol,:,   248)*sol(:ncol,:,   237)                            ! rate_const*MCO3*CH3O2
     372    72055296 :       rxt_rates(:ncol,:,   362) = rxt_rates(:ncol,:,   362)*sol(:ncol,:,   248)*sol(:ncol,:,   242)                            ! rate_const*MCO3*HO2
     373    72055296 :       rxt_rates(:ncol,:,   363) = rxt_rates(:ncol,:,   363)*sol(:ncol,:,   248)*sol(:ncol,:,   248)                            ! rate_const*MCO3*MCO3
     374    72055296 :       rxt_rates(:ncol,:,   364) = rxt_rates(:ncol,:,   364)*sol(:ncol,:,   248)*sol(:ncol,:,   129)                            ! rate_const*MCO3*NO
     375    72055296 :       rxt_rates(:ncol,:,   365) = rxt_rates(:ncol,:,   365)*sol(:ncol,:,   248)*sol(:ncol,:,   131)                            ! rate_const*MCO3*NO3
     376    72055296 :       rxt_rates(:ncol,:,   366) = rxt_rates(:ncol,:,   366)*sol(:ncol,:,   250)*sol(:ncol,:,   242)                            ! rate_const*MEKO2*HO2
     377    72055296 :       rxt_rates(:ncol,:,   367) = rxt_rates(:ncol,:,   367)*sol(:ncol,:,   250)*sol(:ncol,:,   129)                            ! rate_const*MEKO2*NO
     378    72055296 :       rxt_rates(:ncol,:,   368) = rxt_rates(:ncol,:,   368)*sol(:ncol,:,   113)*sol(:ncol,:,   253)                            ! rate_const*MEK*OH
     379    72055296 :       rxt_rates(:ncol,:,   369) = rxt_rates(:ncol,:,   369)*sol(:ncol,:,   114)*sol(:ncol,:,   253)                            ! rate_const*MEKOOH*OH
     380    72055296 :       rxt_rates(:ncol,:,   370) = rxt_rates(:ncol,:,   370)*sol(:ncol,:,   115)*sol(:ncol,:,   253)                            ! rate_const*M*MPAN*OH
     381    72055296 :       rxt_rates(:ncol,:,   371) = rxt_rates(:ncol,:,   371)*sol(:ncol,:,   118)*sol(:ncol,:,   140)                            ! rate_const*MVK*O3
     382    72055296 :       rxt_rates(:ncol,:,   372) = rxt_rates(:ncol,:,   372)*sol(:ncol,:,   118)*sol(:ncol,:,   253)                            ! rate_const*MVK*OH
     383    72055296 :       rxt_rates(:ncol,:,   373) = rxt_rates(:ncol,:,   373)*sol(:ncol,:,   248)*sol(:ncol,:,   130)                            ! rate_const*M*MCO3*NO2
     384    72055296 :       rxt_rates(:ncol,:,   374) = rxt_rates(:ncol,:,   374)*sol(:ncol,:,   115)                                                ! rate_const*M*MPAN
     385    72055296 :       rxt_rates(:ncol,:,   375) = rxt_rates(:ncol,:,   375)*sol(:ncol,:,     1)*sol(:ncol,:,   253)                            ! rate_const*ALKNIT*OH
     386    72055296 :       rxt_rates(:ncol,:,   376) = rxt_rates(:ncol,:,   376)*sol(:ncol,:,   230)*sol(:ncol,:,   242)                            ! rate_const*ALKO2*HO2
     387    72055296 :       rxt_rates(:ncol,:,   377) = rxt_rates(:ncol,:,   377)*sol(:ncol,:,   230)*sol(:ncol,:,   129)                            ! rate_const*ALKO2*NO
     388    72055296 :       rxt_rates(:ncol,:,   378) = rxt_rates(:ncol,:,   378)*sol(:ncol,:,   230)*sol(:ncol,:,   129)                            ! rate_const*ALKO2*NO
     389    72055296 :       rxt_rates(:ncol,:,   379) = rxt_rates(:ncol,:,   379)*sol(:ncol,:,     2)*sol(:ncol,:,   253)                            ! rate_const*ALKOOH*OH
     390    72055296 :       rxt_rates(:ncol,:,   380) = rxt_rates(:ncol,:,   380)*sol(:ncol,:,    17)*sol(:ncol,:,   253)                            ! rate_const*BIGALK*OH
     391    72055296 :       rxt_rates(:ncol,:,   381) = rxt_rates(:ncol,:,   381)*sol(:ncol,:,    96)*sol(:ncol,:,   253)                            ! rate_const*HPALD*OH
     392    72055296 :       rxt_rates(:ncol,:,   382) = rxt_rates(:ncol,:,   382)*sol(:ncol,:,    98)*sol(:ncol,:,   253)                            ! rate_const*HYDRALD*OH
     393    72055296 :       rxt_rates(:ncol,:,   383) = rxt_rates(:ncol,:,   383)*sol(:ncol,:,    99)*sol(:ncol,:,   253)                            ! rate_const*IEPOX*OH
     394    72055296 :       rxt_rates(:ncol,:,   384) = rxt_rates(:ncol,:,   384)*sol(:ncol,:,   244)*sol(:ncol,:,   236)                            ! rate_const*ISOPAO2*CH3CO3
     395    72055296 :       rxt_rates(:ncol,:,   385) = rxt_rates(:ncol,:,   385)*sol(:ncol,:,   244)*sol(:ncol,:,   237)                            ! rate_const*ISOPAO2*CH3O2
     396    72055296 :       rxt_rates(:ncol,:,   386) = rxt_rates(:ncol,:,   386)*sol(:ncol,:,   244)*sol(:ncol,:,   242)                            ! rate_const*ISOPAO2*HO2
     397    72055296 :       rxt_rates(:ncol,:,   387) = rxt_rates(:ncol,:,   387)*sol(:ncol,:,   244)*sol(:ncol,:,   129)                            ! rate_const*ISOPAO2*NO
     398    72055296 :       rxt_rates(:ncol,:,   388) = rxt_rates(:ncol,:,   388)*sol(:ncol,:,   244)*sol(:ncol,:,   131)                            ! rate_const*ISOPAO2*NO3
     399    72055296 :       rxt_rates(:ncol,:,   389) = rxt_rates(:ncol,:,   389)*sol(:ncol,:,   245)*sol(:ncol,:,   236)                            ! rate_const*ISOPBO2*CH3CO3
     400    72055296 :       rxt_rates(:ncol,:,   390) = rxt_rates(:ncol,:,   390)*sol(:ncol,:,   245)*sol(:ncol,:,   237)                            ! rate_const*ISOPBO2*CH3O2
     401    72055296 :       rxt_rates(:ncol,:,   391) = rxt_rates(:ncol,:,   391)*sol(:ncol,:,   245)*sol(:ncol,:,   242)                            ! rate_const*ISOPBO2*HO2
     402    72055296 :       rxt_rates(:ncol,:,   392) = rxt_rates(:ncol,:,   392)*sol(:ncol,:,   245)                                                ! rate_const*ISOPBO2
     403    72055296 :       rxt_rates(:ncol,:,   393) = rxt_rates(:ncol,:,   393)*sol(:ncol,:,   245)*sol(:ncol,:,   129)                            ! rate_const*ISOPBO2*NO
     404    72055296 :       rxt_rates(:ncol,:,   394) = rxt_rates(:ncol,:,   394)*sol(:ncol,:,   245)*sol(:ncol,:,   131)                            ! rate_const*ISOPBO2*NO3
     405    72055296 :       rxt_rates(:ncol,:,   395) = rxt_rates(:ncol,:,   395)*sol(:ncol,:,   101)*sol(:ncol,:,   253)                            ! rate_const*ISOPNITA*OH
     406    72055296 :       rxt_rates(:ncol,:,   396) = rxt_rates(:ncol,:,   396)*sol(:ncol,:,   102)*sol(:ncol,:,   253)                            ! rate_const*ISOPNITB*OH
     407    72055296 :       rxt_rates(:ncol,:,   397) = rxt_rates(:ncol,:,   397)*sol(:ncol,:,   100)*sol(:ncol,:,   131)                            ! rate_const*ISOP*NO3
     408    72055296 :       rxt_rates(:ncol,:,   398) = rxt_rates(:ncol,:,   398)*sol(:ncol,:,   103)*sol(:ncol,:,   236)                            ! rate_const*ISOPNO3*CH3CO3
     409    72055296 :       rxt_rates(:ncol,:,   399) = rxt_rates(:ncol,:,   399)*sol(:ncol,:,   103)*sol(:ncol,:,   237)                            ! rate_const*ISOPNO3*CH3O2
     410    72055296 :       rxt_rates(:ncol,:,   400) = rxt_rates(:ncol,:,   400)*sol(:ncol,:,   103)*sol(:ncol,:,   242)                            ! rate_const*ISOPNO3*HO2
     411    72055296 :       rxt_rates(:ncol,:,   401) = rxt_rates(:ncol,:,   401)*sol(:ncol,:,   103)*sol(:ncol,:,   129)                            ! rate_const*ISOPNO3*NO
     412    72055296 :       rxt_rates(:ncol,:,   402) = rxt_rates(:ncol,:,   402)*sol(:ncol,:,   103)*sol(:ncol,:,   131)                            ! rate_const*ISOPNO3*NO3
     413    72055296 :       rxt_rates(:ncol,:,   403) = rxt_rates(:ncol,:,   403)*sol(:ncol,:,   104)*sol(:ncol,:,   253)                            ! rate_const*ISOPNOOH*OH
     414    72055296 :       rxt_rates(:ncol,:,   404) = rxt_rates(:ncol,:,   404)*sol(:ncol,:,   100)*sol(:ncol,:,   140)                            ! rate_const*ISOP*O3
     415    72055296 :       rxt_rates(:ncol,:,   405) = rxt_rates(:ncol,:,   405)*sol(:ncol,:,   100)*sol(:ncol,:,   253)                            ! rate_const*ISOP*OH
     416    72055296 :       rxt_rates(:ncol,:,   406) = rxt_rates(:ncol,:,   406)*sol(:ncol,:,   106)*sol(:ncol,:,   253)                            ! rate_const*ISOPOOH*OH
     417    72055296 :       rxt_rates(:ncol,:,   407) = rxt_rates(:ncol,:,   407)*sol(:ncol,:,   122)*sol(:ncol,:,   253)                            ! rate_const*NC4CH2OH*OH
     418    72055296 :       rxt_rates(:ncol,:,   408) = rxt_rates(:ncol,:,   408)*sol(:ncol,:,   123)*sol(:ncol,:,   253)                            ! rate_const*NC4CHO*OH
     419    72055296 :       rxt_rates(:ncol,:,   409) = rxt_rates(:ncol,:,   409)*sol(:ncol,:,   260)*sol(:ncol,:,   236)                            ! rate_const*XO2*CH3CO3
     420    72055296 :       rxt_rates(:ncol,:,   410) = rxt_rates(:ncol,:,   410)*sol(:ncol,:,   260)*sol(:ncol,:,   237)                            ! rate_const*XO2*CH3O2
     421    72055296 :       rxt_rates(:ncol,:,   411) = rxt_rates(:ncol,:,   411)*sol(:ncol,:,   260)*sol(:ncol,:,   242)                            ! rate_const*XO2*HO2
     422    72055296 :       rxt_rates(:ncol,:,   412) = rxt_rates(:ncol,:,   412)*sol(:ncol,:,   260)*sol(:ncol,:,   129)                            ! rate_const*XO2*NO
     423    72055296 :       rxt_rates(:ncol,:,   413) = rxt_rates(:ncol,:,   413)*sol(:ncol,:,   260)*sol(:ncol,:,   131)                            ! rate_const*XO2*NO3
     424    72055296 :       rxt_rates(:ncol,:,   414) = rxt_rates(:ncol,:,   414)*sol(:ncol,:,   221)*sol(:ncol,:,   253)                            ! rate_const*XOOH*OH
     425    72055296 :       rxt_rates(:ncol,:,   415) = rxt_rates(:ncol,:,   415)*sol(:ncol,:,   229)*sol(:ncol,:,   242)                            ! rate_const*ACBZO2*HO2
     426    72055296 :       rxt_rates(:ncol,:,   416) = rxt_rates(:ncol,:,   416)*sol(:ncol,:,   229)*sol(:ncol,:,   129)                            ! rate_const*ACBZO2*NO
     427    72055296 :       rxt_rates(:ncol,:,   417) = rxt_rates(:ncol,:,   417)*sol(:ncol,:,     8)*sol(:ncol,:,   253)                            ! rate_const*BENZENE*OH
     428    72055296 :       rxt_rates(:ncol,:,   418) = rxt_rates(:ncol,:,   418)*sol(:ncol,:,   231)*sol(:ncol,:,   242)                            ! rate_const*BENZO2*HO2
     429    72055296 :       rxt_rates(:ncol,:,   419) = rxt_rates(:ncol,:,   419)*sol(:ncol,:,   231)*sol(:ncol,:,   129)                            ! rate_const*BENZO2*NO
     430    72055296 :       rxt_rates(:ncol,:,   420) = rxt_rates(:ncol,:,   420)*sol(:ncol,:,    10)*sol(:ncol,:,   253)                            ! rate_const*BENZOOH*OH
     431    72055296 :       rxt_rates(:ncol,:,   421) = rxt_rates(:ncol,:,   421)*sol(:ncol,:,    24)*sol(:ncol,:,   253)                            ! rate_const*BZALD*OH
     432    72055296 :       rxt_rates(:ncol,:,   422) = rxt_rates(:ncol,:,   422)*sol(:ncol,:,   232)*sol(:ncol,:,   242)                            ! rate_const*BZOO*HO2
     433    72055296 :       rxt_rates(:ncol,:,   423) = rxt_rates(:ncol,:,   423)*sol(:ncol,:,    25)*sol(:ncol,:,   253)                            ! rate_const*BZOOH*OH
     434    72055296 :       rxt_rates(:ncol,:,   424) = rxt_rates(:ncol,:,   424)*sol(:ncol,:,   232)*sol(:ncol,:,   129)                            ! rate_const*BZOO*NO
     435    72055296 :       rxt_rates(:ncol,:,   425) = rxt_rates(:ncol,:,   425)*sol(:ncol,:,   235)*sol(:ncol,:,   242)                            ! rate_const*C6H5O2*HO2
     436    72055296 :       rxt_rates(:ncol,:,   426) = rxt_rates(:ncol,:,   426)*sol(:ncol,:,   235)*sol(:ncol,:,   129)                            ! rate_const*C6H5O2*NO
     437    72055296 :       rxt_rates(:ncol,:,   427) = rxt_rates(:ncol,:,   427)*sol(:ncol,:,    34)*sol(:ncol,:,   253)                            ! rate_const*C6H5OOH*OH
     438    72055296 :       rxt_rates(:ncol,:,   428) = rxt_rates(:ncol,:,   428)*sol(:ncol,:,    68)*sol(:ncol,:,   253)                            ! rate_const*CRESOL*OH
     439    72055296 :       rxt_rates(:ncol,:,   429) = rxt_rates(:ncol,:,   429)*sol(:ncol,:,   238)*sol(:ncol,:,   242)                            ! rate_const*DICARBO2*HO2
     440    72055296 :       rxt_rates(:ncol,:,   430) = rxt_rates(:ncol,:,   430)*sol(:ncol,:,   238)*sol(:ncol,:,   129)                            ! rate_const*DICARBO2*NO
     441    72055296 :       rxt_rates(:ncol,:,   431) = rxt_rates(:ncol,:,   431)*sol(:ncol,:,   238)*sol(:ncol,:,   130)                            ! rate_const*M*DICARBO2*NO2
     442    72055296 :       rxt_rates(:ncol,:,   432) = rxt_rates(:ncol,:,   432)*sol(:ncol,:,   247)*sol(:ncol,:,   242)                            ! rate_const*MALO2*HO2
     443    72055296 :       rxt_rates(:ncol,:,   433) = rxt_rates(:ncol,:,   433)*sol(:ncol,:,   247)*sol(:ncol,:,   129)                            ! rate_const*MALO2*NO
     444    72055296 :       rxt_rates(:ncol,:,   434) = rxt_rates(:ncol,:,   434)*sol(:ncol,:,   247)*sol(:ncol,:,   130)                            ! rate_const*M*MALO2*NO2
     445    72055296 :       rxt_rates(:ncol,:,   435) = rxt_rates(:ncol,:,   435)*sol(:ncol,:,   249)*sol(:ncol,:,   242)                            ! rate_const*MDIALO2*HO2
     446    72055296 :       rxt_rates(:ncol,:,   436) = rxt_rates(:ncol,:,   436)*sol(:ncol,:,   249)*sol(:ncol,:,   129)                            ! rate_const*MDIALO2*NO
     447    72055296 :       rxt_rates(:ncol,:,   437) = rxt_rates(:ncol,:,   437)*sol(:ncol,:,   249)*sol(:ncol,:,   130)                            ! rate_const*M*MDIALO2*NO2
     448    72055296 :       rxt_rates(:ncol,:,   438) = rxt_rates(:ncol,:,   438)*sol(:ncol,:,   254)*sol(:ncol,:,   242)                            ! rate_const*PHENO2*HO2
     449    72055296 :       rxt_rates(:ncol,:,   439) = rxt_rates(:ncol,:,   439)*sol(:ncol,:,   254)*sol(:ncol,:,   129)                            ! rate_const*PHENO2*NO
     450    72055296 :       rxt_rates(:ncol,:,   440) = rxt_rates(:ncol,:,   440)*sol(:ncol,:,   148)*sol(:ncol,:,   253)                            ! rate_const*PHENOL*OH
     451    72055296 :       rxt_rates(:ncol,:,   441) = rxt_rates(:ncol,:,   441)*sol(:ncol,:,   147)*sol(:ncol,:,   130)                            ! rate_const*PHENO*NO2
     452    72055296 :       rxt_rates(:ncol,:,   442) = rxt_rates(:ncol,:,   442)*sol(:ncol,:,   147)*sol(:ncol,:,   140)                            ! rate_const*PHENO*O3
     453    72055296 :       rxt_rates(:ncol,:,   443) = rxt_rates(:ncol,:,   443)*sol(:ncol,:,   149)*sol(:ncol,:,   253)                            ! rate_const*PHENOOH*OH
     454    72055296 :       rxt_rates(:ncol,:,   444) = rxt_rates(:ncol,:,   444)*sol(:ncol,:,   229)*sol(:ncol,:,   130)                            ! rate_const*M*ACBZO2*NO2
     455    72055296 :       rxt_rates(:ncol,:,   445) = rxt_rates(:ncol,:,   445)*sol(:ncol,:,   259)*sol(:ncol,:,   242)                            ! rate_const*TOLO2*HO2
     456    72055296 :       rxt_rates(:ncol,:,   446) = rxt_rates(:ncol,:,   446)*sol(:ncol,:,   259)*sol(:ncol,:,   129)                            ! rate_const*TOLO2*NO
     457    72055296 :       rxt_rates(:ncol,:,   447) = rxt_rates(:ncol,:,   447)*sol(:ncol,:,   218)*sol(:ncol,:,   253)                            ! rate_const*TOLOOH*OH
     458    72055296 :       rxt_rates(:ncol,:,   448) = rxt_rates(:ncol,:,   448)*sol(:ncol,:,   219)*sol(:ncol,:,   253)                            ! rate_const*TOLUENE*OH
     459    72055296 :       rxt_rates(:ncol,:,   449) = rxt_rates(:ncol,:,   449)*sol(:ncol,:,   146)                                                ! rate_const*M*PBZNIT
     460    72055296 :       rxt_rates(:ncol,:,   450) = rxt_rates(:ncol,:,   450)*sol(:ncol,:,   222)*sol(:ncol,:,   253)                            ! rate_const*XYLENES*OH
     461    72055296 :       rxt_rates(:ncol,:,   451) = rxt_rates(:ncol,:,   451)*sol(:ncol,:,   261)*sol(:ncol,:,   242)                            ! rate_const*XYLENO2*HO2
     462    72055296 :       rxt_rates(:ncol,:,   452) = rxt_rates(:ncol,:,   452)*sol(:ncol,:,   261)*sol(:ncol,:,   129)                            ! rate_const*XYLENO2*NO
     463    72055296 :       rxt_rates(:ncol,:,   453) = rxt_rates(:ncol,:,   453)*sol(:ncol,:,   223)*sol(:ncol,:,   253)                            ! rate_const*XYLENOOH*OH
     464    72055296 :       rxt_rates(:ncol,:,   454) = rxt_rates(:ncol,:,   454)*sol(:ncol,:,   262)*sol(:ncol,:,   242)                            ! rate_const*XYLOLO2*HO2
     465    72055296 :       rxt_rates(:ncol,:,   455) = rxt_rates(:ncol,:,   455)*sol(:ncol,:,   262)*sol(:ncol,:,   129)                            ! rate_const*XYLOLO2*NO
     466    72055296 :       rxt_rates(:ncol,:,   456) = rxt_rates(:ncol,:,   456)*sol(:ncol,:,   225)*sol(:ncol,:,   253)                            ! rate_const*XYLOL*OH
     467    72055296 :       rxt_rates(:ncol,:,   457) = rxt_rates(:ncol,:,   457)*sol(:ncol,:,   226)*sol(:ncol,:,   253)                            ! rate_const*XYLOLOOH*OH
     468    72055296 :       rxt_rates(:ncol,:,   458) = rxt_rates(:ncol,:,   458)*sol(:ncol,:,     6)*sol(:ncol,:,   131)                            ! rate_const*BCARY*NO3
     469    72055296 :       rxt_rates(:ncol,:,   459) = rxt_rates(:ncol,:,   459)*sol(:ncol,:,     6)*sol(:ncol,:,   140)                            ! rate_const*BCARY*O3
     470    72055296 :       rxt_rates(:ncol,:,   460) = rxt_rates(:ncol,:,   460)*sol(:ncol,:,     6)*sol(:ncol,:,   253)                            ! rate_const*BCARY*OH
     471    72055296 :       rxt_rates(:ncol,:,   461) = rxt_rates(:ncol,:,   461)*sol(:ncol,:,   116)*sol(:ncol,:,   131)                            ! rate_const*MTERP*NO3
     472    72055296 :       rxt_rates(:ncol,:,   462) = rxt_rates(:ncol,:,   462)*sol(:ncol,:,   116)*sol(:ncol,:,   140)                            ! rate_const*MTERP*O3
     473    72055296 :       rxt_rates(:ncol,:,   463) = rxt_rates(:ncol,:,   463)*sol(:ncol,:,   116)*sol(:ncol,:,   253)                            ! rate_const*MTERP*OH
     474    72055296 :       rxt_rates(:ncol,:,   464) = rxt_rates(:ncol,:,   464)*sol(:ncol,:,   251)*sol(:ncol,:,   237)                            ! rate_const*NTERPO2*CH3O2
     475    72055296 :       rxt_rates(:ncol,:,   465) = rxt_rates(:ncol,:,   465)*sol(:ncol,:,   251)*sol(:ncol,:,   242)                            ! rate_const*NTERPO2*HO2
     476    72055296 :       rxt_rates(:ncol,:,   466) = rxt_rates(:ncol,:,   466)*sol(:ncol,:,   251)*sol(:ncol,:,   129)                            ! rate_const*NTERPO2*NO
     477    72055296 :       rxt_rates(:ncol,:,   467) = rxt_rates(:ncol,:,   467)*sol(:ncol,:,   251)*sol(:ncol,:,   131)                            ! rate_const*NTERPO2*NO3
     478    72055296 :       rxt_rates(:ncol,:,   468) = rxt_rates(:ncol,:,   468)*sol(:ncol,:,   133)*sol(:ncol,:,   253)                            ! rate_const*NTERPOOH*OH
     479    72055296 :       rxt_rates(:ncol,:,   469) = rxt_rates(:ncol,:,   469)*sol(:ncol,:,   257)*sol(:ncol,:,   237)                            ! rate_const*TERP2O2*CH3O2
     480    72055296 :       rxt_rates(:ncol,:,   470) = rxt_rates(:ncol,:,   470)*sol(:ncol,:,   257)*sol(:ncol,:,   242)                            ! rate_const*TERP2O2*HO2
     481    72055296 :       rxt_rates(:ncol,:,   471) = rxt_rates(:ncol,:,   471)*sol(:ncol,:,   257)*sol(:ncol,:,   129)                            ! rate_const*TERP2O2*NO
     482    72055296 :       rxt_rates(:ncol,:,   472) = rxt_rates(:ncol,:,   472)*sol(:ncol,:,   213)*sol(:ncol,:,   253)                            ! rate_const*TERP2OOH*OH
     483    72055296 :       rxt_rates(:ncol,:,   473) = rxt_rates(:ncol,:,   473)*sol(:ncol,:,   214)*sol(:ncol,:,   253)                            ! rate_const*TERPNIT*OH
     484    72055296 :       rxt_rates(:ncol,:,   474) = rxt_rates(:ncol,:,   474)*sol(:ncol,:,   258)*sol(:ncol,:,   237)                            ! rate_const*TERPO2*CH3O2
     485    72055296 :       rxt_rates(:ncol,:,   475) = rxt_rates(:ncol,:,   475)*sol(:ncol,:,   258)*sol(:ncol,:,   242)                            ! rate_const*TERPO2*HO2
     486    72055296 :       rxt_rates(:ncol,:,   476) = rxt_rates(:ncol,:,   476)*sol(:ncol,:,   258)*sol(:ncol,:,   129)                            ! rate_const*TERPO2*NO
     487    72055296 :       rxt_rates(:ncol,:,   477) = rxt_rates(:ncol,:,   477)*sol(:ncol,:,   215)*sol(:ncol,:,   253)                            ! rate_const*TERPOOH*OH
     488    72055296 :       rxt_rates(:ncol,:,   478) = rxt_rates(:ncol,:,   478)*sol(:ncol,:,   216)*sol(:ncol,:,   131)                            ! rate_const*TERPROD1*NO3
     489    72055296 :       rxt_rates(:ncol,:,   479) = rxt_rates(:ncol,:,   479)*sol(:ncol,:,   216)*sol(:ncol,:,   253)                            ! rate_const*TERPROD1*OH
     490    72055296 :       rxt_rates(:ncol,:,   480) = rxt_rates(:ncol,:,   480)*sol(:ncol,:,   217)*sol(:ncol,:,   253)                            ! rate_const*TERPROD2*OH
     491    72055296 :       rxt_rates(:ncol,:,   481) = rxt_rates(:ncol,:,   481)*sol(:ncol,:,    69)*sol(:ncol,:,   131)                            ! rate_const*DMS*NO3
     492    72055296 :       rxt_rates(:ncol,:,   482) = rxt_rates(:ncol,:,   482)*sol(:ncol,:,    69)*sol(:ncol,:,   253)                            ! rate_const*DMS*OH
     493    72055296 :       rxt_rates(:ncol,:,   483) = rxt_rates(:ncol,:,   483)*sol(:ncol,:,   143)*sol(:ncol,:,   139)                            ! rate_const*OCS*O
     494    72055296 :       rxt_rates(:ncol,:,   484) = rxt_rates(:ncol,:,   484)*sol(:ncol,:,   143)*sol(:ncol,:,   253)                            ! rate_const*OCS*OH
     495    72055296 :       rxt_rates(:ncol,:,   485) = rxt_rates(:ncol,:,   485)*sol(:ncol,:,   156)                                                ! rate_const*O2*S
     496    72055296 :       rxt_rates(:ncol,:,   486) = rxt_rates(:ncol,:,   486)*sol(:ncol,:,   159)*sol(:ncol,:,   253)                            ! rate_const*M*SO2*OH
     497    72055296 :       rxt_rates(:ncol,:,   487) = rxt_rates(:ncol,:,   487)*sol(:ncol,:,   156)*sol(:ncol,:,   140)                            ! rate_const*S*O3
     498    72055296 :       rxt_rates(:ncol,:,   488) = rxt_rates(:ncol,:,   488)*sol(:ncol,:,   158)*sol(:ncol,:,    21)                            ! rate_const*SO*BRO
     499    72055296 :       rxt_rates(:ncol,:,   489) = rxt_rates(:ncol,:,   489)*sol(:ncol,:,   158)*sol(:ncol,:,    61)                            ! rate_const*SO*CLO
     500    72055296 :       rxt_rates(:ncol,:,   490) = rxt_rates(:ncol,:,   490)*sol(:ncol,:,   156)*sol(:ncol,:,   253)                            ! rate_const*S*OH
     501    72055296 :       rxt_rates(:ncol,:,   491) = rxt_rates(:ncol,:,   491)*sol(:ncol,:,   158)*sol(:ncol,:,   130)                            ! rate_const*SO*NO2
     502    72055296 :       rxt_rates(:ncol,:,   492) = rxt_rates(:ncol,:,   492)*sol(:ncol,:,   158)                                                ! rate_const*O2*SO
     503    72055296 :       rxt_rates(:ncol,:,   493) = rxt_rates(:ncol,:,   493)*sol(:ncol,:,   158)*sol(:ncol,:,   140)                            ! rate_const*SO*O3
     504    72055296 :       rxt_rates(:ncol,:,   494) = rxt_rates(:ncol,:,   494)*sol(:ncol,:,   158)*sol(:ncol,:,   142)                            ! rate_const*SO*OCLO
     505    72055296 :       rxt_rates(:ncol,:,   495) = rxt_rates(:ncol,:,   495)*sol(:ncol,:,   158)*sol(:ncol,:,   253)                            ! rate_const*SO*OH
     506    72055296 :       rxt_rates(:ncol,:,   496) = rxt_rates(:ncol,:,   496)*sol(:ncol,:,    69)*sol(:ncol,:,   253)                            ! rate_const*DMS*OH
     507    72055296 :       rxt_rates(:ncol,:,   497) = rxt_rates(:ncol,:,   497)*sol(:ncol,:,   160)*sol(:ncol,:,   263)                            ! rate_const*SO3*H2O
     508    72055296 :       rxt_rates(:ncol,:,   498) = rxt_rates(:ncol,:,   498)*sol(:ncol,:,   127)*sol(:ncol,:,   253)                            ! rate_const*NH3*OH
     509    72055296 :       rxt_rates(:ncol,:,   499) = rxt_rates(:ncol,:,   499)*sol(:ncol,:,   242)                                                ! rate_const*HO2
     510    72055296 :       rxt_rates(:ncol,:,   500) = rxt_rates(:ncol,:,   500)*sol(:ncol,:,    95)                                                ! rate_const*HONITR
     511    72055296 :       rxt_rates(:ncol,:,   501) = rxt_rates(:ncol,:,   501)*sol(:ncol,:,   101)                                                ! rate_const*ISOPNITA
     512    72055296 :       rxt_rates(:ncol,:,   502) = rxt_rates(:ncol,:,   502)*sol(:ncol,:,   102)                                                ! rate_const*ISOPNITB
     513    72055296 :       rxt_rates(:ncol,:,   503) = rxt_rates(:ncol,:,   503)*sol(:ncol,:,   121)                                                ! rate_const*N2O5
     514    72055296 :       rxt_rates(:ncol,:,   504) = rxt_rates(:ncol,:,   504)*sol(:ncol,:,   122)                                                ! rate_const*NC4CH2OH
     515    72055296 :       rxt_rates(:ncol,:,   505) = rxt_rates(:ncol,:,   505)*sol(:ncol,:,   123)                                                ! rate_const*NC4CHO
     516    72055296 :       rxt_rates(:ncol,:,   506) = rxt_rates(:ncol,:,   506)*sol(:ncol,:,   128)                                                ! rate_const*NH4
     517    72055296 :       rxt_rates(:ncol,:,   507) = rxt_rates(:ncol,:,   507)*sol(:ncol,:,   130)                                                ! rate_const*NO2
     518    72055296 :       rxt_rates(:ncol,:,   508) = rxt_rates(:ncol,:,   508)*sol(:ncol,:,   131)                                                ! rate_const*NO3
     519    72055296 :       rxt_rates(:ncol,:,   509) = rxt_rates(:ncol,:,   509)*sol(:ncol,:,   133)                                                ! rate_const*NTERPOOH
     520    72055296 :       rxt_rates(:ncol,:,   510) = rxt_rates(:ncol,:,   510)*sol(:ncol,:,   144)                                                ! rate_const*ONITR
     521    72055296 :       rxt_rates(:ncol,:,   511) = rxt_rates(:ncol,:,   511)*sol(:ncol,:,   214)                                                ! rate_const*TERPNIT
     522    72055296 :       rxt_rates(:ncol,:,   512) = rxt_rates(:ncol,:,   512)*sol(:ncol,:,     6)*sol(:ncol,:,   131)                            ! rate_const*BCARY*NO3
     523    72055296 :       rxt_rates(:ncol,:,   513) = rxt_rates(:ncol,:,   513)*sol(:ncol,:,     7)*sol(:ncol,:,   242)                            ! rate_const*BCARYO2VBS*HO2
     524    72055296 :       rxt_rates(:ncol,:,   514) = rxt_rates(:ncol,:,   514)*sol(:ncol,:,     7)*sol(:ncol,:,   129)                            ! rate_const*BCARYO2VBS*NO
     525    72055296 :       rxt_rates(:ncol,:,   515) = rxt_rates(:ncol,:,   515)*sol(:ncol,:,     6)*sol(:ncol,:,   140)                            ! rate_const*BCARY*O3
     526    72055296 :       rxt_rates(:ncol,:,   516) = rxt_rates(:ncol,:,   516)*sol(:ncol,:,     6)*sol(:ncol,:,   253)                            ! rate_const*BCARY*OH
     527    72055296 :       rxt_rates(:ncol,:,   517) = rxt_rates(:ncol,:,   517)*sol(:ncol,:,     8)*sol(:ncol,:,   253)                            ! rate_const*BENZENE*OH
     528    72055296 :       rxt_rates(:ncol,:,   518) = rxt_rates(:ncol,:,   518)*sol(:ncol,:,     9)*sol(:ncol,:,   242)                            ! rate_const*BENZO2VBS*HO2
     529    72055296 :       rxt_rates(:ncol,:,   519) = rxt_rates(:ncol,:,   519)*sol(:ncol,:,     9)*sol(:ncol,:,   129)                            ! rate_const*BENZO2VBS*NO
     530    72055296 :       rxt_rates(:ncol,:,   520) = rxt_rates(:ncol,:,   520)*sol(:ncol,:,   100)*sol(:ncol,:,   131)                            ! rate_const*ISOP*NO3
     531    72055296 :       rxt_rates(:ncol,:,   521) = rxt_rates(:ncol,:,   521)*sol(:ncol,:,   105)*sol(:ncol,:,   242)                            ! rate_const*ISOPO2VBS*HO2
     532    72055296 :       rxt_rates(:ncol,:,   522) = rxt_rates(:ncol,:,   522)*sol(:ncol,:,   105)*sol(:ncol,:,   129)                            ! rate_const*ISOPO2VBS*NO
     533    72055296 :       rxt_rates(:ncol,:,   523) = rxt_rates(:ncol,:,   523)*sol(:ncol,:,   100)*sol(:ncol,:,   140)                            ! rate_const*ISOP*O3
     534    72055296 :       rxt_rates(:ncol,:,   524) = rxt_rates(:ncol,:,   524)*sol(:ncol,:,   100)*sol(:ncol,:,   253)                            ! rate_const*ISOP*OH
     535    72055296 :       rxt_rates(:ncol,:,   525) = rxt_rates(:ncol,:,   525)*sol(:ncol,:,   108)*sol(:ncol,:,   242)                            ! rate_const*IVOCbbO2VBS*HO2
     536    72055296 :       rxt_rates(:ncol,:,   526) = rxt_rates(:ncol,:,   526)*sol(:ncol,:,   108)*sol(:ncol,:,   129)                            ! rate_const*IVOCbbO2VBS*NO
     537    72055296 :       rxt_rates(:ncol,:,   527) = rxt_rates(:ncol,:,   527)*sol(:ncol,:,   107)*sol(:ncol,:,   253)                            ! rate_const*IVOCbb*OH
     538    72055296 :       rxt_rates(:ncol,:,   528) = rxt_rates(:ncol,:,   528)*sol(:ncol,:,   110)*sol(:ncol,:,   242)                            ! rate_const*IVOCffO2VBS*HO2
     539    72055296 :       rxt_rates(:ncol,:,   529) = rxt_rates(:ncol,:,   529)*sol(:ncol,:,   110)*sol(:ncol,:,   129)                            ! rate_const*IVOCffO2VBS*NO
     540    72055296 :       rxt_rates(:ncol,:,   530) = rxt_rates(:ncol,:,   530)*sol(:ncol,:,   109)*sol(:ncol,:,   253)                            ! rate_const*IVOCff*OH
     541    72055296 :       rxt_rates(:ncol,:,   531) = rxt_rates(:ncol,:,   531)*sol(:ncol,:,   116)*sol(:ncol,:,   131)                            ! rate_const*MTERP*NO3
     542    72055296 :       rxt_rates(:ncol,:,   532) = rxt_rates(:ncol,:,   532)*sol(:ncol,:,   117)*sol(:ncol,:,   242)                            ! rate_const*MTERPO2VBS*HO2
     543    72055296 :       rxt_rates(:ncol,:,   533) = rxt_rates(:ncol,:,   533)*sol(:ncol,:,   117)*sol(:ncol,:,   129)                            ! rate_const*MTERPO2VBS*NO
     544    72055296 :       rxt_rates(:ncol,:,   534) = rxt_rates(:ncol,:,   534)*sol(:ncol,:,   116)*sol(:ncol,:,   140)                            ! rate_const*MTERP*O3
     545    72055296 :       rxt_rates(:ncol,:,   535) = rxt_rates(:ncol,:,   535)*sol(:ncol,:,   116)*sol(:ncol,:,   253)                            ! rate_const*MTERP*OH
     546    72055296 :       rxt_rates(:ncol,:,   536) = rxt_rates(:ncol,:,   536)*sol(:ncol,:,   210)*sol(:ncol,:,   253)                            ! rate_const*SVOCbb*OH
     547    72055296 :       rxt_rates(:ncol,:,   537) = rxt_rates(:ncol,:,   537)*sol(:ncol,:,   211)*sol(:ncol,:,   253)                            ! rate_const*SVOCff*OH
     548    72055296 :       rxt_rates(:ncol,:,   538) = rxt_rates(:ncol,:,   538)*sol(:ncol,:,   219)*sol(:ncol,:,   253)                            ! rate_const*TOLUENE*OH
     549    72055296 :       rxt_rates(:ncol,:,   539) = rxt_rates(:ncol,:,   539)*sol(:ncol,:,   220)*sol(:ncol,:,   242)                            ! rate_const*TOLUO2VBS*HO2
     550    72055296 :       rxt_rates(:ncol,:,   540) = rxt_rates(:ncol,:,   540)*sol(:ncol,:,   220)*sol(:ncol,:,   129)                            ! rate_const*TOLUO2VBS*NO
     551    72055296 :       rxt_rates(:ncol,:,   541) = rxt_rates(:ncol,:,   541)*sol(:ncol,:,    77)                                                ! rate_const*GLYOXAL
     552    72055296 :       rxt_rates(:ncol,:,   542) = rxt_rates(:ncol,:,   542)*sol(:ncol,:,   222)*sol(:ncol,:,   253)                            ! rate_const*XYLENES*OH
     553    72055296 :       rxt_rates(:ncol,:,   543) = rxt_rates(:ncol,:,   543)*sol(:ncol,:,   224)*sol(:ncol,:,   242)                            ! rate_const*XYLEO2VBS*HO2
     554    72055296 :       rxt_rates(:ncol,:,   544) = rxt_rates(:ncol,:,   544)*sol(:ncol,:,   224)*sol(:ncol,:,   129)                            ! rate_const*XYLEO2VBS*NO
     555    72055296 :       rxt_rates(:ncol,:,   545) = rxt_rates(:ncol,:,   545)*sol(:ncol,:,   121)                                                ! rate_const*N2O5
     556    72055296 :       rxt_rates(:ncol,:,   546) = rxt_rates(:ncol,:,   546)*sol(:ncol,:,    94)*sol(:ncol,:,    87)                            ! rate_const*HOCL*HCL
     557    72055296 :       rxt_rates(:ncol,:,   547) = rxt_rates(:ncol,:,   547)*sol(:ncol,:,    22)                                                ! rate_const*BRONO2
     558    72055296 :       rxt_rates(:ncol,:,   548) = rxt_rates(:ncol,:,   548)*sol(:ncol,:,   121)                                                ! rate_const*N2O5
     559    72055296 :       rxt_rates(:ncol,:,   549) = rxt_rates(:ncol,:,   549)*sol(:ncol,:,    62)                                                ! rate_const*CLONO2
     560    72055296 :       rxt_rates(:ncol,:,   550) = rxt_rates(:ncol,:,   550)*sol(:ncol,:,    22)                                                ! rate_const*BRONO2
     561    72055296 :       rxt_rates(:ncol,:,   551) = rxt_rates(:ncol,:,   551)*sol(:ncol,:,    62)*sol(:ncol,:,    87)                            ! rate_const*CLONO2*HCL
     562    72055296 :       rxt_rates(:ncol,:,   552) = rxt_rates(:ncol,:,   552)*sol(:ncol,:,    94)*sol(:ncol,:,    87)                            ! rate_const*HOCL*HCL
     563    72055296 :       rxt_rates(:ncol,:,   553) = rxt_rates(:ncol,:,   553)*sol(:ncol,:,    93)*sol(:ncol,:,    87)                            ! rate_const*HOBR*HCL
     564    72055296 :       rxt_rates(:ncol,:,   554) = rxt_rates(:ncol,:,   554)*sol(:ncol,:,    62)                                                ! rate_const*CLONO2
     565    72055296 :       rxt_rates(:ncol,:,   555) = rxt_rates(:ncol,:,   555)*sol(:ncol,:,    22)                                                ! rate_const*BRONO2
     566    72055296 :       rxt_rates(:ncol,:,   556) = rxt_rates(:ncol,:,   556)*sol(:ncol,:,    62)*sol(:ncol,:,    87)                            ! rate_const*CLONO2*HCL
     567    72055296 :       rxt_rates(:ncol,:,   557) = rxt_rates(:ncol,:,   557)*sol(:ncol,:,    94)*sol(:ncol,:,    87)                            ! rate_const*HOCL*HCL
     568    72055296 :       rxt_rates(:ncol,:,   558) = rxt_rates(:ncol,:,   558)*sol(:ncol,:,    93)*sol(:ncol,:,    87)                            ! rate_const*HOBR*HCL
     569    72055296 :       rxt_rates(:ncol,:,   559) = rxt_rates(:ncol,:,   559)*sol(:ncol,:,   121)                                                ! rate_const*N2O5
     570    72055296 :       rxt_rates(:ncol,:,   560) = rxt_rates(:ncol,:,   560)*sol(:ncol,:,    62)                                                ! rate_const*CLONO2
     571    72055296 :       rxt_rates(:ncol,:,   561) = rxt_rates(:ncol,:,   561)*sol(:ncol,:,    62)*sol(:ncol,:,    87)                            ! rate_const*CLONO2*HCL
     572    72055296 :       rxt_rates(:ncol,:,   562) = rxt_rates(:ncol,:,   562)*sol(:ncol,:,    73)                                                ! rate_const*E90
     573      145920 :   end subroutine set_rates
     574             : end module mo_rxt_rates_conv

Generated by: LCOV version 1.14