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