LCOV - code coverage report
Current view: top level - chemistry/pp_waccm_mad_mam5 - mo_rxt_rates_conv.F90 (source / functions) Hit Total Coverage
Test: coverage.info Lines: 600 600 100.0 %
Date: 2025-03-14 01:26:08 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       46080 :    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    77921280 :       rxt_rates(:ncol,:,     1) = rxt_rates(:ncol,:,     1)*sol(:ncol,:,   139)                                                ! rate_const*H2O
      12    77921280 :       rxt_rates(:ncol,:,     2) = rxt_rates(:ncol,:,     2)*sol(:ncol,:,   139)                                                ! rate_const*H2O
      13    77921280 :       rxt_rates(:ncol,:,     3) = rxt_rates(:ncol,:,     3)*sol(:ncol,:,   139)                                                ! rate_const*H2O
      14    77921280 :       rxt_rates(:ncol,:,     4) = rxt_rates(:ncol,:,     4)*sol(:ncol,:,    43)                                                ! rate_const*H2O2
      15    77921280 :       rxt_rates(:ncol,:,     5) = rxt_rates(:ncol,:,     5)*sol(:ncol,:,    72)                                                ! rate_const*O2
      16    77921280 :       rxt_rates(:ncol,:,     6) = rxt_rates(:ncol,:,     6)*sol(:ncol,:,    72)                                                ! rate_const*O2
      17    77921280 :       rxt_rates(:ncol,:,     7) = rxt_rates(:ncol,:,     7)*sol(:ncol,:,    73)                                                ! rate_const*O3
      18    77921280 :       rxt_rates(:ncol,:,     8) = rxt_rates(:ncol,:,     8)*sol(:ncol,:,    73)                                                ! rate_const*O3
      19    77921280 :       rxt_rates(:ncol,:,     9) = rxt_rates(:ncol,:,     9)*sol(:ncol,:,    51)                                                ! rate_const*HNO3
      20    77921280 :       rxt_rates(:ncol,:,    10) = rxt_rates(:ncol,:,    10)*sol(:ncol,:,    52)                                                ! rate_const*HO2NO2
      21    77921280 :       rxt_rates(:ncol,:,    11) = rxt_rates(:ncol,:,    11)*sol(:ncol,:,    52)                                                ! rate_const*HO2NO2
      22    77921280 :       rxt_rates(:ncol,:,    12) = rxt_rates(:ncol,:,    12)*sol(:ncol,:,    55)                                                ! rate_const*HONO
      23    77921280 :       rxt_rates(:ncol,:,    13) = rxt_rates(:ncol,:,    13)*sol(:ncol,:,    57)                                                ! rate_const*N2O
      24    77921280 :       rxt_rates(:ncol,:,    14) = rxt_rates(:ncol,:,    14)*sol(:ncol,:,    58)                                                ! rate_const*N2O5
      25    77921280 :       rxt_rates(:ncol,:,    15) = rxt_rates(:ncol,:,    15)*sol(:ncol,:,    58)                                                ! rate_const*N2O5
      26    77921280 :       rxt_rates(:ncol,:,    16) = rxt_rates(:ncol,:,    16)*sol(:ncol,:,    62)                                                ! rate_const*NO
      27    77921280 :       rxt_rates(:ncol,:,    17) = rxt_rates(:ncol,:,    17)*sol(:ncol,:,    62)                                                ! rate_const*NO
      28    77921280 :       rxt_rates(:ncol,:,    18) = rxt_rates(:ncol,:,    18)*sol(:ncol,:,    63)                                                ! rate_const*NO2
      29    77921280 :       rxt_rates(:ncol,:,    19) = rxt_rates(:ncol,:,    19)*sol(:ncol,:,    64)                                                ! rate_const*NO3
      30    77921280 :       rxt_rates(:ncol,:,    20) = rxt_rates(:ncol,:,    20)*sol(:ncol,:,    64)                                                ! rate_const*NO3
      31    77921280 :       rxt_rates(:ncol,:,    21) = rxt_rates(:ncol,:,    21)*sol(:ncol,:,    17)                                                ! rate_const*CH2O
      32    77921280 :       rxt_rates(:ncol,:,    22) = rxt_rates(:ncol,:,    22)*sol(:ncol,:,    17)                                                ! rate_const*CH2O
      33    77921280 :       rxt_rates(:ncol,:,    23) = rxt_rates(:ncol,:,    23)*sol(:ncol,:,    22)                                                ! rate_const*CH3OOH
      34    77921280 :       rxt_rates(:ncol,:,    24) = rxt_rates(:ncol,:,    24)*sol(:ncol,:,    23)                                                ! rate_const*CH4
      35    77921280 :       rxt_rates(:ncol,:,    25) = rxt_rates(:ncol,:,    25)*sol(:ncol,:,    23)                                                ! rate_const*CH4
      36    77921280 :       rxt_rates(:ncol,:,    26) = rxt_rates(:ncol,:,    26)*sol(:ncol,:,    32)                                                ! rate_const*CO2
      37    77921280 :       rxt_rates(:ncol,:,    27) = rxt_rates(:ncol,:,    27)*sol(:ncol,:,     4)                                                ! rate_const*BRCL
      38    77921280 :       rxt_rates(:ncol,:,    28) = rxt_rates(:ncol,:,    28)*sol(:ncol,:,     5)                                                ! rate_const*BRO
      39    77921280 :       rxt_rates(:ncol,:,    29) = rxt_rates(:ncol,:,    29)*sol(:ncol,:,     6)                                                ! rate_const*BRONO2
      40    77921280 :       rxt_rates(:ncol,:,    30) = rxt_rates(:ncol,:,    30)*sol(:ncol,:,     6)                                                ! rate_const*BRONO2
      41    77921280 :       rxt_rates(:ncol,:,    31) = rxt_rates(:ncol,:,    31)*sol(:ncol,:,     8)                                                ! rate_const*CCL4
      42    77921280 :       rxt_rates(:ncol,:,    32) = rxt_rates(:ncol,:,    32)*sol(:ncol,:,     9)                                                ! rate_const*CF2CLBR
      43    77921280 :       rxt_rates(:ncol,:,    33) = rxt_rates(:ncol,:,    33)*sol(:ncol,:,    10)                                                ! rate_const*CF3BR
      44    77921280 :       rxt_rates(:ncol,:,    34) = rxt_rates(:ncol,:,    34)*sol(:ncol,:,    11)                                                ! rate_const*CFC11
      45    77921280 :       rxt_rates(:ncol,:,    35) = rxt_rates(:ncol,:,    35)*sol(:ncol,:,    12)                                                ! rate_const*CFC113
      46    77921280 :       rxt_rates(:ncol,:,    36) = rxt_rates(:ncol,:,    36)*sol(:ncol,:,    13)                                                ! rate_const*CFC114
      47    77921280 :       rxt_rates(:ncol,:,    37) = rxt_rates(:ncol,:,    37)*sol(:ncol,:,    14)                                                ! rate_const*CFC115
      48    77921280 :       rxt_rates(:ncol,:,    38) = rxt_rates(:ncol,:,    38)*sol(:ncol,:,    15)                                                ! rate_const*CFC12
      49    77921280 :       rxt_rates(:ncol,:,    39) = rxt_rates(:ncol,:,    39)*sol(:ncol,:,    16)                                                ! rate_const*CH2BR2
      50    77921280 :       rxt_rates(:ncol,:,    40) = rxt_rates(:ncol,:,    40)*sol(:ncol,:,    18)                                                ! rate_const*CH3BR
      51    77921280 :       rxt_rates(:ncol,:,    41) = rxt_rates(:ncol,:,    41)*sol(:ncol,:,    19)                                                ! rate_const*CH3CCL3
      52    77921280 :       rxt_rates(:ncol,:,    42) = rxt_rates(:ncol,:,    42)*sol(:ncol,:,    20)                                                ! rate_const*CH3CL
      53    77921280 :       rxt_rates(:ncol,:,    43) = rxt_rates(:ncol,:,    43)*sol(:ncol,:,    24)                                                ! rate_const*CHBR3
      54    77921280 :       rxt_rates(:ncol,:,    44) = rxt_rates(:ncol,:,    44)*sol(:ncol,:,    26)                                                ! rate_const*CL2
      55    77921280 :       rxt_rates(:ncol,:,    45) = rxt_rates(:ncol,:,    45)*sol(:ncol,:,    27)                                                ! rate_const*CL2O2
      56    77921280 :       rxt_rates(:ncol,:,    46) = rxt_rates(:ncol,:,    46)*sol(:ncol,:,    28)                                                ! rate_const*CLO
      57    77921280 :       rxt_rates(:ncol,:,    47) = rxt_rates(:ncol,:,    47)*sol(:ncol,:,    29)                                                ! rate_const*CLONO2
      58    77921280 :       rxt_rates(:ncol,:,    48) = rxt_rates(:ncol,:,    48)*sol(:ncol,:,    29)                                                ! rate_const*CLONO2
      59    77921280 :       rxt_rates(:ncol,:,    49) = rxt_rates(:ncol,:,    49)*sol(:ncol,:,    33)                                                ! rate_const*COF2
      60    77921280 :       rxt_rates(:ncol,:,    50) = rxt_rates(:ncol,:,    50)*sol(:ncol,:,    34)                                                ! rate_const*COFCL
      61    77921280 :       rxt_rates(:ncol,:,    51) = rxt_rates(:ncol,:,    51)*sol(:ncol,:,    42)                                                ! rate_const*H2402
      62    77921280 :       rxt_rates(:ncol,:,    52) = rxt_rates(:ncol,:,    52)*sol(:ncol,:,    45)                                                ! rate_const*HBR
      63    77921280 :       rxt_rates(:ncol,:,    53) = rxt_rates(:ncol,:,    53)*sol(:ncol,:,    46)                                                ! rate_const*HCFC141B
      64    77921280 :       rxt_rates(:ncol,:,    54) = rxt_rates(:ncol,:,    54)*sol(:ncol,:,    47)                                                ! rate_const*HCFC142B
      65    77921280 :       rxt_rates(:ncol,:,    55) = rxt_rates(:ncol,:,    55)*sol(:ncol,:,    48)                                                ! rate_const*HCFC22
      66    77921280 :       rxt_rates(:ncol,:,    56) = rxt_rates(:ncol,:,    56)*sol(:ncol,:,    49)                                                ! rate_const*HCL
      67    77921280 :       rxt_rates(:ncol,:,    57) = rxt_rates(:ncol,:,    57)*sol(:ncol,:,    50)                                                ! rate_const*HF
      68    77921280 :       rxt_rates(:ncol,:,    58) = rxt_rates(:ncol,:,    58)*sol(:ncol,:,    53)                                                ! rate_const*HOBR
      69    77921280 :       rxt_rates(:ncol,:,    59) = rxt_rates(:ncol,:,    59)*sol(:ncol,:,    54)                                                ! rate_const*HOCL
      70    77921280 :       rxt_rates(:ncol,:,    60) = rxt_rates(:ncol,:,    60)*sol(:ncol,:,    74)                                                ! rate_const*OCLO
      71    77921280 :       rxt_rates(:ncol,:,    61) = rxt_rates(:ncol,:,    61)*sol(:ncol,:,    79)                                                ! rate_const*SF6
      72    77921280 :       rxt_rates(:ncol,:,    62) = rxt_rates(:ncol,:,    62)*sol(:ncol,:,    32)                                                ! rate_const*CO2
      73    77921280 :       rxt_rates(:ncol,:,    63) = rxt_rates(:ncol,:,    63)*sol(:ncol,:,    94)                                                ! rate_const*CO3m
      74    77921280 :       rxt_rates(:ncol,:,    64) = rxt_rates(:ncol,:,    64)*sol(:ncol,:,    96)                                                ! rate_const*CO3m_H2O
      75    77921280 :       rxt_rates(:ncol,:,    65) = rxt_rates(:ncol,:,    65)*sol(:ncol,:,    97)                                                ! rate_const*CO4m
      76    77921280 :       rxt_rates(:ncol,:,    66) = rxt_rates(:ncol,:,    66)*sol(:ncol,:,    56)                                                ! rate_const*N
      77             :                                                                                                                                ! rate_const*N2
      78             :                                                                                                                                ! rate_const*N2
      79             :                                                                                                                                ! rate_const*N2
      80             :                                                                                                                                ! rate_const*N2
      81             :                                                                                                                                ! rate_const*N2
      82             :                                                                                                                                ! rate_const*N2
      83             :                                                                                                                                ! rate_const*N2
      84             :                                                                                                                                ! rate_const*N2
      85    77921280 :       rxt_rates(:ncol,:,    75) = rxt_rates(:ncol,:,    75)*sol(:ncol,:,   111)                                                ! rate_const*NO2m
      86    77921280 :       rxt_rates(:ncol,:,    76) = rxt_rates(:ncol,:,    76)*sol(:ncol,:,   113)                                                ! rate_const*NO3m
      87    77921280 :       rxt_rates(:ncol,:,    77) = rxt_rates(:ncol,:,    77)*sol(:ncol,:,    70)                                                ! rate_const*O
      88    77921280 :       rxt_rates(:ncol,:,    78) = rxt_rates(:ncol,:,    78)*sol(:ncol,:,    70)                                                ! rate_const*O
      89    77921280 :       rxt_rates(:ncol,:,    79) = rxt_rates(:ncol,:,    79)*sol(:ncol,:,    70)                                                ! rate_const*O
      90    77921280 :       rxt_rates(:ncol,:,    80) = rxt_rates(:ncol,:,    80)*sol(:ncol,:,    70)                                                ! rate_const*O
      91    77921280 :       rxt_rates(:ncol,:,    81) = rxt_rates(:ncol,:,    81)*sol(:ncol,:,    70)                                                ! rate_const*O
      92    77921280 :       rxt_rates(:ncol,:,    82) = rxt_rates(:ncol,:,    82)*sol(:ncol,:,    70)                                                ! rate_const*O
      93    77921280 :       rxt_rates(:ncol,:,    83) = rxt_rates(:ncol,:,    83)*sol(:ncol,:,    72)                                                ! rate_const*O2
      94    77921280 :       rxt_rates(:ncol,:,    84) = rxt_rates(:ncol,:,    84)*sol(:ncol,:,    72)                                                ! rate_const*O2
      95    77921280 :       rxt_rates(:ncol,:,    85) = rxt_rates(:ncol,:,    85)*sol(:ncol,:,    72)                                                ! rate_const*O2
      96    77921280 :       rxt_rates(:ncol,:,    86) = rxt_rates(:ncol,:,    86)*sol(:ncol,:,    72)                                                ! rate_const*O2
      97    77921280 :       rxt_rates(:ncol,:,    87) = rxt_rates(:ncol,:,    87)*sol(:ncol,:,    72)                                                ! rate_const*O2
      98    77921280 :       rxt_rates(:ncol,:,    88) = rxt_rates(:ncol,:,    88)*sol(:ncol,:,    72)                                                ! rate_const*O2
      99    77921280 :       rxt_rates(:ncol,:,    89) = rxt_rates(:ncol,:,    89)*sol(:ncol,:,    72)                                                ! rate_const*O2
     100    77921280 :       rxt_rates(:ncol,:,    90) = rxt_rates(:ncol,:,    90)*sol(:ncol,:,    72)                                                ! rate_const*O2
     101    77921280 :       rxt_rates(:ncol,:,    91) = rxt_rates(:ncol,:,    91)*sol(:ncol,:,    72)                                                ! rate_const*O2
     102    77921280 :       rxt_rates(:ncol,:,    92) = rxt_rates(:ncol,:,    92)*sol(:ncol,:,    72)                                                ! rate_const*O2
     103    77921280 :       rxt_rates(:ncol,:,    93) = rxt_rates(:ncol,:,    93)*sol(:ncol,:,   127)                                                ! rate_const*O2m
     104    77921280 :       rxt_rates(:ncol,:,    94) = rxt_rates(:ncol,:,    94)*sol(:ncol,:,   129)                                                ! rate_const*O2p_H2O
     105    77921280 :       rxt_rates(:ncol,:,    95) = rxt_rates(:ncol,:,    95)*sol(:ncol,:,   130)                                                ! rate_const*O3m
     106    77921280 :       rxt_rates(:ncol,:,    96) = rxt_rates(:ncol,:,    96)*sol(:ncol,:,   130)                                                ! rate_const*O3m
     107    77921280 :       rxt_rates(:ncol,:,    97) = rxt_rates(:ncol,:,    97)*sol(:ncol,:,   131)                                                ! rate_const*O4m
     108    77921280 :       rxt_rates(:ncol,:,    98) = rxt_rates(:ncol,:,    98)*sol(:ncol,:,   134)                                                ! rate_const*OHm
     109    77921280 :       rxt_rates(:ncol,:,    99) = rxt_rates(:ncol,:,    99)*sol(:ncol,:,   135)                                                ! rate_const*Om
     110    77921280 :       rxt_rates(:ncol,:,   100) = rxt_rates(:ncol,:,   100)*sol(:ncol,:,    44)                                                ! rate_const*H2SO4
     111    77921280 :       rxt_rates(:ncol,:,   101) = rxt_rates(:ncol,:,   101)*sol(:ncol,:,    75)                                                ! rate_const*OCS
     112    77921280 :       rxt_rates(:ncol,:,   102) = rxt_rates(:ncol,:,   102)*sol(:ncol,:,    80)                                                ! rate_const*SO
     113    77921280 :       rxt_rates(:ncol,:,   103) = rxt_rates(:ncol,:,   103)*sol(:ncol,:,    81)                                                ! rate_const*SO2
     114    77921280 :       rxt_rates(:ncol,:,   104) = rxt_rates(:ncol,:,   104)*sol(:ncol,:,    82)                                                ! rate_const*SO3
     115    77921280 :       rxt_rates(:ncol,:,   105) = rxt_rates(:ncol,:,   105)*sol(:ncol,:,    90)*sol(:ncol,:,    40)                            ! rate_const*CLm*H
     116    77921280 :       rxt_rates(:ncol,:,   106) = rxt_rates(:ncol,:,   106)*sol(:ncol,:,    91)*sol(:ncol,:,    49)                            ! rate_const*CLm_H2O*HCL
     117    77921280 :       rxt_rates(:ncol,:,   107) = rxt_rates(:ncol,:,   107)*sol(:ncol,:,    90)*sol(:ncol,:,   139)                            ! rate_const*M*CLm*H2O
     118    77921280 :       rxt_rates(:ncol,:,   108) = rxt_rates(:ncol,:,   108)*sol(:ncol,:,    49)*sol(:ncol,:,    90)                            ! rate_const*M*HCL*CLm
     119    77921280 :       rxt_rates(:ncol,:,   109) = rxt_rates(:ncol,:,   109)*sol(:ncol,:,    90)*sol(:ncol,:,    51)                            ! rate_const*CLm*HNO3
     120    77921280 :       rxt_rates(:ncol,:,   110) = rxt_rates(:ncol,:,   110)*sol(:ncol,:,    90)*sol(:ncol,:,    63)                            ! rate_const*CLm*NO2
     121    77921280 :       rxt_rates(:ncol,:,   111) = rxt_rates(:ncol,:,   111)*sol(:ncol,:,    93)*sol(:ncol,:,    62)                            ! rate_const*CLOm*NO
     122    77921280 :       rxt_rates(:ncol,:,   112) = rxt_rates(:ncol,:,   112)*sol(:ncol,:,    93)*sol(:ncol,:,    62)                            ! rate_const*CLOm*NO
     123    77921280 :       rxt_rates(:ncol,:,   113) = rxt_rates(:ncol,:,   113)*sol(:ncol,:,    93)*sol(:ncol,:,    70)                            ! rate_const*CLOm*O
     124    77921280 :       rxt_rates(:ncol,:,   114) = rxt_rates(:ncol,:,   114)*sol(:ncol,:,    25)*sol(:ncol,:,    94)                            ! rate_const*CL*CO3m
     125    77921280 :       rxt_rates(:ncol,:,   115) = rxt_rates(:ncol,:,   115)*sol(:ncol,:,    25)*sol(:ncol,:,    94)                            ! rate_const*CL*CO3m
     126    77921280 :       rxt_rates(:ncol,:,   116) = rxt_rates(:ncol,:,   116)*sol(:ncol,:,    28)*sol(:ncol,:,    94)                            ! rate_const*CLO*CO3m
     127    77921280 :       rxt_rates(:ncol,:,   117) = rxt_rates(:ncol,:,   117)*sol(:ncol,:,    40)*sol(:ncol,:,    94)                            ! rate_const*H*CO3m
     128    77921280 :       rxt_rates(:ncol,:,   118) = rxt_rates(:ncol,:,   118)*sol(:ncol,:,    96)*sol(:ncol,:,   139)                            ! rate_const*M*CO3m_H2O*H2O
     129    77921280 :       rxt_rates(:ncol,:,   119) = rxt_rates(:ncol,:,   119)*sol(:ncol,:,    94)*sol(:ncol,:,   139)                            ! rate_const*M*CO3m*H2O
     130    77921280 :       rxt_rates(:ncol,:,   120) = rxt_rates(:ncol,:,   120)*sol(:ncol,:,    96)*sol(:ncol,:,    63)                            ! rate_const*CO3m_H2O*NO2
     131    77921280 :       rxt_rates(:ncol,:,   121) = rxt_rates(:ncol,:,   121)*sol(:ncol,:,    96)*sol(:ncol,:,    63)                            ! rate_const*CO3m_H2O*NO2
     132    77921280 :       rxt_rates(:ncol,:,   122) = rxt_rates(:ncol,:,   122)*sol(:ncol,:,    96)*sol(:ncol,:,    62)                            ! rate_const*CO3m_H2O*NO
     133    77921280 :       rxt_rates(:ncol,:,   123) = rxt_rates(:ncol,:,   123)*sol(:ncol,:,    96)*sol(:ncol,:,    62)                            ! rate_const*CO3m_H2O*NO
     134    77921280 :       rxt_rates(:ncol,:,   124) = rxt_rates(:ncol,:,   124)*sol(:ncol,:,    94)*sol(:ncol,:,    51)                            ! rate_const*CO3m*HNO3
     135    77921280 :       rxt_rates(:ncol,:,   125) = rxt_rates(:ncol,:,   125)*sol(:ncol,:,    94)*sol(:ncol,:,    70)                            ! rate_const*CO3m*O
     136    77921280 :       rxt_rates(:ncol,:,   126) = rxt_rates(:ncol,:,   126)*sol(:ncol,:,    72)*sol(:ncol,:,    94)                            ! rate_const*O2*CO3m
     137    77921280 :       rxt_rates(:ncol,:,   127) = rxt_rates(:ncol,:,   127)*sol(:ncol,:,    25)*sol(:ncol,:,    97)                            ! rate_const*CL*CO4m
     138    77921280 :       rxt_rates(:ncol,:,   128) = rxt_rates(:ncol,:,   128)*sol(:ncol,:,    28)*sol(:ncol,:,    97)                            ! rate_const*CLO*CO4m
     139    77921280 :       rxt_rates(:ncol,:,   129) = rxt_rates(:ncol,:,   129)*sol(:ncol,:,    97)*sol(:ncol,:,    40)                            ! rate_const*CO4m*H
     140    77921280 :       rxt_rates(:ncol,:,   130) = rxt_rates(:ncol,:,   130)*sol(:ncol,:,    97)*sol(:ncol,:,    49)                            ! rate_const*CO4m*HCL
     141    77921280 :       rxt_rates(:ncol,:,   131) = rxt_rates(:ncol,:,   131)*sol(:ncol,:,    97)*sol(:ncol,:,    70)                            ! rate_const*CO4m*O
     142    77921280 :       rxt_rates(:ncol,:,   132) = rxt_rates(:ncol,:,   132)*sol(:ncol,:,    97)*sol(:ncol,:,    73)                            ! rate_const*CO4m*O3
     143    77921280 :       rxt_rates(:ncol,:,   133) = rxt_rates(:ncol,:,   133)*sol(:ncol,:,    98)*sol(:ncol,:,    72)                            ! rate_const*N2*e*O2
     144    77921280 :       rxt_rates(:ncol,:,   134) = rxt_rates(:ncol,:,   134)*sol(:ncol,:,    73)*sol(:ncol,:,    98)                            ! rate_const*O3*e
     145    77921280 :       rxt_rates(:ncol,:,   135) = rxt_rates(:ncol,:,   135)*sol(:ncol,:,    72)*sol(:ncol,:,    98)                            ! rate_const*M*O2*e
     146    77921280 :       rxt_rates(:ncol,:,   136) = rxt_rates(:ncol,:,   136)*sol(:ncol,:,    62)*sol(:ncol,:,   135)                            ! rate_const*NO*Om
     147    77921280 :       rxt_rates(:ncol,:,   137) = rxt_rates(:ncol,:,   137)*sol(:ncol,:,   127)                                                ! rate_const*N2*O2m
     148    77921280 :       rxt_rates(:ncol,:,   138) = rxt_rates(:ncol,:,   138)*sol(:ncol,:,    99)*sol(:ncol,:,    98)                            ! rate_const*H3Op_OH*e
     149    77921280 :       rxt_rates(:ncol,:,   139) = rxt_rates(:ncol,:,   139)*sol(:ncol,:,   139)*sol(:ncol,:,    99)                            ! rate_const*H2O*H3Op_OH
     150    77921280 :       rxt_rates(:ncol,:,   140) = rxt_rates(:ncol,:,   140)*sol(:ncol,:,   139)*sol(:ncol,:,   104)                            ! rate_const*H2O*Hp_3N1
     151    77921280 :       rxt_rates(:ncol,:,   141) = rxt_rates(:ncol,:,   141)*sol(:ncol,:,   105)*sol(:ncol,:,    98)                            ! rate_const*Hp_4H2O*e
     152    77921280 :       rxt_rates(:ncol,:,   142) = rxt_rates(:ncol,:,   142)*sol(:ncol,:,   105)*sol(:ncol,:,    58)                            ! rate_const*Hp_4H2O*N2O5
     153    77921280 :       rxt_rates(:ncol,:,   143) = rxt_rates(:ncol,:,   143)*sol(:ncol,:,   139)*sol(:ncol,:,   106)                            ! rate_const*H2O*Hp_4N1
     154    77921280 :       rxt_rates(:ncol,:,   144) = rxt_rates(:ncol,:,   144)*sol(:ncol,:,   107)*sol(:ncol,:,    98)                            ! rate_const*Hp_5H2O*e
     155    77921280 :       rxt_rates(:ncol,:,   145) = rxt_rates(:ncol,:,   145)*sol(:ncol,:,   107)*sol(:ncol,:,    58)                            ! rate_const*Hp_5H2O*N2O5
     156    77921280 :       rxt_rates(:ncol,:,   146) = rxt_rates(:ncol,:,   146)*sol(:ncol,:,   105)*sol(:ncol,:,   117)                            ! rate_const*Hp_4H2O*NO3mHNO3
     157    77921280 :       rxt_rates(:ncol,:,   147) = rxt_rates(:ncol,:,   147)*sol(:ncol,:,    90)*sol(:ncol,:,   105)                            ! rate_const*CLm*Hp_4H2O
     158    77921280 :       rxt_rates(:ncol,:,   148) = rxt_rates(:ncol,:,   148)*sol(:ncol,:,   113)*sol(:ncol,:,   128)                            ! rate_const*NO3m*O2p
     159    77921280 :       rxt_rates(:ncol,:,   149) = rxt_rates(:ncol,:,   149)*sol(:ncol,:,   100)*sol(:ncol,:,   128)                            ! rate_const*HCO3m*O2p
     160    77921280 :       rxt_rates(:ncol,:,   150) = rxt_rates(:ncol,:,   150)*sol(:ncol,:,   127)*sol(:ncol,:,   128)                            ! rate_const*O2m*O2p
     161    77921280 :       rxt_rates(:ncol,:,   151) = rxt_rates(:ncol,:,   151)*sol(:ncol,:,    97)*sol(:ncol,:,   128)                            ! rate_const*CO4m*O2p
     162    77921280 :       rxt_rates(:ncol,:,   152) = rxt_rates(:ncol,:,   152)*sol(:ncol,:,   115)*sol(:ncol,:,   128)                            ! rate_const*NO3m_H2O*O2p
     163    77921280 :       rxt_rates(:ncol,:,   153) = rxt_rates(:ncol,:,   153)*sol(:ncol,:,    95)*sol(:ncol,:,   128)                            ! rate_const*CO3m2H2O*O2p
     164    77921280 :       rxt_rates(:ncol,:,   154) = rxt_rates(:ncol,:,   154)*sol(:ncol,:,    90)*sol(:ncol,:,   128)                            ! rate_const*CLm*O2p
     165    77921280 :       rxt_rates(:ncol,:,   155) = rxt_rates(:ncol,:,   155)*sol(:ncol,:,    96)*sol(:ncol,:,   128)                            ! rate_const*CO3m_H2O*O2p
     166    77921280 :       rxt_rates(:ncol,:,   156) = rxt_rates(:ncol,:,   156)*sol(:ncol,:,   112)*sol(:ncol,:,   128)                            ! rate_const*NO2m_H2O*O2p
     167    77921280 :       rxt_rates(:ncol,:,   157) = rxt_rates(:ncol,:,   157)*sol(:ncol,:,   116)*sol(:ncol,:,   128)                            ! rate_const*NO3m_HCL*O2p
     168    77921280 :       rxt_rates(:ncol,:,   158) = rxt_rates(:ncol,:,   158)*sol(:ncol,:,    96)*sol(:ncol,:,   105)                            ! rate_const*CO3m_H2O*Hp_4H2O
     169    77921280 :       rxt_rates(:ncol,:,   159) = rxt_rates(:ncol,:,   159)*sol(:ncol,:,   128)*sol(:ncol,:,    91)                            ! rate_const*O2p*CLm_H2O
     170    77921280 :       rxt_rates(:ncol,:,   160) = rxt_rates(:ncol,:,   160)*sol(:ncol,:,   114)*sol(:ncol,:,   128)                            ! rate_const*NO3m2H2O*O2p
     171    77921280 :       rxt_rates(:ncol,:,   161) = rxt_rates(:ncol,:,   161)*sol(:ncol,:,   111)*sol(:ncol,:,   128)                            ! rate_const*NO2m*O2p
     172    77921280 :       rxt_rates(:ncol,:,   162) = rxt_rates(:ncol,:,   162)*sol(:ncol,:,   105)*sol(:ncol,:,   112)                            ! rate_const*Hp_4H2O*NO2m_H2O
     173    77921280 :       rxt_rates(:ncol,:,   163) = rxt_rates(:ncol,:,   163)*sol(:ncol,:,   105)*sol(:ncol,:,   116)                            ! rate_const*Hp_4H2O*NO3m_HCL
     174    77921280 :       rxt_rates(:ncol,:,   164) = rxt_rates(:ncol,:,   164)*sol(:ncol,:,    91)*sol(:ncol,:,   105)                            ! rate_const*CLm_H2O*Hp_4H2O
     175    77921280 :       rxt_rates(:ncol,:,   165) = rxt_rates(:ncol,:,   165)*sol(:ncol,:,   114)*sol(:ncol,:,   105)                            ! rate_const*NO3m2H2O*Hp_4H2O
     176    77921280 :       rxt_rates(:ncol,:,   166) = rxt_rates(:ncol,:,   166)*sol(:ncol,:,   105)*sol(:ncol,:,   111)                            ! rate_const*Hp_4H2O*NO2m
     177    77921280 :       rxt_rates(:ncol,:,   167) = rxt_rates(:ncol,:,   167)*sol(:ncol,:,   107)*sol(:ncol,:,   117)                            ! rate_const*Hp_5H2O*NO3mHNO3
     178    77921280 :       rxt_rates(:ncol,:,   168) = rxt_rates(:ncol,:,   168)*sol(:ncol,:,    94)*sol(:ncol,:,   107)                            ! rate_const*CO3m*Hp_5H2O
     179    77921280 :       rxt_rates(:ncol,:,   169) = rxt_rates(:ncol,:,   169)*sol(:ncol,:,    92)*sol(:ncol,:,   107)                            ! rate_const*CLm_HCL*Hp_5H2O
     180    77921280 :       rxt_rates(:ncol,:,   170) = rxt_rates(:ncol,:,   170)*sol(:ncol,:,    94)*sol(:ncol,:,   105)                            ! rate_const*CO3m*Hp_4H2O
     181    77921280 :       rxt_rates(:ncol,:,   171) = rxt_rates(:ncol,:,   171)*sol(:ncol,:,   113)*sol(:ncol,:,   107)                            ! rate_const*NO3m*Hp_5H2O
     182    77921280 :       rxt_rates(:ncol,:,   172) = rxt_rates(:ncol,:,   172)*sol(:ncol,:,   100)*sol(:ncol,:,   107)                            ! rate_const*HCO3m*Hp_5H2O
     183    77921280 :       rxt_rates(:ncol,:,   173) = rxt_rates(:ncol,:,   173)*sol(:ncol,:,   107)*sol(:ncol,:,   127)                            ! rate_const*Hp_5H2O*O2m
     184    77921280 :       rxt_rates(:ncol,:,   174) = rxt_rates(:ncol,:,   174)*sol(:ncol,:,    97)*sol(:ncol,:,   107)                            ! rate_const*CO4m*Hp_5H2O
     185    77921280 :       rxt_rates(:ncol,:,   175) = rxt_rates(:ncol,:,   175)*sol(:ncol,:,   107)*sol(:ncol,:,   115)                            ! rate_const*Hp_5H2O*NO3m_H2O
     186    77921280 :       rxt_rates(:ncol,:,   176) = rxt_rates(:ncol,:,   176)*sol(:ncol,:,    95)*sol(:ncol,:,   107)                            ! rate_const*CO3m2H2O*Hp_5H2O
     187    77921280 :       rxt_rates(:ncol,:,   177) = rxt_rates(:ncol,:,   177)*sol(:ncol,:,    90)*sol(:ncol,:,   107)                            ! rate_const*CLm*Hp_5H2O
     188    77921280 :       rxt_rates(:ncol,:,   178) = rxt_rates(:ncol,:,   178)*sol(:ncol,:,    96)*sol(:ncol,:,   107)                            ! rate_const*CO3m_H2O*Hp_5H2O
     189    77921280 :       rxt_rates(:ncol,:,   179) = rxt_rates(:ncol,:,   179)*sol(:ncol,:,   112)*sol(:ncol,:,   107)                            ! rate_const*NO2m_H2O*Hp_5H2O
     190    77921280 :       rxt_rates(:ncol,:,   180) = rxt_rates(:ncol,:,   180)*sol(:ncol,:,   107)*sol(:ncol,:,   116)                            ! rate_const*Hp_5H2O*NO3m_HCL
     191    77921280 :       rxt_rates(:ncol,:,   181) = rxt_rates(:ncol,:,   181)*sol(:ncol,:,    92)*sol(:ncol,:,   105)                            ! rate_const*CLm_HCL*Hp_4H2O
     192    77921280 :       rxt_rates(:ncol,:,   182) = rxt_rates(:ncol,:,   182)*sol(:ncol,:,    91)*sol(:ncol,:,   107)                            ! rate_const*CLm_H2O*Hp_5H2O
     193    77921280 :       rxt_rates(:ncol,:,   183) = rxt_rates(:ncol,:,   183)*sol(:ncol,:,   107)*sol(:ncol,:,   114)                            ! rate_const*Hp_5H2O*NO3m2H2O
     194    77921280 :       rxt_rates(:ncol,:,   184) = rxt_rates(:ncol,:,   184)*sol(:ncol,:,   107)*sol(:ncol,:,   111)                            ! rate_const*Hp_5H2O*NO2m
     195    77921280 :       rxt_rates(:ncol,:,   185) = rxt_rates(:ncol,:,   185)*sol(:ncol,:,   103)*sol(:ncol,:,   117)                            ! rate_const*Hp_3H2O*NO3mHNO3
     196    77921280 :       rxt_rates(:ncol,:,   186) = rxt_rates(:ncol,:,   186)*sol(:ncol,:,   103)*sol(:ncol,:,    94)                            ! rate_const*Hp_3H2O*CO3m
     197    77921280 :       rxt_rates(:ncol,:,   187) = rxt_rates(:ncol,:,   187)*sol(:ncol,:,    92)*sol(:ncol,:,   103)                            ! rate_const*CLm_HCL*Hp_3H2O
     198    77921280 :       rxt_rates(:ncol,:,   188) = rxt_rates(:ncol,:,   188)*sol(:ncol,:,   103)*sol(:ncol,:,   113)                            ! rate_const*Hp_3H2O*NO3m
     199    77921280 :       rxt_rates(:ncol,:,   189) = rxt_rates(:ncol,:,   189)*sol(:ncol,:,   100)*sol(:ncol,:,   103)                            ! rate_const*HCO3m*Hp_3H2O
     200    77921280 :       rxt_rates(:ncol,:,   190) = rxt_rates(:ncol,:,   190)*sol(:ncol,:,   103)*sol(:ncol,:,   127)                            ! rate_const*Hp_3H2O*O2m
     201    77921280 :       rxt_rates(:ncol,:,   191) = rxt_rates(:ncol,:,   191)*sol(:ncol,:,    97)*sol(:ncol,:,   103)                            ! rate_const*CO4m*Hp_3H2O
     202    77921280 :       rxt_rates(:ncol,:,   192) = rxt_rates(:ncol,:,   192)*sol(:ncol,:,   105)*sol(:ncol,:,   113)                            ! rate_const*Hp_4H2O*NO3m
     203    77921280 :       rxt_rates(:ncol,:,   193) = rxt_rates(:ncol,:,   193)*sol(:ncol,:,   103)*sol(:ncol,:,   115)                            ! rate_const*Hp_3H2O*NO3m_H2O
     204    77921280 :       rxt_rates(:ncol,:,   194) = rxt_rates(:ncol,:,   194)*sol(:ncol,:,    95)*sol(:ncol,:,   103)                            ! rate_const*CO3m2H2O*Hp_3H2O
     205    77921280 :       rxt_rates(:ncol,:,   195) = rxt_rates(:ncol,:,   195)*sol(:ncol,:,    90)*sol(:ncol,:,   103)                            ! rate_const*CLm*Hp_3H2O
     206    77921280 :       rxt_rates(:ncol,:,   196) = rxt_rates(:ncol,:,   196)*sol(:ncol,:,    96)*sol(:ncol,:,   103)                            ! rate_const*CO3m_H2O*Hp_3H2O
     207    77921280 :       rxt_rates(:ncol,:,   197) = rxt_rates(:ncol,:,   197)*sol(:ncol,:,   103)*sol(:ncol,:,   112)                            ! rate_const*Hp_3H2O*NO2m_H2O
     208    77921280 :       rxt_rates(:ncol,:,   198) = rxt_rates(:ncol,:,   198)*sol(:ncol,:,   103)*sol(:ncol,:,   116)                            ! rate_const*Hp_3H2O*NO3m_HCL
     209    77921280 :       rxt_rates(:ncol,:,   199) = rxt_rates(:ncol,:,   199)*sol(:ncol,:,    91)*sol(:ncol,:,   103)                            ! rate_const*CLm_H2O*Hp_3H2O
     210    77921280 :       rxt_rates(:ncol,:,   200) = rxt_rates(:ncol,:,   200)*sol(:ncol,:,   103)*sol(:ncol,:,   114)                            ! rate_const*Hp_3H2O*NO3m2H2O
     211    77921280 :       rxt_rates(:ncol,:,   201) = rxt_rates(:ncol,:,   201)*sol(:ncol,:,   103)*sol(:ncol,:,   111)                            ! rate_const*Hp_3H2O*NO2m
     212    77921280 :       rxt_rates(:ncol,:,   202) = rxt_rates(:ncol,:,   202)*sol(:ncol,:,   117)*sol(:ncol,:,   122)                            ! rate_const*NO3mHNO3*NOp_H2O
     213    77921280 :       rxt_rates(:ncol,:,   203) = rxt_rates(:ncol,:,   203)*sol(:ncol,:,   100)*sol(:ncol,:,   105)                            ! rate_const*HCO3m*Hp_4H2O
     214    77921280 :       rxt_rates(:ncol,:,   204) = rxt_rates(:ncol,:,   204)*sol(:ncol,:,    94)*sol(:ncol,:,   122)                            ! rate_const*CO3m*NOp_H2O
     215    77921280 :       rxt_rates(:ncol,:,   205) = rxt_rates(:ncol,:,   205)*sol(:ncol,:,    92)*sol(:ncol,:,   122)                            ! rate_const*CLm_HCL*NOp_H2O
     216    77921280 :       rxt_rates(:ncol,:,   206) = rxt_rates(:ncol,:,   206)*sol(:ncol,:,   113)*sol(:ncol,:,   122)                            ! rate_const*NO3m*NOp_H2O
     217    77921280 :       rxt_rates(:ncol,:,   207) = rxt_rates(:ncol,:,   207)*sol(:ncol,:,   100)*sol(:ncol,:,   122)                            ! rate_const*HCO3m*NOp_H2O
     218    77921280 :       rxt_rates(:ncol,:,   208) = rxt_rates(:ncol,:,   208)*sol(:ncol,:,   122)*sol(:ncol,:,   127)                            ! rate_const*NOp_H2O*O2m
     219    77921280 :       rxt_rates(:ncol,:,   209) = rxt_rates(:ncol,:,   209)*sol(:ncol,:,    97)*sol(:ncol,:,   122)                            ! rate_const*CO4m*NOp_H2O
     220    77921280 :       rxt_rates(:ncol,:,   210) = rxt_rates(:ncol,:,   210)*sol(:ncol,:,   115)*sol(:ncol,:,   122)                            ! rate_const*NO3m_H2O*NOp_H2O
     221    77921280 :       rxt_rates(:ncol,:,   211) = rxt_rates(:ncol,:,   211)*sol(:ncol,:,    95)*sol(:ncol,:,   122)                            ! rate_const*CO3m2H2O*NOp_H2O
     222    77921280 :       rxt_rates(:ncol,:,   212) = rxt_rates(:ncol,:,   212)*sol(:ncol,:,    90)*sol(:ncol,:,   122)                            ! rate_const*CLm*NOp_H2O
     223    77921280 :       rxt_rates(:ncol,:,   213) = rxt_rates(:ncol,:,   213)*sol(:ncol,:,    96)*sol(:ncol,:,   122)                            ! rate_const*CO3m_H2O*NOp_H2O
     224    77921280 :       rxt_rates(:ncol,:,   214) = rxt_rates(:ncol,:,   214)*sol(:ncol,:,   105)*sol(:ncol,:,   127)                            ! rate_const*Hp_4H2O*O2m
     225    77921280 :       rxt_rates(:ncol,:,   215) = rxt_rates(:ncol,:,   215)*sol(:ncol,:,   112)*sol(:ncol,:,   122)                            ! rate_const*NO2m_H2O*NOp_H2O
     226    77921280 :       rxt_rates(:ncol,:,   216) = rxt_rates(:ncol,:,   216)*sol(:ncol,:,   116)*sol(:ncol,:,   122)                            ! rate_const*NO3m_HCL*NOp_H2O
     227    77921280 :       rxt_rates(:ncol,:,   217) = rxt_rates(:ncol,:,   217)*sol(:ncol,:,    91)*sol(:ncol,:,   122)                            ! rate_const*CLm_H2O*NOp_H2O
     228    77921280 :       rxt_rates(:ncol,:,   218) = rxt_rates(:ncol,:,   218)*sol(:ncol,:,   114)*sol(:ncol,:,   122)                            ! rate_const*NO3m2H2O*NOp_H2O
     229    77921280 :       rxt_rates(:ncol,:,   219) = rxt_rates(:ncol,:,   219)*sol(:ncol,:,   111)*sol(:ncol,:,   122)                            ! rate_const*NO2m*NOp_H2O
     230    77921280 :       rxt_rates(:ncol,:,   220) = rxt_rates(:ncol,:,   220)*sol(:ncol,:,   117)*sol(:ncol,:,   119)                            ! rate_const*NO3mHNO3*NOp_2H2O
     231    77921280 :       rxt_rates(:ncol,:,   221) = rxt_rates(:ncol,:,   221)*sol(:ncol,:,    94)*sol(:ncol,:,   119)                            ! rate_const*CO3m*NOp_2H2O
     232    77921280 :       rxt_rates(:ncol,:,   222) = rxt_rates(:ncol,:,   222)*sol(:ncol,:,    92)*sol(:ncol,:,   119)                            ! rate_const*CLm_HCL*NOp_2H2O
     233    77921280 :       rxt_rates(:ncol,:,   223) = rxt_rates(:ncol,:,   223)*sol(:ncol,:,   119)*sol(:ncol,:,   113)                            ! rate_const*NOp_2H2O*NO3m
     234    77921280 :       rxt_rates(:ncol,:,   224) = rxt_rates(:ncol,:,   224)*sol(:ncol,:,   100)*sol(:ncol,:,   119)                            ! rate_const*HCO3m*NOp_2H2O
     235    77921280 :       rxt_rates(:ncol,:,   225) = rxt_rates(:ncol,:,   225)*sol(:ncol,:,    97)*sol(:ncol,:,   105)                            ! rate_const*CO4m*Hp_4H2O
     236    77921280 :       rxt_rates(:ncol,:,   226) = rxt_rates(:ncol,:,   226)*sol(:ncol,:,   119)*sol(:ncol,:,   127)                            ! rate_const*NOp_2H2O*O2m
     237    77921280 :       rxt_rates(:ncol,:,   227) = rxt_rates(:ncol,:,   227)*sol(:ncol,:,   119)*sol(:ncol,:,    97)                            ! rate_const*NOp_2H2O*CO4m
     238    77921280 :       rxt_rates(:ncol,:,   228) = rxt_rates(:ncol,:,   228)*sol(:ncol,:,   115)*sol(:ncol,:,   119)                            ! rate_const*NO3m_H2O*NOp_2H2O
     239    77921280 :       rxt_rates(:ncol,:,   229) = rxt_rates(:ncol,:,   229)*sol(:ncol,:,    95)*sol(:ncol,:,   119)                            ! rate_const*CO3m2H2O*NOp_2H2O
     240    77921280 :       rxt_rates(:ncol,:,   230) = rxt_rates(:ncol,:,   230)*sol(:ncol,:,    90)*sol(:ncol,:,   119)                            ! rate_const*CLm*NOp_2H2O
     241    77921280 :       rxt_rates(:ncol,:,   231) = rxt_rates(:ncol,:,   231)*sol(:ncol,:,    96)*sol(:ncol,:,   119)                            ! rate_const*CO3m_H2O*NOp_2H2O
     242    77921280 :       rxt_rates(:ncol,:,   232) = rxt_rates(:ncol,:,   232)*sol(:ncol,:,   119)*sol(:ncol,:,   112)                            ! rate_const*NOp_2H2O*NO2m_H2O
     243    77921280 :       rxt_rates(:ncol,:,   233) = rxt_rates(:ncol,:,   233)*sol(:ncol,:,   116)*sol(:ncol,:,   119)                            ! rate_const*NO3m_HCL*NOp_2H2O
     244    77921280 :       rxt_rates(:ncol,:,   234) = rxt_rates(:ncol,:,   234)*sol(:ncol,:,   119)*sol(:ncol,:,    91)                            ! rate_const*NOp_2H2O*CLm_H2O
     245    77921280 :       rxt_rates(:ncol,:,   235) = rxt_rates(:ncol,:,   235)*sol(:ncol,:,   119)*sol(:ncol,:,   114)                            ! rate_const*NOp_2H2O*NO3m2H2O
     246    77921280 :       rxt_rates(:ncol,:,   236) = rxt_rates(:ncol,:,   236)*sol(:ncol,:,   105)*sol(:ncol,:,   115)                            ! rate_const*Hp_4H2O*NO3m_H2O
     247    77921280 :       rxt_rates(:ncol,:,   237) = rxt_rates(:ncol,:,   237)*sol(:ncol,:,   119)*sol(:ncol,:,   111)                            ! rate_const*NOp_2H2O*NO2m
     248    77921280 :       rxt_rates(:ncol,:,   238) = rxt_rates(:ncol,:,   238)*sol(:ncol,:,   118)*sol(:ncol,:,   117)                            ! rate_const*NOp*NO3mHNO3
     249    77921280 :       rxt_rates(:ncol,:,   239) = rxt_rates(:ncol,:,   239)*sol(:ncol,:,   118)*sol(:ncol,:,    94)                            ! rate_const*NOp*CO3m
     250    77921280 :       rxt_rates(:ncol,:,   240) = rxt_rates(:ncol,:,   240)*sol(:ncol,:,   118)*sol(:ncol,:,    92)                            ! rate_const*NOp*CLm_HCL
     251    77921280 :       rxt_rates(:ncol,:,   241) = rxt_rates(:ncol,:,   241)*sol(:ncol,:,   113)*sol(:ncol,:,   118)                            ! rate_const*NO3m*NOp
     252    77921280 :       rxt_rates(:ncol,:,   242) = rxt_rates(:ncol,:,   242)*sol(:ncol,:,   118)*sol(:ncol,:,   100)                            ! rate_const*NOp*HCO3m
     253    77921280 :       rxt_rates(:ncol,:,   243) = rxt_rates(:ncol,:,   243)*sol(:ncol,:,   127)*sol(:ncol,:,   118)                            ! rate_const*O2m*NOp
     254    77921280 :       rxt_rates(:ncol,:,   244) = rxt_rates(:ncol,:,   244)*sol(:ncol,:,   118)*sol(:ncol,:,    97)                            ! rate_const*NOp*CO4m
     255    77921280 :       rxt_rates(:ncol,:,   245) = rxt_rates(:ncol,:,   245)*sol(:ncol,:,   118)*sol(:ncol,:,   115)                            ! rate_const*NOp*NO3m_H2O
     256    77921280 :       rxt_rates(:ncol,:,   246) = rxt_rates(:ncol,:,   246)*sol(:ncol,:,   118)*sol(:ncol,:,    95)                            ! rate_const*NOp*CO3m2H2O
     257    77921280 :       rxt_rates(:ncol,:,   247) = rxt_rates(:ncol,:,   247)*sol(:ncol,:,    95)*sol(:ncol,:,   105)                            ! rate_const*CO3m2H2O*Hp_4H2O
     258    77921280 :       rxt_rates(:ncol,:,   248) = rxt_rates(:ncol,:,   248)*sol(:ncol,:,    90)*sol(:ncol,:,   118)                            ! rate_const*CLm*NOp
     259    77921280 :       rxt_rates(:ncol,:,   249) = rxt_rates(:ncol,:,   249)*sol(:ncol,:,    96)*sol(:ncol,:,   118)                            ! rate_const*CO3m_H2O*NOp
     260    77921280 :       rxt_rates(:ncol,:,   250) = rxt_rates(:ncol,:,   250)*sol(:ncol,:,   112)*sol(:ncol,:,   118)                            ! rate_const*NO2m_H2O*NOp
     261    77921280 :       rxt_rates(:ncol,:,   251) = rxt_rates(:ncol,:,   251)*sol(:ncol,:,   116)*sol(:ncol,:,   118)                            ! rate_const*NO3m_HCL*NOp
     262    77921280 :       rxt_rates(:ncol,:,   252) = rxt_rates(:ncol,:,   252)*sol(:ncol,:,    91)*sol(:ncol,:,   118)                            ! rate_const*CLm_H2O*NOp
     263    77921280 :       rxt_rates(:ncol,:,   253) = rxt_rates(:ncol,:,   253)*sol(:ncol,:,   118)*sol(:ncol,:,   114)                            ! rate_const*NOp*NO3m2H2O
     264    77921280 :       rxt_rates(:ncol,:,   254) = rxt_rates(:ncol,:,   254)*sol(:ncol,:,   118)*sol(:ncol,:,   111)                            ! rate_const*NOp*NO2m
     265    77921280 :       rxt_rates(:ncol,:,   255) = rxt_rates(:ncol,:,   255)*sol(:ncol,:,   117)*sol(:ncol,:,   128)                            ! rate_const*NO3mHNO3*O2p
     266    77921280 :       rxt_rates(:ncol,:,   256) = rxt_rates(:ncol,:,   256)*sol(:ncol,:,   128)*sol(:ncol,:,    94)                            ! rate_const*O2p*CO3m
     267    77921280 :       rxt_rates(:ncol,:,   257) = rxt_rates(:ncol,:,   257)*sol(:ncol,:,   128)*sol(:ncol,:,    92)                            ! rate_const*O2p*CLm_HCL
     268    77921280 :       rxt_rates(:ncol,:,   258) = rxt_rates(:ncol,:,   258)*sol(:ncol,:,   105)*sol(:ncol,:,    94)                            ! rate_const*M*Hp_4H2O*CO3m
     269    77921280 :       rxt_rates(:ncol,:,   259) = rxt_rates(:ncol,:,   259)*sol(:ncol,:,   107)*sol(:ncol,:,    95)                            ! rate_const*M*Hp_5H2O*CO3m2H2O
     270    77921280 :       rxt_rates(:ncol,:,   260) = rxt_rates(:ncol,:,   260)*sol(:ncol,:,    96)*sol(:ncol,:,   105)                            ! rate_const*M*CO3m_H2O*Hp_4H2O
     271    77921280 :       rxt_rates(:ncol,:,   261) = rxt_rates(:ncol,:,   261)*sol(:ncol,:,   107)*sol(:ncol,:,    96)                            ! rate_const*M*Hp_5H2O*CO3m_H2O
     272    77921280 :       rxt_rates(:ncol,:,   262) = rxt_rates(:ncol,:,   262)*sol(:ncol,:,   115)*sol(:ncol,:,   105)                            ! rate_const*M*NO3m_H2O*Hp_4H2O
     273    77921280 :       rxt_rates(:ncol,:,   263) = rxt_rates(:ncol,:,   263)*sol(:ncol,:,   115)*sol(:ncol,:,   107)                            ! rate_const*M*NO3m_H2O*Hp_5H2O
     274    77921280 :       rxt_rates(:ncol,:,   264) = rxt_rates(:ncol,:,   264)*sol(:ncol,:,   113)*sol(:ncol,:,   105)                            ! rate_const*M*NO3m*Hp_4H2O
     275    77921280 :       rxt_rates(:ncol,:,   265) = rxt_rates(:ncol,:,   265)*sol(:ncol,:,   107)*sol(:ncol,:,    94)                            ! rate_const*M*Hp_5H2O*CO3m
     276    77921280 :       rxt_rates(:ncol,:,   266) = rxt_rates(:ncol,:,   266)*sol(:ncol,:,   107)*sol(:ncol,:,   113)                            ! rate_const*M*Hp_5H2O*NO3m
     277    77921280 :       rxt_rates(:ncol,:,   267) = rxt_rates(:ncol,:,   267)*sol(:ncol,:,    92)*sol(:ncol,:,   105)                            ! rate_const*M*CLm_HCL*Hp_4H2O
     278    77921280 :       rxt_rates(:ncol,:,   268) = rxt_rates(:ncol,:,   268)*sol(:ncol,:,   107)*sol(:ncol,:,    92)                            ! rate_const*M*Hp_5H2O*CLm_HCL
     279    77921280 :       rxt_rates(:ncol,:,   269) = rxt_rates(:ncol,:,   269)*sol(:ncol,:,   117)*sol(:ncol,:,   105)                            ! rate_const*M*NO3mHNO3*Hp_4H2O
     280    77921280 :       rxt_rates(:ncol,:,   270) = rxt_rates(:ncol,:,   270)*sol(:ncol,:,   107)*sol(:ncol,:,   117)                            ! rate_const*M*Hp_5H2O*NO3mHNO3
     281    77921280 :       rxt_rates(:ncol,:,   271) = rxt_rates(:ncol,:,   271)*sol(:ncol,:,    95)*sol(:ncol,:,   105)                            ! rate_const*M*CO3m2H2O*Hp_4H2O
     282    77921280 :       rxt_rates(:ncol,:,   272) = rxt_rates(:ncol,:,   272)*sol(:ncol,:,    62)*sol(:ncol,:,   130)                            ! rate_const*NO*O3m
     283    77921280 :       rxt_rates(:ncol,:,   273) = rxt_rates(:ncol,:,   273)*sol(:ncol,:,   112)                                                ! rate_const*M*NO2m_H2O
     284    77921280 :       rxt_rates(:ncol,:,   274) = rxt_rates(:ncol,:,   274)*sol(:ncol,:,   114)                                                ! rate_const*M*NO3m2H2O
     285    77921280 :       rxt_rates(:ncol,:,   275) = rxt_rates(:ncol,:,   275)*sol(:ncol,:,   117)                                                ! rate_const*M*NO3mHNO3
     286    77921280 :       rxt_rates(:ncol,:,   276) = rxt_rates(:ncol,:,   276)*sol(:ncol,:,    49)*sol(:ncol,:,   113)                            ! rate_const*M*HCL*NO3m
     287    77921280 :       rxt_rates(:ncol,:,   277) = rxt_rates(:ncol,:,   277)*sol(:ncol,:,    63)*sol(:ncol,:,   130)                            ! rate_const*NO2*O3m
     288    77921280 :       rxt_rates(:ncol,:,   278) = rxt_rates(:ncol,:,   278)*sol(:ncol,:,    63)*sol(:ncol,:,   130)                            ! rate_const*NO2*O3m
     289    77921280 :       rxt_rates(:ncol,:,   279) = rxt_rates(:ncol,:,   279)*sol(:ncol,:,    62)*sol(:ncol,:,   130)                            ! rate_const*NO*O3m
     290    77921280 :       rxt_rates(:ncol,:,   280) = rxt_rates(:ncol,:,   280)*sol(:ncol,:,    94)*sol(:ncol,:,    62)                            ! rate_const*CO3m*NO
     291    77921280 :       rxt_rates(:ncol,:,   281) = rxt_rates(:ncol,:,   281)*sol(:ncol,:,    94)*sol(:ncol,:,    63)                            ! rate_const*CO3m*NO2
     292    77921280 :       rxt_rates(:ncol,:,   282) = rxt_rates(:ncol,:,   282)*sol(:ncol,:,   115)                                                ! rate_const*M*NO3m_H2O
     293    77921280 :       rxt_rates(:ncol,:,   283) = rxt_rates(:ncol,:,   283)*sol(:ncol,:,    96)                                                ! rate_const*M*CO3m_H2O
     294    77921280 :       rxt_rates(:ncol,:,   284) = rxt_rates(:ncol,:,   284)*sol(:ncol,:,    95)                                                ! rate_const*M*CO3m2H2O
     295    77921280 :       rxt_rates(:ncol,:,   285) = rxt_rates(:ncol,:,   285)*sol(:ncol,:,    25)*sol(:ncol,:,   111)                            ! rate_const*CL*NO2m
     296    77921280 :       rxt_rates(:ncol,:,   286) = rxt_rates(:ncol,:,   286)*sol(:ncol,:,    28)*sol(:ncol,:,   111)                            ! rate_const*CLO*NO2m
     297    77921280 :       rxt_rates(:ncol,:,   287) = rxt_rates(:ncol,:,   287)*sol(:ncol,:,    40)*sol(:ncol,:,   111)                            ! rate_const*H*NO2m
     298    77921280 :       rxt_rates(:ncol,:,   288) = rxt_rates(:ncol,:,   288)*sol(:ncol,:,   111)*sol(:ncol,:,   139)                            ! rate_const*M*NO2m*H2O
     299    77921280 :       rxt_rates(:ncol,:,   289) = rxt_rates(:ncol,:,   289)*sol(:ncol,:,    49)*sol(:ncol,:,   111)                            ! rate_const*HCL*NO2m
     300    77921280 :       rxt_rates(:ncol,:,   290) = rxt_rates(:ncol,:,   290)*sol(:ncol,:,    51)*sol(:ncol,:,   111)                            ! rate_const*HNO3*NO2m
     301    77921280 :       rxt_rates(:ncol,:,   291) = rxt_rates(:ncol,:,   291)*sol(:ncol,:,    63)*sol(:ncol,:,   111)                            ! rate_const*NO2*NO2m
     302    77921280 :       rxt_rates(:ncol,:,   292) = rxt_rates(:ncol,:,   292)*sol(:ncol,:,   111)*sol(:ncol,:,    73)                            ! rate_const*NO2m*O3
     303    77921280 :       rxt_rates(:ncol,:,   293) = rxt_rates(:ncol,:,   293)*sol(:ncol,:,   114)*sol(:ncol,:,    58)                            ! rate_const*NO3m2H2O*N2O5
     304    77921280 :       rxt_rates(:ncol,:,   294) = rxt_rates(:ncol,:,   294)*sol(:ncol,:,   115)*sol(:ncol,:,   139)                            ! rate_const*M*NO3m_H2O*H2O
     305    77921280 :       rxt_rates(:ncol,:,   295) = rxt_rates(:ncol,:,   295)*sol(:ncol,:,    51)*sol(:ncol,:,   115)                            ! rate_const*HNO3*NO3m_H2O
     306    77921280 :       rxt_rates(:ncol,:,   296) = rxt_rates(:ncol,:,   296)*sol(:ncol,:,   139)*sol(:ncol,:,   113)                            ! rate_const*M*H2O*NO3m
     307    77921280 :       rxt_rates(:ncol,:,   297) = rxt_rates(:ncol,:,   297)*sol(:ncol,:,   115)*sol(:ncol,:,    58)                            ! rate_const*NO3m_H2O*N2O5
     308    77921280 :       rxt_rates(:ncol,:,   298) = rxt_rates(:ncol,:,   298)*sol(:ncol,:,    49)*sol(:ncol,:,   113)                            ! rate_const*HCL*NO3m
     309    77921280 :       rxt_rates(:ncol,:,   299) = rxt_rates(:ncol,:,   299)*sol(:ncol,:,    51)*sol(:ncol,:,   116)                            ! rate_const*HNO3*NO3m_HCL
     310    77921280 :       rxt_rates(:ncol,:,   300) = rxt_rates(:ncol,:,   300)*sol(:ncol,:,   113)*sol(:ncol,:,    51)                            ! rate_const*M*NO3m*HNO3
     311    77921280 :       rxt_rates(:ncol,:,   301) = rxt_rates(:ncol,:,   301)*sol(:ncol,:,   113)*sol(:ncol,:,    70)                            ! rate_const*NO3m*O
     312    77921280 :       rxt_rates(:ncol,:,   302) = rxt_rates(:ncol,:,   302)*sol(:ncol,:,    73)*sol(:ncol,:,   113)                            ! rate_const*O3*NO3m
     313    77921280 :       rxt_rates(:ncol,:,   303) = rxt_rates(:ncol,:,   303)*sol(:ncol,:,   119)*sol(:ncol,:,    98)                            ! rate_const*NOp_2H2O*e
     314    77921280 :       rxt_rates(:ncol,:,   304) = rxt_rates(:ncol,:,   304)*sol(:ncol,:,   120)*sol(:ncol,:,    98)                            ! rate_const*NOp_3H2O*e
     315    77921280 :       rxt_rates(:ncol,:,   305) = rxt_rates(:ncol,:,   305)*sol(:ncol,:,   139)*sol(:ncol,:,   120)                            ! rate_const*H2O*NOp_3H2O
     316    77921280 :       rxt_rates(:ncol,:,   306) = rxt_rates(:ncol,:,   306)*sol(:ncol,:,   121)*sol(:ncol,:,    98)                            ! rate_const*NOp_CO2*e
     317    77921280 :       rxt_rates(:ncol,:,   307) = rxt_rates(:ncol,:,   307)*sol(:ncol,:,   121)*sol(:ncol,:,   139)                            ! rate_const*NOp_CO2*H2O
     318    77921280 :       rxt_rates(:ncol,:,   308) = rxt_rates(:ncol,:,   308)*sol(:ncol,:,   122)*sol(:ncol,:,    98)                            ! rate_const*NOp_H2O*e
     319    77921280 :       rxt_rates(:ncol,:,   309) = rxt_rates(:ncol,:,   309)*sol(:ncol,:,    40)*sol(:ncol,:,   122)                            ! rate_const*H*NOp_H2O
     320    77921280 :       rxt_rates(:ncol,:,   310) = rxt_rates(:ncol,:,   310)*sol(:ncol,:,   122)*sol(:ncol,:,   101)                            ! rate_const*NOp_H2O*HO2
     321    77921280 :       rxt_rates(:ncol,:,   311) = rxt_rates(:ncol,:,   311)*sol(:ncol,:,   122)*sol(:ncol,:,   133)                            ! rate_const*NOp_H2O*OH
     322    77921280 :       rxt_rates(:ncol,:,   312) = rxt_rates(:ncol,:,   312)*sol(:ncol,:,    32)*sol(:ncol,:,   123)                            ! rate_const*CO2*NOp_N2
     323    77921280 :       rxt_rates(:ncol,:,   313) = rxt_rates(:ncol,:,   313)*sol(:ncol,:,   123)*sol(:ncol,:,   139)                            ! rate_const*NOp_N2*H2O
     324    77921280 :       rxt_rates(:ncol,:,   314) = rxt_rates(:ncol,:,   314)*sol(:ncol,:,   127)*sol(:ncol,:,    25)                            ! rate_const*O2m*CL
     325    77921280 :       rxt_rates(:ncol,:,   315) = rxt_rates(:ncol,:,   315)*sol(:ncol,:,    28)*sol(:ncol,:,   127)                            ! rate_const*CLO*O2m
     326    77921280 :       rxt_rates(:ncol,:,   316) = rxt_rates(:ncol,:,   316)*sol(:ncol,:,    32)*sol(:ncol,:,   127)                            ! rate_const*M*CO2*O2m
     327    77921280 :       rxt_rates(:ncol,:,   317) = rxt_rates(:ncol,:,   317)*sol(:ncol,:,    40)*sol(:ncol,:,   127)                            ! rate_const*H*O2m
     328    77921280 :       rxt_rates(:ncol,:,   318) = rxt_rates(:ncol,:,   318)*sol(:ncol,:,   127)*sol(:ncol,:,    49)                            ! rate_const*O2m*HCL
     329    77921280 :       rxt_rates(:ncol,:,   319) = rxt_rates(:ncol,:,   319)*sol(:ncol,:,   127)*sol(:ncol,:,    51)                            ! rate_const*O2m*HNO3
     330    77921280 :       rxt_rates(:ncol,:,   320) = rxt_rates(:ncol,:,   320)*sol(:ncol,:,    63)*sol(:ncol,:,   127)                            ! rate_const*NO2*O2m
     331    77921280 :       rxt_rates(:ncol,:,   321) = rxt_rates(:ncol,:,   321)*sol(:ncol,:,   125)*sol(:ncol,:,   127)                            ! rate_const*O2_1D*O2m
     332    77921280 :       rxt_rates(:ncol,:,   322) = rxt_rates(:ncol,:,   322)*sol(:ncol,:,    72)*sol(:ncol,:,   127)                            ! rate_const*M*O2*O2m
     333    77921280 :       rxt_rates(:ncol,:,   323) = rxt_rates(:ncol,:,   323)*sol(:ncol,:,    73)*sol(:ncol,:,   127)                            ! rate_const*O3*O2m
     334    77921280 :       rxt_rates(:ncol,:,   324) = rxt_rates(:ncol,:,   324)*sol(:ncol,:,    70)*sol(:ncol,:,   127)                            ! rate_const*O*O2m
     335    77921280 :       rxt_rates(:ncol,:,   325) = rxt_rates(:ncol,:,   325)*sol(:ncol,:,   127)*sol(:ncol,:,    70)                            ! rate_const*O2m*O
     336    77921280 :       rxt_rates(:ncol,:,   326) = rxt_rates(:ncol,:,   326)*sol(:ncol,:,   129)*sol(:ncol,:,    98)                            ! rate_const*O2p_H2O*e
     337    77921280 :       rxt_rates(:ncol,:,   327) = rxt_rates(:ncol,:,   327)*sol(:ncol,:,   129)*sol(:ncol,:,   139)                            ! rate_const*O2p_H2O*H2O
     338    77921280 :       rxt_rates(:ncol,:,   328) = rxt_rates(:ncol,:,   328)*sol(:ncol,:,   129)*sol(:ncol,:,   139)                            ! rate_const*O2p_H2O*H2O
     339    77921280 :       rxt_rates(:ncol,:,   329) = rxt_rates(:ncol,:,   329)*sol(:ncol,:,   139)*sol(:ncol,:,   128)                            ! rate_const*M*H2O*O2p
     340    77921280 :       rxt_rates(:ncol,:,   330) = rxt_rates(:ncol,:,   330)*sol(:ncol,:,   130)*sol(:ncol,:,    32)                            ! rate_const*O3m*CO2
     341    77921280 :       rxt_rates(:ncol,:,   331) = rxt_rates(:ncol,:,   331)*sol(:ncol,:,   130)*sol(:ncol,:,    40)                            ! rate_const*O3m*H
     342    77921280 :       rxt_rates(:ncol,:,   332) = rxt_rates(:ncol,:,   332)*sol(:ncol,:,    73)*sol(:ncol,:,   130)                            ! rate_const*O3*O3m
     343    77921280 :       rxt_rates(:ncol,:,   333) = rxt_rates(:ncol,:,   333)*sol(:ncol,:,   130)*sol(:ncol,:,    70)                            ! rate_const*O3m*O
     344    77921280 :       rxt_rates(:ncol,:,   334) = rxt_rates(:ncol,:,   334)*sol(:ncol,:,    70)*sol(:ncol,:,   130)                            ! rate_const*O*O3m
     345    77921280 :       rxt_rates(:ncol,:,   335) = rxt_rates(:ncol,:,   335)*sol(:ncol,:,    32)*sol(:ncol,:,   131)                            ! rate_const*CO2*O4m
     346    77921280 :       rxt_rates(:ncol,:,   336) = rxt_rates(:ncol,:,   336)*sol(:ncol,:,    70)*sol(:ncol,:,   131)                            ! rate_const*O*O4m
     347    77921280 :       rxt_rates(:ncol,:,   337) = rxt_rates(:ncol,:,   337)*sol(:ncol,:,   139)*sol(:ncol,:,   132)                            ! rate_const*H2O*O4p
     348    77921280 :       rxt_rates(:ncol,:,   338) = rxt_rates(:ncol,:,   338)*sol(:ncol,:,   132)*sol(:ncol,:,    70)                            ! rate_const*O4p*O
     349    77921280 :       rxt_rates(:ncol,:,   339) = rxt_rates(:ncol,:,   339)*sol(:ncol,:,   132)*sol(:ncol,:,   125)                            ! rate_const*O4p*O2_1D
     350    77921280 :       rxt_rates(:ncol,:,   340) = rxt_rates(:ncol,:,   340)*sol(:ncol,:,    55)*sol(:ncol,:,   133)                            ! rate_const*HONO*OH
     351    77921280 :       rxt_rates(:ncol,:,   341) = rxt_rates(:ncol,:,   341)*sol(:ncol,:,    25)*sol(:ncol,:,   134)                            ! rate_const*CL*OHm
     352    77921280 :       rxt_rates(:ncol,:,   342) = rxt_rates(:ncol,:,   342)*sol(:ncol,:,    28)*sol(:ncol,:,   134)                            ! rate_const*CLO*OHm
     353    77921280 :       rxt_rates(:ncol,:,   343) = rxt_rates(:ncol,:,   343)*sol(:ncol,:,    32)*sol(:ncol,:,   134)                            ! rate_const*M*CO2*OHm
     354    77921280 :       rxt_rates(:ncol,:,   344) = rxt_rates(:ncol,:,   344)*sol(:ncol,:,    40)*sol(:ncol,:,   134)                            ! rate_const*H*OHm
     355    77921280 :       rxt_rates(:ncol,:,   345) = rxt_rates(:ncol,:,   345)*sol(:ncol,:,   134)*sol(:ncol,:,    49)                            ! rate_const*OHm*HCL
     356    77921280 :       rxt_rates(:ncol,:,   346) = rxt_rates(:ncol,:,   346)*sol(:ncol,:,    63)*sol(:ncol,:,   134)                            ! rate_const*NO2*OHm
     357    77921280 :       rxt_rates(:ncol,:,   347) = rxt_rates(:ncol,:,   347)*sol(:ncol,:,   134)*sol(:ncol,:,    70)                            ! rate_const*OHm*O
     358    77921280 :       rxt_rates(:ncol,:,   348) = rxt_rates(:ncol,:,   348)*sol(:ncol,:,   134)*sol(:ncol,:,    73)                            ! rate_const*OHm*O3
     359    77921280 :       rxt_rates(:ncol,:,   349) = rxt_rates(:ncol,:,   349)*sol(:ncol,:,   133)*sol(:ncol,:,    62)                            ! rate_const*M*OH*NO
     360    77921280 :       rxt_rates(:ncol,:,   350) = rxt_rates(:ncol,:,   350)*sol(:ncol,:,   135)*sol(:ncol,:,    25)                            ! rate_const*Om*CL
     361    77921280 :       rxt_rates(:ncol,:,   351) = rxt_rates(:ncol,:,   351)*sol(:ncol,:,    28)*sol(:ncol,:,   135)                            ! rate_const*CLO*Om
     362    77921280 :       rxt_rates(:ncol,:,   352) = rxt_rates(:ncol,:,   352)*sol(:ncol,:,   135)*sol(:ncol,:,    32)                            ! rate_const*M*Om*CO2
     363    77921280 :       rxt_rates(:ncol,:,   353) = rxt_rates(:ncol,:,   353)*sol(:ncol,:,    41)*sol(:ncol,:,   135)                            ! rate_const*H2*Om
     364    77921280 :       rxt_rates(:ncol,:,   354) = rxt_rates(:ncol,:,   354)*sol(:ncol,:,   135)*sol(:ncol,:,    41)                            ! rate_const*Om*H2
     365    77921280 :       rxt_rates(:ncol,:,   355) = rxt_rates(:ncol,:,   355)*sol(:ncol,:,   135)*sol(:ncol,:,   139)                            ! rate_const*Om*H2O
     366    77921280 :       rxt_rates(:ncol,:,   356) = rxt_rates(:ncol,:,   356)*sol(:ncol,:,   135)*sol(:ncol,:,    49)                            ! rate_const*Om*HCL
     367    77921280 :       rxt_rates(:ncol,:,   357) = rxt_rates(:ncol,:,   357)*sol(:ncol,:,   135)*sol(:ncol,:,    51)                            ! rate_const*Om*HNO3
     368    77921280 :       rxt_rates(:ncol,:,   358) = rxt_rates(:ncol,:,   358)*sol(:ncol,:,   135)                                                ! rate_const*M*Om
     369    77921280 :       rxt_rates(:ncol,:,   359) = rxt_rates(:ncol,:,   359)*sol(:ncol,:,    63)*sol(:ncol,:,   135)                            ! rate_const*NO2*Om
     370    77921280 :       rxt_rates(:ncol,:,   360) = rxt_rates(:ncol,:,   360)*sol(:ncol,:,   135)*sol(:ncol,:,    70)                            ! rate_const*Om*O
     371    77921280 :       rxt_rates(:ncol,:,   361) = rxt_rates(:ncol,:,   361)*sol(:ncol,:,   135)*sol(:ncol,:,   125)                            ! rate_const*Om*O2_1D
     372    77921280 :       rxt_rates(:ncol,:,   362) = rxt_rates(:ncol,:,   362)*sol(:ncol,:,   135)*sol(:ncol,:,    72)                            ! rate_const*M*Om*O2
     373    77921280 :       rxt_rates(:ncol,:,   363) = rxt_rates(:ncol,:,   363)*sol(:ncol,:,    73)*sol(:ncol,:,   135)                            ! rate_const*O3*Om
     374    77921280 :       rxt_rates(:ncol,:,   364) = rxt_rates(:ncol,:,   364)*sol(:ncol,:,   128)*sol(:ncol,:,    72)                            ! rate_const*M*O2p*O2
     375    77921280 :       rxt_rates(:ncol,:,   365) = rxt_rates(:ncol,:,   365)*sol(:ncol,:,   139)*sol(:ncol,:,   118)                            ! rate_const*M*H2O*NOp
     376    77921280 :       rxt_rates(:ncol,:,   366) = rxt_rates(:ncol,:,   366)*sol(:ncol,:,   139)*sol(:ncol,:,   122)                            ! rate_const*M*H2O*NOp_H2O
     377    77921280 :       rxt_rates(:ncol,:,   367) = rxt_rates(:ncol,:,   367)*sol(:ncol,:,   139)*sol(:ncol,:,   119)                            ! rate_const*M*H2O*NOp_2H2O
     378    77921280 :       rxt_rates(:ncol,:,   368) = rxt_rates(:ncol,:,   368)*sol(:ncol,:,   118)*sol(:ncol,:,    32)                            ! rate_const*M*NOp*CO2
     379    77921280 :       rxt_rates(:ncol,:,   369) = rxt_rates(:ncol,:,   369)*sol(:ncol,:,   121)                                                ! rate_const*M*NOp_CO2
     380    77921280 :       rxt_rates(:ncol,:,   370) = rxt_rates(:ncol,:,   370)*sol(:ncol,:,   118)                                                ! rate_const*N2*M*NOp
     381    77921280 :       rxt_rates(:ncol,:,   371) = rxt_rates(:ncol,:,   371)*sol(:ncol,:,   123)                                                ! rate_const*M*NOp_N2
     382    77921280 :       rxt_rates(:ncol,:,   372) = rxt_rates(:ncol,:,   372)*sol(:ncol,:,   108)*sol(:ncol,:,   139)                            ! rate_const*M*Hp_H2O*H2O
     383    77921280 :       rxt_rates(:ncol,:,   373) = rxt_rates(:ncol,:,   373)*sol(:ncol,:,   102)                                                ! rate_const*M*Hp_2H2O
     384    77921280 :       rxt_rates(:ncol,:,   374) = rxt_rates(:ncol,:,   374)*sol(:ncol,:,   139)*sol(:ncol,:,   102)                            ! rate_const*M*H2O*Hp_2H2O
     385    77921280 :       rxt_rates(:ncol,:,   375) = rxt_rates(:ncol,:,   375)*sol(:ncol,:,   103)                                                ! rate_const*M*Hp_3H2O
     386    77921280 :       rxt_rates(:ncol,:,   376) = rxt_rates(:ncol,:,   376)*sol(:ncol,:,   103)*sol(:ncol,:,   139)                            ! rate_const*M*Hp_3H2O*H2O
     387    77921280 :       rxt_rates(:ncol,:,   377) = rxt_rates(:ncol,:,   377)*sol(:ncol,:,   105)                                                ! rate_const*M*Hp_4H2O
     388    77921280 :       rxt_rates(:ncol,:,   378) = rxt_rates(:ncol,:,   378)*sol(:ncol,:,   105)*sol(:ncol,:,   139)                            ! rate_const*M*Hp_4H2O*H2O
     389    77921280 :       rxt_rates(:ncol,:,   379) = rxt_rates(:ncol,:,   379)*sol(:ncol,:,   107)                                                ! rate_const*M*Hp_5H2O
     390    77921280 :       rxt_rates(:ncol,:,   380) = rxt_rates(:ncol,:,   380)*sol(:ncol,:,    98)*sol(:ncol,:,   132)                            ! rate_const*e*O4p
     391    77921280 :       rxt_rates(:ncol,:,   381) = rxt_rates(:ncol,:,   381)*sol(:ncol,:,   108)*sol(:ncol,:,    98)                            ! rate_const*Hp_H2O*e
     392    77921280 :       rxt_rates(:ncol,:,   382) = rxt_rates(:ncol,:,   382)*sol(:ncol,:,   102)*sol(:ncol,:,    98)                            ! rate_const*Hp_2H2O*e
     393    77921280 :       rxt_rates(:ncol,:,   383) = rxt_rates(:ncol,:,   383)*sol(:ncol,:,   103)*sol(:ncol,:,    98)                            ! rate_const*Hp_3H2O*e
     394    77921280 :       rxt_rates(:ncol,:,   384) = rxt_rates(:ncol,:,   384)*sol(:ncol,:,    98)*sol(:ncol,:,   123)                            ! rate_const*e*NOp_N2
     395    77921280 :       rxt_rates(:ncol,:,   385) = rxt_rates(:ncol,:,   385)*sol(:ncol,:,    91)                                                ! rate_const*M*CLm_H2O
     396    77921280 :       rxt_rates(:ncol,:,   386) = rxt_rates(:ncol,:,   386)*sol(:ncol,:,    92)                                                ! rate_const*M*CLm_HCL
     397    77921280 :       rxt_rates(:ncol,:,   387) = rxt_rates(:ncol,:,   387)*sol(:ncol,:,   125)                                                ! rate_const*O2_1D
     398    77921280 :       rxt_rates(:ncol,:,   388) = rxt_rates(:ncol,:,   388)*sol(:ncol,:,   126)                                                ! rate_const*O2_1S
     399    77921280 :       rxt_rates(:ncol,:,   389) = rxt_rates(:ncol,:,   389)*sol(:ncol,:,    71)*sol(:ncol,:,    41)                            ! rate_const*O1D*H2
     400    77921280 :       rxt_rates(:ncol,:,   390) = rxt_rates(:ncol,:,   390)*sol(:ncol,:,    71)*sol(:ncol,:,   139)                            ! rate_const*O1D*H2O
     401    77921280 :       rxt_rates(:ncol,:,   391) = rxt_rates(:ncol,:,   391)*sol(:ncol,:,    71)                                                ! rate_const*N2*O1D
     402    77921280 :       rxt_rates(:ncol,:,   392) = rxt_rates(:ncol,:,   392)*sol(:ncol,:,    71)*sol(:ncol,:,    72)                            ! rate_const*O1D*O2
     403    77921280 :       rxt_rates(:ncol,:,   393) = rxt_rates(:ncol,:,   393)*sol(:ncol,:,    71)*sol(:ncol,:,    72)                            ! rate_const*O1D*O2
     404    77921280 :       rxt_rates(:ncol,:,   394) = rxt_rates(:ncol,:,   394)*sol(:ncol,:,    71)*sol(:ncol,:,    73)                            ! rate_const*O1D*O3
     405    77921280 :       rxt_rates(:ncol,:,   395) = rxt_rates(:ncol,:,   395)*sol(:ncol,:,   125)                                                ! rate_const*N2*O2_1D
     406    77921280 :       rxt_rates(:ncol,:,   396) = rxt_rates(:ncol,:,   396)*sol(:ncol,:,   125)*sol(:ncol,:,    70)                            ! rate_const*O2_1D*O
     407    77921280 :       rxt_rates(:ncol,:,   397) = rxt_rates(:ncol,:,   397)*sol(:ncol,:,   125)*sol(:ncol,:,    72)                            ! rate_const*O2_1D*O2
     408    77921280 :       rxt_rates(:ncol,:,   398) = rxt_rates(:ncol,:,   398)*sol(:ncol,:,   126)*sol(:ncol,:,    32)                            ! rate_const*O2_1S*CO2
     409    77921280 :       rxt_rates(:ncol,:,   399) = rxt_rates(:ncol,:,   399)*sol(:ncol,:,   126)                                                ! rate_const*N2*O2_1S
     410    77921280 :       rxt_rates(:ncol,:,   400) = rxt_rates(:ncol,:,   400)*sol(:ncol,:,   126)*sol(:ncol,:,    70)                            ! rate_const*O2_1S*O
     411    77921280 :       rxt_rates(:ncol,:,   401) = rxt_rates(:ncol,:,   401)*sol(:ncol,:,   126)*sol(:ncol,:,    72)                            ! rate_const*O2_1S*O2
     412    77921280 :       rxt_rates(:ncol,:,   402) = rxt_rates(:ncol,:,   402)*sol(:ncol,:,   126)*sol(:ncol,:,    73)                            ! rate_const*O2_1S*O3
     413    77921280 :       rxt_rates(:ncol,:,   403) = rxt_rates(:ncol,:,   403)*sol(:ncol,:,    70)*sol(:ncol,:,    73)                            ! rate_const*O*O3
     414    77921280 :       rxt_rates(:ncol,:,   404) = rxt_rates(:ncol,:,   404)*sol(:ncol,:,    70)*sol(:ncol,:,    70)                            ! rate_const*M*O*O
     415    77921280 :       rxt_rates(:ncol,:,   405) = rxt_rates(:ncol,:,   405)*sol(:ncol,:,    70)*sol(:ncol,:,    72)                            ! rate_const*M*O*O2
     416    77921280 :       rxt_rates(:ncol,:,   406) = rxt_rates(:ncol,:,   406)*sol(:ncol,:,    41)*sol(:ncol,:,    70)                            ! rate_const*H2*O
     417    77921280 :       rxt_rates(:ncol,:,   407) = rxt_rates(:ncol,:,   407)*sol(:ncol,:,    43)*sol(:ncol,:,    70)                            ! rate_const*H2O2*O
     418    77921280 :       rxt_rates(:ncol,:,   408) = rxt_rates(:ncol,:,   408)*sol(:ncol,:,    40)*sol(:ncol,:,   101)                            ! rate_const*H*HO2
     419    77921280 :       rxt_rates(:ncol,:,   409) = rxt_rates(:ncol,:,   409)*sol(:ncol,:,    40)*sol(:ncol,:,   101)                            ! rate_const*H*HO2
     420    77921280 :       rxt_rates(:ncol,:,   410) = rxt_rates(:ncol,:,   410)*sol(:ncol,:,    40)*sol(:ncol,:,   101)                            ! rate_const*H*HO2
     421    77921280 :       rxt_rates(:ncol,:,   411) = rxt_rates(:ncol,:,   411)*sol(:ncol,:,    40)*sol(:ncol,:,    72)                            ! rate_const*M*H*O2
     422    77921280 :       rxt_rates(:ncol,:,   412) = rxt_rates(:ncol,:,   412)*sol(:ncol,:,   101)*sol(:ncol,:,    70)                            ! rate_const*HO2*O
     423    77921280 :       rxt_rates(:ncol,:,   413) = rxt_rates(:ncol,:,   413)*sol(:ncol,:,   101)*sol(:ncol,:,    73)                            ! rate_const*HO2*O3
     424    77921280 :       rxt_rates(:ncol,:,   414) = rxt_rates(:ncol,:,   414)*sol(:ncol,:,    40)*sol(:ncol,:,    73)                            ! rate_const*H*O3
     425    77921280 :       rxt_rates(:ncol,:,   415) = rxt_rates(:ncol,:,   415)*sol(:ncol,:,   133)*sol(:ncol,:,    41)                            ! rate_const*OH*H2
     426    77921280 :       rxt_rates(:ncol,:,   416) = rxt_rates(:ncol,:,   416)*sol(:ncol,:,   133)*sol(:ncol,:,    43)                            ! rate_const*OH*H2O2
     427    77921280 :       rxt_rates(:ncol,:,   417) = rxt_rates(:ncol,:,   417)*sol(:ncol,:,   133)*sol(:ncol,:,   101)                            ! rate_const*OH*HO2
     428    77921280 :       rxt_rates(:ncol,:,   418) = rxt_rates(:ncol,:,   418)*sol(:ncol,:,   133)*sol(:ncol,:,    70)                            ! rate_const*OH*O
     429    77921280 :       rxt_rates(:ncol,:,   419) = rxt_rates(:ncol,:,   419)*sol(:ncol,:,   133)*sol(:ncol,:,    73)                            ! rate_const*OH*O3
     430    77921280 :       rxt_rates(:ncol,:,   420) = rxt_rates(:ncol,:,   420)*sol(:ncol,:,   133)*sol(:ncol,:,   133)                            ! rate_const*OH*OH
     431    77921280 :       rxt_rates(:ncol,:,   421) = rxt_rates(:ncol,:,   421)*sol(:ncol,:,   133)*sol(:ncol,:,   133)                            ! rate_const*M*OH*OH
     432    77921280 :       rxt_rates(:ncol,:,   422) = rxt_rates(:ncol,:,   422)*sol(:ncol,:,   101)*sol(:ncol,:,   101)                            ! rate_const*HO2*HO2
     433    77921280 :       rxt_rates(:ncol,:,   423) = rxt_rates(:ncol,:,   423)*sol(:ncol,:,    52)*sol(:ncol,:,   133)                            ! rate_const*HO2NO2*OH
     434    77921280 :       rxt_rates(:ncol,:,   424) = rxt_rates(:ncol,:,   424)*sol(:ncol,:,   109)*sol(:ncol,:,    70)                            ! rate_const*N2D*O
     435    77921280 :       rxt_rates(:ncol,:,   425) = rxt_rates(:ncol,:,   425)*sol(:ncol,:,   109)*sol(:ncol,:,    72)                            ! rate_const*N2D*O2
     436    77921280 :       rxt_rates(:ncol,:,   426) = rxt_rates(:ncol,:,   426)*sol(:ncol,:,    56)*sol(:ncol,:,    62)                            ! rate_const*N*NO
     437    77921280 :       rxt_rates(:ncol,:,   427) = rxt_rates(:ncol,:,   427)*sol(:ncol,:,    56)*sol(:ncol,:,    63)                            ! rate_const*N*NO2
     438    77921280 :       rxt_rates(:ncol,:,   428) = rxt_rates(:ncol,:,   428)*sol(:ncol,:,    56)*sol(:ncol,:,    63)                            ! rate_const*N*NO2
     439    77921280 :       rxt_rates(:ncol,:,   429) = rxt_rates(:ncol,:,   429)*sol(:ncol,:,    56)*sol(:ncol,:,    63)                            ! rate_const*N*NO2
     440    77921280 :       rxt_rates(:ncol,:,   430) = rxt_rates(:ncol,:,   430)*sol(:ncol,:,    56)*sol(:ncol,:,    72)                            ! rate_const*N*O2
     441    77921280 :       rxt_rates(:ncol,:,   431) = rxt_rates(:ncol,:,   431)*sol(:ncol,:,    63)*sol(:ncol,:,    70)                            ! rate_const*NO2*O
     442    77921280 :       rxt_rates(:ncol,:,   432) = rxt_rates(:ncol,:,   432)*sol(:ncol,:,    63)*sol(:ncol,:,    73)                            ! rate_const*NO2*O3
     443    77921280 :       rxt_rates(:ncol,:,   433) = rxt_rates(:ncol,:,   433)*sol(:ncol,:,    63)*sol(:ncol,:,    70)                            ! rate_const*M*NO2*O
     444    77921280 :       rxt_rates(:ncol,:,   434) = rxt_rates(:ncol,:,   434)*sol(:ncol,:,    64)*sol(:ncol,:,   101)                            ! rate_const*NO3*HO2
     445    77921280 :       rxt_rates(:ncol,:,   435) = rxt_rates(:ncol,:,   435)*sol(:ncol,:,    64)*sol(:ncol,:,    62)                            ! rate_const*NO3*NO
     446    77921280 :       rxt_rates(:ncol,:,   436) = rxt_rates(:ncol,:,   436)*sol(:ncol,:,    64)*sol(:ncol,:,    70)                            ! rate_const*NO3*O
     447    77921280 :       rxt_rates(:ncol,:,   437) = rxt_rates(:ncol,:,   437)*sol(:ncol,:,    64)*sol(:ncol,:,   133)                            ! rate_const*NO3*OH
     448    77921280 :       rxt_rates(:ncol,:,   438) = rxt_rates(:ncol,:,   438)*sol(:ncol,:,    56)*sol(:ncol,:,   133)                            ! rate_const*N*OH
     449    77921280 :       rxt_rates(:ncol,:,   439) = rxt_rates(:ncol,:,   439)*sol(:ncol,:,    62)*sol(:ncol,:,   101)                            ! rate_const*NO*HO2
     450    77921280 :       rxt_rates(:ncol,:,   440) = rxt_rates(:ncol,:,   440)*sol(:ncol,:,    62)*sol(:ncol,:,    73)                            ! rate_const*NO*O3
     451    77921280 :       rxt_rates(:ncol,:,   441) = rxt_rates(:ncol,:,   441)*sol(:ncol,:,    62)*sol(:ncol,:,    70)                            ! rate_const*M*NO*O
     452    77921280 :       rxt_rates(:ncol,:,   442) = rxt_rates(:ncol,:,   442)*sol(:ncol,:,    71)*sol(:ncol,:,    57)                            ! rate_const*O1D*N2O
     453    77921280 :       rxt_rates(:ncol,:,   443) = rxt_rates(:ncol,:,   443)*sol(:ncol,:,    71)*sol(:ncol,:,    57)                            ! rate_const*O1D*N2O
     454    77921280 :       rxt_rates(:ncol,:,   444) = rxt_rates(:ncol,:,   444)*sol(:ncol,:,    63)*sol(:ncol,:,   101)                            ! rate_const*M*NO2*HO2
     455    77921280 :       rxt_rates(:ncol,:,   445) = rxt_rates(:ncol,:,   445)*sol(:ncol,:,    63)*sol(:ncol,:,    64)                            ! rate_const*M*NO2*NO3
     456    77921280 :       rxt_rates(:ncol,:,   446) = rxt_rates(:ncol,:,   446)*sol(:ncol,:,    63)*sol(:ncol,:,   133)                            ! rate_const*M*NO2*OH
     457    77921280 :       rxt_rates(:ncol,:,   447) = rxt_rates(:ncol,:,   447)*sol(:ncol,:,    51)*sol(:ncol,:,   133)                            ! rate_const*HNO3*OH
     458    77921280 :       rxt_rates(:ncol,:,   448) = rxt_rates(:ncol,:,   448)*sol(:ncol,:,    52)                                                ! rate_const*M*HO2NO2
     459    77921280 :       rxt_rates(:ncol,:,   449) = rxt_rates(:ncol,:,   449)*sol(:ncol,:,    58)                                                ! rate_const*M*N2O5
     460    77921280 :       rxt_rates(:ncol,:,   450) = rxt_rates(:ncol,:,   450)*sol(:ncol,:,    25)*sol(:ncol,:,    17)                            ! rate_const*CL*CH2O
     461    77921280 :       rxt_rates(:ncol,:,   451) = rxt_rates(:ncol,:,   451)*sol(:ncol,:,    25)*sol(:ncol,:,    23)                            ! rate_const*CL*CH4
     462    77921280 :       rxt_rates(:ncol,:,   452) = rxt_rates(:ncol,:,   452)*sol(:ncol,:,    25)*sol(:ncol,:,    41)                            ! rate_const*CL*H2
     463    77921280 :       rxt_rates(:ncol,:,   453) = rxt_rates(:ncol,:,   453)*sol(:ncol,:,    25)*sol(:ncol,:,    43)                            ! rate_const*CL*H2O2
     464    77921280 :       rxt_rates(:ncol,:,   454) = rxt_rates(:ncol,:,   454)*sol(:ncol,:,    25)*sol(:ncol,:,   101)                            ! rate_const*CL*HO2
     465    77921280 :       rxt_rates(:ncol,:,   455) = rxt_rates(:ncol,:,   455)*sol(:ncol,:,    25)*sol(:ncol,:,   101)                            ! rate_const*CL*HO2
     466    77921280 :       rxt_rates(:ncol,:,   456) = rxt_rates(:ncol,:,   456)*sol(:ncol,:,    25)*sol(:ncol,:,    73)                            ! rate_const*CL*O3
     467    77921280 :       rxt_rates(:ncol,:,   457) = rxt_rates(:ncol,:,   457)*sol(:ncol,:,    28)*sol(:ncol,:,    21)                            ! rate_const*CLO*CH3O2
     468    77921280 :       rxt_rates(:ncol,:,   458) = rxt_rates(:ncol,:,   458)*sol(:ncol,:,    28)*sol(:ncol,:,    28)                            ! rate_const*CLO*CLO
     469    77921280 :       rxt_rates(:ncol,:,   459) = rxt_rates(:ncol,:,   459)*sol(:ncol,:,    28)*sol(:ncol,:,    28)                            ! rate_const*CLO*CLO
     470    77921280 :       rxt_rates(:ncol,:,   460) = rxt_rates(:ncol,:,   460)*sol(:ncol,:,    28)*sol(:ncol,:,    28)                            ! rate_const*CLO*CLO
     471    77921280 :       rxt_rates(:ncol,:,   461) = rxt_rates(:ncol,:,   461)*sol(:ncol,:,    28)*sol(:ncol,:,   101)                            ! rate_const*CLO*HO2
     472    77921280 :       rxt_rates(:ncol,:,   462) = rxt_rates(:ncol,:,   462)*sol(:ncol,:,    28)*sol(:ncol,:,    62)                            ! rate_const*CLO*NO
     473    77921280 :       rxt_rates(:ncol,:,   463) = rxt_rates(:ncol,:,   463)*sol(:ncol,:,    29)*sol(:ncol,:,    25)                            ! rate_const*CLONO2*CL
     474    77921280 :       rxt_rates(:ncol,:,   464) = rxt_rates(:ncol,:,   464)*sol(:ncol,:,    28)*sol(:ncol,:,    63)                            ! rate_const*M*CLO*NO2
     475    77921280 :       rxt_rates(:ncol,:,   465) = rxt_rates(:ncol,:,   465)*sol(:ncol,:,    29)*sol(:ncol,:,    70)                            ! rate_const*CLONO2*O
     476    77921280 :       rxt_rates(:ncol,:,   466) = rxt_rates(:ncol,:,   466)*sol(:ncol,:,    29)*sol(:ncol,:,   133)                            ! rate_const*CLONO2*OH
     477    77921280 :       rxt_rates(:ncol,:,   467) = rxt_rates(:ncol,:,   467)*sol(:ncol,:,    28)*sol(:ncol,:,    70)                            ! rate_const*CLO*O
     478    77921280 :       rxt_rates(:ncol,:,   468) = rxt_rates(:ncol,:,   468)*sol(:ncol,:,    28)*sol(:ncol,:,   133)                            ! rate_const*CLO*OH
     479    77921280 :       rxt_rates(:ncol,:,   469) = rxt_rates(:ncol,:,   469)*sol(:ncol,:,    28)*sol(:ncol,:,   133)                            ! rate_const*CLO*OH
     480    77921280 :       rxt_rates(:ncol,:,   470) = rxt_rates(:ncol,:,   470)*sol(:ncol,:,    49)*sol(:ncol,:,    70)                            ! rate_const*HCL*O
     481    77921280 :       rxt_rates(:ncol,:,   471) = rxt_rates(:ncol,:,   471)*sol(:ncol,:,    49)*sol(:ncol,:,   133)                            ! rate_const*HCL*OH
     482    77921280 :       rxt_rates(:ncol,:,   472) = rxt_rates(:ncol,:,   472)*sol(:ncol,:,    54)*sol(:ncol,:,    25)                            ! rate_const*HOCL*CL
     483    77921280 :       rxt_rates(:ncol,:,   473) = rxt_rates(:ncol,:,   473)*sol(:ncol,:,    54)*sol(:ncol,:,    70)                            ! rate_const*HOCL*O
     484    77921280 :       rxt_rates(:ncol,:,   474) = rxt_rates(:ncol,:,   474)*sol(:ncol,:,    54)*sol(:ncol,:,   133)                            ! rate_const*HOCL*OH
     485    77921280 :       rxt_rates(:ncol,:,   475) = rxt_rates(:ncol,:,   475)*sol(:ncol,:,    71)*sol(:ncol,:,     8)                            ! rate_const*O1D*CCL4
     486    77921280 :       rxt_rates(:ncol,:,   476) = rxt_rates(:ncol,:,   476)*sol(:ncol,:,    71)*sol(:ncol,:,     9)                            ! rate_const*O1D*CF2CLBR
     487    77921280 :       rxt_rates(:ncol,:,   477) = rxt_rates(:ncol,:,   477)*sol(:ncol,:,    71)*sol(:ncol,:,    11)                            ! rate_const*O1D*CFC11
     488    77921280 :       rxt_rates(:ncol,:,   478) = rxt_rates(:ncol,:,   478)*sol(:ncol,:,    71)*sol(:ncol,:,    12)                            ! rate_const*O1D*CFC113
     489    77921280 :       rxt_rates(:ncol,:,   479) = rxt_rates(:ncol,:,   479)*sol(:ncol,:,    71)*sol(:ncol,:,    13)                            ! rate_const*O1D*CFC114
     490    77921280 :       rxt_rates(:ncol,:,   480) = rxt_rates(:ncol,:,   480)*sol(:ncol,:,    71)*sol(:ncol,:,    14)                            ! rate_const*O1D*CFC115
     491    77921280 :       rxt_rates(:ncol,:,   481) = rxt_rates(:ncol,:,   481)*sol(:ncol,:,    71)*sol(:ncol,:,    15)                            ! rate_const*O1D*CFC12
     492    77921280 :       rxt_rates(:ncol,:,   482) = rxt_rates(:ncol,:,   482)*sol(:ncol,:,    71)*sol(:ncol,:,    49)                            ! rate_const*O1D*HCL
     493    77921280 :       rxt_rates(:ncol,:,   483) = rxt_rates(:ncol,:,   483)*sol(:ncol,:,    71)*sol(:ncol,:,    49)                            ! rate_const*O1D*HCL
     494    77921280 :       rxt_rates(:ncol,:,   484) = rxt_rates(:ncol,:,   484)*sol(:ncol,:,    28)*sol(:ncol,:,    28)                            ! rate_const*M*CLO*CLO
     495    77921280 :       rxt_rates(:ncol,:,   485) = rxt_rates(:ncol,:,   485)*sol(:ncol,:,    27)                                                ! rate_const*M*CL2O2
     496    77921280 :       rxt_rates(:ncol,:,   486) = rxt_rates(:ncol,:,   486)*sol(:ncol,:,     3)*sol(:ncol,:,    17)                            ! rate_const*BR*CH2O
     497    77921280 :       rxt_rates(:ncol,:,   487) = rxt_rates(:ncol,:,   487)*sol(:ncol,:,     3)*sol(:ncol,:,   101)                            ! rate_const*BR*HO2
     498    77921280 :       rxt_rates(:ncol,:,   488) = rxt_rates(:ncol,:,   488)*sol(:ncol,:,     3)*sol(:ncol,:,    73)                            ! rate_const*BR*O3
     499    77921280 :       rxt_rates(:ncol,:,   489) = rxt_rates(:ncol,:,   489)*sol(:ncol,:,     5)*sol(:ncol,:,     5)                            ! rate_const*BRO*BRO
     500    77921280 :       rxt_rates(:ncol,:,   490) = rxt_rates(:ncol,:,   490)*sol(:ncol,:,     5)*sol(:ncol,:,    28)                            ! rate_const*BRO*CLO
     501    77921280 :       rxt_rates(:ncol,:,   491) = rxt_rates(:ncol,:,   491)*sol(:ncol,:,     5)*sol(:ncol,:,    28)                            ! rate_const*BRO*CLO
     502    77921280 :       rxt_rates(:ncol,:,   492) = rxt_rates(:ncol,:,   492)*sol(:ncol,:,     5)*sol(:ncol,:,    28)                            ! rate_const*BRO*CLO
     503    77921280 :       rxt_rates(:ncol,:,   493) = rxt_rates(:ncol,:,   493)*sol(:ncol,:,     5)*sol(:ncol,:,   101)                            ! rate_const*BRO*HO2
     504    77921280 :       rxt_rates(:ncol,:,   494) = rxt_rates(:ncol,:,   494)*sol(:ncol,:,     5)*sol(:ncol,:,    62)                            ! rate_const*BRO*NO
     505    77921280 :       rxt_rates(:ncol,:,   495) = rxt_rates(:ncol,:,   495)*sol(:ncol,:,     5)*sol(:ncol,:,    63)                            ! rate_const*M*BRO*NO2
     506    77921280 :       rxt_rates(:ncol,:,   496) = rxt_rates(:ncol,:,   496)*sol(:ncol,:,     6)*sol(:ncol,:,    70)                            ! rate_const*BRONO2*O
     507    77921280 :       rxt_rates(:ncol,:,   497) = rxt_rates(:ncol,:,   497)*sol(:ncol,:,     5)*sol(:ncol,:,    70)                            ! rate_const*BRO*O
     508    77921280 :       rxt_rates(:ncol,:,   498) = rxt_rates(:ncol,:,   498)*sol(:ncol,:,     5)*sol(:ncol,:,   133)                            ! rate_const*BRO*OH
     509    77921280 :       rxt_rates(:ncol,:,   499) = rxt_rates(:ncol,:,   499)*sol(:ncol,:,    45)*sol(:ncol,:,    70)                            ! rate_const*HBR*O
     510    77921280 :       rxt_rates(:ncol,:,   500) = rxt_rates(:ncol,:,   500)*sol(:ncol,:,    45)*sol(:ncol,:,   133)                            ! rate_const*HBR*OH
     511    77921280 :       rxt_rates(:ncol,:,   501) = rxt_rates(:ncol,:,   501)*sol(:ncol,:,    53)*sol(:ncol,:,    70)                            ! rate_const*HOBR*O
     512    77921280 :       rxt_rates(:ncol,:,   502) = rxt_rates(:ncol,:,   502)*sol(:ncol,:,    71)*sol(:ncol,:,    10)                            ! rate_const*O1D*CF3BR
     513    77921280 :       rxt_rates(:ncol,:,   503) = rxt_rates(:ncol,:,   503)*sol(:ncol,:,    71)*sol(:ncol,:,    24)                            ! rate_const*O1D*CHBR3
     514    77921280 :       rxt_rates(:ncol,:,   504) = rxt_rates(:ncol,:,   504)*sol(:ncol,:,    71)*sol(:ncol,:,    42)                            ! rate_const*O1D*H2402
     515    77921280 :       rxt_rates(:ncol,:,   505) = rxt_rates(:ncol,:,   505)*sol(:ncol,:,    71)*sol(:ncol,:,    45)                            ! rate_const*O1D*HBR
     516    77921280 :       rxt_rates(:ncol,:,   506) = rxt_rates(:ncol,:,   506)*sol(:ncol,:,    71)*sol(:ncol,:,    45)                            ! rate_const*O1D*HBR
     517    77921280 :       rxt_rates(:ncol,:,   507) = rxt_rates(:ncol,:,   507)*sol(:ncol,:,    39)*sol(:ncol,:,    23)                            ! rate_const*F*CH4
     518    77921280 :       rxt_rates(:ncol,:,   508) = rxt_rates(:ncol,:,   508)*sol(:ncol,:,    39)*sol(:ncol,:,    41)                            ! rate_const*F*H2
     519    77921280 :       rxt_rates(:ncol,:,   509) = rxt_rates(:ncol,:,   509)*sol(:ncol,:,    39)*sol(:ncol,:,   139)                            ! rate_const*F*H2O
     520    77921280 :       rxt_rates(:ncol,:,   510) = rxt_rates(:ncol,:,   510)*sol(:ncol,:,    39)*sol(:ncol,:,    51)                            ! rate_const*F*HNO3
     521    77921280 :       rxt_rates(:ncol,:,   511) = rxt_rates(:ncol,:,   511)*sol(:ncol,:,    71)*sol(:ncol,:,    33)                            ! rate_const*O1D*COF2
     522    77921280 :       rxt_rates(:ncol,:,   512) = rxt_rates(:ncol,:,   512)*sol(:ncol,:,    71)*sol(:ncol,:,    34)                            ! rate_const*O1D*COFCL
     523    77921280 :       rxt_rates(:ncol,:,   513) = rxt_rates(:ncol,:,   513)*sol(:ncol,:,    16)*sol(:ncol,:,    25)                            ! rate_const*CH2BR2*CL
     524    77921280 :       rxt_rates(:ncol,:,   514) = rxt_rates(:ncol,:,   514)*sol(:ncol,:,    16)*sol(:ncol,:,   133)                            ! rate_const*CH2BR2*OH
     525    77921280 :       rxt_rates(:ncol,:,   515) = rxt_rates(:ncol,:,   515)*sol(:ncol,:,    18)*sol(:ncol,:,    25)                            ! rate_const*CH3BR*CL
     526    77921280 :       rxt_rates(:ncol,:,   516) = rxt_rates(:ncol,:,   516)*sol(:ncol,:,    18)*sol(:ncol,:,   133)                            ! rate_const*CH3BR*OH
     527    77921280 :       rxt_rates(:ncol,:,   517) = rxt_rates(:ncol,:,   517)*sol(:ncol,:,    19)*sol(:ncol,:,   133)                            ! rate_const*CH3CCL3*OH
     528    77921280 :       rxt_rates(:ncol,:,   518) = rxt_rates(:ncol,:,   518)*sol(:ncol,:,    20)*sol(:ncol,:,    25)                            ! rate_const*CH3CL*CL
     529    77921280 :       rxt_rates(:ncol,:,   519) = rxt_rates(:ncol,:,   519)*sol(:ncol,:,    20)*sol(:ncol,:,   133)                            ! rate_const*CH3CL*OH
     530    77921280 :       rxt_rates(:ncol,:,   520) = rxt_rates(:ncol,:,   520)*sol(:ncol,:,    24)*sol(:ncol,:,    25)                            ! rate_const*CHBR3*CL
     531    77921280 :       rxt_rates(:ncol,:,   521) = rxt_rates(:ncol,:,   521)*sol(:ncol,:,    24)*sol(:ncol,:,   133)                            ! rate_const*CHBR3*OH
     532    77921280 :       rxt_rates(:ncol,:,   522) = rxt_rates(:ncol,:,   522)*sol(:ncol,:,    46)*sol(:ncol,:,   133)                            ! rate_const*HCFC141B*OH
     533    77921280 :       rxt_rates(:ncol,:,   523) = rxt_rates(:ncol,:,   523)*sol(:ncol,:,    47)*sol(:ncol,:,   133)                            ! rate_const*HCFC142B*OH
     534    77921280 :       rxt_rates(:ncol,:,   524) = rxt_rates(:ncol,:,   524)*sol(:ncol,:,    48)*sol(:ncol,:,   133)                            ! rate_const*HCFC22*OH
     535    77921280 :       rxt_rates(:ncol,:,   525) = rxt_rates(:ncol,:,   525)*sol(:ncol,:,    71)*sol(:ncol,:,    16)                            ! rate_const*O1D*CH2BR2
     536    77921280 :       rxt_rates(:ncol,:,   526) = rxt_rates(:ncol,:,   526)*sol(:ncol,:,    71)*sol(:ncol,:,    18)                            ! rate_const*O1D*CH3BR
     537    77921280 :       rxt_rates(:ncol,:,   527) = rxt_rates(:ncol,:,   527)*sol(:ncol,:,    71)*sol(:ncol,:,    46)                            ! rate_const*O1D*HCFC141B
     538    77921280 :       rxt_rates(:ncol,:,   528) = rxt_rates(:ncol,:,   528)*sol(:ncol,:,    71)*sol(:ncol,:,    47)                            ! rate_const*O1D*HCFC142B
     539    77921280 :       rxt_rates(:ncol,:,   529) = rxt_rates(:ncol,:,   529)*sol(:ncol,:,    71)*sol(:ncol,:,    48)                            ! rate_const*O1D*HCFC22
     540    77921280 :       rxt_rates(:ncol,:,   530) = rxt_rates(:ncol,:,   530)*sol(:ncol,:,    17)*sol(:ncol,:,    64)                            ! rate_const*CH2O*NO3
     541    77921280 :       rxt_rates(:ncol,:,   531) = rxt_rates(:ncol,:,   531)*sol(:ncol,:,    17)*sol(:ncol,:,    70)                            ! rate_const*CH2O*O
     542    77921280 :       rxt_rates(:ncol,:,   532) = rxt_rates(:ncol,:,   532)*sol(:ncol,:,    17)*sol(:ncol,:,   133)                            ! rate_const*CH2O*OH
     543    77921280 :       rxt_rates(:ncol,:,   533) = rxt_rates(:ncol,:,   533)*sol(:ncol,:,    21)*sol(:ncol,:,   101)                            ! rate_const*CH3O2*HO2
     544    77921280 :       rxt_rates(:ncol,:,   534) = rxt_rates(:ncol,:,   534)*sol(:ncol,:,    21)*sol(:ncol,:,    62)                            ! rate_const*CH3O2*NO
     545    77921280 :       rxt_rates(:ncol,:,   535) = rxt_rates(:ncol,:,   535)*sol(:ncol,:,    22)*sol(:ncol,:,   133)                            ! rate_const*CH3OOH*OH
     546    77921280 :       rxt_rates(:ncol,:,   536) = rxt_rates(:ncol,:,   536)*sol(:ncol,:,    23)*sol(:ncol,:,   133)                            ! rate_const*CH4*OH
     547    77921280 :       rxt_rates(:ncol,:,   537) = rxt_rates(:ncol,:,   537)*sol(:ncol,:,    71)*sol(:ncol,:,    23)                            ! rate_const*O1D*CH4
     548    77921280 :       rxt_rates(:ncol,:,   538) = rxt_rates(:ncol,:,   538)*sol(:ncol,:,    71)*sol(:ncol,:,    23)                            ! rate_const*O1D*CH4
     549    77921280 :       rxt_rates(:ncol,:,   539) = rxt_rates(:ncol,:,   539)*sol(:ncol,:,    71)*sol(:ncol,:,    23)                            ! rate_const*O1D*CH4
     550    77921280 :       rxt_rates(:ncol,:,   540) = rxt_rates(:ncol,:,   540)*sol(:ncol,:,    31)*sol(:ncol,:,   133)                            ! rate_const*CO*OH
     551    77921280 :       rxt_rates(:ncol,:,   541) = rxt_rates(:ncol,:,   541)*sol(:ncol,:,    35)*sol(:ncol,:,    64)                            ! rate_const*DMS*NO3
     552    77921280 :       rxt_rates(:ncol,:,   542) = rxt_rates(:ncol,:,   542)*sol(:ncol,:,    35)*sol(:ncol,:,   133)                            ! rate_const*DMS*OH
     553    77921280 :       rxt_rates(:ncol,:,   543) = rxt_rates(:ncol,:,   543)*sol(:ncol,:,    75)*sol(:ncol,:,    70)                            ! rate_const*OCS*O
     554    77921280 :       rxt_rates(:ncol,:,   544) = rxt_rates(:ncol,:,   544)*sol(:ncol,:,    75)*sol(:ncol,:,   133)                            ! rate_const*OCS*OH
     555    77921280 :       rxt_rates(:ncol,:,   545) = rxt_rates(:ncol,:,   545)*sol(:ncol,:,    78)*sol(:ncol,:,    72)                            ! rate_const*S*O2
     556    77921280 :       rxt_rates(:ncol,:,   546) = rxt_rates(:ncol,:,   546)*sol(:ncol,:,    81)*sol(:ncol,:,   133)                            ! rate_const*M*SO2*OH
     557    77921280 :       rxt_rates(:ncol,:,   547) = rxt_rates(:ncol,:,   547)*sol(:ncol,:,    78)*sol(:ncol,:,    73)                            ! rate_const*S*O3
     558    77921280 :       rxt_rates(:ncol,:,   548) = rxt_rates(:ncol,:,   548)*sol(:ncol,:,    80)*sol(:ncol,:,     5)                            ! rate_const*SO*BRO
     559    77921280 :       rxt_rates(:ncol,:,   549) = rxt_rates(:ncol,:,   549)*sol(:ncol,:,    80)*sol(:ncol,:,    28)                            ! rate_const*SO*CLO
     560    77921280 :       rxt_rates(:ncol,:,   550) = rxt_rates(:ncol,:,   550)*sol(:ncol,:,    78)*sol(:ncol,:,   133)                            ! rate_const*S*OH
     561    77921280 :       rxt_rates(:ncol,:,   551) = rxt_rates(:ncol,:,   551)*sol(:ncol,:,    80)*sol(:ncol,:,    63)                            ! rate_const*SO*NO2
     562    77921280 :       rxt_rates(:ncol,:,   552) = rxt_rates(:ncol,:,   552)*sol(:ncol,:,    80)*sol(:ncol,:,    72)                            ! rate_const*SO*O2
     563    77921280 :       rxt_rates(:ncol,:,   553) = rxt_rates(:ncol,:,   553)*sol(:ncol,:,    80)*sol(:ncol,:,    73)                            ! rate_const*SO*O3
     564    77921280 :       rxt_rates(:ncol,:,   554) = rxt_rates(:ncol,:,   554)*sol(:ncol,:,    80)*sol(:ncol,:,    74)                            ! rate_const*SO*OCLO
     565    77921280 :       rxt_rates(:ncol,:,   555) = rxt_rates(:ncol,:,   555)*sol(:ncol,:,    80)*sol(:ncol,:,   133)                            ! rate_const*SO*OH
     566    77921280 :       rxt_rates(:ncol,:,   556) = rxt_rates(:ncol,:,   556)*sol(:ncol,:,    35)*sol(:ncol,:,   133)                            ! rate_const*DMS*OH
     567    77921280 :       rxt_rates(:ncol,:,   557) = rxt_rates(:ncol,:,   557)*sol(:ncol,:,    82)*sol(:ncol,:,   139)                            ! rate_const*SO3*H2O
     568    77921280 :       rxt_rates(:ncol,:,   558) = rxt_rates(:ncol,:,   558)*sol(:ncol,:,   101)                                                ! rate_const*HO2
     569    77921280 :       rxt_rates(:ncol,:,   559) = rxt_rates(:ncol,:,   559)*sol(:ncol,:,    58)                                                ! rate_const*N2O5
     570    77921280 :       rxt_rates(:ncol,:,   560) = rxt_rates(:ncol,:,   560)*sol(:ncol,:,    63)                                                ! rate_const*NO2
     571    77921280 :       rxt_rates(:ncol,:,   561) = rxt_rates(:ncol,:,   561)*sol(:ncol,:,    64)                                                ! rate_const*NO3
     572    77921280 :       rxt_rates(:ncol,:,   562) = rxt_rates(:ncol,:,   562)*sol(:ncol,:,    58)                                                ! rate_const*N2O5
     573    77921280 :       rxt_rates(:ncol,:,   563) = rxt_rates(:ncol,:,   563)*sol(:ncol,:,    54)*sol(:ncol,:,    49)                            ! rate_const*HOCL*HCL
     574    77921280 :       rxt_rates(:ncol,:,   564) = rxt_rates(:ncol,:,   564)*sol(:ncol,:,     6)                                                ! rate_const*BRONO2
     575    77921280 :       rxt_rates(:ncol,:,   565) = rxt_rates(:ncol,:,   565)*sol(:ncol,:,    58)                                                ! rate_const*N2O5
     576    77921280 :       rxt_rates(:ncol,:,   566) = rxt_rates(:ncol,:,   566)*sol(:ncol,:,    29)                                                ! rate_const*CLONO2
     577    77921280 :       rxt_rates(:ncol,:,   567) = rxt_rates(:ncol,:,   567)*sol(:ncol,:,     6)                                                ! rate_const*BRONO2
     578    77921280 :       rxt_rates(:ncol,:,   568) = rxt_rates(:ncol,:,   568)*sol(:ncol,:,    29)*sol(:ncol,:,    49)                            ! rate_const*CLONO2*HCL
     579    77921280 :       rxt_rates(:ncol,:,   569) = rxt_rates(:ncol,:,   569)*sol(:ncol,:,    54)*sol(:ncol,:,    49)                            ! rate_const*HOCL*HCL
     580    77921280 :       rxt_rates(:ncol,:,   570) = rxt_rates(:ncol,:,   570)*sol(:ncol,:,    53)*sol(:ncol,:,    49)                            ! rate_const*HOBR*HCL
     581    77921280 :       rxt_rates(:ncol,:,   571) = rxt_rates(:ncol,:,   571)*sol(:ncol,:,    29)                                                ! rate_const*CLONO2
     582    77921280 :       rxt_rates(:ncol,:,   572) = rxt_rates(:ncol,:,   572)*sol(:ncol,:,     6)                                                ! rate_const*BRONO2
     583    77921280 :       rxt_rates(:ncol,:,   573) = rxt_rates(:ncol,:,   573)*sol(:ncol,:,    29)*sol(:ncol,:,    49)                            ! rate_const*CLONO2*HCL
     584    77921280 :       rxt_rates(:ncol,:,   574) = rxt_rates(:ncol,:,   574)*sol(:ncol,:,    54)*sol(:ncol,:,    49)                            ! rate_const*HOCL*HCL
     585    77921280 :       rxt_rates(:ncol,:,   575) = rxt_rates(:ncol,:,   575)*sol(:ncol,:,    53)*sol(:ncol,:,    49)                            ! rate_const*HOBR*HCL
     586    77921280 :       rxt_rates(:ncol,:,   576) = rxt_rates(:ncol,:,   576)*sol(:ncol,:,    58)                                                ! rate_const*N2O5
     587    77921280 :       rxt_rates(:ncol,:,   577) = rxt_rates(:ncol,:,   577)*sol(:ncol,:,    29)                                                ! rate_const*CLONO2
     588    77921280 :       rxt_rates(:ncol,:,   578) = rxt_rates(:ncol,:,   578)*sol(:ncol,:,    29)*sol(:ncol,:,    49)                            ! rate_const*CLONO2*HCL
     589    77921280 :       rxt_rates(:ncol,:,   579) = rxt_rates(:ncol,:,   579)*sol(:ncol,:,   138)                                                ! rate_const*Op2P
     590    77921280 :       rxt_rates(:ncol,:,   580) = rxt_rates(:ncol,:,   580)*sol(:ncol,:,   137)                                                ! rate_const*Op2D
     591    77921280 :       rxt_rates(:ncol,:,   581) = rxt_rates(:ncol,:,   581)*sol(:ncol,:,   138)                                                ! rate_const*Op2P
     592    77921280 :       rxt_rates(:ncol,:,   582) = rxt_rates(:ncol,:,   582)*sol(:ncol,:,   118)*sol(:ncol,:,    98)                            ! rate_const*NOp*e
     593    77921280 :       rxt_rates(:ncol,:,   583) = rxt_rates(:ncol,:,   583)*sol(:ncol,:,   128)*sol(:ncol,:,    98)                            ! rate_const*O2p*e
     594    77921280 :       rxt_rates(:ncol,:,   584) = rxt_rates(:ncol,:,   584)*sol(:ncol,:,   110)*sol(:ncol,:,    98)                            ! rate_const*N2p*e
     595    77921280 :       rxt_rates(:ncol,:,   585) = rxt_rates(:ncol,:,   585)*sol(:ncol,:,   110)*sol(:ncol,:,    72)                            ! rate_const*N2p*O2
     596    77921280 :       rxt_rates(:ncol,:,   586) = rxt_rates(:ncol,:,   586)*sol(:ncol,:,   110)*sol(:ncol,:,    70)                            ! rate_const*N2p*O
     597    77921280 :       rxt_rates(:ncol,:,   587) = rxt_rates(:ncol,:,   587)*sol(:ncol,:,   110)*sol(:ncol,:,    70)                            ! rate_const*N2p*O
     598    77921280 :       rxt_rates(:ncol,:,   588) = rxt_rates(:ncol,:,   588)*sol(:ncol,:,   124)*sol(:ncol,:,    70)                            ! rate_const*Np*O
     599    77921280 :       rxt_rates(:ncol,:,   589) = rxt_rates(:ncol,:,   589)*sol(:ncol,:,   124)*sol(:ncol,:,    72)                            ! rate_const*Np*O2
     600    77921280 :       rxt_rates(:ncol,:,   590) = rxt_rates(:ncol,:,   590)*sol(:ncol,:,   124)*sol(:ncol,:,    72)                            ! rate_const*Np*O2
     601    77921280 :       rxt_rates(:ncol,:,   591) = rxt_rates(:ncol,:,   591)*sol(:ncol,:,   128)*sol(:ncol,:,    56)                            ! rate_const*O2p*N
     602    77921280 :       rxt_rates(:ncol,:,   592) = rxt_rates(:ncol,:,   592)*sol(:ncol,:,   128)                                                ! rate_const*N2*O2p
     603    77921280 :       rxt_rates(:ncol,:,   593) = rxt_rates(:ncol,:,   593)*sol(:ncol,:,   128)*sol(:ncol,:,    62)                            ! rate_const*O2p*NO
     604    77921280 :       rxt_rates(:ncol,:,   594) = rxt_rates(:ncol,:,   594)*sol(:ncol,:,   136)*sol(:ncol,:,    32)                            ! rate_const*Op*CO2
     605    77921280 :       rxt_rates(:ncol,:,   595) = rxt_rates(:ncol,:,   595)*sol(:ncol,:,   136)                                                ! rate_const*N2*Op
     606    77921280 :       rxt_rates(:ncol,:,   596) = rxt_rates(:ncol,:,   596)*sol(:ncol,:,   136)*sol(:ncol,:,   109)                            ! rate_const*Op*N2D
     607    77921280 :       rxt_rates(:ncol,:,   597) = rxt_rates(:ncol,:,   597)*sol(:ncol,:,   136)*sol(:ncol,:,    72)                            ! rate_const*Op*O2
     608    77921280 :       rxt_rates(:ncol,:,   598) = rxt_rates(:ncol,:,   598)*sol(:ncol,:,   137)*sol(:ncol,:,    98)                            ! rate_const*Op2D*e
     609    77921280 :       rxt_rates(:ncol,:,   599) = rxt_rates(:ncol,:,   599)*sol(:ncol,:,   137)                                                ! rate_const*N2*Op2D
     610    77921280 :       rxt_rates(:ncol,:,   600) = rxt_rates(:ncol,:,   600)*sol(:ncol,:,   137)*sol(:ncol,:,    70)                            ! rate_const*Op2D*O
     611    77921280 :       rxt_rates(:ncol,:,   601) = rxt_rates(:ncol,:,   601)*sol(:ncol,:,   137)*sol(:ncol,:,    72)                            ! rate_const*Op2D*O2
     612    77921280 :       rxt_rates(:ncol,:,   602) = rxt_rates(:ncol,:,   602)*sol(:ncol,:,   138)*sol(:ncol,:,    98)                            ! rate_const*Op2P*e
     613    77921280 :       rxt_rates(:ncol,:,   603) = rxt_rates(:ncol,:,   603)*sol(:ncol,:,   138)*sol(:ncol,:,    98)                            ! rate_const*Op2P*e
     614    77921280 :       rxt_rates(:ncol,:,   604) = rxt_rates(:ncol,:,   604)*sol(:ncol,:,   138)                                                ! rate_const*N2*Op2P
     615    77921280 :       rxt_rates(:ncol,:,   605) = rxt_rates(:ncol,:,   605)*sol(:ncol,:,   138)                                                ! rate_const*N2*Op2P
     616    77921280 :       rxt_rates(:ncol,:,   606) = rxt_rates(:ncol,:,   606)*sol(:ncol,:,   138)*sol(:ncol,:,    70)                            ! rate_const*Op2P*O
     617       46080 :   end subroutine set_rates
     618             : end module mo_rxt_rates_conv

Generated by: LCOV version 1.14