module_data_mgn2mech.F
References to this file elsewhere.
1 MODULE module_data_mgn2mech
2
3
4 ! This module contains speciation to convert MEGAN emissions
5 ! species to various gas-phase mechanism species
6 !
7 ! August, 2007
8 !
9 ! Serena H. Chung Washington State University
10 ! Tan Sakulyanontvittaya University of Colorado
11 ! Christine Wiedinmyer National Center for Atmospheric Research
12
13
14
15 !
16 ! provides p_iso, p_par, etc
17 USE module_state_description
18 ! provides is_soprene, is_myrcene, etc
19 USE module_data_megan2
20
21
22 IMPLICIT NONE
23 SAVE
24
25 ! for MEGAN species not in the reaction mechanisms
26 INTEGER, PARAMETER :: non_react = 9999
27
28 INTEGER, PARAMETER :: n_megan2cbmz = 173
29 INTEGER, DIMENSION (n_megan2cbmz) :: p_of_megan2cbmz, p_of_cbmz
30 REAL, DIMENSION (n_megan2cbmz) :: cbmz_per_megan
31 DATA p_of_cbmz / n_megan2cbmz*non_react /
32
33
34 INTEGER, PARAMETER :: n_megan2radm2 = 165
35 INTEGER, DIMENSION (n_megan2radm2) :: p_of_megan2radm2, p_of_radm2
36 REAL, DIMENSION (n_megan2radm2) :: radm2_per_megan
37 DATA p_of_radm2 / n_megan2radm2*non_react /
38
39 INTEGER, PARAMETER :: n_megan2racm = 147
40 INTEGER, DIMENSION (n_megan2racm) :: p_of_megan2racm, p_of_racm
41 REAL, DIMENSION (n_megan2racm) :: racm_per_megan
42 DATA p_of_racm / n_megan2racm*non_react /
43
44
45
46 !--------------------------------------------------------------------
47 ! Some naming convention in denoting MEGAN species
48 ! _a = alpha , _b = beta , _c = cis , _al = allo ,
49 ! _g = gamma , _d = delta , _t = trans , _m = methyl ,
50 ! _p = para , _o = ortho , _e = ene , _ol = ol ,
51 ! met = methyl , 2met= dimethyl , MBO = methylbutenol ,
52 ! 2s = disulfide , s = sulfide , OXD = oxide , ACT = acetate ,
53 ! PPPP= propenylpropyl , DCTT= decatetraene ,
54 ! CCO = acetaldehyde
55
56
57 CONTAINS
58
59
60 !--------------------------------------------------------------------
61
62 SUBROUTINE get_megan2cbmz_table
63
64 ! For MEGAN v2.04 species conversion to CBMZ species
65 ! Based on Tan's MAP_CV2CBMZ.EXT; updated on 08/03/2007
66 ! based on Rahul A. Zaveri's suggestions.
67
68
69 !
70 ! Index of Index of Molar ratio
71 ! MEGAN species CMBZ Species
72 !
73 p_of_megan2cbmz( 1) = is_isoprene ; p_of_cbmz( 1) = p_iso ; cbmz_per_megan( 1) = 1.
74 p_of_megan2cbmz( 2) = is_myrcene ; p_of_cbmz( 2) = p_iso ; cbmz_per_megan( 2) = 2.
75 p_of_megan2cbmz( 3) = is_sabinene ; p_of_cbmz( 3) = p_iso ; cbmz_per_megan( 3) = 2.
76 p_of_megan2cbmz( 4) = is_limonene ; p_of_cbmz( 4) = p_iso ; cbmz_per_megan( 4) = 2.
77 p_of_megan2cbmz( 5) = is_carene_3 ; p_of_cbmz( 5) = p_iso ; cbmz_per_megan( 5) = 2.
78 p_of_megan2cbmz( 6) = is_ocimene_t_b ; p_of_cbmz( 6) = p_iso ; cbmz_per_megan( 6) = 2.
79 p_of_megan2cbmz( 7) = is_pinene_b ; p_of_cbmz( 7) = p_iso ; cbmz_per_megan( 7) = 2.
80 p_of_megan2cbmz( 8) = is_pinene_a ; p_of_cbmz( 8) = p_iso ; cbmz_per_megan( 8) = 2.
81 p_of_megan2cbmz( 9) = is_2met_styrene ; p_of_cbmz( 9) = p_iso ; cbmz_per_megan( 9) = 2.
82 p_of_megan2cbmz( 10) = is_cymene_p ; p_of_cbmz( 10) = p_iso ; cbmz_per_megan( 10) = 2.
83 p_of_megan2cbmz( 11) = is_cymene_o ; p_of_cbmz( 11) = p_iso ; cbmz_per_megan( 11) = 2.
84 p_of_megan2cbmz( 12) = is_phellandrene_a ; p_of_cbmz( 12) = p_iso ; cbmz_per_megan( 12) = 2.
85 p_of_megan2cbmz( 13) = is_thujene_a ; p_of_cbmz( 13) = p_iso ; cbmz_per_megan( 13) = 2.
86 p_of_megan2cbmz( 14) = is_terpinene_a ; p_of_cbmz( 14) = p_iso ; cbmz_per_megan( 14) = 2.
87 p_of_megan2cbmz( 15) = is_terpinene_g ; p_of_cbmz( 15) = p_iso ; cbmz_per_megan( 15) = 2.
88 p_of_megan2cbmz( 16) = is_terpinolene ; p_of_cbmz( 16) = p_iso ; cbmz_per_megan( 16) = 2.
89 p_of_megan2cbmz( 17) = is_phellandrene_b ; p_of_cbmz( 17) = p_iso ; cbmz_per_megan( 17) = 2.
90 p_of_megan2cbmz( 18) = is_camphene ; p_of_cbmz( 18) = p_iso ; cbmz_per_megan( 18) = 2.
91 p_of_megan2cbmz( 19) = is_bornene ; p_of_cbmz( 19) = p_iso ; cbmz_per_megan( 19) = 2.
92 p_of_megan2cbmz( 20) = is_fenchene_a ; p_of_cbmz( 20) = p_iso ; cbmz_per_megan( 20) = 2.
93 p_of_megan2cbmz( 21) = is_ocimene_al ; p_of_cbmz( 21) = p_iso ; cbmz_per_megan( 21) = 2.
94 p_of_megan2cbmz( 22) = is_ocimene_c_b ; p_of_cbmz( 22) = p_iso ; cbmz_per_megan( 22) = 2.
95 p_of_megan2cbmz( 23) = is_tricyclene ; p_of_cbmz( 23) = p_iso ; cbmz_per_megan( 23) = 2.
96 p_of_megan2cbmz( 24) = is_estragole ; p_of_cbmz( 24) = p_iso ; cbmz_per_megan( 24) = 2.
97 p_of_megan2cbmz( 25) = is_camphor ; p_of_cbmz( 25) = p_iso ; cbmz_per_megan( 25) = 2.
98 p_of_megan2cbmz( 26) = is_fenchone ; p_of_cbmz( 26) = p_iso ; cbmz_per_megan( 26) = 2.
99 p_of_megan2cbmz( 27) = is_piperitone ; p_of_cbmz( 27) = p_iso ; cbmz_per_megan( 27) = 2.
100 p_of_megan2cbmz( 28) = is_thujone_a ; p_of_cbmz( 28) = p_iso ; cbmz_per_megan( 28) = 2.
101 p_of_megan2cbmz( 29) = is_thujone_b ; p_of_cbmz( 29) = p_iso ; cbmz_per_megan( 29) = 2.
102 p_of_megan2cbmz( 30) = is_cineole_1_8 ; p_of_cbmz( 30) = p_iso ; cbmz_per_megan( 30) = 2.
103 p_of_megan2cbmz( 31) = is_borneol ; p_of_cbmz( 31) = p_iso ; cbmz_per_megan( 31) = 2.
104 p_of_megan2cbmz( 32) = is_linalool ; p_of_cbmz( 32) = p_iso ; cbmz_per_megan( 32) = 2.
105 p_of_megan2cbmz( 33) = is_terpineol_4 ; p_of_cbmz( 33) = p_iso ; cbmz_per_megan( 33) = 2.
106 p_of_megan2cbmz( 34) = is_terpineol_a ; p_of_cbmz( 34) = p_iso ; cbmz_per_megan( 34) = 2.
107 p_of_megan2cbmz( 35) = is_linalool_oxd_c ; p_of_cbmz( 35) = p_iso ; cbmz_per_megan( 35) = 2.
108 p_of_megan2cbmz( 36) = is_linalool_oxd_t ; p_of_cbmz( 36) = p_iso ; cbmz_per_megan( 36) = 2.
109 p_of_megan2cbmz( 37) = is_ionone_b ; p_of_cbmz( 37) = p_iso ; cbmz_per_megan( 37) = 3.
110 p_of_megan2cbmz( 38) = is_bornyl_act ; p_of_cbmz( 38) = p_iso ; cbmz_per_megan( 38) = 2.
111 p_of_megan2cbmz( 39) = is_farnescene_a ; p_of_cbmz( 39) = p_iso ; cbmz_per_megan( 39) = 3.
112 p_of_megan2cbmz( 40) = is_caryophyllene_b ; p_of_cbmz( 40) = p_iso ; cbmz_per_megan( 40) = 3.
113 p_of_megan2cbmz( 41) = is_acoradiene ; p_of_cbmz( 41) = p_iso ; cbmz_per_megan( 41) = 3.
114 p_of_megan2cbmz( 42) = is_aromadendrene ; p_of_cbmz( 42) = p_iso ; cbmz_per_megan( 42) = 3.
115 p_of_megan2cbmz( 43) = is_bergamotene_a ; p_of_cbmz( 43) = p_iso ; cbmz_per_megan( 43) = 3.
116 p_of_megan2cbmz( 44) = is_bergamotene_b ; p_of_cbmz( 44) = p_iso ; cbmz_per_megan( 44) = 3.
117 p_of_megan2cbmz( 45) = is_bisabolene_a ; p_of_cbmz( 45) = p_iso ; cbmz_per_megan( 45) = 3.
118 p_of_megan2cbmz( 46) = is_bisabolene_b ; p_of_cbmz( 46) = p_iso ; cbmz_per_megan( 46) = 3.
119 p_of_megan2cbmz( 47) = is_bourbonene_b ; p_of_cbmz( 47) = p_iso ; cbmz_per_megan( 47) = 3.
120 p_of_megan2cbmz( 48) = is_cadinene_d ; p_of_cbmz( 48) = p_iso ; cbmz_per_megan( 48) = 3.
121 p_of_megan2cbmz( 49) = is_cadinene_g ; p_of_cbmz( 49) = p_iso ; cbmz_per_megan( 49) = 3.
122 p_of_megan2cbmz( 50) = is_cedrene_a ; p_of_cbmz( 50) = p_iso ; cbmz_per_megan( 50) = 3.
123 p_of_megan2cbmz( 51) = is_copaene_a ; p_of_cbmz( 51) = p_iso ; cbmz_per_megan( 51) = 3.
124 p_of_megan2cbmz( 52) = is_cubebene_a ; p_of_cbmz( 52) = p_iso ; cbmz_per_megan( 52) = 3.
125 p_of_megan2cbmz( 53) = is_cubebene_b ; p_of_cbmz( 53) = p_iso ; cbmz_per_megan( 53) = 3.
126 p_of_megan2cbmz( 54) = is_elemene_b ; p_of_cbmz( 54) = p_iso ; cbmz_per_megan( 54) = 3.
127 p_of_megan2cbmz( 55) = is_farnescene_b ; p_of_cbmz( 55) = p_iso ; cbmz_per_megan( 55) = 3.
128 p_of_megan2cbmz( 56) = is_germacrene_B ; p_of_cbmz( 56) = p_iso ; cbmz_per_megan( 56) = 3.
129 p_of_megan2cbmz( 57) = is_germacrene_D ; p_of_cbmz( 57) = p_iso ; cbmz_per_megan( 57) = 3.
130 p_of_megan2cbmz( 58) = is_gurjunene_b ; p_of_cbmz( 58) = p_iso ; cbmz_per_megan( 58) = 3.
131 p_of_megan2cbmz( 59) = is_humulene_a ; p_of_cbmz( 59) = p_iso ; cbmz_per_megan( 59) = 3.
132 p_of_megan2cbmz( 60) = is_humulene_g ; p_of_cbmz( 60) = p_iso ; cbmz_per_megan( 60) = 3.
133 p_of_megan2cbmz( 61) = is_isolongifolene ; p_of_cbmz( 61) = p_iso ; cbmz_per_megan( 61) = 3.
134 p_of_megan2cbmz( 62) = is_longifolene ; p_of_cbmz( 62) = p_iso ; cbmz_per_megan( 62) = 3.
135 p_of_megan2cbmz( 63) = is_longipinene ; p_of_cbmz( 63) = p_iso ; cbmz_per_megan( 63) = 3.
136 p_of_megan2cbmz( 64) = is_muurolene_a ; p_of_cbmz( 64) = p_iso ; cbmz_per_megan( 64) = 3.
137 p_of_megan2cbmz( 65) = is_muurolene_g ; p_of_cbmz( 65) = p_iso ; cbmz_per_megan( 65) = 3.
138 p_of_megan2cbmz( 66) = is_selinene_b ; p_of_cbmz( 66) = p_iso ; cbmz_per_megan( 66) = 3.
139 p_of_megan2cbmz( 67) = is_selinene_d ; p_of_cbmz( 67) = p_iso ; cbmz_per_megan( 67) = 3.
140 p_of_megan2cbmz( 68) = is_nerolidol_c ; p_of_cbmz( 68) = p_iso ; cbmz_per_megan( 68) = 3.
141 p_of_megan2cbmz( 69) = is_nerolidol_t ; p_of_cbmz( 69) = p_iso ; cbmz_per_megan( 69) = 3.
142 p_of_megan2cbmz( 70) = is_cedrol ; p_of_cbmz( 70) = p_iso ; cbmz_per_megan( 70) = 3.
143 p_of_megan2cbmz( 71) = is_mbo_2m3e2ol ; p_of_cbmz( 71) = p_olt ; cbmz_per_megan( 71) = 1.
144 p_of_megan2cbmz( 72) = is_mbo_2m3e2ol ; p_of_cbmz( 72) = p_par ; cbmz_per_megan( 72) = 3.
145 p_of_megan2cbmz( 73) = is_methanol ; p_of_cbmz( 73) = p_ch3oh ; cbmz_per_megan( 73) = 1.
146 p_of_megan2cbmz( 74) = is_acetone ; p_of_cbmz( 74) = p_ket ; cbmz_per_megan( 74) = 1.
147 p_of_megan2cbmz( 75) = is_methane ; p_of_cbmz( 75) = p_ch4 ; cbmz_per_megan( 75) = 1
148 p_of_megan2cbmz( 76) = is_ammonia ; p_of_cbmz( 76) = p_nh3 ; cbmz_per_megan( 76) = 1.
149 p_of_megan2cbmz( 77) = is_nitrous_oxd ; p_of_cbmz( 77) = non_react ; cbmz_per_megan( 77) = 1.
150 p_of_megan2cbmz( 78) = is_nitric_oxd ; p_of_cbmz( 78) = p_no ; cbmz_per_megan( 78) = 1.
151 p_of_megan2cbmz( 79) = is_acetaldehyde ; p_of_cbmz( 79) = p_ald ; cbmz_per_megan( 79) = 1.
152 p_of_megan2cbmz( 80) = is_ethanol ; p_of_cbmz( 80) = p_c2h5oh ; cbmz_per_megan( 80) = 1.
153 p_of_megan2cbmz( 81) = is_formic_acid ; p_of_cbmz( 81) = p_ora1 ; cbmz_per_megan( 81) = 1.
154 p_of_megan2cbmz( 82) = is_formaldehyde ; p_of_cbmz( 82) = p_hcho ; cbmz_per_megan( 82) = 1.
155 p_of_megan2cbmz( 83) = is_acetic_acid ; p_of_cbmz( 83) = p_ora2 ; cbmz_per_megan( 83) = 1.
156 p_of_megan2cbmz( 84) = is_mbo_3m2e1ol ; p_of_cbmz( 84) = p_ald ; cbmz_per_megan( 84) = 1.
157 p_of_megan2cbmz( 85) = is_mbo_3m2e1ol ; p_of_cbmz( 85) = p_par ; cbmz_per_megan( 85) = 3.
158 p_of_megan2cbmz( 86) = is_mbo_3m3e1ol ; p_of_cbmz( 86) = p_hcho ; cbmz_per_megan( 86) = 1.
159 p_of_megan2cbmz( 87) = is_mbo_3m3e1ol ; p_of_cbmz( 87) = p_par ; cbmz_per_megan( 87) = 4.
160 p_of_megan2cbmz( 88) = is_benzaldehyde ; p_of_cbmz( 88) = p_tol ; cbmz_per_megan( 88) = 1.
161 p_of_megan2cbmz( 89) = is_butanone_2 ; p_of_cbmz( 89) = p_ket ; cbmz_per_megan( 89) = 1.
162 p_of_megan2cbmz( 90) = is_butanone_2 ; p_of_cbmz( 90) = p_par ; cbmz_per_megan( 90) = 1.
163 p_of_megan2cbmz( 91) = is_decanal ; p_of_cbmz( 91) = p_ald ; cbmz_per_megan( 91) = 1.
164 p_of_megan2cbmz( 92) = is_decanal ; p_of_cbmz( 92) = p_par ; cbmz_per_megan( 92) = 8.
165 p_of_megan2cbmz( 93) = is_dodecene_1 ; p_of_cbmz( 93) = p_olt ; cbmz_per_megan( 93) = 1.
166 p_of_megan2cbmz( 94) = is_dodecene_1 ; p_of_cbmz( 94) = p_par ; cbmz_per_megan( 94) = 10.
167 p_of_megan2cbmz( 95) = is_geranyl_acetone ; p_of_cbmz( 95) = p_iso ; cbmz_per_megan( 95) = 3.
168 p_of_megan2cbmz( 96) = is_heptanal ; p_of_cbmz( 96) = p_ald ; cbmz_per_megan( 96) = 1.
169 p_of_megan2cbmz( 97) = is_heptanal ; p_of_cbmz( 97) = p_par ; cbmz_per_megan( 97) = 5.
170 p_of_megan2cbmz( 98) = is_heptane ; p_of_cbmz( 98) = p_par ; cbmz_per_megan( 98) = 7.
171 p_of_megan2cbmz( 99) = is_hexane ; p_of_cbmz( 99) = p_par ; cbmz_per_megan( 99) = 6.
172 p_of_megan2cbmz(100) = is_met_benzoate ; p_of_cbmz(100) = p_tol ; cbmz_per_megan(100) = 1.
173 p_of_megan2cbmz(101) = is_met_heptenone ; p_of_cbmz(101) = p_ket ; cbmz_per_megan(101) = 1.
174 p_of_megan2cbmz(102) = is_met_heptenone ; p_of_cbmz(102) = p_par ; cbmz_per_megan(102) = 3.
175 p_of_megan2cbmz(103) = is_met_heptenone ; p_of_cbmz(103) = p_olt ; cbmz_per_megan(103) = 1.
176 p_of_megan2cbmz(104) = is_neryl_acetone ; p_of_cbmz(104) = p_ket ; cbmz_per_megan(104) = 1.
177 p_of_megan2cbmz(105) = is_neryl_acetone ; p_of_cbmz(105) = p_par ; cbmz_per_megan(105) = 8.
178 p_of_megan2cbmz(106) = is_neryl_acetone ; p_of_cbmz(106) = p_oli ; cbmz_per_megan(106) = 2.
179 p_of_megan2cbmz(107) = is_nonanal ; p_of_cbmz(107) = p_ald ; cbmz_per_megan(107) = 1.
180 p_of_megan2cbmz(108) = is_nonanal ; p_of_cbmz(108) = p_par ; cbmz_per_megan(108) = 7.
181 p_of_megan2cbmz(109) = is_nonenal ; p_of_cbmz(109) = p_ald ; cbmz_per_megan(109) = 1.
182 p_of_megan2cbmz(110) = is_nonenal ; p_of_cbmz(110) = p_par ; cbmz_per_megan(110) = 6.
183 p_of_megan2cbmz(111) = is_nonenal ; p_of_cbmz(111) = p_oli ; cbmz_per_megan(111) = 1.
184 p_of_megan2cbmz(112) = is_octanal ; p_of_cbmz(112) = p_ald ; cbmz_per_megan(112) = 1.
185 p_of_megan2cbmz(113) = is_octanal ; p_of_cbmz(113) = p_par ; cbmz_per_megan(113) = 6.
186 p_of_megan2cbmz(114) = is_octanol ; p_of_cbmz(114) = p_par ; cbmz_per_megan(114) = 8.
187 p_of_megan2cbmz(115) = is_octenol_1e3ol ; p_of_cbmz(115) = p_par ; cbmz_per_megan(115) = 6.
188 p_of_megan2cbmz(116) = is_octenol_1e3ol ; p_of_cbmz(116) = p_olt ; cbmz_per_megan(116) = 1.
189 p_of_megan2cbmz(117) = is_oxopentanal ; p_of_cbmz(117) = p_ald ; cbmz_per_megan(117) = 1.
190 p_of_megan2cbmz(118) = is_oxopentanal ; p_of_cbmz(118) = p_par ; cbmz_per_megan(118) = 3.
191 p_of_megan2cbmz(119) = is_pentane ; p_of_cbmz(119) = p_par ; cbmz_per_megan(119) = 5.
192 p_of_megan2cbmz(120) = is_phenyl_cco ; p_of_cbmz(120) = p_ald ; cbmz_per_megan(120) = 1
193 p_of_megan2cbmz(121) = is_phenyl_cco ; p_of_cbmz(121) = p_tol ; cbmz_per_megan(121) = 1.
194 p_of_megan2cbmz(122) = is_pyruvic_acid ; p_of_cbmz(122) = p_ora1 ; cbmz_per_megan(122) = 1.
195 p_of_megan2cbmz(123) = is_pyruvic_acid ; p_of_cbmz(123) = p_ket ; cbmz_per_megan(123) = 1.
196 p_of_megan2cbmz(124) = is_terpinyl_act_a ; p_of_cbmz(124) = p_iso ; cbmz_per_megan(124) = 2.
197 p_of_megan2cbmz(125) = is_tetradecene_1 ; p_of_cbmz(125) = p_par ; cbmz_per_megan(125) = 12.
198 p_of_megan2cbmz(126) = is_tetradecene_1 ; p_of_cbmz(126) = p_olt ; cbmz_per_megan(126) = 1.
199 p_of_megan2cbmz(127) = is_toluene ; p_of_cbmz(127) = p_tol ; cbmz_per_megan(127) = 1.
200 p_of_megan2cbmz(128) = is_carbon_monoxide ; p_of_cbmz(128) = p_co ; cbmz_per_megan(128) = 1.
201 p_of_megan2cbmz(129) = is_butene ; p_of_cbmz(129) = p_olt ; cbmz_per_megan(129) = 1.
202 p_of_megan2cbmz(130) = is_butene ; p_of_cbmz(130) = p_par ; cbmz_per_megan(130) = 2.
203 p_of_megan2cbmz(131) = is_ethane ; p_of_cbmz(131) = p_eth ; cbmz_per_megan(131) = 1.
204 p_of_megan2cbmz(132) = is_ethene ; p_of_cbmz(132) = p_ol2 ; cbmz_per_megan(132) = 1.
205 p_of_megan2cbmz(133) = is_hydrogen_cyanide ; p_of_cbmz(133) = non_react ; cbmz_per_megan(133) = 1.
206 p_of_megan2cbmz(134) = is_propane ; p_of_cbmz(134) = p_par ; cbmz_per_megan(134) = 3.
207 p_of_megan2cbmz(135) = is_propene ; p_of_cbmz(135) = p_olt ; cbmz_per_megan(135) = 1.
208 p_of_megan2cbmz(136) = is_propene ; p_of_cbmz(136) = p_par ; cbmz_per_megan(136) = 1.
209 p_of_megan2cbmz(137) = is_carbon_2s ; p_of_cbmz(137) = non_react ; cbmz_per_megan(137) = 1.
210 p_of_megan2cbmz(138) = is_carbonyl_s ; p_of_cbmz(138) = non_react ; cbmz_per_megan(138) = 1.
211 p_of_megan2cbmz(139) = is_diallyl_2s ; p_of_cbmz(139) = p_dms ; cbmz_per_megan(139) = 1.
212 p_of_megan2cbmz(140) = is_diallyl_2s ; p_of_cbmz(140) = p_par ; cbmz_per_megan(140) = 2.
213 p_of_megan2cbmz(141) = is_diallyl_2s ; p_of_cbmz(141) = p_olt ; cbmz_per_megan(141) = 2.
214 p_of_megan2cbmz(142) = is_2met_2s ; p_of_cbmz(142) = p_dms ; cbmz_per_megan(142) = 1.
215 p_of_megan2cbmz(143) = is_2met_s ; p_of_cbmz(143) = p_dms ; cbmz_per_megan(143) = 1.
216 p_of_megan2cbmz(144) = is_met_chloride ; p_of_cbmz(144) = non_react ; cbmz_per_megan(144) = 1.
217 p_of_megan2cbmz(145) = is_met_bromide ; p_of_cbmz(145) = non_react ; cbmz_per_megan(145) = 1.
218 p_of_megan2cbmz(146) = is_met_iodide ; p_of_cbmz(146) = non_react ; cbmz_per_megan(146) = 1.
219 p_of_megan2cbmz(147) = is_hydrogen_s ; p_of_cbmz(147) = non_react ; cbmz_per_megan(147) = 1.
220 p_of_megan2cbmz(148) = is_met_mercaptan ; p_of_cbmz(148) = p_par ; cbmz_per_megan(148) = 1.
221 p_of_megan2cbmz(149) = is_met_propenyl_2s ; p_of_cbmz(149) = p_dms ; cbmz_per_megan(149) = 1.
222 p_of_megan2cbmz(150) = is_met_propenyl_2s ; p_of_cbmz(150) = p_oli ; cbmz_per_megan(150) = 1.
223 p_of_megan2cbmz(151) = is_pppp_2s ; p_of_cbmz(151) = p_dms ; cbmz_per_megan(151) = 1.
224 p_of_megan2cbmz(152) = is_pppp_2s ; p_of_cbmz(152) = p_par ; cbmz_per_megan(152) = 2.
225 p_of_megan2cbmz(153) = is_pppp_2s ; p_of_cbmz(153) = p_oli ; cbmz_per_megan(153) = 1.
226 p_of_megan2cbmz(154) = is_2met_nonatriene ; p_of_cbmz(154) = p_iso ; cbmz_per_megan(154) = 2.
227 p_of_megan2cbmz(155) = is_met_salicylate ; p_of_cbmz(155) = p_tol ; cbmz_per_megan(155) = 1.
228 p_of_megan2cbmz(156) = is_indole ; p_of_cbmz(156) = p_tol ; cbmz_per_megan(156) = 1.
229 p_of_megan2cbmz(157) = is_jasmone ; p_of_cbmz(157) = p_iso ; cbmz_per_megan(157) = 2.
230 p_of_megan2cbmz(158) = is_met_jasmonate ; p_of_cbmz(158) = p_iso ; cbmz_per_megan(158) = 3.
231 p_of_megan2cbmz(159) = is_3met_3dctt ; p_of_cbmz(159) = p_iso ; cbmz_per_megan(159) = 3.
232 p_of_megan2cbmz(160) = is_hexanal ; p_of_cbmz(160) = p_ald ; cbmz_per_megan(160) = 1.
233 p_of_megan2cbmz(161) = is_hexanal ; p_of_cbmz(161) = p_par ; cbmz_per_megan(161) = 4.
234 p_of_megan2cbmz(162) = is_hexanol_1 ; p_of_cbmz(162) = p_par ; cbmz_per_megan(162) = 6.
235 p_of_megan2cbmz(163) = is_hexenal_c3 ; p_of_cbmz(163) = p_ald ; cbmz_per_megan(163) = 1.
236 p_of_megan2cbmz(164) = is_hexenal_c3 ; p_of_cbmz(164) = p_par ; cbmz_per_megan(164) = 3.
237 p_of_megan2cbmz(165) = is_hexenal_c3 ; p_of_cbmz(165) = p_oli ; cbmz_per_megan(165) = 1
238 p_of_megan2cbmz(166) = is_hexenal_t2 ; p_of_cbmz(166) = p_ald ; cbmz_per_megan(166) = 1.
239 p_of_megan2cbmz(167) = is_hexenal_t2 ; p_of_cbmz(167) = p_par ; cbmz_per_megan(167) = 6.
240 p_of_megan2cbmz(168) = is_hexenal_t2 ; p_of_cbmz(168) = p_oli ; cbmz_per_megan(168) = 1.
241 p_of_megan2cbmz(169) = is_hexenol_c3 ; p_of_cbmz(169) = p_par ; cbmz_per_megan(169) = 5.
242 p_of_megan2cbmz(170) = is_hexenol_c3 ; p_of_cbmz(170) = p_oli ; cbmz_per_megan(170) = 1.
243 p_of_megan2cbmz(171) = is_hexenyl_act_c3 ; p_of_cbmz(171) = p_ket ; cbmz_per_megan(171) = 1.
244 p_of_megan2cbmz(172) = is_hexenyl_act_c3 ; p_of_cbmz(172) = p_par ; cbmz_per_megan(172) = 3.
245 p_of_megan2cbmz(173) = is_hexenyl_act_c3 ; p_of_cbmz(173) = p_oli ; cbmz_per_megan(173) = 1.
246
247 END SUBROUTINE get_megan2cbmz_table
248
249
250 !--------------------------------------------------------------------
251
252 SUBROUTINE get_megan2radm2_table
253
254 ! For MEGAN v2.04 species conversion to RADM2 species
255 ! Based on Tan's MAP_CV2RADM2.EXT
256
257
258 ! Index of Index of Molar ratio
259 ! MEGAN species RADM2 Species
260 !
261 p_of_megan2radm2( 1) = is_isoprene ; p_of_radm2( 1) = p_iso ; radm2_per_megan( 1) = 1.000
262 p_of_megan2radm2( 2) = is_myrcene ; p_of_radm2( 2) = p_olt ; radm2_per_megan( 2) = 0.5
263 p_of_megan2radm2( 3) = is_myrcene ; p_of_radm2( 3) = p_oli ; radm2_per_megan( 3) = 0.5
264 p_of_megan2radm2( 4) = is_sabinene ; p_of_radm2( 4) = p_olt ; radm2_per_megan( 4) = 1.000
265 p_of_megan2radm2( 5) = is_limonene ; p_of_radm2( 5) = p_olt ; radm2_per_megan( 5) = 0.5
266 p_of_megan2radm2( 6) = is_limonene ; p_of_radm2( 6) = p_oli ; radm2_per_megan( 6) = 0.5
267 p_of_megan2radm2( 7) = is_carene_3 ; p_of_radm2( 7) = p_oli ; radm2_per_megan( 7) = 1.000
268 p_of_megan2radm2( 8) = is_ocimene_t_b ; p_of_radm2( 8) = p_olt ; radm2_per_megan( 8) = 0.5
269 p_of_megan2radm2( 9) = is_ocimene_t_b ; p_of_radm2( 9) = p_oli ; radm2_per_megan( 9) = 0.5
270 p_of_megan2radm2( 10) = is_pinene_b ; p_of_radm2( 10) = p_olt ; radm2_per_megan( 10) = 1.000
271 p_of_megan2radm2( 11) = is_pinene_a ; p_of_radm2( 11) = p_oli ; radm2_per_megan( 11) = 1.000
272 p_of_megan2radm2( 12) = is_2met_styrene ; p_of_radm2( 12) = p_tol ; radm2_per_megan( 12) = 1.000
273 p_of_megan2radm2( 13) = is_cymene_p ; p_of_radm2( 13) = p_tol ; radm2_per_megan( 13) = 1.000
274 p_of_megan2radm2( 14) = is_cymene_o ; p_of_radm2( 14) = p_tol ; radm2_per_megan( 14) = 1.000
275 p_of_megan2radm2( 15) = is_phellandrene_a ; p_of_radm2( 15) = p_oli ; radm2_per_megan( 15) = 1.000
276 p_of_megan2radm2( 16) = is_thujene_a ; p_of_radm2( 16) = p_oli ; radm2_per_megan( 16) = 1.000
277 p_of_megan2radm2( 17) = is_terpinene_a ; p_of_radm2( 17) = p_oli ; radm2_per_megan( 17) = 1.000
278 p_of_megan2radm2( 18) = is_terpinene_g ; p_of_radm2( 18) = p_oli ; radm2_per_megan( 18) = 1.000
279 p_of_megan2radm2( 19) = is_terpinolene ; p_of_radm2( 19) = p_oli ; radm2_per_megan( 19) = 1.000
280 p_of_megan2radm2( 20) = is_phellandrene_b ; p_of_radm2( 20) = p_olt ; radm2_per_megan( 20) = 0.5
281 p_of_megan2radm2( 21) = is_phellandrene_b ; p_of_radm2( 21) = p_oli ; radm2_per_megan( 21) = 0.5
282 p_of_megan2radm2( 22) = is_camphene ; p_of_radm2( 22) = p_olt ; radm2_per_megan( 22) = 1.000
283 p_of_megan2radm2( 23) = is_bornene ; p_of_radm2( 23) = p_oli ; radm2_per_megan( 23) = 1.000
284 p_of_megan2radm2( 24) = is_fenchene_a ; p_of_radm2( 24) = p_olt ; radm2_per_megan( 24) = 1.000
285 p_of_megan2radm2( 25) = is_ocimene_al ; p_of_radm2( 25) = p_oli ; radm2_per_megan( 25) = 1.000
286 p_of_megan2radm2( 26) = is_ocimene_c_b ; p_of_radm2( 26) = p_olt ; radm2_per_megan( 26) = 0.5
287 p_of_megan2radm2( 27) = is_ocimene_c_b ; p_of_radm2( 27) = p_oli ; radm2_per_megan( 27) = 0.5
288 p_of_megan2radm2( 28) = is_tricyclene ; p_of_radm2( 28) = non_react ; radm2_per_megan( 28) = 1.000
289 p_of_megan2radm2( 29) = is_estragole ; p_of_radm2( 29) = p_olt ; radm2_per_megan( 29) = 1.000
290 p_of_megan2radm2( 30) = is_camphor ; p_of_radm2( 30) = p_hc8 ; radm2_per_megan( 30) = 0.388
291 p_of_megan2radm2( 31) = is_fenchone ; p_of_radm2( 31) = non_react ; radm2_per_megan( 31) = 1.000
292 p_of_megan2radm2( 32) = is_piperitone ; p_of_radm2( 32) = p_olt ; radm2_per_megan( 32) = 1.000
293 p_of_megan2radm2( 33) = is_thujone_a ; p_of_radm2( 33) = non_react ; radm2_per_megan( 33) = 1.000
294 p_of_megan2radm2( 34) = is_thujone_b ; p_of_radm2( 34) = non_react ; radm2_per_megan( 34) = 1.000
295 p_of_megan2radm2( 35) = is_cineole_1_8 ; p_of_radm2( 35) = p_hc8 ; radm2_per_megan( 35) = 0.755
296 p_of_megan2radm2( 36) = is_borneol ; p_of_radm2( 36) = non_react ; radm2_per_megan( 36) = 1.000
297 p_of_megan2radm2( 37) = is_linalool ; p_of_radm2( 37) = p_olt ; radm2_per_megan( 37) = 0.5
298 p_of_megan2radm2( 38) = is_linalool ; p_of_radm2( 38) = p_oli ; radm2_per_megan( 38) = 0.5
299 p_of_megan2radm2( 39) = is_terpineol_4 ; p_of_radm2( 39) = p_oli ; radm2_per_megan( 39) = 1.000
300 p_of_megan2radm2( 40) = is_terpineol_a ; p_of_radm2( 40) = p_oli ; radm2_per_megan( 40) = 1.000
301 p_of_megan2radm2( 41) = is_linalool_oxd_c ; p_of_radm2( 41) = p_olt ; radm2_per_megan( 41) = 1.000
302 p_of_megan2radm2( 42) = is_linalool_oxd_t ; p_of_radm2( 42) = p_olt ; radm2_per_megan( 42) = 1.000
303 p_of_megan2radm2( 43) = is_ionone_b ; p_of_radm2( 43) = p_oli ; radm2_per_megan( 43) = 1.000
304 p_of_megan2radm2( 44) = is_bornyl_act ; p_of_radm2( 44) = non_react ; radm2_per_megan( 44) = 1.000
305 p_of_megan2radm2( 45) = is_farnescene_a ; p_of_radm2( 45) = p_olt ; radm2_per_megan( 45) = 0.5
306 p_of_megan2radm2( 46) = is_farnescene_a ; p_of_radm2( 46) = p_oli ; radm2_per_megan( 46) = 0.5
307 p_of_megan2radm2( 47) = is_caryophyllene_b ; p_of_radm2( 47) = p_olt ; radm2_per_megan( 47) = 0.5
308 p_of_megan2radm2( 48) = is_caryophyllene_b ; p_of_radm2( 48) = p_oli ; radm2_per_megan( 48) = 0.5
309 p_of_megan2radm2( 49) = is_acoradiene ; p_of_radm2( 49) = p_olt ; radm2_per_megan( 49) = 0.5
310 p_of_megan2radm2( 50) = is_acoradiene ; p_of_radm2( 50) = p_oli ; radm2_per_megan( 50) = 0.5
311 p_of_megan2radm2( 51) = is_aromadendrene ; p_of_radm2( 51) = p_olt ; radm2_per_megan( 51) = 1.000
312 p_of_megan2radm2( 52) = is_bergamotene_a ; p_of_radm2( 52) = p_oli ; radm2_per_megan( 52) = 1.000
313 p_of_megan2radm2( 53) = is_bergamotene_b ; p_of_radm2( 53) = p_olt ; radm2_per_megan( 53) = 0.5
314 p_of_megan2radm2( 54) = is_bergamotene_b ; p_of_radm2( 54) = p_oli ; radm2_per_megan( 54) = 0.5
315 p_of_megan2radm2( 55) = is_bisabolene_a ; p_of_radm2( 55) = p_oli ; radm2_per_megan( 55) = 1.000
316 p_of_megan2radm2( 56) = is_bisabolene_b ; p_of_radm2( 56) = p_olt ; radm2_per_megan( 56) = 0.5
317 p_of_megan2radm2( 57) = is_bisabolene_b ; p_of_radm2( 57) = p_oli ; radm2_per_megan( 57) = 0.5
318 p_of_megan2radm2( 58) = is_bourbonene_b ; p_of_radm2( 58) = p_olt ; radm2_per_megan( 58) = 1.000
319 p_of_megan2radm2( 59) = is_cadinene_d ; p_of_radm2( 59) = p_oli ; radm2_per_megan( 59) = 1.000
320 p_of_megan2radm2( 60) = is_cadinene_g ; p_of_radm2( 60) = p_olt ; radm2_per_megan( 60) = 0.5
321 p_of_megan2radm2( 61) = is_cadinene_g ; p_of_radm2( 61) = p_oli ; radm2_per_megan( 61) = 0.5
322 p_of_megan2radm2( 62) = is_cedrene_a ; p_of_radm2( 62) = p_oli ; radm2_per_megan( 62) = 1.000
323 p_of_megan2radm2( 63) = is_copaene_a ; p_of_radm2( 63) = p_oli ; radm2_per_megan( 63) = 1.000
324 p_of_megan2radm2( 64) = is_cubebene_a ; p_of_radm2( 64) = p_oli ; radm2_per_megan( 64) = 1.000
325 p_of_megan2radm2( 65) = is_cubebene_b ; p_of_radm2( 65) = p_olt ; radm2_per_megan( 65) = 1.000
326 p_of_megan2radm2( 66) = is_elemene_b ; p_of_radm2( 66) = p_olt ; radm2_per_megan( 66) = 1.000
327 p_of_megan2radm2( 67) = is_farnescene_b ; p_of_radm2( 67) = p_olt ; radm2_per_megan( 67) = 0.5
328 p_of_megan2radm2( 68) = is_farnescene_b ; p_of_radm2( 68) = p_oli ; radm2_per_megan( 68) = 0.5
329 p_of_megan2radm2( 69) = is_germacrene_b ; p_of_radm2( 69) = p_oli ; radm2_per_megan( 69) = 1.000
330 p_of_megan2radm2( 70) = is_germacrene_d ; p_of_radm2( 70) = p_olt ; radm2_per_megan( 70) = 0.5
331 p_of_megan2radm2( 71) = is_germacrene_d ; p_of_radm2( 71) = p_oli ; radm2_per_megan( 71) = 0.5
332 p_of_megan2radm2( 72) = is_gurjunene_b ; p_of_radm2( 72) = p_oli ; radm2_per_megan( 72) = 1.000
333 p_of_megan2radm2( 73) = is_humulene_a ; p_of_radm2( 73) = p_oli ; radm2_per_megan( 73) = 1.000
334 p_of_megan2radm2( 74) = is_humulene_g ; p_of_radm2( 74) = p_oli ; radm2_per_megan( 74) = 1.000
335 p_of_megan2radm2( 75) = is_isolongifolene ; p_of_radm2( 75) = p_oli ; radm2_per_megan( 75) = 1.000
336 p_of_megan2radm2( 76) = is_longifolene ; p_of_radm2( 76) = p_olt ; radm2_per_megan( 76) = 1.000
337 p_of_megan2radm2( 77) = is_longipinene ; p_of_radm2( 77) = p_oli ; radm2_per_megan( 77) = 1.000
338 p_of_megan2radm2( 78) = is_muurolene_a ; p_of_radm2( 78) = p_oli ; radm2_per_megan( 78) = 1.000
339 p_of_megan2radm2( 79) = is_muurolene_g ; p_of_radm2( 79) = p_olt ; radm2_per_megan( 79) = 0.5
340 p_of_megan2radm2( 80) = is_muurolene_g ; p_of_radm2( 80) = p_oli ; radm2_per_megan( 80) = 0.5
341 p_of_megan2radm2( 81) = is_selinene_b ; p_of_radm2( 81) = p_olt ; radm2_per_megan( 81) = 1.000
342 p_of_megan2radm2( 82) = is_selinene_d ; p_of_radm2( 82) = p_oli ; radm2_per_megan( 82) = 1.000
343 p_of_megan2radm2( 83) = is_nerolidol_c ; p_of_radm2( 83) = p_olt ; radm2_per_megan( 83) = 0.5
344 p_of_megan2radm2( 84) = is_nerolidol_c ; p_of_radm2( 84) = p_oli ; radm2_per_megan( 84) = 0.5
345 p_of_megan2radm2( 85) = is_nerolidol_t ; p_of_radm2( 85) = p_olt ; radm2_per_megan( 85) = 0.5
346 p_of_megan2radm2( 86) = is_nerolidol_t ; p_of_radm2( 86) = p_oli ; radm2_per_megan( 86) = 0.5
347 p_of_megan2radm2( 87) = is_cedrol ; p_of_radm2( 87) = non_react ; radm2_per_megan( 87) = 1.000
348 p_of_megan2radm2( 88) = is_mbo_2m3e2ol ; p_of_radm2( 88) = p_iso ; radm2_per_megan( 88) = 1.000
349 p_of_megan2radm2( 89) = is_methanol ; p_of_radm2( 89) = p_hc3 ; radm2_per_megan( 89) = 0.402
350 p_of_megan2radm2( 90) = is_acetone ; p_of_radm2( 90) = p_ket ; radm2_per_megan( 90) = 0.253
351 p_of_megan2radm2( 91) = is_methane ; p_of_radm2( 91) = p_ch4 ; radm2_per_megan( 91) = 1.000
352 p_of_megan2radm2( 92) = is_ammonia ; p_of_radm2( 92) = p_nh3 ; radm2_per_megan( 92) = 1.000
353 p_of_megan2radm2( 93) = is_nitrous_oxd ; p_of_radm2( 93) = p_no2 ; radm2_per_megan( 93) = 1.000
354 p_of_megan2radm2( 94) = is_nitric_oxd ; p_of_radm2( 94) = p_no ; radm2_per_megan( 94) = 1.000
355 p_of_megan2radm2( 95) = is_acetaldehyde ; p_of_radm2( 95) = p_ald ; radm2_per_megan( 95) = 1.000
356 p_of_megan2radm2( 96) = is_ethanol ; p_of_radm2( 96) = p_hc3 ; radm2_per_megan( 96) = 1.198
357 p_of_megan2radm2( 97) = is_formic_acid ; p_of_radm2( 97) = p_ora1 ; radm2_per_megan( 97) = 1.000
358 p_of_megan2radm2( 98) = is_formaldehyde ; p_of_radm2( 98) = p_hcho ; radm2_per_megan( 98) = 1.000
359 p_of_megan2radm2( 99) = is_acetic_acid ; p_of_radm2( 99) = p_ora2 ; radm2_per_megan( 99) = 1.000
360 p_of_megan2radm2(100) = is_mbo_3m2e1ol ; p_of_radm2(100) = p_iso ; radm2_per_megan(100) = 1.000
361 p_of_megan2radm2(101) = is_mbo_3m3e1ol ; p_of_radm2(101) = p_iso ; radm2_per_megan(101) = 1.000
362 p_of_megan2radm2(102) = is_benzaldehyde ; p_of_radm2(102) = non_react ; radm2_per_megan(102) = 1.000
363 p_of_megan2radm2(103) = is_butanone_2 ; p_of_radm2(103) = p_ket ; radm2_per_megan(103) = 1.000
364 p_of_megan2radm2(104) = is_decanal ; p_of_radm2(104) = p_ald ; radm2_per_megan(104) = 1.000
365 p_of_megan2radm2(105) = is_dodecene_1 ; p_of_radm2(105) = p_olt ; radm2_per_megan(105) = 1.000
366 p_of_megan2radm2(106) = is_geranyl_acetone ; p_of_radm2(106) = p_oli ; radm2_per_megan(106) = 1.000
367 p_of_megan2radm2(107) = is_heptanal ; p_of_radm2(107) = p_ald ; radm2_per_megan(107) = 1.000
368 p_of_megan2radm2(108) = is_heptane ; p_of_radm2(108) = p_hc5 ; radm2_per_megan(108) = 1.226
369 p_of_megan2radm2(109) = is_hexane ; p_of_radm2(109) = p_hc5 ; radm2_per_megan(109) = 1.049
370 p_of_megan2radm2(110) = is_met_benzoate ; p_of_radm2(110) = p_hc8 ; radm2_per_megan(110) = 1.000
371 p_of_megan2radm2(111) = is_met_heptenone ; p_of_radm2(111) = p_oli ; radm2_per_megan(111) = 1.000
372 p_of_megan2radm2(112) = is_neryl_acetone ; p_of_radm2(112) = p_oli ; radm2_per_megan(112) = 1.000
373 p_of_megan2radm2(113) = is_nonanal ; p_of_radm2(113) = p_ald ; radm2_per_megan(113) = 1.000
374 p_of_megan2radm2(114) = is_nonenal ; p_of_radm2(114) = p_ald ; radm2_per_megan(114) = 1.000
375 p_of_megan2radm2(115) = is_nonenal ; p_of_radm2(115) = p_hc8 ; radm2_per_megan(115) = 1.000
376 p_of_megan2radm2(116) = is_octanal ; p_of_radm2(116) = p_ald ; radm2_per_megan(116) = 1.000
377 p_of_megan2radm2(117) = is_octanol ; p_of_radm2(117) = p_hc8 ; radm2_per_megan(117) = 1.119
378 p_of_megan2radm2(118) = is_octenol_1e3ol ; p_of_radm2(118) = p_olt ; radm2_per_megan(118) = 1.000
379 p_of_megan2radm2(119) = is_oxopentanal ; p_of_radm2(119) = p_ald ; radm2_per_megan(119) = 1.000
380 p_of_megan2radm2(120) = is_pentane ; p_of_radm2(120) = p_hc5 ; radm2_per_megan(120) = 0.847
381 p_of_megan2radm2(121) = is_phenyl_cco ; p_of_radm2(121) = non_react ; radm2_per_megan(121) = 1.000
382 p_of_megan2radm2(122) = is_pyruvic_acid ; p_of_radm2(122) = p_ora2 ; radm2_per_megan(122) = 1.000
383 p_of_megan2radm2(123) = is_terpinyl_act_a ; p_of_radm2(123) = p_oli ; radm2_per_megan(123) = 1.000
384 p_of_megan2radm2(124) = is_tetradecene_1 ; p_of_radm2(124) = p_olt ; radm2_per_megan(124) = 1.000
385 p_of_megan2radm2(125) = is_toluene ; p_of_radm2(125) = p_tol ; radm2_per_megan(125) = 1.000
386 p_of_megan2radm2(126) = is_carbon_monoxide ; p_of_radm2(126) = p_co ; radm2_per_megan(126) = 1.000
387 p_of_megan2radm2(127) = is_butene ; p_of_radm2(127) = p_olt ; radm2_per_megan(127) = 1.000
388 p_of_megan2radm2(128) = is_ethane ; p_of_radm2(128) = p_eth ; radm2_per_megan(128) = 1.000
389 p_of_megan2radm2(129) = is_ethene ; p_of_radm2(129) = p_ol2 ; radm2_per_megan(129) = 1.000
390 p_of_megan2radm2(130) = is_hydrogen_cyanide; p_of_radm2(130) = non_react ; radm2_per_megan(130) = 1.000
391 p_of_megan2radm2(131) = is_propane ; p_of_radm2(131) = p_hc3 ; radm2_per_megan(131) = 0.519
392 p_of_megan2radm2(132) = is_propene ; p_of_radm2(132) = p_olt ; radm2_per_megan(132) = 1.000
393 p_of_megan2radm2(133) = is_carbon_2s ; p_of_radm2(133) = non_react ; radm2_per_megan(133) = 1.000
394 p_of_megan2radm2(134) = is_carbonyl_s ; p_of_radm2(134) = non_react ; radm2_per_megan(134) = 1.000
395 p_of_megan2radm2(135) = is_diallyl_2s ; p_of_radm2(135) = p_oli ; radm2_per_megan(135) = 1.000
396 p_of_megan2radm2(136) = is_diallyl_2s ; p_of_radm2(136) = p_so2 ; radm2_per_megan(136) = 2.000
397 p_of_megan2radm2(137) = is_2met_2s ; p_of_radm2(137) = p_eth ; radm2_per_megan(137) = 1.000
398 p_of_megan2radm2(138) = is_2met_2s ; p_of_radm2(138) = p_so2 ; radm2_per_megan(138) = 2.000
399 p_of_megan2radm2(139) = is_2met_s ; p_of_radm2(139) = p_eth ; radm2_per_megan(139) = 1.000
400 p_of_megan2radm2(140) = is_2met_s ; p_of_radm2(140) = p_so2 ; radm2_per_megan(140) = 1.000
401 p_of_megan2radm2(141) = is_met_chloride ; p_of_radm2(141) = non_react ; radm2_per_megan(141) = 1.000
402 p_of_megan2radm2(142) = is_met_bromide ; p_of_radm2(142) = non_react ; radm2_per_megan(142) = 1.000
403 p_of_megan2radm2(143) = is_met_iodide ; p_of_radm2(143) = non_react ; radm2_per_megan(143) = 1.000
404 p_of_megan2radm2(144) = is_hydrogen_s ; p_of_radm2(144) = p_so2 ; radm2_per_megan(144) = 1.000
405 p_of_megan2radm2(145) = is_met_mercaptan ; p_of_radm2(145) = p_ch4 ; radm2_per_megan(145) = 1.000
406 p_of_megan2radm2(146) = is_met_mercaptan ; p_of_radm2(146) = p_so2 ; radm2_per_megan(146) = 1.000
407 p_of_megan2radm2(147) = is_met_propenyl_2s ; p_of_radm2(147) = p_oli ; radm2_per_megan(147) = 1.000
408 p_of_megan2radm2(148) = is_met_propenyl_2s ; p_of_radm2(148) = p_so2 ; radm2_per_megan(148) = 2.000
409 p_of_megan2radm2(149) = is_pppp_2s ; p_of_radm2(149) = p_oli ; radm2_per_megan(149) = 1.000
410 p_of_megan2radm2(150) = is_pppp_2s ; p_of_radm2(150) = p_so2 ; radm2_per_megan(150) = 2.000
411 p_of_megan2radm2(151) = is_2met_nonatriene ; p_of_radm2(151) = p_olt ; radm2_per_megan(151) = 0.500
412 p_of_megan2radm2(152) = is_2met_nonatriene ; p_of_radm2(152) = p_oli ; radm2_per_megan(152) = 0.500
413 p_of_megan2radm2(153) = is_met_salicylate ; p_of_radm2(153) = p_hc8 ; radm2_per_megan(153) = 1.000
414 p_of_megan2radm2(154) = is_indole ; p_of_radm2(154) = p_hc8 ; radm2_per_megan(154) = 1.238
415 p_of_megan2radm2(155) = is_indole ; p_of_radm2(155) = p_hno3 ; radm2_per_megan(155) = 1.000
416 p_of_megan2radm2(156) = is_jasmone ; p_of_radm2(156) = p_oli ; radm2_per_megan(156) = 1.000
417 p_of_megan2radm2(157) = is_met_jasmonate ; p_of_radm2(157) = p_oli ; radm2_per_megan(157) = 1.000
418 p_of_megan2radm2(158) = is_3met_3dctt ; p_of_radm2(158) = p_olt ; radm2_per_megan(158) = 0.500
419 p_of_megan2radm2(159) = is_3met_3dctt ; p_of_radm2(159) = p_oli ; radm2_per_megan(159) = 0.500
420 p_of_megan2radm2(160) = is_hexanal ; p_of_radm2(160) = p_ald ; radm2_per_megan(160) = 1.000
421 p_of_megan2radm2(161) = is_hexanol_1 ; p_of_radm2(161) = p_hc5 ; radm2_per_megan(161) = 1.697
422 p_of_megan2radm2(162) = is_hexenal_c3 ; p_of_radm2(162) = p_oli ; radm2_per_megan(162) = 1.000
423 p_of_megan2radm2(163) = is_hexenal_t2 ; p_of_radm2(163) = p_oli ; radm2_per_megan(163) = 1.000
424 p_of_megan2radm2(164) = is_hexenol_c3 ; p_of_radm2(164) = p_olt ; radm2_per_megan(164) = 1.000
425 p_of_megan2radm2(165) = is_hexenyl_act_c3 ; p_of_radm2(165) = p_oli ; radm2_per_megan(165) = 1.000
426
427 END SUBROUTINE get_megan2radm2_table
428
429
430 !--------------------------------------------------------------------
431
432 SUBROUTINE get_megan2racm_table
433
434 ! For MEGAN v2.04 species conversion to RACM species
435 ! Based on Tan's MAP_CV2RACM.EXT
436
437 !
438 ! Index of Index of Molar ratio
439 ! MEGAN species RACM Species
440 !
441
442 p_of_megan2racm( 1) = is_isoprene ; p_of_racm( 1) = p_iso ; racm_per_megan( 1) = 1.000
443 p_of_megan2racm( 2) = is_myrcene ; p_of_racm( 2) = p_lim ; racm_per_megan( 2) = 1.000
444 p_of_megan2racm( 3) = is_sabinene ; p_of_racm( 3) = p_api ; racm_per_megan( 3) = 1.000
445 p_of_megan2racm( 4) = is_limonene ; p_of_racm( 4) = p_lim ; racm_per_megan( 4) = 1.000
446 p_of_megan2racm( 5) = is_carene_3 ; p_of_racm( 5) = p_api ; racm_per_megan( 5) = 1.000
447 p_of_megan2racm( 6) = is_ocimene_t_b ; p_of_racm( 6) = p_lim ; racm_per_megan( 6) = 1.000
448 p_of_megan2racm( 7) = is_pinene_b ; p_of_racm( 7) = p_api ; racm_per_megan( 7) = 1.000
449 p_of_megan2racm( 8) = is_pinene_a ; p_of_racm( 8) = p_api ; racm_per_megan( 8) = 1.000
450 p_of_megan2racm( 9) = is_2met_styrene ; p_of_racm( 9) = p_lim ; racm_per_megan( 9) = 1.000
451 p_of_megan2racm( 10) = is_cymene_p ; p_of_racm( 10) = p_lim ; racm_per_megan( 10) = 1.000
452 p_of_megan2racm( 11) = is_cymene_o ; p_of_racm( 11) = p_lim ; racm_per_megan( 11) = 1.000
453 p_of_megan2racm( 12) = is_phellandrene_a ; p_of_racm( 12) = p_lim ; racm_per_megan( 12) = 1.000
454 p_of_megan2racm( 13) = is_thujene_a ; p_of_racm( 13) = p_api ; racm_per_megan( 13) = 1.000
455 p_of_megan2racm( 14) = is_terpinene_a ; p_of_racm( 14) = p_lim ; racm_per_megan( 14) = 1.000
456 p_of_megan2racm( 15) = is_terpinene_g ; p_of_racm( 15) = p_lim ; racm_per_megan( 15) = 1.000
457 p_of_megan2racm( 16) = is_terpinolene ; p_of_racm( 16) = p_lim ; racm_per_megan( 16) = 1.000
458 p_of_megan2racm( 17) = is_phellandrene_b ; p_of_racm( 17) = p_lim ; racm_per_megan( 17) = 1.000
459 p_of_megan2racm( 18) = is_camphene ; p_of_racm( 18) = p_api ; racm_per_megan( 18) = 1.000
460 p_of_megan2racm( 19) = is_bornene ; p_of_racm( 19) = p_api ; racm_per_megan( 19) = 1.000
461 p_of_megan2racm( 20) = is_fenchene_a ; p_of_racm( 20) = p_api ; racm_per_megan( 20) = 1.000
462 p_of_megan2racm( 21) = is_ocimene_al ; p_of_racm( 21) = p_lim ; racm_per_megan( 21) = 1.000
463 p_of_megan2racm( 22) = is_ocimene_c_b ; p_of_racm( 22) = p_lim ; racm_per_megan( 22) = 1.000
464 p_of_megan2racm( 23) = is_tricyclene ; p_of_racm( 23) = non_react ; racm_per_megan( 23) = 1.000
465 p_of_megan2racm( 24) = is_estragole ; p_of_racm( 24) = p_lim ; racm_per_megan( 24) = 1.000
466 p_of_megan2racm( 25) = is_camphor ; p_of_racm( 25) = p_hc8 ; racm_per_megan( 25) = 0.380
467 p_of_megan2racm( 26) = is_fenchone ; p_of_racm( 26) = non_react ; racm_per_megan( 26) = 1.000
468 p_of_megan2racm( 27) = is_piperitone ; p_of_racm( 27) = p_api ; racm_per_megan( 27) = 1.000
469 p_of_megan2racm( 28) = is_thujone_a ; p_of_racm( 28) = non_react ; racm_per_megan( 28) = 1.000
470 p_of_megan2racm( 29) = is_thujone_b ; p_of_racm( 29) = non_react ; racm_per_megan( 29) = 1.000
471 p_of_megan2racm( 30) = is_cineole_1_8 ; p_of_racm( 30) = p_hc8 ; racm_per_megan( 30) = 0.738
472 p_of_megan2racm( 31) = is_borneol ; p_of_racm( 31) = non_react ; racm_per_megan( 31) = 1.000
473 p_of_megan2racm( 32) = is_linalool ; p_of_racm( 32) = p_lim ; racm_per_megan( 32) = 1.000
474 p_of_megan2racm( 33) = is_terpineol_4 ; p_of_racm( 33) = p_api ; racm_per_megan( 33) = 1.000
475 p_of_megan2racm( 34) = is_terpineol_a ; p_of_racm( 34) = p_api ; racm_per_megan( 34) = 1.000
476 p_of_megan2racm( 35) = is_linalool_oxd_c ; p_of_racm( 35) = p_lim ; racm_per_megan( 35) = 1.000
477 p_of_megan2racm( 36) = is_linalool_oxd_t ; p_of_racm( 36) = p_lim ; racm_per_megan( 36) = 1.000
478 p_of_megan2racm( 37) = is_ionone_b ; p_of_racm( 37) = p_lim ; racm_per_megan( 37) = 1.000
479 p_of_megan2racm( 38) = is_bornyl_act ; p_of_racm( 38) = non_react ; racm_per_megan( 38) = 1.000
480 p_of_megan2racm( 39) = is_farnescene_a ; p_of_racm( 39) = p_lim ; racm_per_megan( 39) = 1.000
481 p_of_megan2racm( 40) = is_caryophyllene_b ; p_of_racm( 40) = p_lim ; racm_per_megan( 40) = 1.000
482 p_of_megan2racm( 41) = is_acoradiene ; p_of_racm( 41) = p_lim ; racm_per_megan( 41) = 1.000
483 p_of_megan2racm( 42) = is_aromadendrene ; p_of_racm( 42) = p_api ; racm_per_megan( 42) = 1.000
484 p_of_megan2racm( 43) = is_bergamotene_a ; p_of_racm( 43) = p_lim ; racm_per_megan( 43) = 1.000
485 p_of_megan2racm( 44) = is_bergamotene_b ; p_of_racm( 44) = p_lim ; racm_per_megan( 44) = 1.000
486 p_of_megan2racm( 45) = is_bisabolene_a ; p_of_racm( 45) = p_lim ; racm_per_megan( 45) = 1.000
487 p_of_megan2racm( 46) = is_bisabolene_b ; p_of_racm( 46) = p_lim ; racm_per_megan( 46) = 1.000
488 p_of_megan2racm( 47) = is_bourbonene_b ; p_of_racm( 47) = p_api ; racm_per_megan( 47) = 1.000
489 p_of_megan2racm( 48) = is_cadinene_d ; p_of_racm( 48) = p_lim ; racm_per_megan( 48) = 1.000
490 p_of_megan2racm( 49) = is_cadinene_g ; p_of_racm( 49) = p_lim ; racm_per_megan( 49) = 1.000
491 p_of_megan2racm( 50) = is_cedrene_a ; p_of_racm( 50) = p_api ; racm_per_megan( 50) = 1.000
492 p_of_megan2racm( 51) = is_copaene_a ; p_of_racm( 51) = p_api ; racm_per_megan( 51) = 1.000
493 p_of_megan2racm( 52) = is_cubebene_a ; p_of_racm( 52) = p_api ; racm_per_megan( 52) = 1.000
494 p_of_megan2racm( 53) = is_cubebene_b ; p_of_racm( 53) = p_api ; racm_per_megan( 53) = 1.000
495 p_of_megan2racm( 54) = is_elemene_b ; p_of_racm( 54) = p_lim ; racm_per_megan( 54) = 1.000
496 p_of_megan2racm( 55) = is_farnescene_b ; p_of_racm( 55) = p_lim ; racm_per_megan( 55) = 1.000
497 p_of_megan2racm( 56) = is_germacrene_b ; p_of_racm( 56) = p_lim ; racm_per_megan( 56) = 1.000
498 p_of_megan2racm( 57) = is_germacrene_d ; p_of_racm( 57) = p_lim ; racm_per_megan( 57) = 1.000
499 p_of_megan2racm( 58) = is_gurjunene_b ; p_of_racm( 58) = p_api ; racm_per_megan( 58) = 1.000
500 p_of_megan2racm( 59) = is_humulene_a ; p_of_racm( 59) = p_lim ; racm_per_megan( 59) = 1.000
501 p_of_megan2racm( 60) = is_humulene_g ; p_of_racm( 60) = p_lim ; racm_per_megan( 60) = 1.000
502 p_of_megan2racm( 61) = is_isolongifolene ; p_of_racm( 61) = p_api ; racm_per_megan( 61) = 1.000
503 p_of_megan2racm( 62) = is_longifolene ; p_of_racm( 62) = p_api ; racm_per_megan( 62) = 1.000
504 p_of_megan2racm( 63) = is_longipinene ; p_of_racm( 63) = p_api ; racm_per_megan( 63) = 1.000
505 p_of_megan2racm( 64) = is_muurolene_a ; p_of_racm( 64) = p_lim ; racm_per_megan( 64) = 1.000
506 p_of_megan2racm( 65) = is_muurolene_g ; p_of_racm( 65) = p_lim ; racm_per_megan( 65) = 1.000
507 p_of_megan2racm( 66) = is_selinene_b ; p_of_racm( 66) = p_lim ; racm_per_megan( 66) = 1.000
508 p_of_megan2racm( 67) = is_selinene_d ; p_of_racm( 67) = p_lim ; racm_per_megan( 67) = 1.000
509 p_of_megan2racm( 68) = is_nerolidol_c ; p_of_racm( 68) = p_lim ; racm_per_megan( 68) = 1.000
510 p_of_megan2racm( 69) = is_nerolidol_t ; p_of_racm( 69) = p_lim ; racm_per_megan( 69) = 1.000
511 p_of_megan2racm( 70) = is_cedrol ; p_of_racm( 70) = non_react ; racm_per_megan( 70) = 1.000
512 p_of_megan2racm( 71) = is_mbo_2m3e2ol ; p_of_racm( 71) = p_iso ; racm_per_megan( 71) = 1.000
513 p_of_megan2racm( 72) = is_methanol ; p_of_racm( 72) = p_hc3 ; racm_per_megan( 72) = 0.490
514 p_of_megan2racm( 73) = is_acetone ; p_of_racm( 73) = p_ket ; racm_per_megan( 73) = 0.330
515 p_of_megan2racm( 74) = is_methane ; p_of_racm( 74) = p_ch4 ; racm_per_megan( 74) = 1.000
516 p_of_megan2racm( 75) = is_ammonia ; p_of_racm( 75) = p_nh3 ; racm_per_megan( 75) = 1.000
517 p_of_megan2racm( 76) = is_nitrous_oxd ; p_of_racm( 76) = p_no2 ; racm_per_megan( 76) = 1.000
518 p_of_megan2racm( 77) = is_nitric_oxd ; p_of_racm( 77) = p_no ; racm_per_megan( 77) = 1.000
519 p_of_megan2racm( 78) = is_acetaldehyde ; p_of_racm( 78) = p_ald ; racm_per_megan( 78) = 1.000
520 p_of_megan2racm( 79) = is_ethanol ; p_of_racm( 79) = p_hc3 ; racm_per_megan( 79) = 1.370
521 p_of_megan2racm( 80) = is_formic_acid ; p_of_racm( 80) = p_ora1 ; racm_per_megan( 80) = 1.000
522 p_of_megan2racm( 81) = is_formaldehyde ; p_of_racm( 81) = p_hcho ; racm_per_megan( 81) = 1.000
523 p_of_megan2racm( 82) = is_acetic_acid ; p_of_racm( 82) = p_ora2 ; racm_per_megan( 82) = 1.000
524 p_of_megan2racm( 83) = is_mbo_3m2e1ol ; p_of_racm( 83) = p_iso ; racm_per_megan( 83) = 1.000
525 p_of_megan2racm( 84) = is_mbo_3m3e1ol ; p_of_racm( 84) = p_iso ; racm_per_megan( 84) = 1.000
526 p_of_megan2racm( 85) = is_benzaldehyde ; p_of_racm( 85) = non_react ; racm_per_megan( 85) = 1.000
527 p_of_megan2racm( 86) = is_butanone_2 ; p_of_racm( 86) = p_ket ; racm_per_megan( 86) = 1.610
528 p_of_megan2racm( 87) = is_decanal ; p_of_racm( 87) = p_ald ; racm_per_megan( 87) = 1.000
529 p_of_megan2racm( 88) = is_dodecene_1 ; p_of_racm( 88) = p_olt ; racm_per_megan( 88) = 1.000
530 p_of_megan2racm( 89) = is_geranyl_acetone ; p_of_racm( 89) = p_lim ; racm_per_megan( 89) = 1.000
531 p_of_megan2racm( 90) = is_heptanal ; p_of_racm( 90) = p_ald ; racm_per_megan( 90) = 1.000
532 p_of_megan2racm( 91) = is_heptane ; p_of_racm( 91) = p_hc5 ; racm_per_megan( 91) = 1.236
533 p_of_megan2racm( 92) = is_hexane ; p_of_racm( 92) = p_hc5 ; racm_per_megan( 92) = 1.058
534 p_of_megan2racm( 93) = is_met_benzoate ; p_of_racm( 93) = p_hc8 ; racm_per_megan( 93) = 1.000
535 p_of_megan2racm( 94) = is_met_heptenone ; p_of_racm( 94) = p_oli ; racm_per_megan( 94) = 1.000
536 p_of_megan2racm( 95) = is_neryl_acetone ; p_of_racm( 95) = p_oli ; racm_per_megan( 95) = 1.000
537 p_of_megan2racm( 96) = is_nonanal ; p_of_racm( 96) = p_ald ; racm_per_megan( 96) = 1.000
538 p_of_megan2racm( 97) = is_nonenal ; p_of_racm( 97) = p_hc8 ; racm_per_megan( 97) = 1.000
539 p_of_megan2racm( 98) = is_nonenal ; p_of_racm( 98) = p_ald ; racm_per_megan( 98) = 1.000
540 p_of_megan2racm( 99) = is_octanal ; p_of_racm( 99) = p_ald ; racm_per_megan( 99) = 1.000
541 p_of_megan2racm(100) = is_octanol ; p_of_racm(100) = p_hc8 ; racm_per_megan(100) = 1.092
542 p_of_megan2racm(101) = is_octenol_1e3ol ; p_of_racm(101) = p_olt ; racm_per_megan(101) = 1.000
543 p_of_megan2racm(102) = is_oxopentanal ; p_of_racm(102) = p_ald ; racm_per_megan(102) = 1.000
544 p_of_megan2racm(103) = is_pentane ; p_of_racm(103) = p_hc5 ; racm_per_megan(103) = 0.854
545 p_of_megan2racm(104) = is_phenyl_cco ; p_of_racm(104) = non_react ; racm_per_megan(104) = 1.000
546 p_of_megan2racm(105) = is_pyruvic_acid ; p_of_racm(105) = p_ora2 ; racm_per_megan(105) = 1.000
547 p_of_megan2racm(106) = is_terpinyl_act_a ; p_of_racm(106) = p_api ; racm_per_megan(106) = 1.000
548 p_of_megan2racm(107) = is_tetradecene_1 ; p_of_racm(107) = p_olt ; racm_per_megan(107) = 1.000
549 p_of_megan2racm(108) = is_toluene ; p_of_racm(108) = p_tol ; racm_per_megan(108) = 1.000
550 p_of_megan2racm(109) = is_carbon_monoxide ; p_of_racm(109) = p_co ; racm_per_megan(109) = 1.000
551 p_of_megan2racm(110) = is_butene ; p_of_racm(110) = p_olt ; racm_per_megan(110) = 1.000
552 p_of_megan2racm(111) = is_ethane ; p_of_racm(111) = p_eth ; racm_per_megan(111) = 1.000
553 p_of_megan2racm(112) = is_ethene ; p_of_racm(112) = p_ete ; racm_per_megan(112) = 1.000
554 p_of_megan2racm(113) = is_hydrogen_cyanide ; p_of_racm(113) = non_react ; racm_per_megan(113) = 1.000
555 p_of_megan2racm(114) = is_propane ; p_of_racm(114) = p_hc3 ; racm_per_megan(114) = 0.570
556 p_of_megan2racm(115) = is_propene ; p_of_racm(115) = p_olt ; racm_per_megan(115) = 1.000
557 p_of_megan2racm(116) = is_carbon_2s ; p_of_racm(116) = non_react ; racm_per_megan(116) = 1.000
558 p_of_megan2racm(117) = is_carbonyl_s ; p_of_racm(117) = non_react ; racm_per_megan(117) = 1.000
559 p_of_megan2racm(118) = is_diallyl_2s ; p_of_racm(118) = p_oli ; racm_per_megan(118) = 1.000
560 p_of_megan2racm(119) = is_diallyl_2s ; p_of_racm(119) = p_so2 ; racm_per_megan(119) = 2.000
561 p_of_megan2racm(120) = is_2met_2s ; p_of_racm(120) = p_eth ; racm_per_megan(120) = 1.000
562 p_of_megan2racm(121) = is_2met_2s ; p_of_racm(121) = p_so2 ; racm_per_megan(121) = 2.000
563 p_of_megan2racm(122) = is_2met_s ; p_of_racm(122) = p_eth ; racm_per_megan(122) = 1.000
564 p_of_megan2racm(123) = is_2met_s ; p_of_racm(123) = p_so2 ; racm_per_megan(123) = 1.000
565 p_of_megan2racm(124) = is_met_chloride ; p_of_racm(124) = non_react ; racm_per_megan(124) = 1.000
566 p_of_megan2racm(125) = is_met_bromide ; p_of_racm(125) = non_react ; racm_per_megan(125) = 1.000
567 p_of_megan2racm(126) = is_met_iodide ; p_of_racm(126) = non_react ; racm_per_megan(126) = 1.000
568 p_of_megan2racm(127) = is_hydrogen_s ; p_of_racm(127) = p_so2 ; racm_per_megan(127) = 1.000
569 p_of_megan2racm(128) = is_met_mercaptan ; p_of_racm(128) = p_ch4 ; racm_per_megan(128) = 1.000
570 p_of_megan2racm(129) = is_met_mercaptan ; p_of_racm(129) = p_so2 ; racm_per_megan(129) = 1.000
571 p_of_megan2racm(130) = is_met_propenyl_2s ; p_of_racm(130) = p_oli ; racm_per_megan(130) = 1.000
572 p_of_megan2racm(131) = is_met_propenyl_2s ; p_of_racm(131) = p_so2 ; racm_per_megan(131) = 2.000
573 p_of_megan2racm(132) = is_pppp_2s ; p_of_racm(132) = p_oli ; racm_per_megan(132) = 1.000
574 p_of_megan2racm(133) = is_pppp_2s ; p_of_racm(133) = p_so2 ; racm_per_megan(133) = 2.000
575 p_of_megan2racm(134) = is_2met_nonatriene ; p_of_racm(134) = p_lim ; racm_per_megan(134) = 1.000
576 p_of_megan2racm(135) = is_met_salicylate ; p_of_racm(135) = p_hc8 ; racm_per_megan(135) = 1.000
577 p_of_megan2racm(136) = is_indole ; p_of_racm(136) = p_hc8 ; racm_per_megan(136) = 1.201
578 p_of_megan2racm(137) = is_indole ; p_of_racm(137) = p_hno3 ; racm_per_megan(137) = 1.000
579 p_of_megan2racm(138) = is_jasmone ; p_of_racm(138) = p_lim ; racm_per_megan(138) = 1.000
580 p_of_megan2racm(139) = is_met_jasmonate ; p_of_racm(139) = p_lim ; racm_per_megan(139) = 1.000
581 p_of_megan2racm(140) = is_3met_3dctt ; p_of_racm(140) = p_oli ; racm_per_megan(140) = 0.500
582 p_of_megan2racm(141) = is_3met_3dctt ; p_of_racm(141) = p_olt ; racm_per_megan(141) = 0.500
583 p_of_megan2racm(142) = is_hexanal ; p_of_racm(142) = p_ald ; racm_per_megan(142) = 1.000
584 p_of_megan2racm(143) = is_hexanol_1 ; p_of_racm(143) = p_hc5 ; racm_per_megan(143) = 1.710
585 p_of_megan2racm(144) = is_hexenal_c3 ; p_of_racm(144) = p_oli ; racm_per_megan(144) = 1.000
586 p_of_megan2racm(145) = is_hexenal_t2 ; p_of_racm(145) = p_oli ; racm_per_megan(145) = 1.000
587 p_of_megan2racm(146) = is_hexenol_c3 ; p_of_racm(146) = p_olt ; racm_per_megan(146) = 1.000
588 p_of_megan2racm(147) = is_hexenyl_act_c3 ; p_of_racm(147) = p_oli ; racm_per_megan(147) = 1.000
589
590 END SUBROUTINE get_megan2racm_table
591
592 END MODULE module_data_mgn2mech