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