Context Navigation

← Previous Revision
Latest Revision
Next Revision →
Blame
Revision Log

rrtm_kgb3.F90 @ 3981

Last change on this file since 3981 was 3908, checked in by idelkadi, 3 years ago

Online implementation of the radiative transfer code ECRAD in the LMDZ model.

Inclusion of the ecrad directory containing the sources of the ECRAD code
- interface routine : radiation_scheme.F90
Adaptation of compilation scripts :
- compilation under CPP key CPP_ECRAD
- compilation with option "-rad ecard" or "-ecard true"
- The "-rad old/rtm/ecran" build option will need to replace the "-rrtm true" and "-ecrad true" options in the future.
Runing LMDZ simulations with ecrad, you need :
- logical key iflag_rrtm = 2 in physiq.def
- namelist_ecrad (DefLists?)
- the directory "data" containing the configuration files is temporarily placed in ../libfphylmd/ecrad/
Compilation and execution are tested in the 1D case. The repository under svn would allow to continue the implementation work: tests, verification of the results, ...

File size: 104.8 KB

Line
1	SUBROUTINE RRTM_KGB3
2
3	! Originally by Eli J. Mlawer, Atmospheric & Environmental Research.
4	! BAND 3: 500-630 cm-1 (low - H2O,CO2; high - H2O,CO2)
5	! Reformatted for F90 by JJMorcrette, ECMWF
6	! R. Elkhatib 12-10-2005 Split for faster and more robust compilation.
7	! G.Mozdzynski March 2011 read constants from files
8	! ABozzo 201305 updated to rrtmg_lw_v4.85:
9	! band 3: 500-630 cm-1 (low key - h2o,co2; low minor - n2o)
10	! (high key - h2o,co2; high minor - n2o)
11	! T. Wilhelmsson and K. Yessad (Oct 2013) Geometry and setup refactoring.
12	! ------------------------------------------------------------------
13
14	USE PARKIND1 ,ONLY : JPRB
15	USE YOMHOOK ,ONLY : LHOOK, DR_HOOK
16	USE YOMLUN ,ONLY : NULRAD
17	USE MPL_MODULE,ONLY : MPL_BROADCAST
18	USE YOMTAG ,ONLY : MTAGRAD
19	USE YOMMP0 , ONLY : NPROC, MYPROC
20
21	USE YOERRTO3 , ONLY : KAO ,KBO ,KAO_D,KBO_D,SELFREFO ,FRACREFAO ,&
22	& FRACREFBO ,FORREFO ,KAO_MN2O,KBO_MN2O
23	!USE YOERRTA3 , ONLY : ETAREF ,H2OREF ,&
24	! & N2OREF ,CO2REF ,STRRAT
25
26	! ------------------------------------------------------------------
27
28	IMPLICIT NONE
29	REAL(KIND=JPRB) :: ZHOOK_HANDLE
30
31	#include "abor1.intfb.h"
32
33	IF (LHOOK) CALL DR_HOOK('RRTM_KGB3',0,ZHOOK_HANDLE)
34
35	IF( MYPROC==1 )THEN
36	READ(NULRAD,ERR=1001) KAO_D,KBO_D
37	! Convert the data into model actual precision.
38	KAO = REAL(KAO_D,JPRB)
39	KBO = REAL(KBO_D,JPRB)
40	ENDIF
41	IF( NPROC>1 )THEN
42	CALL MPL_BROADCAST (KAO,MTAGRAD,1,CDSTRING='RRTM_KGB3:')
43	CALL MPL_BROADCAST (KBO,MTAGRAD,1,CDSTRING='RRTM_KGB3:')
44	ENDIF
45
46
47	! Planck fraction mapping level: P=212.7250 mbar, T = 223.06 K
48	fracrefao(:, 1) = (/ &
49	& 1.6251e-01_JPRB,1.5572e-01_JPRB,1.4557e-01_JPRB,1.3208e-01_JPRB,1.1582e-01_JPRB,9.6895e-02_JPRB, &
50	& 7.8720e-02_JPRB,5.8462e-02_JPRB,3.9631e-02_JPRB,4.3001e-03_JPRB,3.5555e-03_JPRB,2.8101e-03_JPRB, &
51	& 2.0547e-03_JPRB,1.3109e-03_JPRB,4.9403e-04_JPRB,6.9515e-05_JPRB/)
52	fracrefao(:, 2) = (/ &
53	& 1.6006e-01_JPRB,1.5576e-01_JPRB,1.4609e-01_JPRB,1.3276e-01_JPRB,1.1594e-01_JPRB,9.7336e-02_JPRB, &
54	& 7.9035e-02_JPRB,5.8696e-02_JPRB,3.9723e-02_JPRB,4.3001e-03_JPRB,3.5555e-03_JPRB,2.8101e-03_JPRB, &
55	& 2.0547e-03_JPRB,1.3109e-03_JPRB,4.9403e-04_JPRB,6.9515e-05_JPRB/)
56	fracrefao(:, 3) = (/ &
57	& 1.5952e-01_JPRB,1.5566e-01_JPRB,1.4590e-01_JPRB,1.3294e-01_JPRB,1.1599e-01_JPRB,9.7511e-02_JPRB, &
58	& 7.9127e-02_JPRB,5.8888e-02_JPRB,3.9874e-02_JPRB,4.3001e-03_JPRB,3.5555e-03_JPRB,2.8102e-03_JPRB, &
59	& 2.0547e-03_JPRB,1.3109e-03_JPRB,4.9403e-04_JPRB,6.9515e-05_JPRB/)
60	fracrefao(:, 4) = (/ &
61	& 1.5907e-01_JPRB,1.5541e-01_JPRB,1.4585e-01_JPRB,1.3316e-01_JPRB,1.1596e-01_JPRB,9.7647e-02_JPRB, &
62	& 7.9243e-02_JPRB,5.9024e-02_JPRB,4.0028e-02_JPRB,4.3112e-03_JPRB,3.5555e-03_JPRB,2.8102e-03_JPRB, &
63	& 2.0547e-03_JPRB,1.3109e-03_JPRB,4.9403e-04_JPRB,6.9515e-05_JPRB/)
64	fracrefao(:, 5) = (/ &
65	& 1.5862e-01_JPRB,1.5517e-01_JPRB,1.4588e-01_JPRB,1.3328e-01_JPRB,1.1585e-01_JPRB,9.7840e-02_JPRB, &
66	& 7.9364e-02_JPRB,5.9174e-02_JPRB,4.0160e-02_JPRB,4.3403e-03_JPRB,3.5900e-03_JPRB,2.8102e-03_JPRB, &
67	& 2.0547e-03_JPRB,1.3109e-03_JPRB,4.9403e-04_JPRB,6.9515e-05_JPRB/)
68	fracrefao(:, 6) = (/ &
69	& 1.5830e-01_JPRB,1.5490e-01_JPRB,1.4582e-01_JPRB,1.3331e-01_JPRB,1.1567e-01_JPRB,9.8079e-02_JPRB, &
70	& 7.9510e-02_JPRB,5.9369e-02_JPRB,4.0326e-02_JPRB,4.3343e-03_JPRB,3.5908e-03_JPRB,2.8527e-03_JPRB, &
71	& 2.0655e-03_JPRB,1.3109e-03_JPRB,4.9403e-04_JPRB,6.9515e-05_JPRB/)
72	fracrefao(:, 7) = (/ &
73	& 1.5789e-01_JPRB,1.5435e-01_JPRB,1.4595e-01_JPRB,1.3304e-01_JPRB,1.1566e-01_JPRB,9.8426e-02_JPRB, &
74	& 7.9704e-02_JPRB,5.9618e-02_JPRB,4.0520e-02_JPRB,4.3812e-03_JPRB,3.6147e-03_JPRB,2.8395e-03_JPRB, &
75	& 2.1301e-03_JPRB,1.3145e-03_JPRB,4.9403e-04_JPRB,6.9515e-05_JPRB/)
76	fracrefao(:, 8) = (/ &
77	& 1.5704e-01_JPRB,1.5398e-01_JPRB,1.4564e-01_JPRB,1.3222e-01_JPRB,1.1586e-01_JPRB,9.9230e-02_JPRB, &
78	& 8.0011e-02_JPRB,6.0149e-02_JPRB,4.0790e-02_JPRB,4.4253e-03_JPRB,3.6534e-03_JPRB,2.9191e-03_JPRB, &
79	& 2.1373e-03_JPRB,1.3558e-03_JPRB,5.1631e-04_JPRB,7.8794e-05_JPRB/)
80	fracrefao(:, 9) = (/ &
81	& 1.5270e-01_JPRB,1.5126e-01_JPRB,1.4264e-01_JPRB,1.3106e-01_JPRB,1.1740e-01_JPRB,1.0137e-01_JPRB, &
82	& 8.3057e-02_JPRB,6.2282e-02_JPRB,4.2301e-02_JPRB,4.6486e-03_JPRB,3.8159e-03_JPRB,3.0472e-03_JPRB, &
83	& 2.2870e-03_JPRB,1.4818e-03_JPRB,5.6773e-04_JPRB,7.8794e-05_JPRB/)
84
85	! Planck fraction mapping level: p = 95.8 mbar, t = 215.7 k
86	fracrefbo(:, 1) = (/ &
87	& 1.6413e-01_JPRB,1.5665e-01_JPRB,1.4606e-01_JPRB,1.3184e-01_JPRB,1.1517e-01_JPRB,9.6243e-02_JPRB, &
88	& 7.7982e-02_JPRB,5.8165e-02_JPRB,3.9311e-02_JPRB,4.2586e-03_JPRB,3.5189e-03_JPRB,2.7793e-03_JPRB, &
89	& 2.0376e-03_JPRB,1.2938e-03_JPRB,4.8853e-04_JPRB,6.8745e-05_JPRB/)
90	fracrefbo(:, 2) = (/ &
91	& 1.6254e-01_JPRB,1.5674e-01_JPRB,1.4652e-01_JPRB,1.3221e-01_JPRB,1.1535e-01_JPRB,9.6439e-02_JPRB, &
92	& 7.8155e-02_JPRB,5.8254e-02_JPRB,3.9343e-02_JPRB,4.2586e-03_JPRB,3.5189e-03_JPRB,2.7793e-03_JPRB, &
93	& 2.0376e-03_JPRB,1.2938e-03_JPRB,4.8853e-04_JPRB,6.8745e-05_JPRB/)
94	fracrefbo(:, 3) = (/ &
95	& 1.6177e-01_JPRB,1.5664e-01_JPRB,1.4669e-01_JPRB,1.3242e-01_JPRB,1.1541e-01_JPRB,9.6536e-02_JPRB, &
96	& 7.8257e-02_JPRB,5.8387e-02_JPRB,3.9431e-02_JPRB,4.2587e-03_JPRB,3.5189e-03_JPRB,2.7793e-03_JPRB, &
97	& 2.0376e-03_JPRB,1.2938e-03_JPRB,4.8853e-04_JPRB,6.8745e-05_JPRB/)
98	fracrefbo(:, 4) = (/ &
99	& 1.6077e-01_JPRB,1.5679e-01_JPRB,1.4648e-01_JPRB,1.3273e-01_JPRB,1.1546e-01_JPRB,9.6779e-02_JPRB, &
100	& 7.8371e-02_JPRB,5.8546e-02_JPRB,3.9611e-02_JPRB,4.2772e-03_JPRB,3.5190e-03_JPRB,2.7793e-03_JPRB, &
101	& 2.0376e-03_JPRB,1.2938e-03_JPRB,4.8853e-04_JPRB,6.8745e-05_JPRB/)
102	fracrefbo(:, 5) = (/ &
103	& 1.6067e-01_JPRB,1.5608e-01_JPRB,1.4247e-01_JPRB,1.2881e-01_JPRB,1.1449e-01_JPRB,9.8802e-02_JPRB, &
104	& 8.0828e-02_JPRB,6.0977e-02_JPRB,4.1494e-02_JPRB,4.5116e-03_JPRB,3.7290e-03_JPRB,2.9460e-03_JPRB, &
105	& 2.1948e-03_JPRB,1.3778e-03_JPRB,5.4552e-04_JPRB,7.9969e-05_JPRB/)
106
107
108
109
110	! ------------------------------------------------------------------
111
112	! The array KAO contains absorption coefs for each of the 16 g-intervals
113	! for a range of pressure levels > ~100mb, temperatures, and ratios
114	! of water vapor to CO2. The first index in the array, JS, runs
115	! from 1 to 10, and corresponds to different water vapor to CO2 ratios,
116	! as expressed through the binary species parameter eta, defined as
117	! eta = h2o/(h20 + (rat) * co2), where rat is the ratio of the integrated
118	! line strength in the band of co2 to that of h2o. For instance,
119	! JS=1 refers to dry air (eta = 0), JS = 10 corresponds to eta = 1.0.
120	! The 2nd index in the array, JT, which runs from 1 to 5, corresponds
121	! to different temperatures. More specifically, JT = 3 means that the
122	! data are for the reference temperature TREF for this pressure
123	! level, JT = 2 refers to the temperature
124	! TREF-15, JT = 1 is for TREF-30, JT = 4 is for TREF+15, and JT = 5
125	! is for TREF+30. The third index, JP, runs from 1 to 13 and refers
126	! to the reference pressure level (e.g. JP = 1 is for a
127	! pressure of 1053.63 mb). The fourth index, IG, goes from 1 to 16,
128	! and tells us which g-interval the absorption coefficients are for.
129
130
131
132	! The array KBO contains absorption coefs for each of the 16 g-intervals
133	! for a range of pressure levels < ~100mb, temperatures, and ratios
134	! of H2O to CO2. The first index in the array, JS, runs from 1 to 5,
135	! and corresponds to different H2O to CO2 ratios, as expressed through
136	! the binary species parameter eta, defined as eta = H2O/(H2O+RAT*CO2),
137	! where RAT is the ratio of the integrated line strength in the band
138	! of CO2 to that of H2O. For instance, JS=1 refers to no H2O,
139	! JS = 2 corresponds to eta = 0.25, etc. The second index, JT, which
140	! runs from 1 to 5, corresponds to different temperatures. More
141	! specifically, JT = 3 means that the data are for the corresponding
142	! reference temperature TREF for this pressure level, JT = 2 refers
143	! to the TREF-15, JT = 1 is for TREF-30, JT = 4 is for TREF+15, and
144	! JT = 5 is for TREF+30. The third index, JP, runs from 13 to 59 and
145	! refers to the corresponding pressure level in PREF (e.g. JP = 13 is
146	! for a pressure of 95.5835 mb). The fourth index, IG, goes from 1 to
147	! 16, and tells us which g-interval the absorption coefficients are for.
148
149
150	! The array KAO_Mxx contains the absorption coefficient for
151	! a minor species at the 16 chosen g-values for a reference pressure
152	! level below 100~ mb. The first index in the array, JS, runs
153	! from 1 to 10, and corresponds to different gas column amount ratios,
154	! as expressed through the binary species parameter eta, defined as
155	! eta = gas1/(gas1 + (rat) * gas2), where rat is the
156	! ratio of the reference MLS column amount value of gas 1
157	! to that of gas2. The second index refers to temperature
158	! in 7.2 degree increments. For instance, JT = 1 refers to a
159	! temperature of 188.0, JT = 2 refers to 195.2, etc. The third index
160	! runs over the g-channel (1 to 16).
161
162	kao_mn2o( 1, :, 1) = (/ &
163	& 1.28178e-05_JPRB, 1.55472e-05_JPRB, 1.88578e-05_JPRB, 2.28735e-05_JPRB, 2.77442e-05_JPRB, &
164	& 3.36520e-05_JPRB, 4.08179e-05_JPRB, 4.95098e-05_JPRB, 6.00525e-05_JPRB, 7.28401e-05_JPRB, &
165	& 8.83508e-05_JPRB, 1.07164e-04_JPRB, 1.29984e-04_JPRB, 1.57663e-04_JPRB, 1.91236e-04_JPRB, &
166	& 2.31958e-04_JPRB, 2.81352e-04_JPRB, 3.41263e-04_JPRB, 4.13932e-04_JPRB/)
167	kao_mn2o( 2, :, 1) = (/ &
168	& 1.00725e-01_JPRB, 1.04470e-01_JPRB, 1.08355e-01_JPRB, 1.12384e-01_JPRB, 1.16563e-01_JPRB, &
169	& 1.20898e-01_JPRB, 1.25394e-01_JPRB, 1.30057e-01_JPRB, 1.34893e-01_JPRB, 1.39909e-01_JPRB, &
170	& 1.45112e-01_JPRB, 1.50508e-01_JPRB, 1.56104e-01_JPRB, 1.61909e-01_JPRB, 1.67930e-01_JPRB, &
171	& 1.74175e-01_JPRB, 1.80652e-01_JPRB, 1.87369e-01_JPRB, 1.94337e-01_JPRB/)
172	kao_mn2o( 3, :, 1) = (/ &
173	& 1.94143e-01_JPRB, 1.97380e-01_JPRB, 2.00670e-01_JPRB, 2.04016e-01_JPRB, 2.07417e-01_JPRB, &
174	& 2.10875e-01_JPRB, 2.14390e-01_JPRB, 2.17964e-01_JPRB, 2.21598e-01_JPRB, 2.25292e-01_JPRB, &
175	& 2.29048e-01_JPRB, 2.32867e-01_JPRB, 2.36749e-01_JPRB, 2.40696e-01_JPRB, 2.44708e-01_JPRB, &
176	& 2.48788e-01_JPRB, 2.52936e-01_JPRB, 2.57152e-01_JPRB, 2.61439e-01_JPRB/)
177	kao_mn2o( 4, :, 1) = (/ &
178	& 2.98127e-01_JPRB, 3.00016e-01_JPRB, 3.01916e-01_JPRB, 3.03829e-01_JPRB, 3.05754e-01_JPRB, &
179	& 3.07691e-01_JPRB, 3.09640e-01_JPRB, 3.11601e-01_JPRB, 3.13575e-01_JPRB, 3.15562e-01_JPRB, &
180	& 3.17561e-01_JPRB, 3.19572e-01_JPRB, 3.21597e-01_JPRB, 3.23634e-01_JPRB, 3.25684e-01_JPRB, &
181	& 3.27748e-01_JPRB, 3.29824e-01_JPRB, 3.31913e-01_JPRB, 3.34016e-01_JPRB/)
182	kao_mn2o( 5, :, 1) = (/ &
183	& 4.45029e-01_JPRB, 4.45243e-01_JPRB, 4.45458e-01_JPRB, 4.45673e-01_JPRB, 4.45889e-01_JPRB, &
184	& 4.46104e-01_JPRB, 4.46319e-01_JPRB, 4.46535e-01_JPRB, 4.46750e-01_JPRB, 4.46966e-01_JPRB, &
185	& 4.47182e-01_JPRB, 4.47398e-01_JPRB, 4.47614e-01_JPRB, 4.47830e-01_JPRB, 4.48046e-01_JPRB, &
186	& 4.48262e-01_JPRB, 4.48479e-01_JPRB, 4.48695e-01_JPRB, 4.48912e-01_JPRB/)
187	kao_mn2o( 6, :, 1) = (/ &
188	& 7.15677e-01_JPRB, 7.14564e-01_JPRB, 7.13452e-01_JPRB, 7.12342e-01_JPRB, 7.11234e-01_JPRB, &
189	& 7.10127e-01_JPRB, 7.09022e-01_JPRB, 7.07919e-01_JPRB, 7.06818e-01_JPRB, 7.05718e-01_JPRB, &
190	& 7.04620e-01_JPRB, 7.03524e-01_JPRB, 7.02429e-01_JPRB, 7.01336e-01_JPRB, 7.00245e-01_JPRB, &
191	& 6.99156e-01_JPRB, 6.98068e-01_JPRB, 6.96982e-01_JPRB, 6.95898e-01_JPRB/)
192	kao_mn2o( 7, :, 1) = (/ &
193	& 9.89605e-01_JPRB, 9.85128e-01_JPRB, 9.80671e-01_JPRB, 9.76234e-01_JPRB, 9.71817e-01_JPRB, &
194	& 9.67421e-01_JPRB, 9.63044e-01_JPRB, 9.58687e-01_JPRB, 9.54350e-01_JPRB, 9.50032e-01_JPRB, &
195	& 9.45734e-01_JPRB, 9.41455e-01_JPRB, 9.37196e-01_JPRB, 9.32956e-01_JPRB, 9.28735e-01_JPRB, &
196	& 9.24533e-01_JPRB, 9.20350e-01_JPRB, 9.16187e-01_JPRB, 9.12042e-01_JPRB/)
197	kao_mn2o( 8, :, 1) = (/ &
198	& 1.12229e+00_JPRB, 1.11502e+00_JPRB, 1.10779e+00_JPRB, 1.10061e+00_JPRB, 1.09348e+00_JPRB, &
199	& 1.08639e+00_JPRB, 1.07935e+00_JPRB, 1.07235e+00_JPRB, 1.06540e+00_JPRB, 1.05850e+00_JPRB, &
200	& 1.05164e+00_JPRB, 1.04482e+00_JPRB, 1.03805e+00_JPRB, 1.03132e+00_JPRB, 1.02464e+00_JPRB, &
201	& 1.01799e+00_JPRB, 1.01140e+00_JPRB, 1.00484e+00_JPRB, 9.98328e-01_JPRB/)
202	kao_mn2o( 9, :, 1) = (/ &
203	& 7.20959e-01_JPRB, 7.22839e-01_JPRB, 7.24723e-01_JPRB, 7.26612e-01_JPRB, 7.28506e-01_JPRB, &
204	& 7.30405e-01_JPRB, 7.32309e-01_JPRB, 7.34218e-01_JPRB, 7.36132e-01_JPRB, 7.38051e-01_JPRB, &
205	& 7.39975e-01_JPRB, 7.41904e-01_JPRB, 7.43838e-01_JPRB, 7.45777e-01_JPRB, 7.47721e-01_JPRB, &
206	& 7.49670e-01_JPRB, 7.51624e-01_JPRB, 7.53584e-01_JPRB, 7.55548e-01_JPRB/)
207	kao_mn2o( 1, :, 2) = (/ &
208	& 1.62152e-03_JPRB, 1.81627e-03_JPRB, 2.03443e-03_JPRB, 2.27878e-03_JPRB, 2.55248e-03_JPRB, &
209	& 2.85906e-03_JPRB, 3.20245e-03_JPRB, 3.58710e-03_JPRB, 4.01794e-03_JPRB, 4.50053e-03_JPRB, &
210	& 5.04109e-03_JPRB, 5.64657e-03_JPRB, 6.32477e-03_JPRB, 7.08444e-03_JPRB, 7.93534e-03_JPRB, &
211	& 8.88845e-03_JPRB, 9.95603e-03_JPRB, 1.11518e-02_JPRB, 1.24913e-02_JPRB/)
212	kao_mn2o( 2, :, 2) = (/ &
213	& 3.73716e-01_JPRB, 3.72491e-01_JPRB, 3.71271e-01_JPRB, 3.70054e-01_JPRB, 3.68841e-01_JPRB, &
214	& 3.67633e-01_JPRB, 3.66428e-01_JPRB, 3.65227e-01_JPRB, 3.64031e-01_JPRB, 3.62838e-01_JPRB, &
215	& 3.61649e-01_JPRB, 3.60464e-01_JPRB, 3.59283e-01_JPRB, 3.58106e-01_JPRB, 3.56932e-01_JPRB, &
216	& 3.55763e-01_JPRB, 3.54597e-01_JPRB, 3.53435e-01_JPRB, 3.52277e-01_JPRB/)
217	kao_mn2o( 3, :, 2) = (/ &
218	& 5.46240e-01_JPRB, 5.42972e-01_JPRB, 5.39724e-01_JPRB, 5.36495e-01_JPRB, 5.33285e-01_JPRB, &
219	& 5.30095e-01_JPRB, 5.26923e-01_JPRB, 5.23771e-01_JPRB, 5.20637e-01_JPRB, 5.17523e-01_JPRB, &
220	& 5.14426e-01_JPRB, 5.11349e-01_JPRB, 5.08290e-01_JPRB, 5.05249e-01_JPRB, 5.02226e-01_JPRB, &
221	& 4.99221e-01_JPRB, 4.96235e-01_JPRB, 4.93266e-01_JPRB, 4.90315e-01_JPRB/)
222	kao_mn2o( 4, :, 2) = (/ &
223	& 8.35399e-01_JPRB, 8.36766e-01_JPRB, 8.38135e-01_JPRB, 8.39507e-01_JPRB, 8.40880e-01_JPRB, &
224	& 8.42256e-01_JPRB, 8.43635e-01_JPRB, 8.45015e-01_JPRB, 8.46398e-01_JPRB, 8.47783e-01_JPRB, &
225	& 8.49170e-01_JPRB, 8.50559e-01_JPRB, 8.51951e-01_JPRB, 8.53345e-01_JPRB, 8.54742e-01_JPRB, &
226	& 8.56140e-01_JPRB, 8.57541e-01_JPRB, 8.58944e-01_JPRB, 8.60350e-01_JPRB/)
227	kao_mn2o( 5, :, 2) = (/ &
228	& 1.04433e+00_JPRB, 1.04864e+00_JPRB, 1.05297e+00_JPRB, 1.05731e+00_JPRB, 1.06168e+00_JPRB, &
229	& 1.06606e+00_JPRB, 1.07046e+00_JPRB, 1.07488e+00_JPRB, 1.07932e+00_JPRB, 1.08377e+00_JPRB, &
230	& 1.08824e+00_JPRB, 1.09274e+00_JPRB, 1.09725e+00_JPRB, 1.10178e+00_JPRB, 1.10632e+00_JPRB, &
231	& 1.11089e+00_JPRB, 1.11547e+00_JPRB, 1.12008e+00_JPRB, 1.12470e+00_JPRB/)
232	kao_mn2o( 6, :, 2) = (/ &
233	& 1.22341e+00_JPRB, 1.22885e+00_JPRB, 1.23431e+00_JPRB, 1.23980e+00_JPRB, 1.24531e+00_JPRB, &
234	& 1.25084e+00_JPRB, 1.25640e+00_JPRB, 1.26199e+00_JPRB, 1.26760e+00_JPRB, 1.27323e+00_JPRB, &
235	& 1.27889e+00_JPRB, 1.28458e+00_JPRB, 1.29029e+00_JPRB, 1.29602e+00_JPRB, 1.30178e+00_JPRB, &
236	& 1.30757e+00_JPRB, 1.31338e+00_JPRB, 1.31922e+00_JPRB, 1.32508e+00_JPRB/)
237	kao_mn2o( 7, :, 2) = (/ &
238	& 1.67595e+00_JPRB, 1.68296e+00_JPRB, 1.69000e+00_JPRB, 1.69707e+00_JPRB, 1.70417e+00_JPRB, &
239	& 1.71130e+00_JPRB, 1.71846e+00_JPRB, 1.72565e+00_JPRB, 1.73287e+00_JPRB, 1.74012e+00_JPRB, &
240	& 1.74740e+00_JPRB, 1.75471e+00_JPRB, 1.76206e+00_JPRB, 1.76943e+00_JPRB, 1.77683e+00_JPRB, &
241	& 1.78426e+00_JPRB, 1.79173e+00_JPRB, 1.79922e+00_JPRB, 1.80675e+00_JPRB/)
242	kao_mn2o( 8, :, 2) = (/ &
243	& 2.76890e+00_JPRB, 2.76981e+00_JPRB, 2.77072e+00_JPRB, 2.77163e+00_JPRB, 2.77254e+00_JPRB, &
244	& 2.77345e+00_JPRB, 2.77436e+00_JPRB, 2.77527e+00_JPRB, 2.77618e+00_JPRB, 2.77709e+00_JPRB, &
245	& 2.77800e+00_JPRB, 2.77891e+00_JPRB, 2.77982e+00_JPRB, 2.78074e+00_JPRB, 2.78165e+00_JPRB, &
246	& 2.78256e+00_JPRB, 2.78348e+00_JPRB, 2.78439e+00_JPRB, 2.78530e+00_JPRB/)
247	kao_mn2o( 9, :, 2) = (/ &
248	& 8.00944e-01_JPRB, 7.95531e-01_JPRB, 7.90155e-01_JPRB, 7.84815e-01_JPRB, 7.79511e-01_JPRB, &
249	& 7.74243e-01_JPRB, 7.69011e-01_JPRB, 7.63813e-01_JPRB, 7.58652e-01_JPRB, 7.53525e-01_JPRB, &
250	& 7.48432e-01_JPRB, 7.43374e-01_JPRB, 7.38350e-01_JPRB, 7.33360e-01_JPRB, 7.28404e-01_JPRB, &
251	& 7.23482e-01_JPRB, 7.18592e-01_JPRB, 7.13736e-01_JPRB, 7.08912e-01_JPRB/)
252	kao_mn2o( 1, :, 3) = (/ &
253	& 5.26578e-02_JPRB, 5.59000e-02_JPRB, 5.93419e-02_JPRB, 6.29957e-02_JPRB, 6.68744e-02_JPRB, &
254	& 7.09920e-02_JPRB, 7.53631e-02_JPRB, 8.00034e-02_JPRB, 8.49294e-02_JPRB, 9.01586e-02_JPRB, &
255	& 9.57099e-02_JPRB, 1.01603e-01_JPRB, 1.07859e-01_JPRB, 1.14500e-01_JPRB, 1.21550e-01_JPRB, &
256	& 1.29034e-01_JPRB, 1.36979e-01_JPRB, 1.45413e-01_JPRB, 1.54366e-01_JPRB/)
257	kao_mn2o( 2, :, 3) = (/ &
258	& 8.18393e-01_JPRB, 8.20623e-01_JPRB, 8.22860e-01_JPRB, 8.25103e-01_JPRB, 8.27352e-01_JPRB, &
259	& 8.29608e-01_JPRB, 8.31869e-01_JPRB, 8.34137e-01_JPRB, 8.36410e-01_JPRB, 8.38690e-01_JPRB, &
260	& 8.40976e-01_JPRB, 8.43269e-01_JPRB, 8.45567e-01_JPRB, 8.47872e-01_JPRB, 8.50183e-01_JPRB, &
261	& 8.52501e-01_JPRB, 8.54825e-01_JPRB, 8.57155e-01_JPRB, 8.59491e-01_JPRB/)
262	kao_mn2o( 3, :, 3) = (/ &
263	& 1.02454e+00_JPRB, 1.03210e+00_JPRB, 1.03972e+00_JPRB, 1.04740e+00_JPRB, 1.05514e+00_JPRB, &
264	& 1.06293e+00_JPRB, 1.07077e+00_JPRB, 1.07868e+00_JPRB, 1.08665e+00_JPRB, 1.09467e+00_JPRB, &
265	& 1.10275e+00_JPRB, 1.11089e+00_JPRB, 1.11910e+00_JPRB, 1.12736e+00_JPRB, 1.13568e+00_JPRB, &
266	& 1.14407e+00_JPRB, 1.15252e+00_JPRB, 1.16103e+00_JPRB, 1.16960e+00_JPRB/)
267	kao_mn2o( 4, :, 3) = (/ &
268	& 1.11755e+00_JPRB, 1.12348e+00_JPRB, 1.12944e+00_JPRB, 1.13543e+00_JPRB, 1.14146e+00_JPRB, &
269	& 1.14752e+00_JPRB, 1.15360e+00_JPRB, 1.15972e+00_JPRB, 1.16588e+00_JPRB, 1.17206e+00_JPRB, &
270	& 1.17828e+00_JPRB, 1.18453e+00_JPRB, 1.19082e+00_JPRB, 1.19714e+00_JPRB, 1.20349e+00_JPRB, &
271	& 1.20988e+00_JPRB, 1.21630e+00_JPRB, 1.22275e+00_JPRB, 1.22924e+00_JPRB/)
272	kao_mn2o( 5, :, 3) = (/ &
273	& 1.41993e+00_JPRB, 1.42353e+00_JPRB, 1.42713e+00_JPRB, 1.43074e+00_JPRB, 1.43436e+00_JPRB, &
274	& 1.43799e+00_JPRB, 1.44163e+00_JPRB, 1.44528e+00_JPRB, 1.44894e+00_JPRB, 1.45261e+00_JPRB, &
275	& 1.45628e+00_JPRB, 1.45997e+00_JPRB, 1.46367e+00_JPRB, 1.46737e+00_JPRB, 1.47108e+00_JPRB, &
276	& 1.47481e+00_JPRB, 1.47854e+00_JPRB, 1.48228e+00_JPRB, 1.48603e+00_JPRB/)
277	kao_mn2o( 6, :, 3) = (/ &
278	& 1.37725e+00_JPRB, 1.38029e+00_JPRB, 1.38334e+00_JPRB, 1.38640e+00_JPRB, 1.38947e+00_JPRB, &
279	& 1.39254e+00_JPRB, 1.39562e+00_JPRB, 1.39870e+00_JPRB, 1.40179e+00_JPRB, 1.40489e+00_JPRB, &
280	& 1.40800e+00_JPRB, 1.41111e+00_JPRB, 1.41423e+00_JPRB, 1.41736e+00_JPRB, 1.42049e+00_JPRB, &
281	& 1.42363e+00_JPRB, 1.42678e+00_JPRB, 1.42993e+00_JPRB, 1.43309e+00_JPRB/)
282	kao_mn2o( 7, :, 3) = (/ &
283	& 1.34579e+00_JPRB, 1.34584e+00_JPRB, 1.34589e+00_JPRB, 1.34594e+00_JPRB, 1.34599e+00_JPRB, &
284	& 1.34603e+00_JPRB, 1.34608e+00_JPRB, 1.34613e+00_JPRB, 1.34618e+00_JPRB, 1.34623e+00_JPRB, &
285	& 1.34627e+00_JPRB, 1.34632e+00_JPRB, 1.34637e+00_JPRB, 1.34642e+00_JPRB, 1.34647e+00_JPRB, &
286	& 1.34651e+00_JPRB, 1.34656e+00_JPRB, 1.34661e+00_JPRB, 1.34666e+00_JPRB/)
287	kao_mn2o( 8, :, 3) = (/ &
288	& 9.15268e-01_JPRB, 9.12779e-01_JPRB, 9.10298e-01_JPRB, 9.07823e-01_JPRB, 9.05355e-01_JPRB, &
289	& 9.02893e-01_JPRB, 9.00438e-01_JPRB, 8.97990e-01_JPRB, 8.95549e-01_JPRB, 8.93114e-01_JPRB, &
290	& 8.90686e-01_JPRB, 8.88264e-01_JPRB, 8.85849e-01_JPRB, 8.83441e-01_JPRB, 8.81039e-01_JPRB, &
291	& 8.78644e-01_JPRB, 8.76255e-01_JPRB, 8.73873e-01_JPRB, 8.71497e-01_JPRB/)
292	kao_mn2o( 9, :, 3) = (/ &
293	& 1.12514e+00_JPRB, 1.13523e+00_JPRB, 1.14541e+00_JPRB, 1.15568e+00_JPRB, 1.16604e+00_JPRB, &
294	& 1.17649e+00_JPRB, 1.18704e+00_JPRB, 1.19768e+00_JPRB, 1.20841e+00_JPRB, 1.21925e+00_JPRB, &
295	& 1.23018e+00_JPRB, 1.24121e+00_JPRB, 1.25233e+00_JPRB, 1.26356e+00_JPRB, 1.27489e+00_JPRB, &
296	& 1.28632e+00_JPRB, 1.29785e+00_JPRB, 1.30948e+00_JPRB, 1.32122e+00_JPRB/)
297	kao_mn2o( 1, :, 4) = (/ &
298	& 4.65135e-01_JPRB, 4.69677e-01_JPRB, 4.74264e-01_JPRB, 4.78895e-01_JPRB, 4.83572e-01_JPRB, &
299	& 4.88294e-01_JPRB, 4.93063e-01_JPRB, 4.97878e-01_JPRB, 5.02740e-01_JPRB, 5.07649e-01_JPRB, &
300	& 5.12607e-01_JPRB, 5.17613e-01_JPRB, 5.22667e-01_JPRB, 5.27771e-01_JPRB, 5.32925e-01_JPRB, &
301	& 5.38130e-01_JPRB, 5.43385e-01_JPRB, 5.48691e-01_JPRB, 5.54049e-01_JPRB/)
302	kao_mn2o( 2, :, 4) = (/ &
303	& 9.71592e-01_JPRB, 9.74472e-01_JPRB, 9.77360e-01_JPRB, 9.80257e-01_JPRB, 9.83163e-01_JPRB, &
304	& 9.86077e-01_JPRB, 9.89000e-01_JPRB, 9.91931e-01_JPRB, 9.94871e-01_JPRB, 9.97820e-01_JPRB, &
305	& 1.00078e+00_JPRB, 1.00374e+00_JPRB, 1.00672e+00_JPRB, 1.00970e+00_JPRB, 1.01270e+00_JPRB, &
306	& 1.01570e+00_JPRB, 1.01871e+00_JPRB, 1.02173e+00_JPRB, 1.02476e+00_JPRB/)
307	kao_mn2o( 3, :, 4) = (/ &
308	& 1.48090e+00_JPRB, 1.48238e+00_JPRB, 1.48385e+00_JPRB, 1.48532e+00_JPRB, 1.48680e+00_JPRB, &
309	& 1.48828e+00_JPRB, 1.48976e+00_JPRB, 1.49124e+00_JPRB, 1.49272e+00_JPRB, 1.49420e+00_JPRB, &
310	& 1.49569e+00_JPRB, 1.49717e+00_JPRB, 1.49866e+00_JPRB, 1.50015e+00_JPRB, 1.50164e+00_JPRB, &
311	& 1.50313e+00_JPRB, 1.50463e+00_JPRB, 1.50612e+00_JPRB, 1.50762e+00_JPRB/)
312	kao_mn2o( 4, :, 4) = (/ &
313	& 1.50599e+00_JPRB, 1.50541e+00_JPRB, 1.50483e+00_JPRB, 1.50426e+00_JPRB, 1.50368e+00_JPRB, &
314	& 1.50310e+00_JPRB, 1.50252e+00_JPRB, 1.50195e+00_JPRB, 1.50137e+00_JPRB, 1.50079e+00_JPRB, &
315	& 1.50022e+00_JPRB, 1.49964e+00_JPRB, 1.49906e+00_JPRB, 1.49849e+00_JPRB, 1.49791e+00_JPRB, &
316	& 1.49734e+00_JPRB, 1.49676e+00_JPRB, 1.49619e+00_JPRB, 1.49561e+00_JPRB/)
317	kao_mn2o( 5, :, 4) = (/ &
318	& 1.25396e+00_JPRB, 1.25230e+00_JPRB, 1.25065e+00_JPRB, 1.24900e+00_JPRB, 1.24735e+00_JPRB, &
319	& 1.24570e+00_JPRB, 1.24405e+00_JPRB, 1.24241e+00_JPRB, 1.24077e+00_JPRB, 1.23913e+00_JPRB, &
320	& 1.23749e+00_JPRB, 1.23586e+00_JPRB, 1.23423e+00_JPRB, 1.23260e+00_JPRB, 1.23097e+00_JPRB, &
321	& 1.22934e+00_JPRB, 1.22772e+00_JPRB, 1.22610e+00_JPRB, 1.22448e+00_JPRB/)
322	kao_mn2o( 6, :, 4) = (/ &
323	& 1.27104e+00_JPRB, 1.26416e+00_JPRB, 1.25731e+00_JPRB, 1.25050e+00_JPRB, 1.24373e+00_JPRB, &
324	& 1.23700e+00_JPRB, 1.23030e+00_JPRB, 1.22364e+00_JPRB, 1.21701e+00_JPRB, 1.21043e+00_JPRB, &
325	& 1.20387e+00_JPRB, 1.19735e+00_JPRB, 1.19087e+00_JPRB, 1.18442e+00_JPRB, 1.17801e+00_JPRB, &
326	& 1.17163e+00_JPRB, 1.16529e+00_JPRB, 1.15898e+00_JPRB, 1.15270e+00_JPRB/)
327	kao_mn2o( 7, :, 4) = (/ &
328	& 9.57877e-01_JPRB, 9.49712e-01_JPRB, 9.41617e-01_JPRB, 9.33591e-01_JPRB, 9.25633e-01_JPRB, &
329	& 9.17743e-01_JPRB, 9.09920e-01_JPRB, 9.02164e-01_JPRB, 8.94473e-01_JPRB, 8.86849e-01_JPRB, &
330	& 8.79289e-01_JPRB, 8.71794e-01_JPRB, 8.64363e-01_JPRB, 8.56995e-01_JPRB, 8.49690e-01_JPRB, &
331	& 8.42447e-01_JPRB, 8.35266e-01_JPRB, 8.28147e-01_JPRB, 8.21087e-01_JPRB/)
332	kao_mn2o( 8, :, 4) = (/ &
333	& 4.75787e-01_JPRB, 4.77208e-01_JPRB, 4.78633e-01_JPRB, 4.80063e-01_JPRB, 4.81496e-01_JPRB, &
334	& 4.82934e-01_JPRB, 4.84377e-01_JPRB, 4.85823e-01_JPRB, 4.87274e-01_JPRB, 4.88730e-01_JPRB, &
335	& 4.90189e-01_JPRB, 4.91653e-01_JPRB, 4.93122e-01_JPRB, 4.94595e-01_JPRB, 4.96072e-01_JPRB, &
336	& 4.97553e-01_JPRB, 4.99039e-01_JPRB, 5.00530e-01_JPRB, 5.02025e-01_JPRB/)
337	kao_mn2o( 9, :, 4) = (/ &
338	& 2.42533e+00_JPRB, 2.41357e+00_JPRB, 2.40188e+00_JPRB, 2.39024e+00_JPRB, 2.37866e+00_JPRB, &
339	& 2.36713e+00_JPRB, 2.35566e+00_JPRB, 2.34425e+00_JPRB, 2.33289e+00_JPRB, 2.32158e+00_JPRB, &
340	& 2.31033e+00_JPRB, 2.29914e+00_JPRB, 2.28800e+00_JPRB, 2.27691e+00_JPRB, 2.26588e+00_JPRB, &
341	& 2.25490e+00_JPRB, 2.24397e+00_JPRB, 2.23310e+00_JPRB, 2.22228e+00_JPRB/)
342	kao_mn2o( 1, :, 5) = (/ &
343	& 1.53885e+00_JPRB, 1.53590e+00_JPRB, 1.53297e+00_JPRB, 1.53004e+00_JPRB, 1.52711e+00_JPRB, &
344	& 1.52419e+00_JPRB, 1.52128e+00_JPRB, 1.51837e+00_JPRB, 1.51547e+00_JPRB, 1.51257e+00_JPRB, &
345	& 1.50968e+00_JPRB, 1.50679e+00_JPRB, 1.50391e+00_JPRB, 1.50104e+00_JPRB, 1.49817e+00_JPRB, &
346	& 1.49530e+00_JPRB, 1.49245e+00_JPRB, 1.48959e+00_JPRB, 1.48675e+00_JPRB/)
347	kao_mn2o( 2, :, 5) = (/ &
348	& 1.83368e+00_JPRB, 1.83530e+00_JPRB, 1.83692e+00_JPRB, 1.83854e+00_JPRB, 1.84016e+00_JPRB, &
349	& 1.84178e+00_JPRB, 1.84340e+00_JPRB, 1.84503e+00_JPRB, 1.84665e+00_JPRB, 1.84828e+00_JPRB, &
350	& 1.84991e+00_JPRB, 1.85154e+00_JPRB, 1.85317e+00_JPRB, 1.85480e+00_JPRB, 1.85644e+00_JPRB, &
351	& 1.85807e+00_JPRB, 1.85971e+00_JPRB, 1.86135e+00_JPRB, 1.86299e+00_JPRB/)
352	kao_mn2o( 3, :, 5) = (/ &
353	& 1.49593e+00_JPRB, 1.49279e+00_JPRB, 1.48965e+00_JPRB, 1.48652e+00_JPRB, 1.48340e+00_JPRB, &
354	& 1.48028e+00_JPRB, 1.47717e+00_JPRB, 1.47406e+00_JPRB, 1.47096e+00_JPRB, 1.46787e+00_JPRB, &
355	& 1.46479e+00_JPRB, 1.46171e+00_JPRB, 1.45863e+00_JPRB, 1.45557e+00_JPRB, 1.45251e+00_JPRB, &
356	& 1.44946e+00_JPRB, 1.44641e+00_JPRB, 1.44337e+00_JPRB, 1.44033e+00_JPRB/)
357	kao_mn2o( 4, :, 5) = (/ &
358	& 1.40048e+00_JPRB, 1.39228e+00_JPRB, 1.38413e+00_JPRB, 1.37603e+00_JPRB, 1.36798e+00_JPRB, &
359	& 1.35997e+00_JPRB, 1.35201e+00_JPRB, 1.34410e+00_JPRB, 1.33623e+00_JPRB, 1.32841e+00_JPRB, &
360	& 1.32064e+00_JPRB, 1.31291e+00_JPRB, 1.30522e+00_JPRB, 1.29758e+00_JPRB, 1.28999e+00_JPRB, &
361	& 1.28244e+00_JPRB, 1.27493e+00_JPRB, 1.26747e+00_JPRB, 1.26005e+00_JPRB/)
362	kao_mn2o( 5, :, 5) = (/ &
363	& 1.22253e+00_JPRB, 1.21202e+00_JPRB, 1.20160e+00_JPRB, 1.19126e+00_JPRB, 1.18102e+00_JPRB, &
364	& 1.17087e+00_JPRB, 1.16080e+00_JPRB, 1.15082e+00_JPRB, 1.14092e+00_JPRB, 1.13111e+00_JPRB, &
365	& 1.12139e+00_JPRB, 1.11174e+00_JPRB, 1.10219e+00_JPRB, 1.09271e+00_JPRB, 1.08331e+00_JPRB, &
366	& 1.07400e+00_JPRB, 1.06476e+00_JPRB, 1.05561e+00_JPRB, 1.04653e+00_JPRB/)
367	kao_mn2o( 6, :, 5) = (/ &
368	& 1.07930e+00_JPRB, 1.06998e+00_JPRB, 1.06075e+00_JPRB, 1.05159e+00_JPRB, 1.04251e+00_JPRB, &
369	& 1.03352e+00_JPRB, 1.02459e+00_JPRB, 1.01575e+00_JPRB, 1.00698e+00_JPRB, 9.98291e-01_JPRB, &
370	& 9.89674e-01_JPRB, 9.81131e-01_JPRB, 9.72663e-01_JPRB, 9.64267e-01_JPRB, 9.55944e-01_JPRB, &
371	& 9.47692e-01_JPRB, 9.39512e-01_JPRB, 9.31402e-01_JPRB, 9.23363e-01_JPRB/)
372	kao_mn2o( 7, :, 5) = (/ &
373	& 7.87066e-01_JPRB, 7.82767e-01_JPRB, 7.78490e-01_JPRB, 7.74237e-01_JPRB, 7.70008e-01_JPRB, &
374	& 7.65801e-01_JPRB, 7.61617e-01_JPRB, 7.57457e-01_JPRB, 7.53319e-01_JPRB, 7.49203e-01_JPRB, &
375	& 7.45110e-01_JPRB, 7.41040e-01_JPRB, 7.36991e-01_JPRB, 7.32965e-01_JPRB, 7.28961e-01_JPRB, &
376	& 7.24979e-01_JPRB, 7.21018e-01_JPRB, 7.17079e-01_JPRB, 7.13161e-01_JPRB/)
377	kao_mn2o( 8, :, 5) = (/ &
378	& 3.83362e-01_JPRB, 3.84405e-01_JPRB, 3.85452e-01_JPRB, 3.86501e-01_JPRB, 3.87552e-01_JPRB, &
379	& 3.88607e-01_JPRB, 3.89665e-01_JPRB, 3.90725e-01_JPRB, 3.91788e-01_JPRB, 3.92855e-01_JPRB, &
380	& 3.93924e-01_JPRB, 3.94996e-01_JPRB, 3.96071e-01_JPRB, 3.97149e-01_JPRB, 3.98229e-01_JPRB, &
381	& 3.99313e-01_JPRB, 4.00400e-01_JPRB, 4.01489e-01_JPRB, 4.02582e-01_JPRB/)
382	kao_mn2o( 9, :, 5) = (/ &
383	& 8.97278e-01_JPRB, 8.92873e-01_JPRB, 8.88490e-01_JPRB, 8.84128e-01_JPRB, 8.79787e-01_JPRB, &
384	& 8.75468e-01_JPRB, 8.71170e-01_JPRB, 8.66893e-01_JPRB, 8.62637e-01_JPRB, 8.58402e-01_JPRB, &
385	& 8.54187e-01_JPRB, 8.49994e-01_JPRB, 8.45821e-01_JPRB, 8.41668e-01_JPRB, 8.37536e-01_JPRB, &
386	& 8.33424e-01_JPRB, 8.29333e-01_JPRB, 8.25261e-01_JPRB, 8.21209e-01_JPRB/)
387	kao_mn2o( 1, :, 6) = (/ &
388	& 1.83809e+00_JPRB, 1.84036e+00_JPRB, 1.84264e+00_JPRB, 1.84491e+00_JPRB, 1.84720e+00_JPRB, &
389	& 1.84948e+00_JPRB, 1.85177e+00_JPRB, 1.85406e+00_JPRB, 1.85635e+00_JPRB, 1.85864e+00_JPRB, &
390	& 1.86094e+00_JPRB, 1.86324e+00_JPRB, 1.86555e+00_JPRB, 1.86785e+00_JPRB, 1.87016e+00_JPRB, &
391	& 1.87247e+00_JPRB, 1.87479e+00_JPRB, 1.87711e+00_JPRB, 1.87943e+00_JPRB/)
392	kao_mn2o( 2, :, 6) = (/ &
393	& 1.82624e+00_JPRB, 1.81564e+00_JPRB, 1.80510e+00_JPRB, 1.79463e+00_JPRB, 1.78421e+00_JPRB, &
394	& 1.77386e+00_JPRB, 1.76356e+00_JPRB, 1.75333e+00_JPRB, 1.74315e+00_JPRB, 1.73304e+00_JPRB, &
395	& 1.72298e+00_JPRB, 1.71298e+00_JPRB, 1.70304e+00_JPRB, 1.69316e+00_JPRB, 1.68333e+00_JPRB, &
396	& 1.67356e+00_JPRB, 1.66385e+00_JPRB, 1.65419e+00_JPRB, 1.64459e+00_JPRB/)
397	kao_mn2o( 3, :, 6) = (/ &
398	& 1.35442e+00_JPRB, 1.34174e+00_JPRB, 1.32918e+00_JPRB, 1.31673e+00_JPRB, 1.30440e+00_JPRB, &
399	& 1.29219e+00_JPRB, 1.28010e+00_JPRB, 1.26811e+00_JPRB, 1.25624e+00_JPRB, 1.24448e+00_JPRB, &
400	& 1.23283e+00_JPRB, 1.22129e+00_JPRB, 1.20985e+00_JPRB, 1.19853e+00_JPRB, 1.18731e+00_JPRB, &
401	& 1.17619e+00_JPRB, 1.16518e+00_JPRB, 1.15427e+00_JPRB, 1.14347e+00_JPRB/)
402	kao_mn2o( 4, :, 6) = (/ &
403	& 1.10510e+00_JPRB, 1.09473e+00_JPRB, 1.08446e+00_JPRB, 1.07429e+00_JPRB, 1.06420e+00_JPRB, &
404	& 1.05422e+00_JPRB, 1.04433e+00_JPRB, 1.03453e+00_JPRB, 1.02482e+00_JPRB, 1.01520e+00_JPRB, &
405	& 1.00568e+00_JPRB, 9.96238e-01_JPRB, 9.86890e-01_JPRB, 9.77629e-01_JPRB, 9.68455e-01_JPRB, &
406	& 9.59367e-01_JPRB, 9.50365e-01_JPRB, 9.41447e-01_JPRB, 9.32612e-01_JPRB/)
407	kao_mn2o( 5, :, 6) = (/ &
408	& 1.01083e+00_JPRB, 1.00221e+00_JPRB, 9.93656e-01_JPRB, 9.85178e-01_JPRB, 9.76772e-01_JPRB, &
409	& 9.68437e-01_JPRB, 9.60174e-01_JPRB, 9.51981e-01_JPRB, 9.43859e-01_JPRB, 9.35805e-01_JPRB, &
410	& 9.27821e-01_JPRB, 9.19904e-01_JPRB, 9.12055e-01_JPRB, 9.04273e-01_JPRB, 8.96557e-01_JPRB, &
411	& 8.88907e-01_JPRB, 8.81323e-01_JPRB, 8.73803e-01_JPRB, 8.66347e-01_JPRB/)
412	kao_mn2o( 6, :, 6) = (/ &
413	& 5.91415e-01_JPRB, 5.90427e-01_JPRB, 5.89441e-01_JPRB, 5.88457e-01_JPRB, 5.87474e-01_JPRB, &
414	& 5.86493e-01_JPRB, 5.85514e-01_JPRB, 5.84536e-01_JPRB, 5.83559e-01_JPRB, 5.82585e-01_JPRB, &
415	& 5.81612e-01_JPRB, 5.80640e-01_JPRB, 5.79671e-01_JPRB, 5.78703e-01_JPRB, 5.77736e-01_JPRB, &
416	& 5.76771e-01_JPRB, 5.75808e-01_JPRB, 5.74846e-01_JPRB, 5.73886e-01_JPRB/)
417	kao_mn2o( 7, :, 6) = (/ &
418	& 3.68189e-01_JPRB, 3.70029e-01_JPRB, 3.71877e-01_JPRB, 3.73735e-01_JPRB, 3.75603e-01_JPRB, &
419	& 3.77479e-01_JPRB, 3.79365e-01_JPRB, 3.81260e-01_JPRB, 3.83165e-01_JPRB, 3.85079e-01_JPRB, &
420	& 3.87003e-01_JPRB, 3.88937e-01_JPRB, 3.90880e-01_JPRB, 3.92833e-01_JPRB, 3.94795e-01_JPRB, &
421	& 3.96768e-01_JPRB, 3.98750e-01_JPRB, 4.00742e-01_JPRB, 4.02744e-01_JPRB/)
422	kao_mn2o( 8, :, 6) = (/ &
423	& 2.98721e-01_JPRB, 2.99932e-01_JPRB, 3.01149e-01_JPRB, 3.02370e-01_JPRB, 3.03597e-01_JPRB, &
424	& 3.04828e-01_JPRB, 3.06064e-01_JPRB, 3.07306e-01_JPRB, 3.08552e-01_JPRB, 3.09804e-01_JPRB, &
425	& 3.11060e-01_JPRB, 3.12322e-01_JPRB, 3.13589e-01_JPRB, 3.14860e-01_JPRB, 3.16138e-01_JPRB, &
426	& 3.17420e-01_JPRB, 3.18707e-01_JPRB, 3.20000e-01_JPRB, 3.21298e-01_JPRB/)
427	kao_mn2o( 9, :, 6) = (/ &
428	& 3.76116e-01_JPRB, 3.77276e-01_JPRB, 3.78439e-01_JPRB, 3.79606e-01_JPRB, 3.80777e-01_JPRB, &
429	& 3.81951e-01_JPRB, 3.83129e-01_JPRB, 3.84310e-01_JPRB, 3.85495e-01_JPRB, 3.86684e-01_JPRB, &
430	& 3.87876e-01_JPRB, 3.89072e-01_JPRB, 3.90272e-01_JPRB, 3.91475e-01_JPRB, 3.92682e-01_JPRB, &
431	& 3.93893e-01_JPRB, 3.95107e-01_JPRB, 3.96326e-01_JPRB, 3.97548e-01_JPRB/)
432	kao_mn2o( 1, :, 7) = (/ &
433	& 3.22705e+00_JPRB, 3.21966e+00_JPRB, 3.21230e+00_JPRB, 3.20494e+00_JPRB, 3.19761e+00_JPRB, &
434	& 3.19029e+00_JPRB, 3.18299e+00_JPRB, 3.17571e+00_JPRB, 3.16844e+00_JPRB, 3.16119e+00_JPRB, &
435	& 3.15395e+00_JPRB, 3.14673e+00_JPRB, 3.13953e+00_JPRB, 3.13235e+00_JPRB, 3.12518e+00_JPRB, &
436	& 3.11803e+00_JPRB, 3.11089e+00_JPRB, 3.10377e+00_JPRB, 3.09667e+00_JPRB/)
437	kao_mn2o( 2, :, 7) = (/ &
438	& 1.43811e+00_JPRB, 1.42367e+00_JPRB, 1.40938e+00_JPRB, 1.39522e+00_JPRB, 1.38121e+00_JPRB, &
439	& 1.36735e+00_JPRB, 1.35362e+00_JPRB, 1.34002e+00_JPRB, 1.32657e+00_JPRB, 1.31325e+00_JPRB, &
440	& 1.30006e+00_JPRB, 1.28701e+00_JPRB, 1.27408e+00_JPRB, 1.26129e+00_JPRB, 1.24862e+00_JPRB, &
441	& 1.23609e+00_JPRB, 1.22367e+00_JPRB, 1.21139e+00_JPRB, 1.19922e+00_JPRB/)
442	kao_mn2o( 3, :, 7) = (/ &
443	& 1.22586e+00_JPRB, 1.21639e+00_JPRB, 1.20700e+00_JPRB, 1.19767e+00_JPRB, 1.18842e+00_JPRB, &
444	& 1.17924e+00_JPRB, 1.17014e+00_JPRB, 1.16110e+00_JPRB, 1.15213e+00_JPRB, 1.14323e+00_JPRB, &
445	& 1.13440e+00_JPRB, 1.12564e+00_JPRB, 1.11695e+00_JPRB, 1.10832e+00_JPRB, 1.09976e+00_JPRB, &
446	& 1.09127e+00_JPRB, 1.08284e+00_JPRB, 1.07447e+00_JPRB, 1.06618e+00_JPRB/)
447	kao_mn2o( 4, :, 7) = (/ &
448	& 7.94380e-01_JPRB, 7.92795e-01_JPRB, 7.91213e-01_JPRB, 7.89634e-01_JPRB, 7.88059e-01_JPRB, &
449	& 7.86486e-01_JPRB, 7.84917e-01_JPRB, 7.83351e-01_JPRB, 7.81787e-01_JPRB, 7.80227e-01_JPRB, &
450	& 7.78671e-01_JPRB, 7.77117e-01_JPRB, 7.75566e-01_JPRB, 7.74019e-01_JPRB, 7.72474e-01_JPRB, &
451	& 7.70933e-01_JPRB, 7.69394e-01_JPRB, 7.67859e-01_JPRB, 7.66327e-01_JPRB/)
452	kao_mn2o( 5, :, 7) = (/ &
453	& 4.46935e-01_JPRB, 4.49760e-01_JPRB, 4.52602e-01_JPRB, 4.55462e-01_JPRB, 4.58340e-01_JPRB, &
454	& 4.61237e-01_JPRB, 4.64152e-01_JPRB, 4.67085e-01_JPRB, 4.70037e-01_JPRB, 4.73007e-01_JPRB, &
455	& 4.75996e-01_JPRB, 4.79004e-01_JPRB, 4.82031e-01_JPRB, 4.85078e-01_JPRB, 4.88143e-01_JPRB, &
456	& 4.91228e-01_JPRB, 4.94332e-01_JPRB, 4.97456e-01_JPRB, 5.00600e-01_JPRB/)
457	kao_mn2o( 6, :, 7) = (/ &
458	& 4.20211e-01_JPRB, 4.21711e-01_JPRB, 4.23216e-01_JPRB, 4.24726e-01_JPRB, 4.26242e-01_JPRB, &
459	& 4.27763e-01_JPRB, 4.29290e-01_JPRB, 4.30822e-01_JPRB, 4.32359e-01_JPRB, 4.33902e-01_JPRB, &
460	& 4.35450e-01_JPRB, 4.37004e-01_JPRB, 4.38564e-01_JPRB, 4.40129e-01_JPRB, 4.41700e-01_JPRB, &
461	& 4.43276e-01_JPRB, 4.44858e-01_JPRB, 4.46445e-01_JPRB, 4.48038e-01_JPRB/)
462	kao_mn2o( 7, :, 7) = (/ &
463	& 3.42094e-01_JPRB, 3.43589e-01_JPRB, 3.45091e-01_JPRB, 3.46600e-01_JPRB, 3.48115e-01_JPRB, &
464	& 3.49637e-01_JPRB, 3.51165e-01_JPRB, 3.52700e-01_JPRB, 3.54242e-01_JPRB, 3.55791e-01_JPRB, &
465	& 3.57346e-01_JPRB, 3.58908e-01_JPRB, 3.60477e-01_JPRB, 3.62053e-01_JPRB, 3.63636e-01_JPRB, &
466	& 3.65225e-01_JPRB, 3.66822e-01_JPRB, 3.68426e-01_JPRB, 3.70036e-01_JPRB/)
467	kao_mn2o( 8, :, 7) = (/ &
468	& 2.94919e-01_JPRB, 2.97460e-01_JPRB, 3.00022e-01_JPRB, 3.02606e-01_JPRB, 3.05212e-01_JPRB, &
469	& 3.07841e-01_JPRB, 3.10492e-01_JPRB, 3.13167e-01_JPRB, 3.15864e-01_JPRB, 3.18584e-01_JPRB, &
470	& 3.21328e-01_JPRB, 3.24096e-01_JPRB, 3.26887e-01_JPRB, 3.29703e-01_JPRB, 3.32543e-01_JPRB, &
471	& 3.35407e-01_JPRB, 3.38296e-01_JPRB, 3.41210e-01_JPRB, 3.44148e-01_JPRB/)
472	kao_mn2o( 9, :, 7) = (/ &
473	& 2.97441e-01_JPRB, 2.99207e-01_JPRB, 3.00984e-01_JPRB, 3.02772e-01_JPRB, 3.04570e-01_JPRB, &
474	& 3.06379e-01_JPRB, 3.08199e-01_JPRB, 3.10029e-01_JPRB, 3.11870e-01_JPRB, 3.13723e-01_JPRB, &
475	& 3.15586e-01_JPRB, 3.17460e-01_JPRB, 3.19345e-01_JPRB, 3.21242e-01_JPRB, 3.23150e-01_JPRB, &
476	& 3.25069e-01_JPRB, 3.27000e-01_JPRB, 3.28942e-01_JPRB, 3.30895e-01_JPRB/)
477	kao_mn2o( 1, :, 8) = (/ &
478	& 2.14641e+00_JPRB, 2.12585e+00_JPRB, 2.10549e+00_JPRB, 2.08532e+00_JPRB, 2.06534e+00_JPRB, &
479	& 2.04556e+00_JPRB, 2.02596e+00_JPRB, 2.00656e+00_JPRB, 1.98733e+00_JPRB, 1.96830e+00_JPRB, &
480	& 1.94944e+00_JPRB, 1.93077e+00_JPRB, 1.91227e+00_JPRB, 1.89395e+00_JPRB, 1.87581e+00_JPRB, &
481	& 1.85784e+00_JPRB, 1.84004e+00_JPRB, 1.82242e+00_JPRB, 1.80496e+00_JPRB/)
482	kao_mn2o( 2, :, 8) = (/ &
483	& 8.83687e-01_JPRB, 8.83170e-01_JPRB, 8.82654e-01_JPRB, 8.82137e-01_JPRB, 8.81621e-01_JPRB, &
484	& 8.81106e-01_JPRB, 8.80590e-01_JPRB, 8.80075e-01_JPRB, 8.79560e-01_JPRB, 8.79046e-01_JPRB, &
485	& 8.78531e-01_JPRB, 8.78017e-01_JPRB, 8.77504e-01_JPRB, 8.76990e-01_JPRB, 8.76477e-01_JPRB, &
486	& 8.75965e-01_JPRB, 8.75452e-01_JPRB, 8.74940e-01_JPRB, 8.74428e-01_JPRB/)
487	kao_mn2o( 3, :, 8) = (/ &
488	& 4.49840e-01_JPRB, 4.52683e-01_JPRB, 4.55543e-01_JPRB, 4.58421e-01_JPRB, 4.61318e-01_JPRB, &
489	& 4.64233e-01_JPRB, 4.67166e-01_JPRB, 4.70118e-01_JPRB, 4.73088e-01_JPRB, 4.76078e-01_JPRB, &
490	& 4.79086e-01_JPRB, 4.82113e-01_JPRB, 4.85159e-01_JPRB, 4.88225e-01_JPRB, 4.91310e-01_JPRB, &
491	& 4.94414e-01_JPRB, 4.97538e-01_JPRB, 5.00682e-01_JPRB, 5.03845e-01_JPRB/)
492	kao_mn2o( 4, :, 8) = (/ &
493	& 3.92292e-01_JPRB, 3.93574e-01_JPRB, 3.94861e-01_JPRB, 3.96151e-01_JPRB, 3.97446e-01_JPRB, &
494	& 3.98746e-01_JPRB, 4.00049e-01_JPRB, 4.01357e-01_JPRB, 4.02669e-01_JPRB, 4.03985e-01_JPRB, &
495	& 4.05306e-01_JPRB, 4.06630e-01_JPRB, 4.07960e-01_JPRB, 4.09293e-01_JPRB, 4.10631e-01_JPRB, &
496	& 4.11973e-01_JPRB, 4.13320e-01_JPRB, 4.14671e-01_JPRB, 4.16027e-01_JPRB/)
497	kao_mn2o( 5, :, 8) = (/ &
498	& 3.38920e-01_JPRB, 3.41151e-01_JPRB, 3.43397e-01_JPRB, 3.45658e-01_JPRB, 3.47934e-01_JPRB, &
499	& 3.50225e-01_JPRB, 3.52531e-01_JPRB, 3.54852e-01_JPRB, 3.57189e-01_JPRB, 3.59541e-01_JPRB, &
500	& 3.61908e-01_JPRB, 3.64291e-01_JPRB, 3.66689e-01_JPRB, 3.69104e-01_JPRB, 3.71534e-01_JPRB, &
501	& 3.73980e-01_JPRB, 3.76443e-01_JPRB, 3.78921e-01_JPRB, 3.81416e-01_JPRB/)
502	kao_mn2o( 6, :, 8) = (/ &
503	& 3.01673e-01_JPRB, 3.04752e-01_JPRB, 3.07863e-01_JPRB, 3.11005e-01_JPRB, 3.14180e-01_JPRB, &
504	& 3.17387e-01_JPRB, 3.20626e-01_JPRB, 3.23899e-01_JPRB, 3.27205e-01_JPRB, 3.30545e-01_JPRB, &
505	& 3.33919e-01_JPRB, 3.37328e-01_JPRB, 3.40771e-01_JPRB, 3.44249e-01_JPRB, 3.47763e-01_JPRB, &
506	& 3.51313e-01_JPRB, 3.54899e-01_JPRB, 3.58521e-01_JPRB, 3.62181e-01_JPRB/)
507	kao_mn2o( 7, :, 8) = (/ &
508	& 2.99381e-01_JPRB, 3.02431e-01_JPRB, 3.05512e-01_JPRB, 3.08624e-01_JPRB, 3.11768e-01_JPRB, &
509	& 3.14945e-01_JPRB, 3.18153e-01_JPRB, 3.21394e-01_JPRB, 3.24668e-01_JPRB, 3.27976e-01_JPRB, &
510	& 3.31317e-01_JPRB, 3.34693e-01_JPRB, 3.38102e-01_JPRB, 3.41547e-01_JPRB, 3.45026e-01_JPRB, &
511	& 3.48541e-01_JPRB, 3.52092e-01_JPRB, 3.55679e-01_JPRB, 3.59302e-01_JPRB/)
512	kao_mn2o( 8, :, 8) = (/ &
513	& 2.87559e-01_JPRB, 2.89153e-01_JPRB, 2.90756e-01_JPRB, 2.92367e-01_JPRB, 2.93987e-01_JPRB, &
514	& 2.95617e-01_JPRB, 2.97255e-01_JPRB, 2.98902e-01_JPRB, 3.00559e-01_JPRB, 3.02225e-01_JPRB, &
515	& 3.03899e-01_JPRB, 3.05584e-01_JPRB, 3.07277e-01_JPRB, 3.08980e-01_JPRB, 3.10693e-01_JPRB, &
516	& 3.12414e-01_JPRB, 3.14146e-01_JPRB, 3.15887e-01_JPRB, 3.17638e-01_JPRB/)
517	kao_mn2o( 9, :, 8) = (/ &
518	& 2.96238e-01_JPRB, 2.97588e-01_JPRB, 2.98945e-01_JPRB, 3.00309e-01_JPRB, 3.01678e-01_JPRB, &
519	& 3.03054e-01_JPRB, 3.04436e-01_JPRB, 3.05824e-01_JPRB, 3.07219e-01_JPRB, 3.08620e-01_JPRB, &
520	& 3.10027e-01_JPRB, 3.11441e-01_JPRB, 3.12861e-01_JPRB, 3.14288e-01_JPRB, 3.15721e-01_JPRB, &
521	& 3.17161e-01_JPRB, 3.18607e-01_JPRB, 3.20060e-01_JPRB, 3.21520e-01_JPRB/)
522	kao_mn2o( 1, :, 9) = (/ &
523	& 1.56483e+00_JPRB, 1.55792e+00_JPRB, 1.55105e+00_JPRB, 1.54420e+00_JPRB, 1.53739e+00_JPRB, &
524	& 1.53060e+00_JPRB, 1.52384e+00_JPRB, 1.51712e+00_JPRB, 1.51042e+00_JPRB, 1.50376e+00_JPRB, &
525	& 1.49712e+00_JPRB, 1.49051e+00_JPRB, 1.48393e+00_JPRB, 1.47738e+00_JPRB, 1.47086e+00_JPRB, &
526	& 1.46437e+00_JPRB, 1.45791e+00_JPRB, 1.45147e+00_JPRB, 1.44507e+00_JPRB/)
527	kao_mn2o( 2, :, 9) = (/ &
528	& 4.09526e-01_JPRB, 4.10301e-01_JPRB, 4.11078e-01_JPRB, 4.11857e-01_JPRB, 4.12637e-01_JPRB, &
529	& 4.13418e-01_JPRB, 4.14201e-01_JPRB, 4.14986e-01_JPRB, 4.15771e-01_JPRB, 4.16559e-01_JPRB, &
530	& 4.17348e-01_JPRB, 4.18138e-01_JPRB, 4.18930e-01_JPRB, 4.19723e-01_JPRB, 4.20518e-01_JPRB, &
531	& 4.21315e-01_JPRB, 4.22112e-01_JPRB, 4.22912e-01_JPRB, 4.23713e-01_JPRB/)
532	kao_mn2o( 3, :, 9) = (/ &
533	& 3.35672e-01_JPRB, 3.38982e-01_JPRB, 3.42326e-01_JPRB, 3.45702e-01_JPRB, 3.49111e-01_JPRB, &
534	& 3.52554e-01_JPRB, 3.56031e-01_JPRB, 3.59543e-01_JPRB, 3.63089e-01_JPRB, 3.66670e-01_JPRB, &
535	& 3.70286e-01_JPRB, 3.73938e-01_JPRB, 3.77626e-01_JPRB, 3.81350e-01_JPRB, 3.85111e-01_JPRB, &
536	& 3.88909e-01_JPRB, 3.92745e-01_JPRB, 3.96618e-01_JPRB, 4.00530e-01_JPRB/)
537	kao_mn2o( 4, :, 9) = (/ &
538	& 3.19130e-01_JPRB, 3.23028e-01_JPRB, 3.26973e-01_JPRB, 3.30966e-01_JPRB, 3.35008e-01_JPRB, &
539	& 3.39100e-01_JPRB, 3.43241e-01_JPRB, 3.47433e-01_JPRB, 3.51676e-01_JPRB, 3.55971e-01_JPRB, &
540	& 3.60319e-01_JPRB, 3.64719e-01_JPRB, 3.69173e-01_JPRB, 3.73682e-01_JPRB, 3.78246e-01_JPRB, &
541	& 3.82865e-01_JPRB, 3.87541e-01_JPRB, 3.92274e-01_JPRB, 3.97065e-01_JPRB/)
542	kao_mn2o( 5, :, 9) = (/ &
543	& 3.04385e-01_JPRB, 3.07155e-01_JPRB, 3.09949e-01_JPRB, 3.12770e-01_JPRB, 3.15616e-01_JPRB, &
544	& 3.18488e-01_JPRB, 3.21386e-01_JPRB, 3.24310e-01_JPRB, 3.27261e-01_JPRB, 3.30239e-01_JPRB, &
545	& 3.33244e-01_JPRB, 3.36276e-01_JPRB, 3.39336e-01_JPRB, 3.42424e-01_JPRB, 3.45540e-01_JPRB, &
546	& 3.48684e-01_JPRB, 3.51857e-01_JPRB, 3.55059e-01_JPRB, 3.58289e-01_JPRB/)
547	kao_mn2o( 6, :, 9) = (/ &
548	& 2.98789e-01_JPRB, 3.00996e-01_JPRB, 3.03220e-01_JPRB, 3.05460e-01_JPRB, 3.07717e-01_JPRB, &
549	& 3.09990e-01_JPRB, 3.12281e-01_JPRB, 3.14588e-01_JPRB, 3.16912e-01_JPRB, 3.19253e-01_JPRB, &
550	& 3.21612e-01_JPRB, 3.23988e-01_JPRB, 3.26382e-01_JPRB, 3.28793e-01_JPRB, 3.31222e-01_JPRB, &
551	& 3.33669e-01_JPRB, 3.36134e-01_JPRB, 3.38618e-01_JPRB, 3.41119e-01_JPRB/)
552	kao_mn2o( 7, :, 9) = (/ &
553	& 3.08712e-01_JPRB, 3.10491e-01_JPRB, 3.12281e-01_JPRB, 3.14080e-01_JPRB, 3.15890e-01_JPRB, &
554	& 3.17710e-01_JPRB, 3.19541e-01_JPRB, 3.21382e-01_JPRB, 3.23234e-01_JPRB, 3.25097e-01_JPRB, &
555	& 3.26970e-01_JPRB, 3.28854e-01_JPRB, 3.30749e-01_JPRB, 3.32655e-01_JPRB, 3.34572e-01_JPRB, &
556	& 3.36500e-01_JPRB, 3.38439e-01_JPRB, 3.40390e-01_JPRB, 3.42351e-01_JPRB/)
557	kao_mn2o( 8, :, 9) = (/ &
558	& 3.10571e-01_JPRB, 3.12262e-01_JPRB, 3.13961e-01_JPRB, 3.15670e-01_JPRB, 3.17388e-01_JPRB, &
559	& 3.19115e-01_JPRB, 3.20852e-01_JPRB, 3.22598e-01_JPRB, 3.24354e-01_JPRB, 3.26120e-01_JPRB, &
560	& 3.27895e-01_JPRB, 3.29679e-01_JPRB, 3.31474e-01_JPRB, 3.33278e-01_JPRB, 3.35092e-01_JPRB, &
561	& 3.36915e-01_JPRB, 3.38749e-01_JPRB, 3.40593e-01_JPRB, 3.42447e-01_JPRB/)
562	kao_mn2o( 9, :, 9) = (/ &
563	& 3.16436e-01_JPRB, 3.18200e-01_JPRB, 3.19974e-01_JPRB, 3.21759e-01_JPRB, 3.23553e-01_JPRB, &
564	& 3.25357e-01_JPRB, 3.27172e-01_JPRB, 3.28996e-01_JPRB, 3.30831e-01_JPRB, 3.32675e-01_JPRB, &
565	& 3.34530e-01_JPRB, 3.36396e-01_JPRB, 3.38272e-01_JPRB, 3.40158e-01_JPRB, 3.42055e-01_JPRB, &
566	& 3.43962e-01_JPRB, 3.45880e-01_JPRB, 3.47809e-01_JPRB, 3.49749e-01_JPRB/)
567	kao_mn2o( 1, :,10) = (/ &
568	& 7.68616e-01_JPRB, 7.63263e-01_JPRB, 7.57948e-01_JPRB, 7.52669e-01_JPRB, 7.47428e-01_JPRB, &
569	& 7.42223e-01_JPRB, 7.37054e-01_JPRB, 7.31921e-01_JPRB, 7.26824e-01_JPRB, 7.21762e-01_JPRB, &
570	& 7.16736e-01_JPRB, 7.11744e-01_JPRB, 7.06788e-01_JPRB, 7.01866e-01_JPRB, 6.96978e-01_JPRB, &
571	& 6.92124e-01_JPRB, 6.87304e-01_JPRB, 6.82517e-01_JPRB, 6.77764e-01_JPRB/)
572	kao_mn2o( 2, :,10) = (/ &
573	& 4.97271e-01_JPRB, 5.10054e-01_JPRB, 5.23165e-01_JPRB, 5.36614e-01_JPRB, 5.50408e-01_JPRB, &
574	& 5.64556e-01_JPRB, 5.79069e-01_JPRB, 5.93954e-01_JPRB, 6.09222e-01_JPRB, 6.24883e-01_JPRB, &
575	& 6.40946e-01_JPRB, 6.57422e-01_JPRB, 6.74321e-01_JPRB, 6.91655e-01_JPRB, 7.09435e-01_JPRB, &
576	& 7.27671e-01_JPRB, 7.46377e-01_JPRB, 7.65563e-01_JPRB, 7.85242e-01_JPRB/)
577	kao_mn2o( 3, :,10) = (/ &
578	& 2.44443e-01_JPRB, 2.47096e-01_JPRB, 2.49778e-01_JPRB, 2.52489e-01_JPRB, 2.55229e-01_JPRB, &
579	& 2.57999e-01_JPRB, 2.60799e-01_JPRB, 2.63630e-01_JPRB, 2.66491e-01_JPRB, 2.69383e-01_JPRB, &
580	& 2.72307e-01_JPRB, 2.75262e-01_JPRB, 2.78250e-01_JPRB, 2.81269e-01_JPRB, 2.84322e-01_JPRB, &
581	& 2.87408e-01_JPRB, 2.90527e-01_JPRB, 2.93680e-01_JPRB, 2.96868e-01_JPRB/)
582	kao_mn2o( 4, :,10) = (/ &
583	& 2.01964e-01_JPRB, 2.02869e-01_JPRB, 2.03777e-01_JPRB, 2.04690e-01_JPRB, 2.05606e-01_JPRB, &
584	& 2.06527e-01_JPRB, 2.07452e-01_JPRB, 2.08381e-01_JPRB, 2.09314e-01_JPRB, 2.10251e-01_JPRB, &
585	& 2.11193e-01_JPRB, 2.12139e-01_JPRB, 2.13089e-01_JPRB, 2.14043e-01_JPRB, 2.15002e-01_JPRB, &
586	& 2.15964e-01_JPRB, 2.16932e-01_JPRB, 2.17903e-01_JPRB, 2.18879e-01_JPRB/)
587	kao_mn2o( 5, :,10) = (/ &
588	& 2.56972e-01_JPRB, 2.56837e-01_JPRB, 2.56702e-01_JPRB, 2.56567e-01_JPRB, 2.56432e-01_JPRB, &
589	& 2.56297e-01_JPRB, 2.56162e-01_JPRB, 2.56027e-01_JPRB, 2.55893e-01_JPRB, 2.55758e-01_JPRB, &
590	& 2.55624e-01_JPRB, 2.55489e-01_JPRB, 2.55355e-01_JPRB, 2.55220e-01_JPRB, 2.55086e-01_JPRB, &
591	& 2.54952e-01_JPRB, 2.54818e-01_JPRB, 2.54684e-01_JPRB, 2.54550e-01_JPRB/)
592	kao_mn2o( 6, :,10) = (/ &
593	& 2.57322e-01_JPRB, 2.57187e-01_JPRB, 2.57052e-01_JPRB, 2.56917e-01_JPRB, 2.56782e-01_JPRB, &
594	& 2.56647e-01_JPRB, 2.56512e-01_JPRB, 2.56377e-01_JPRB, 2.56243e-01_JPRB, 2.56108e-01_JPRB, &
595	& 2.55974e-01_JPRB, 2.55839e-01_JPRB, 2.55705e-01_JPRB, 2.55570e-01_JPRB, 2.55436e-01_JPRB, &
596	& 2.55302e-01_JPRB, 2.55168e-01_JPRB, 2.55034e-01_JPRB, 2.54900e-01_JPRB/)
597	kao_mn2o( 7, :,10) = (/ &
598	& 2.56551e-01_JPRB, 2.56421e-01_JPRB, 2.56291e-01_JPRB, 2.56161e-01_JPRB, 2.56030e-01_JPRB, &
599	& 2.55900e-01_JPRB, 2.55770e-01_JPRB, 2.55640e-01_JPRB, 2.55511e-01_JPRB, 2.55381e-01_JPRB, &
600	& 2.55251e-01_JPRB, 2.55121e-01_JPRB, 2.54992e-01_JPRB, 2.54862e-01_JPRB, 2.54733e-01_JPRB, &
601	& 2.54603e-01_JPRB, 2.54474e-01_JPRB, 2.54345e-01_JPRB, 2.54215e-01_JPRB/)
602	kao_mn2o( 8, :,10) = (/ &
603	& 2.73629e-01_JPRB, 2.73460e-01_JPRB, 2.73291e-01_JPRB, 2.73122e-01_JPRB, 2.72953e-01_JPRB, &
604	& 2.72784e-01_JPRB, 2.72615e-01_JPRB, 2.72447e-01_JPRB, 2.72279e-01_JPRB, 2.72110e-01_JPRB, &
605	& 2.71942e-01_JPRB, 2.71774e-01_JPRB, 2.71606e-01_JPRB, 2.71438e-01_JPRB, 2.71270e-01_JPRB, &
606	& 2.71102e-01_JPRB, 2.70935e-01_JPRB, 2.70767e-01_JPRB, 2.70600e-01_JPRB/)
607	kao_mn2o( 9, :,10) = (/ &
608	& 2.57294e-01_JPRB, 2.57149e-01_JPRB, 2.57004e-01_JPRB, 2.56860e-01_JPRB, 2.56715e-01_JPRB, &
609	& 2.56570e-01_JPRB, 2.56426e-01_JPRB, 2.56282e-01_JPRB, 2.56137e-01_JPRB, 2.55993e-01_JPRB, &
610	& 2.55849e-01_JPRB, 2.55705e-01_JPRB, 2.55561e-01_JPRB, 2.55417e-01_JPRB, 2.55273e-01_JPRB, &
611	& 2.55129e-01_JPRB, 2.54986e-01_JPRB, 2.54842e-01_JPRB, 2.54698e-01_JPRB/)
612	kao_mn2o( 1, :,11) = (/ &
613	& 6.91062e-01_JPRB, 6.84151e-01_JPRB, 6.77309e-01_JPRB, 6.70535e-01_JPRB, 6.63829e-01_JPRB, &
614	& 6.57190e-01_JPRB, 6.50617e-01_JPRB, 6.44111e-01_JPRB, 6.37669e-01_JPRB, 6.31292e-01_JPRB, &
615	& 6.24978e-01_JPRB, 6.18728e-01_JPRB, 6.12540e-01_JPRB, 6.06414e-01_JPRB, 6.00349e-01_JPRB, &
616	& 5.94345e-01_JPRB, 5.88401e-01_JPRB, 5.82517e-01_JPRB, 5.76691e-01_JPRB/)
617	kao_mn2o( 2, :,11) = (/ &
618	& 1.98698e-01_JPRB, 2.01182e-01_JPRB, 2.03698e-01_JPRB, 2.06244e-01_JPRB, 2.08823e-01_JPRB, &
619	& 2.11433e-01_JPRB, 2.14077e-01_JPRB, 2.16753e-01_JPRB, 2.19463e-01_JPRB, 2.22207e-01_JPRB, &
620	& 2.24985e-01_JPRB, 2.27798e-01_JPRB, 2.30646e-01_JPRB, 2.33529e-01_JPRB, 2.36449e-01_JPRB, &
621	& 2.39405e-01_JPRB, 2.42398e-01_JPRB, 2.45429e-01_JPRB, 2.48497e-01_JPRB/)
622	kao_mn2o( 3, :,11) = (/ &
623	& 2.11950e-01_JPRB, 2.13560e-01_JPRB, 2.15184e-01_JPRB, 2.16819e-01_JPRB, 2.18467e-01_JPRB, &
624	& 2.20127e-01_JPRB, 2.21800e-01_JPRB, 2.23486e-01_JPRB, 2.25185e-01_JPRB, 2.26896e-01_JPRB, &
625	& 2.28621e-01_JPRB, 2.30358e-01_JPRB, 2.32109e-01_JPRB, 2.33873e-01_JPRB, 2.35651e-01_JPRB, &
626	& 2.37442e-01_JPRB, 2.39247e-01_JPRB, 2.41065e-01_JPRB, 2.42897e-01_JPRB/)
627	kao_mn2o( 4, :,11) = (/ &
628	& 3.14210e-01_JPRB, 3.13143e-01_JPRB, 3.12080e-01_JPRB, 3.11021e-01_JPRB, 3.09965e-01_JPRB, &
629	& 3.08913e-01_JPRB, 3.07864e-01_JPRB, 3.06819e-01_JPRB, 3.05777e-01_JPRB, 3.04739e-01_JPRB, &
630	& 3.03705e-01_JPRB, 3.02674e-01_JPRB, 3.01646e-01_JPRB, 3.00622e-01_JPRB, 2.99602e-01_JPRB, &
631	& 2.98584e-01_JPRB, 2.97571e-01_JPRB, 2.96561e-01_JPRB, 2.95554e-01_JPRB/)
632	kao_mn2o( 5, :,11) = (/ &
633	& 3.13536e-01_JPRB, 3.12459e-01_JPRB, 3.11386e-01_JPRB, 3.10316e-01_JPRB, 3.09250e-01_JPRB, &
634	& 3.08188e-01_JPRB, 3.07129e-01_JPRB, 3.06074e-01_JPRB, 3.05022e-01_JPRB, 3.03974e-01_JPRB, &
635	& 3.02930e-01_JPRB, 3.01889e-01_JPRB, 3.00852e-01_JPRB, 2.99819e-01_JPRB, 2.98789e-01_JPRB, &
636	& 2.97762e-01_JPRB, 2.96739e-01_JPRB, 2.95720e-01_JPRB, 2.94704e-01_JPRB/)
637	kao_mn2o( 6, :,11) = (/ &
638	& 3.13215e-01_JPRB, 3.12123e-01_JPRB, 3.11034e-01_JPRB, 3.09949e-01_JPRB, 3.08867e-01_JPRB, &
639	& 3.07790e-01_JPRB, 3.06716e-01_JPRB, 3.05646e-01_JPRB, 3.04579e-01_JPRB, 3.03517e-01_JPRB, &
640	& 3.02458e-01_JPRB, 3.01403e-01_JPRB, 3.00351e-01_JPRB, 2.99303e-01_JPRB, 2.98259e-01_JPRB, &
641	& 2.97219e-01_JPRB, 2.96182e-01_JPRB, 2.95148e-01_JPRB, 2.94119e-01_JPRB/)
642	kao_mn2o( 7, :,11) = (/ &
643	& 3.14236e-01_JPRB, 3.13123e-01_JPRB, 3.12014e-01_JPRB, 3.10908e-01_JPRB, 3.09806e-01_JPRB, &
644	& 3.08709e-01_JPRB, 3.07615e-01_JPRB, 3.06525e-01_JPRB, 3.05439e-01_JPRB, 3.04357e-01_JPRB, &
645	& 3.03278e-01_JPRB, 3.02204e-01_JPRB, 3.01133e-01_JPRB, 3.00066e-01_JPRB, 2.99003e-01_JPRB, &
646	& 2.97944e-01_JPRB, 2.96888e-01_JPRB, 2.95836e-01_JPRB, 2.94788e-01_JPRB/)
647	kao_mn2o( 8, :,11) = (/ &
648	& 2.97453e-01_JPRB, 2.96420e-01_JPRB, 2.95391e-01_JPRB, 2.94366e-01_JPRB, 2.93344e-01_JPRB, &
649	& 2.92325e-01_JPRB, 2.91311e-01_JPRB, 2.90299e-01_JPRB, 2.89291e-01_JPRB, 2.88287e-01_JPRB, &
650	& 2.87286e-01_JPRB, 2.86289e-01_JPRB, 2.85295e-01_JPRB, 2.84304e-01_JPRB, 2.83317e-01_JPRB, &
651	& 2.82334e-01_JPRB, 2.81354e-01_JPRB, 2.80377e-01_JPRB, 2.79404e-01_JPRB/)
652	kao_mn2o( 9, :,11) = (/ &
653	& 3.12694e-01_JPRB, 3.11622e-01_JPRB, 3.10554e-01_JPRB, 3.09489e-01_JPRB, 3.08428e-01_JPRB, &
654	& 3.07370e-01_JPRB, 3.06316e-01_JPRB, 3.05266e-01_JPRB, 3.04220e-01_JPRB, 3.03177e-01_JPRB, &
655	& 3.02137e-01_JPRB, 3.01101e-01_JPRB, 3.00069e-01_JPRB, 2.99040e-01_JPRB, 2.98015e-01_JPRB, &
656	& 2.96993e-01_JPRB, 2.95975e-01_JPRB, 2.94960e-01_JPRB, 2.93949e-01_JPRB/)
657	kao_mn2o( 1, :,12) = (/ &
658	& 5.30796e-01_JPRB, 5.50444e-01_JPRB, 5.70818e-01_JPRB, 5.91947e-01_JPRB, 6.13857e-01_JPRB, &
659	& 6.36579e-01_JPRB, 6.60142e-01_JPRB, 6.84577e-01_JPRB, 7.09916e-01_JPRB, 7.36194e-01_JPRB, &
660	& 7.63444e-01_JPRB, 7.91702e-01_JPRB, 8.21007e-01_JPRB, 8.51396e-01_JPRB, 8.82910e-01_JPRB, &
661	& 9.15591e-01_JPRB, 9.49481e-01_JPRB, 9.84626e-01_JPRB, 1.02107e+00_JPRB/)
662	kao_mn2o( 2, :,12) = (/ &
663	& 1.38469e-01_JPRB, 1.40959e-01_JPRB, 1.43493e-01_JPRB, 1.46073e-01_JPRB, 1.48699e-01_JPRB, &
664	& 1.51373e-01_JPRB, 1.54094e-01_JPRB, 1.56865e-01_JPRB, 1.59685e-01_JPRB, 1.62556e-01_JPRB, &
665	& 1.65478e-01_JPRB, 1.68454e-01_JPRB, 1.71482e-01_JPRB, 1.74565e-01_JPRB, 1.77704e-01_JPRB, &
666	& 1.80899e-01_JPRB, 1.84151e-01_JPRB, 1.87462e-01_JPRB, 1.90833e-01_JPRB/)
667	kao_mn2o( 3, :,12) = (/ &
668	& 1.50741e-01_JPRB, 1.50855e-01_JPRB, 1.50969e-01_JPRB, 1.51084e-01_JPRB, 1.51198e-01_JPRB, &
669	& 1.51313e-01_JPRB, 1.51427e-01_JPRB, 1.51542e-01_JPRB, 1.51657e-01_JPRB, 1.51772e-01_JPRB, &
670	& 1.51887e-01_JPRB, 1.52002e-01_JPRB, 1.52117e-01_JPRB, 1.52233e-01_JPRB, 1.52348e-01_JPRB, &
671	& 1.52463e-01_JPRB, 1.52579e-01_JPRB, 1.52695e-01_JPRB, 1.52810e-01_JPRB/)
672	kao_mn2o( 4, :,12) = (/ &
673	& 1.80444e-01_JPRB, 1.79944e-01_JPRB, 1.79445e-01_JPRB, 1.78948e-01_JPRB, 1.78452e-01_JPRB, &
674	& 1.77958e-01_JPRB, 1.77465e-01_JPRB, 1.76973e-01_JPRB, 1.76483e-01_JPRB, 1.75994e-01_JPRB, &
675	& 1.75506e-01_JPRB, 1.75020e-01_JPRB, 1.74535e-01_JPRB, 1.74051e-01_JPRB, 1.73569e-01_JPRB, &
676	& 1.73088e-01_JPRB, 1.72609e-01_JPRB, 1.72131e-01_JPRB, 1.71654e-01_JPRB/)
677	kao_mn2o( 5, :,12) = (/ &
678	& 1.80595e-01_JPRB, 1.80033e-01_JPRB, 1.79474e-01_JPRB, 1.78916e-01_JPRB, 1.78359e-01_JPRB, &
679	& 1.77805e-01_JPRB, 1.77252e-01_JPRB, 1.76701e-01_JPRB, 1.76152e-01_JPRB, 1.75604e-01_JPRB, &
680	& 1.75058e-01_JPRB, 1.74514e-01_JPRB, 1.73971e-01_JPRB, 1.73430e-01_JPRB, 1.72891e-01_JPRB, &
681	& 1.72354e-01_JPRB, 1.71818e-01_JPRB, 1.71284e-01_JPRB, 1.70751e-01_JPRB/)
682	kao_mn2o( 6, :,12) = (/ &
683	& 1.79904e-01_JPRB, 1.79254e-01_JPRB, 1.78607e-01_JPRB, 1.77962e-01_JPRB, 1.77320e-01_JPRB, &
684	& 1.76680e-01_JPRB, 1.76042e-01_JPRB, 1.75406e-01_JPRB, 1.74773e-01_JPRB, 1.74142e-01_JPRB, &
685	& 1.73513e-01_JPRB, 1.72887e-01_JPRB, 1.72262e-01_JPRB, 1.71640e-01_JPRB, 1.71021e-01_JPRB, &
686	& 1.70403e-01_JPRB, 1.69788e-01_JPRB, 1.69175e-01_JPRB, 1.68564e-01_JPRB/)
687	kao_mn2o( 7, :,12) = (/ &
688	& 1.78712e-01_JPRB, 1.77868e-01_JPRB, 1.77027e-01_JPRB, 1.76190e-01_JPRB, 1.75357e-01_JPRB, &
689	& 1.74528e-01_JPRB, 1.73703e-01_JPRB, 1.72882e-01_JPRB, 1.72064e-01_JPRB, 1.71251e-01_JPRB, &
690	& 1.70441e-01_JPRB, 1.69636e-01_JPRB, 1.68834e-01_JPRB, 1.68036e-01_JPRB, 1.67241e-01_JPRB, &
691	& 1.66451e-01_JPRB, 1.65664e-01_JPRB, 1.64881e-01_JPRB, 1.64101e-01_JPRB/)
692	kao_mn2o( 8, :,12) = (/ &
693	& 1.72346e-01_JPRB, 1.70873e-01_JPRB, 1.69413e-01_JPRB, 1.67965e-01_JPRB, 1.66530e-01_JPRB, &
694	& 1.65107e-01_JPRB, 1.63696e-01_JPRB, 1.62297e-01_JPRB, 1.60910e-01_JPRB, 1.59535e-01_JPRB, &
695	& 1.58171e-01_JPRB, 1.56819e-01_JPRB, 1.55479e-01_JPRB, 1.54150e-01_JPRB, 1.52833e-01_JPRB, &
696	& 1.51527e-01_JPRB, 1.50232e-01_JPRB, 1.48948e-01_JPRB, 1.47675e-01_JPRB/)
697	kao_mn2o( 9, :,12) = (/ &
698	& 1.80517e-01_JPRB, 1.79951e-01_JPRB, 1.79386e-01_JPRB, 1.78823e-01_JPRB, 1.78262e-01_JPRB, &
699	& 1.77702e-01_JPRB, 1.77144e-01_JPRB, 1.76588e-01_JPRB, 1.76034e-01_JPRB, 1.75481e-01_JPRB, &
700	& 1.74931e-01_JPRB, 1.74382e-01_JPRB, 1.73834e-01_JPRB, 1.73289e-01_JPRB, 1.72745e-01_JPRB, &
701	& 1.72202e-01_JPRB, 1.71662e-01_JPRB, 1.71123e-01_JPRB, 1.70586e-01_JPRB/)
702	kao_mn2o( 1, :,13) = (/ &
703	& 2.41966e-01_JPRB, 2.50534e-01_JPRB, 2.59406e-01_JPRB, 2.68591e-01_JPRB, 2.78102e-01_JPRB, &
704	& 2.87950e-01_JPRB, 2.98146e-01_JPRB, 3.08704e-01_JPRB, 3.19635e-01_JPRB, 3.30953e-01_JPRB, &
705	& 3.42672e-01_JPRB, 3.54806e-01_JPRB, 3.67370e-01_JPRB, 3.80379e-01_JPRB, 3.93848e-01_JPRB, &
706	& 4.07794e-01_JPRB, 4.22234e-01_JPRB, 4.37186e-01_JPRB, 4.52667e-01_JPRB/)
707	kao_mn2o( 2, :,13) = (/ &
708	& 1.54385e-01_JPRB, 1.54015e-01_JPRB, 1.53646e-01_JPRB, 1.53279e-01_JPRB, 1.52912e-01_JPRB, &
709	& 1.52545e-01_JPRB, 1.52180e-01_JPRB, 1.51816e-01_JPRB, 1.51452e-01_JPRB, 1.51089e-01_JPRB, &
710	& 1.50728e-01_JPRB, 1.50367e-01_JPRB, 1.50007e-01_JPRB, 1.49647e-01_JPRB, 1.49289e-01_JPRB, &
711	& 1.48932e-01_JPRB, 1.48575e-01_JPRB, 1.48219e-01_JPRB, 1.47864e-01_JPRB/)
712	kao_mn2o( 3, :,13) = (/ &
713	& 2.00518e-01_JPRB, 1.94901e-01_JPRB, 1.89442e-01_JPRB, 1.84136e-01_JPRB, 1.78978e-01_JPRB, &
714	& 1.73965e-01_JPRB, 1.69092e-01_JPRB, 1.64356e-01_JPRB, 1.59752e-01_JPRB, 1.55278e-01_JPRB, &
715	& 1.50928e-01_JPRB, 1.46701e-01_JPRB, 1.42592e-01_JPRB, 1.38598e-01_JPRB, 1.34715e-01_JPRB, &
716	& 1.30942e-01_JPRB, 1.27274e-01_JPRB, 1.23709e-01_JPRB, 1.20244e-01_JPRB/)
717	kao_mn2o( 4, :,13) = (/ &
718	& 2.03974e-01_JPRB, 1.98258e-01_JPRB, 1.92703e-01_JPRB, 1.87302e-01_JPRB, 1.82054e-01_JPRB, &
719	& 1.76952e-01_JPRB, 1.71993e-01_JPRB, 1.67173e-01_JPRB, 1.62489e-01_JPRB, 1.57935e-01_JPRB, &
720	& 1.53509e-01_JPRB, 1.49207e-01_JPRB, 1.45026e-01_JPRB, 1.40962e-01_JPRB, 1.37012e-01_JPRB, &
721	& 1.33172e-01_JPRB, 1.29440e-01_JPRB, 1.25813e-01_JPRB, 1.22287e-01_JPRB/)
722	kao_mn2o( 5, :,13) = (/ &
723	& 2.09410e-01_JPRB, 2.03543e-01_JPRB, 1.97841e-01_JPRB, 1.92298e-01_JPRB, 1.86911e-01_JPRB, &
724	& 1.81674e-01_JPRB, 1.76585e-01_JPRB, 1.71637e-01_JPRB, 1.66829e-01_JPRB, 1.62155e-01_JPRB, &
725	& 1.57612e-01_JPRB, 1.53196e-01_JPRB, 1.48904e-01_JPRB, 1.44733e-01_JPRB, 1.40678e-01_JPRB, &
726	& 1.36736e-01_JPRB, 1.32906e-01_JPRB, 1.29182e-01_JPRB, 1.25563e-01_JPRB/)
727	kao_mn2o( 6, :,13) = (/ &
728	& 2.19808e-01_JPRB, 2.13643e-01_JPRB, 2.07651e-01_JPRB, 2.01827e-01_JPRB, 1.96166e-01_JPRB, &
729	& 1.90664e-01_JPRB, 1.85317e-01_JPRB, 1.80119e-01_JPRB, 1.75067e-01_JPRB, 1.70157e-01_JPRB, &
730	& 1.65385e-01_JPRB, 1.60746e-01_JPRB, 1.56238e-01_JPRB, 1.51856e-01_JPRB, 1.47596e-01_JPRB, &
731	& 1.43457e-01_JPRB, 1.39433e-01_JPRB, 1.35523e-01_JPRB, 1.31722e-01_JPRB/)
732	kao_mn2o( 7, :,13) = (/ &
733	& 2.47074e-01_JPRB, 2.40127e-01_JPRB, 2.33375e-01_JPRB, 2.26813e-01_JPRB, 2.20436e-01_JPRB, &
734	& 2.14238e-01_JPRB, 2.08215e-01_JPRB, 2.02360e-01_JPRB, 1.96671e-01_JPRB, 1.91141e-01_JPRB, &
735	& 1.85767e-01_JPRB, 1.80544e-01_JPRB, 1.75467e-01_JPRB, 1.70534e-01_JPRB, 1.65739e-01_JPRB, &
736	& 1.61079e-01_JPRB, 1.56550e-01_JPRB, 1.52148e-01_JPRB, 1.47870e-01_JPRB/)
737	kao_mn2o( 8, :,13) = (/ &
738	& 2.55282e-01_JPRB, 2.48105e-01_JPRB, 2.41130e-01_JPRB, 2.34350e-01_JPRB, 2.27762e-01_JPRB, &
739	& 2.21358e-01_JPRB, 2.15135e-01_JPRB, 2.09086e-01_JPRB, 2.03208e-01_JPRB, 1.97495e-01_JPRB, &
740	& 1.91942e-01_JPRB, 1.86546e-01_JPRB, 1.81301e-01_JPRB, 1.76204e-01_JPRB, 1.71250e-01_JPRB, &
741	& 1.66435e-01_JPRB, 1.61756e-01_JPRB, 1.57208e-01_JPRB, 1.52788e-01_JPRB/)
742	kao_mn2o( 9, :,13) = (/ &
743	& 2.09991e-01_JPRB, 2.04103e-01_JPRB, 1.98380e-01_JPRB, 1.92818e-01_JPRB, 1.87411e-01_JPRB, &
744	& 1.82156e-01_JPRB, 1.77048e-01_JPRB, 1.72084e-01_JPRB, 1.67259e-01_JPRB, 1.62569e-01_JPRB, &
745	& 1.58010e-01_JPRB, 1.53580e-01_JPRB, 1.49273e-01_JPRB, 1.45087e-01_JPRB, 1.41019e-01_JPRB, &
746	& 1.37065e-01_JPRB, 1.33222e-01_JPRB, 1.29486e-01_JPRB, 1.25855e-01_JPRB/)
747	kao_mn2o( 1, :,14) = (/ &
748	& 9.08340e-02_JPRB, 9.50421e-02_JPRB, 9.94452e-02_JPRB, 1.04052e-01_JPRB, 1.08873e-01_JPRB, &
749	& 1.13917e-01_JPRB, 1.19194e-01_JPRB, 1.24716e-01_JPRB, 1.30494e-01_JPRB, 1.36540e-01_JPRB, &
750	& 1.42865e-01_JPRB, 1.49484e-01_JPRB, 1.56409e-01_JPRB, 1.63655e-01_JPRB, 1.71237e-01_JPRB, &
751	& 1.79170e-01_JPRB, 1.87471e-01_JPRB, 1.96156e-01_JPRB, 2.05243e-01_JPRB/)
752	kao_mn2o( 2, :,14) = (/ &
753	& 3.36945e-02_JPRB, 3.45144e-02_JPRB, 3.53542e-02_JPRB, 3.62144e-02_JPRB, 3.70956e-02_JPRB, &
754	& 3.79982e-02_JPRB, 3.89228e-02_JPRB, 3.98698e-02_JPRB, 4.08399e-02_JPRB, 4.18336e-02_JPRB, &
755	& 4.28515e-02_JPRB, 4.38942e-02_JPRB, 4.49622e-02_JPRB, 4.60562e-02_JPRB, 4.71769e-02_JPRB, &
756	& 4.83248e-02_JPRB, 4.95006e-02_JPRB, 5.07051e-02_JPRB, 5.19388e-02_JPRB/)
757	kao_mn2o( 3, :,14) = (/ &
758	& 9.11678e-02_JPRB, 8.85761e-02_JPRB, 8.60580e-02_JPRB, 8.36116e-02_JPRB, 8.12347e-02_JPRB, &
759	& 7.89253e-02_JPRB, 7.66817e-02_JPRB, 7.45017e-02_JPRB, 7.23838e-02_JPRB, 7.03261e-02_JPRB, &
760	& 6.83269e-02_JPRB, 6.63845e-02_JPRB, 6.44973e-02_JPRB, 6.26638e-02_JPRB, 6.08824e-02_JPRB, &
761	& 5.91516e-02_JPRB, 5.74700e-02_JPRB, 5.58363e-02_JPRB, 5.42490e-02_JPRB/)
762	kao_mn2o( 4, :,14) = (/ &
763	& 8.43999e-02_JPRB, 8.20004e-02_JPRB, 7.96692e-02_JPRB, 7.74042e-02_JPRB, 7.52037e-02_JPRB, &
764	& 7.30656e-02_JPRB, 7.09884e-02_JPRB, 6.89702e-02_JPRB, 6.70094e-02_JPRB, 6.51044e-02_JPRB, &
765	& 6.32535e-02_JPRB, 6.14552e-02_JPRB, 5.97081e-02_JPRB, 5.80106e-02_JPRB, 5.63614e-02_JPRB, &
766	& 5.47590e-02_JPRB, 5.32022e-02_JPRB, 5.16897e-02_JPRB, 5.02202e-02_JPRB/)
767	kao_mn2o( 5, :,14) = (/ &
768	& 7.41279e-02_JPRB, 7.20196e-02_JPRB, 6.99712e-02_JPRB, 6.79811e-02_JPRB, 6.60476e-02_JPRB, &
769	& 6.41691e-02_JPRB, 6.23440e-02_JPRB, 6.05708e-02_JPRB, 5.88481e-02_JPRB, 5.71743e-02_JPRB, &
770	& 5.55482e-02_JPRB, 5.39683e-02_JPRB, 5.24334e-02_JPRB, 5.09421e-02_JPRB, 4.94932e-02_JPRB, &
771	& 4.80855e-02_JPRB, 4.67179e-02_JPRB, 4.53891e-02_JPRB, 4.40982e-02_JPRB/)
772	kao_mn2o( 6, :,14) = (/ &
773	& 5.66805e-02_JPRB, 5.50676e-02_JPRB, 5.35006e-02_JPRB, 5.19782e-02_JPRB, 5.04991e-02_JPRB, &
774	& 4.90621e-02_JPRB, 4.76659e-02_JPRB, 4.63096e-02_JPRB, 4.49918e-02_JPRB, 4.37115e-02_JPRB, &
775	& 4.24676e-02_JPRB, 4.12592e-02_JPRB, 4.00851e-02_JPRB, 3.89444e-02_JPRB, 3.78362e-02_JPRB, &
776	& 3.67595e-02_JPRB, 3.57135e-02_JPRB, 3.46972e-02_JPRB, 3.37099e-02_JPRB/)
777	kao_mn2o( 7, :,14) = (/ &
778	& 1.23018e-02_JPRB, 1.19517e-02_JPRB, 1.16116e-02_JPRB, 1.12811e-02_JPRB, 1.09601e-02_JPRB, &
779	& 1.06482e-02_JPRB, 1.03452e-02_JPRB, 1.00508e-02_JPRB, 9.76474e-03_JPRB, 9.48685e-03_JPRB, &
780	& 9.21687e-03_JPRB, 8.95458e-03_JPRB, 8.69974e-03_JPRB, 8.45216e-03_JPRB, 8.21163e-03_JPRB, &
781	& 7.97794e-03_JPRB, 7.75091e-03_JPRB, 7.53033e-03_JPRB, 7.31603e-03_JPRB/)
782	kao_mn2o( 8, :,14) = (/ &
783	& 3.22403e-07_JPRB, 3.75986e-07_JPRB, 4.38475e-07_JPRB, 5.11349e-07_JPRB, 5.96335e-07_JPRB, &
784	& 6.95446e-07_JPRB, 8.11028e-07_JPRB, 9.45821e-07_JPRB, 1.10302e-06_JPRB, 1.28634e-06_JPRB, &
785	& 1.50012e-06_JPRB, 1.74944e-06_JPRB, 2.04020e-06_JPRB, 2.37928e-06_JPRB, 2.77472e-06_JPRB, &
786	& 3.23587e-06_JPRB, 3.77367e-06_JPRB, 4.40085e-06_JPRB, 5.13227e-06_JPRB/)
787	kao_mn2o( 9, :,14) = (/ &
788	& 7.33052e-02_JPRB, 7.12199e-02_JPRB, 6.91939e-02_JPRB, 6.72255e-02_JPRB, 6.53131e-02_JPRB, &
789	& 6.34551e-02_JPRB, 6.16500e-02_JPRB, 5.98963e-02_JPRB, 5.81924e-02_JPRB, 5.65370e-02_JPRB, &
790	& 5.49287e-02_JPRB, 5.33661e-02_JPRB, 5.18480e-02_JPRB, 5.03730e-02_JPRB, 4.89401e-02_JPRB, &
791	& 4.75479e-02_JPRB, 4.61953e-02_JPRB, 4.48811e-02_JPRB, 4.36044e-02_JPRB/)
792	kao_mn2o( 1, :,15) = (/ &
793	& 8.80247e-02_JPRB, 9.01793e-02_JPRB, 9.23868e-02_JPRB, 9.46482e-02_JPRB, 9.69650e-02_JPRB, &
794	& 9.93385e-02_JPRB, 1.01770e-01_JPRB, 1.04261e-01_JPRB, 1.06813e-01_JPRB, 1.09428e-01_JPRB, &
795	& 1.12107e-01_JPRB, 1.14851e-01_JPRB, 1.17662e-01_JPRB, 1.20542e-01_JPRB, 1.23493e-01_JPRB, &
796	& 1.26516e-01_JPRB, 1.29613e-01_JPRB, 1.32785e-01_JPRB, 1.36036e-01_JPRB/)
797	kao_mn2o( 2, :,15) = (/ &
798	& 3.89107e-07_JPRB, 4.53768e-07_JPRB, 5.29173e-07_JPRB, 6.17109e-07_JPRB, 7.19658e-07_JPRB, &
799	& 8.39248e-07_JPRB, 9.78710e-07_JPRB, 1.14135e-06_JPRB, 1.33101e-06_JPRB, 1.55220e-06_JPRB, &
800	& 1.81013e-06_JPRB, 2.11094e-06_JPRB, 2.46172e-06_JPRB, 2.87080e-06_JPRB, 3.34786e-06_JPRB, &
801	& 3.90420e-06_JPRB, 4.55298e-06_JPRB, 5.30958e-06_JPRB, 6.19190e-06_JPRB/)
802	kao_mn2o( 3, :,15) = (/ &
803	& 3.86537e-07_JPRB, 4.50763e-07_JPRB, 5.25662e-07_JPRB, 6.13006e-07_JPRB, 7.14863e-07_JPRB, &
804	& 8.33644e-07_JPRB, 9.72162e-07_JPRB, 1.13370e-06_JPRB, 1.32207e-06_JPRB, 1.54175e-06_JPRB, &
805	& 1.79792e-06_JPRB, 2.09666e-06_JPRB, 2.44504e-06_JPRB, 2.85131e-06_JPRB, 3.32508e-06_JPRB, &
806	& 3.87758e-06_JPRB, 4.52188e-06_JPRB, 5.27323e-06_JPRB, 6.14943e-06_JPRB/)
807	kao_mn2o( 4, :,15) = (/ &
808	& 3.81913e-07_JPRB, 4.45369e-07_JPRB, 5.19369e-07_JPRB, 6.05664e-07_JPRB, 7.06297e-07_JPRB, &
809	& 8.23651e-07_JPRB, 9.60503e-07_JPRB, 1.12009e-06_JPRB, 1.30620e-06_JPRB, 1.52323e-06_JPRB, &
810	& 1.77632e-06_JPRB, 2.07147e-06_JPRB, 2.41565e-06_JPRB, 2.81701e-06_JPRB, 3.28507e-06_JPRB, &
811	& 3.83090e-06_JPRB, 4.46741e-06_JPRB, 5.20969e-06_JPRB, 6.07529e-06_JPRB/)
812	kao_mn2o( 5, :,15) = (/ &
813	& 3.77265e-07_JPRB, 4.39951e-07_JPRB, 5.13053e-07_JPRB, 5.98303e-07_JPRB, 6.97717e-07_JPRB, &
814	& 8.13650e-07_JPRB, 9.48846e-07_JPRB, 1.10651e-06_JPRB, 1.29036e-06_JPRB, 1.50477e-06_JPRB, &
815	& 1.75480e-06_JPRB, 2.04638e-06_JPRB, 2.38641e-06_JPRB, 2.78294e-06_JPRB, 3.24535e-06_JPRB, &
816	& 3.78460e-06_JPRB, 4.41345e-06_JPRB, 5.14679e-06_JPRB, 6.00198e-06_JPRB/)
817	kao_mn2o( 6, :,15) = (/ &
818	& 3.77877e-07_JPRB, 4.40670e-07_JPRB, 5.13897e-07_JPRB, 5.99292e-07_JPRB, 6.98878e-07_JPRB, &
819	& 8.15012e-07_JPRB, 9.50444e-07_JPRB, 1.10838e-06_JPRB, 1.29256e-06_JPRB, 1.50735e-06_JPRB, &
820	& 1.75783e-06_JPRB, 2.04993e-06_JPRB, 2.39057e-06_JPRB, 2.78782e-06_JPRB, 3.25107e-06_JPRB, &
821	& 3.79131e-06_JPRB, 4.42132e-06_JPRB, 5.15602e-06_JPRB, 6.01280e-06_JPRB/)
822	kao_mn2o( 7, :,15) = (/ &
823	& 3.80495e-07_JPRB, 4.43726e-07_JPRB, 5.17465e-07_JPRB, 6.03458e-07_JPRB, 7.03741e-07_JPRB, &
824	& 8.20689e-07_JPRB, 9.57072e-07_JPRB, 1.11612e-06_JPRB, 1.30160e-06_JPRB, 1.51790e-06_JPRB, &
825	& 1.77014e-06_JPRB, 2.06430e-06_JPRB, 2.40735e-06_JPRB, 2.80741e-06_JPRB, 3.27394e-06_JPRB, &
826	& 3.81801e-06_JPRB, 4.45249e-06_JPRB, 5.19241e-06_JPRB, 6.05528e-06_JPRB/)
827	kao_mn2o( 8, :,15) = (/ &
828	& 3.87881e-07_JPRB, 4.52329e-07_JPRB, 5.27486e-07_JPRB, 6.15129e-07_JPRB, 7.17335e-07_JPRB, &
829	& 8.36523e-07_JPRB, 9.75515e-07_JPRB, 1.13760e-06_JPRB, 1.32662e-06_JPRB, 1.54704e-06_JPRB, &
830	& 1.80409e-06_JPRB, 2.10384e-06_JPRB, 2.45340e-06_JPRB, 2.86105e-06_JPRB, 3.33642e-06_JPRB, &
831	& 3.89078e-06_JPRB, 4.53725e-06_JPRB, 5.29112e-06_JPRB, 6.17026e-06_JPRB/)
832	kao_mn2o( 9, :,15) = (/ &
833	& 3.77265e-07_JPRB, 4.39951e-07_JPRB, 5.13053e-07_JPRB, 5.98303e-07_JPRB, 6.97717e-07_JPRB, &
834	& 8.13650e-07_JPRB, 9.48846e-07_JPRB, 1.10651e-06_JPRB, 1.29036e-06_JPRB, 1.50477e-06_JPRB, &
835	& 1.75480e-06_JPRB, 2.04638e-06_JPRB, 2.38641e-06_JPRB, 2.78294e-06_JPRB, 3.24535e-06_JPRB, &
836	& 3.78460e-06_JPRB, 4.41345e-06_JPRB, 5.14679e-06_JPRB, 6.00198e-06_JPRB/)
837	kao_mn2o( 1, :,16) = (/ &
838	& 8.84606e-02_JPRB, 9.05971e-02_JPRB, 9.27852e-02_JPRB, 9.50261e-02_JPRB, 9.73212e-02_JPRB, &
839	& 9.96717e-02_JPRB, 1.02079e-01_JPRB, 1.04544e-01_JPRB, 1.07069e-01_JPRB, 1.09655e-01_JPRB, &
840	& 1.12304e-01_JPRB, 1.15016e-01_JPRB, 1.17794e-01_JPRB, 1.20639e-01_JPRB, 1.23553e-01_JPRB, &
841	& 1.26537e-01_JPRB, 1.29593e-01_JPRB, 1.32723e-01_JPRB, 1.35928e-01_JPRB/)
842	kao_mn2o( 2, :,16) = (/ &
843	& 8.13898e-07_JPRB, 9.49130e-07_JPRB, 1.10683e-06_JPRB, 1.29073e-06_JPRB, 1.50519e-06_JPRB, &
844	& 1.75528e-06_JPRB, 2.04693e-06_JPRB, 2.38703e-06_JPRB, 2.78364e-06_JPRB, 3.24615e-06_JPRB, &
845	& 3.78551e-06_JPRB, 4.41449e-06_JPRB, 5.14796e-06_JPRB, 6.00331e-06_JPRB, 7.00078e-06_JPRB, &
846	& 8.16398e-06_JPRB, 9.52045e-06_JPRB, 1.11023e-05_JPRB, 1.29470e-05_JPRB/)
847	kao_mn2o( 3, :,16) = (/ &
848	& 8.32666e-07_JPRB, 9.71021e-07_JPRB, 1.13237e-06_JPRB, 1.32052e-06_JPRB, 1.53994e-06_JPRB, &
849	& 1.79581e-06_JPRB, 2.09420e-06_JPRB, 2.44217e-06_JPRB, 2.84796e-06_JPRB, 3.32117e-06_JPRB, &
850	& 3.87302e-06_JPRB, 4.51656e-06_JPRB, 5.26703e-06_JPRB, 6.14219e-06_JPRB, 7.16277e-06_JPRB, &
851	& 8.35294e-06_JPRB, 9.74086e-06_JPRB, 1.13594e-05_JPRB, 1.32468e-05_JPRB/)
852	kao_mn2o( 4, :,16) = (/ &
853	& 8.70348e-07_JPRB, 1.01496e-06_JPRB, 1.18360e-06_JPRB, 1.38026e-06_JPRB, 1.60959e-06_JPRB, &
854	& 1.87703e-06_JPRB, 2.18890e-06_JPRB, 2.55259e-06_JPRB, 2.97671e-06_JPRB, 3.47130e-06_JPRB, &
855	& 4.04807e-06_JPRB, 4.72067e-06_JPRB, 5.50502e-06_JPRB, 6.41970e-06_JPRB, 7.48635e-06_JPRB, &
856	& 8.73023e-06_JPRB, 1.01808e-05_JPRB, 1.18724e-05_JPRB, 1.38450e-05_JPRB/)
857	kao_mn2o( 5, :,16) = (/ &
858	& 9.07957e-07_JPRB, 1.05882e-06_JPRB, 1.23475e-06_JPRB, 1.43991e-06_JPRB, 1.67916e-06_JPRB, &
859	& 1.95816e-06_JPRB, 2.28352e-06_JPRB, 2.66294e-06_JPRB, 3.10541e-06_JPRB, 3.62139e-06_JPRB, &
860	& 4.22310e-06_JPRB, 4.92480e-06_JPRB, 5.74308e-06_JPRB, 6.69733e-06_JPRB, 7.81013e-06_JPRB, &
861	& 9.10784e-06_JPRB, 1.06212e-05_JPRB, 1.23859e-05_JPRB, 1.44439e-05_JPRB/)
862	kao_mn2o( 6, :,16) = (/ &
863	& 8.59072e-04_JPRB, 9.19773e-04_JPRB, 9.84764e-04_JPRB, 1.05435e-03_JPRB, 1.12885e-03_JPRB, &
864	& 1.20861e-03_JPRB, 1.29401e-03_JPRB, 1.38544e-03_JPRB, 1.48334e-03_JPRB, 1.58815e-03_JPRB, &
865	& 1.70037e-03_JPRB, 1.82052e-03_JPRB, 1.94915e-03_JPRB, 2.08688e-03_JPRB, 2.23434e-03_JPRB, &
866	& 2.39222e-03_JPRB, 2.56125e-03_JPRB, 2.74223e-03_JPRB, 2.93599e-03_JPRB/)
867	kao_mn2o( 7, :,16) = (/ &
868	& 9.17294e-07_JPRB, 1.06971e-06_JPRB, 1.24746e-06_JPRB, 1.45474e-06_JPRB, 1.69646e-06_JPRB, &
869	& 1.97835e-06_JPRB, 2.30708e-06_JPRB, 2.69043e-06_JPRB, 3.13748e-06_JPRB, 3.65880e-06_JPRB, &
870	& 4.26676e-06_JPRB, 4.97574e-06_JPRB, 5.80251e-06_JPRB, 6.76667e-06_JPRB, 7.89104e-06_JPRB, &
871	& 9.20223e-06_JPRB, 1.07313e-05_JPRB, 1.25144e-05_JPRB, 1.45939e-05_JPRB/)
872	kao_mn2o( 8, :,16) = (/ &
873	& 9.17341e-07_JPRB, 1.06977e-06_JPRB, 1.24752e-06_JPRB, 1.45480e-06_JPRB, 1.69653e-06_JPRB, &
874	& 1.97843e-06_JPRB, 2.30716e-06_JPRB, 2.69051e-06_JPRB, 3.13757e-06_JPRB, 3.65890e-06_JPRB, &
875	& 4.26686e-06_JPRB, 4.97584e-06_JPRB, 5.80261e-06_JPRB, 6.76677e-06_JPRB, 7.89113e-06_JPRB, &
876	& 9.20231e-06_JPRB, 1.07314e-05_JPRB, 1.25145e-05_JPRB, 1.45939e-05_JPRB/)
877	kao_mn2o( 9, :,16) = (/ &
878	& 9.07957e-07_JPRB, 1.05882e-06_JPRB, 1.23475e-06_JPRB, 1.43991e-06_JPRB, 1.67916e-06_JPRB, &
879	& 1.95816e-06_JPRB, 2.28352e-06_JPRB, 2.66294e-06_JPRB, 3.10541e-06_JPRB, 3.62139e-06_JPRB, &
880	& 4.22310e-06_JPRB, 4.92480e-06_JPRB, 5.74308e-06_JPRB, 6.69733e-06_JPRB, 7.81013e-06_JPRB, &
881	& 9.10784e-06_JPRB, 1.06212e-05_JPRB, 1.23859e-05_JPRB, 1.44439e-05_JPRB/)
882
883	! The array KBO_Mxx contains the absorption coefficient for
884	! a minor species at the 16 chosen g-values for a reference pressure
885	! level above 100~ mb. The first index in the array, JS, runs
886	! from 1 to 10, and corresponds to different gas column amounts ratios,
887	! as expressed through the binary species parameter eta, defined as
888	! eta = gas1/(gas1 + (rat) * gas2), where rat is the
889	! ratio of the reference MLS column amount value of gas 1 to
890	! that of gas2. The second index refers to temperature
891	! in 7.2 degree increments. For instance, JT = 1 refers to a
892	! temperature of 188.0, JT = 2 refers to 195.2, etc. The third index
893	! runs over the g-channel (1 to 16).
894
895	kbo_mn2o( 1, :, 1) = (/ &
896	& 7.72009e-08_JPRB, 1.15883e-07_JPRB, 1.73947e-07_JPRB, 2.61104e-07_JPRB, 3.91932e-07_JPRB, &
897	& 5.88311e-07_JPRB, 8.83088e-07_JPRB, 1.32556e-06_JPRB, 1.98975e-06_JPRB, 2.98672e-06_JPRB, &
898	& 4.48324e-06_JPRB, 6.72960e-06_JPRB, 1.01015e-05_JPRB, 1.51629e-05_JPRB, 2.27604e-05_JPRB, &
899	& 3.41646e-05_JPRB, 5.12831e-05_JPRB, 7.69787e-05_JPRB, 1.15549e-04_JPRB/)
900	kbo_mn2o( 2, :, 1) = (/ &
901	& 1.29932e-05_JPRB, 1.78207e-05_JPRB, 2.44419e-05_JPRB, 3.35232e-05_JPRB, 4.59786e-05_JPRB, &
902	& 6.30617e-05_JPRB, 8.64920e-05_JPRB, 1.18628e-04_JPRB, 1.62703e-04_JPRB, 2.23155e-04_JPRB, &
903	& 3.06067e-04_JPRB, 4.19784e-04_JPRB, 5.75753e-04_JPRB, 7.89671e-04_JPRB, 1.08307e-03_JPRB, &
904	& 1.48548e-03_JPRB, 2.03740e-03_JPRB, 2.79439e-03_JPRB, 3.83262e-03_JPRB/)
905	kbo_mn2o( 3, :, 1) = (/ &
906	& 6.44518e-05_JPRB, 8.10996e-05_JPRB, 1.02047e-04_JPRB, 1.28406e-04_JPRB, 1.61573e-04_JPRB, &
907	& 2.03307e-04_JPRB, 2.55821e-04_JPRB, 3.21899e-04_JPRB, 4.05045e-04_JPRB, 5.09667e-04_JPRB, &
908	& 6.41313e-04_JPRB, 8.06964e-04_JPRB, 1.01540e-03_JPRB, 1.27768e-03_JPRB, 1.60770e-03_JPRB, &
909	& 2.02296e-03_JPRB, 2.54549e-03_JPRB, 3.20298e-03_JPRB, 4.03031e-03_JPRB/)
910	kbo_mn2o( 4, :, 1) = (/ &
911	& 3.23454e-04_JPRB, 3.82112e-04_JPRB, 4.51408e-04_JPRB, 5.33270e-04_JPRB, 6.29978e-04_JPRB, &
912	& 7.44223e-04_JPRB, 8.79187e-04_JPRB, 1.03863e-03_JPRB, 1.22698e-03_JPRB, 1.44949e-03_JPRB, &
913	& 1.71235e-03_JPRB, 2.02289e-03_JPRB, 2.38974e-03_JPRB, 2.82311e-03_JPRB, 3.33508e-03_JPRB, &
914	& 3.93989e-03_JPRB, 4.65439e-03_JPRB, 5.49845e-03_JPRB, 6.49558e-03_JPRB/)
915	kbo_mn2o( 5, :, 1) = (/ &
916	& 1.45978e-04_JPRB, 1.75646e-04_JPRB, 2.11344e-04_JPRB, 2.54296e-04_JPRB, 3.05978e-04_JPRB, &
917	& 3.68163e-04_JPRB, 4.42986e-04_JPRB, 5.33017e-04_JPRB, 6.41344e-04_JPRB, 7.71687e-04_JPRB, &
918	& 9.28522e-04_JPRB, 1.11723e-03_JPRB, 1.34429e-03_JPRB, 1.61750e-03_JPRB, 1.94623e-03_JPRB, &
919	& 2.34177e-03_JPRB, 2.81770e-03_JPRB, 3.39035e-03_JPRB, 4.07939e-03_JPRB/)
920	kbo_mn2o( 1, :, 2) = (/ &
921	& 1.94527e-04_JPRB, 2.38609e-04_JPRB, 2.92680e-04_JPRB, 3.59005e-04_JPRB, 4.40360e-04_JPRB, &
922	& 5.40150e-04_JPRB, 6.62554e-04_JPRB, 8.12697e-04_JPRB, 9.96864e-04_JPRB, 1.22276e-03_JPRB, &
923	& 1.49986e-03_JPRB, 1.83974e-03_JPRB, 2.25665e-03_JPRB, 2.76803e-03_JPRB, 3.39530e-03_JPRB, &
924	& 4.16472e-03_JPRB, 5.10849e-03_JPRB, 6.26613e-03_JPRB, 7.68611e-03_JPRB/)
925	kbo_mn2o( 2, :, 2) = (/ &
926	& 7.49615e-04_JPRB, 8.82716e-04_JPRB, 1.03945e-03_JPRB, 1.22401e-03_JPRB, 1.44135e-03_JPRB, &
927	& 1.69727e-03_JPRB, 1.99863e-03_JPRB, 2.35351e-03_JPRB, 2.77139e-03_JPRB, 3.26347e-03_JPRB, &
928	& 3.84293e-03_JPRB, 4.52528e-03_JPRB, 5.32878e-03_JPRB, 6.27495e-03_JPRB, 7.38911e-03_JPRB, &
929	& 8.70111e-03_JPRB, 1.02461e-02_JPRB, 1.20653e-02_JPRB, 1.42076e-02_JPRB/)
930	kbo_mn2o( 3, :, 2) = (/ &
931	& 1.39162e-03_JPRB, 1.59859e-03_JPRB, 1.83634e-03_JPRB, 2.10946e-03_JPRB, 2.42319e-03_JPRB, &
932	& 2.78358e-03_JPRB, 3.19758e-03_JPRB, 3.67314e-03_JPRB, 4.21944e-03_JPRB, 4.84698e-03_JPRB, &
933	& 5.56786e-03_JPRB, 6.39595e-03_JPRB, 7.34720e-03_JPRB, 8.43992e-03_JPRB, 9.69516e-03_JPRB, &
934	& 1.11371e-02_JPRB, 1.27935e-02_JPRB, 1.46962e-02_JPRB, 1.68819e-02_JPRB/)
935	kbo_mn2o( 4, :, 2) = (/ &
936	& 2.42354e-03_JPRB, 2.73623e-03_JPRB, 3.08926e-03_JPRB, 3.48783e-03_JPRB, 3.93783e-03_JPRB, &
937	& 4.44589e-03_JPRB, 5.01950e-03_JPRB, 5.66712e-03_JPRB, 6.39829e-03_JPRB, 7.22379e-03_JPRB, &
938	& 8.15581e-03_JPRB, 9.20807e-03_JPRB, 1.03961e-02_JPRB, 1.17374e-02_JPRB, 1.32517e-02_JPRB, &
939	& 1.49615e-02_JPRB, 1.68918e-02_JPRB, 1.90712e-02_JPRB, 2.15318e-02_JPRB/)
940	kbo_mn2o( 5, :, 2) = (/ &
941	& 1.39908e-03_JPRB, 1.59133e-03_JPRB, 1.81000e-03_JPRB, 2.05872e-03_JPRB, 2.34161e-03_JPRB, &
942	& 2.66338e-03_JPRB, 3.02937e-03_JPRB, 3.44564e-03_JPRB, 3.91912e-03_JPRB, 4.45766e-03_JPRB, &
943	& 5.07021e-03_JPRB, 5.76693e-03_JPRB, 6.55938e-03_JPRB, 7.46073e-03_JPRB, 8.48594e-03_JPRB, &
944	& 9.65202e-03_JPRB, 1.09783e-02_JPRB, 1.24869e-02_JPRB, 1.42028e-02_JPRB/)
945	kbo_mn2o( 1, :, 3) = (/ &
946	& 8.74797e-03_JPRB, 9.66828e-03_JPRB, 1.06854e-02_JPRB, 1.18095e-02_JPRB, 1.30519e-02_JPRB, &
947	& 1.44250e-02_JPRB, 1.59426e-02_JPRB, 1.76198e-02_JPRB, 1.94735e-02_JPRB, 2.15221e-02_JPRB, &
948	& 2.37863e-02_JPRB, 2.62887e-02_JPRB, 2.90544e-02_JPRB, 3.21110e-02_JPRB, 3.54891e-02_JPRB, &
949	& 3.92227e-02_JPRB, 4.33491e-02_JPRB, 4.79095e-02_JPRB, 5.29497e-02_JPRB/)
950	kbo_mn2o( 2, :, 3) = (/ &
951	& 1.43974e-02_JPRB, 1.56118e-02_JPRB, 1.69286e-02_JPRB, 1.83564e-02_JPRB, 1.99047e-02_JPRB, &
952	& 2.15836e-02_JPRB, 2.34041e-02_JPRB, 2.53781e-02_JPRB, 2.75187e-02_JPRB, 2.98397e-02_JPRB, &
953	& 3.23566e-02_JPRB, 3.50857e-02_JPRB, 3.80451e-02_JPRB, 4.12540e-02_JPRB, 4.47336e-02_JPRB, &
954	& 4.85067e-02_JPRB, 5.25980e-02_JPRB, 5.70344e-02_JPRB, 6.18450e-02_JPRB/)
955	kbo_mn2o( 3, :, 3) = (/ &
956	& 1.83051e-02_JPRB, 1.96851e-02_JPRB, 2.11692e-02_JPRB, 2.27651e-02_JPRB, 2.44813e-02_JPRB, &
957	& 2.63270e-02_JPRB, 2.83117e-02_JPRB, 3.04461e-02_JPRB, 3.27414e-02_JPRB, 3.52097e-02_JPRB, &
958	& 3.78642e-02_JPRB, 4.07187e-02_JPRB, 4.37884e-02_JPRB, 4.70896e-02_JPRB, 5.06396e-02_JPRB, &
959	& 5.44573e-02_JPRB, 5.85628e-02_JPRB, 6.29777e-02_JPRB, 6.77256e-02_JPRB/)
960	kbo_mn2o( 4, :, 3) = (/ &
961	& 2.81258e-02_JPRB, 2.97806e-02_JPRB, 3.15328e-02_JPRB, 3.33880e-02_JPRB, 3.53524e-02_JPRB, &
962	& 3.74324e-02_JPRB, 3.96348e-02_JPRB, 4.19667e-02_JPRB, 4.44358e-02_JPRB, 4.70502e-02_JPRB, &
963	& 4.98185e-02_JPRB, 5.27496e-02_JPRB, 5.58531e-02_JPRB, 5.91393e-02_JPRB, 6.26187e-02_JPRB, &
964	& 6.63030e-02_JPRB, 7.02039e-02_JPRB, 7.43344e-02_JPRB, 7.87079e-02_JPRB/)
965	kbo_mn2o( 5, :, 3) = (/ &
966	& 8.82958e-03_JPRB, 9.53842e-03_JPRB, 1.03042e-02_JPRB, 1.11314e-02_JPRB, 1.20250e-02_JPRB, &
967	& 1.29904e-02_JPRB, 1.40333e-02_JPRB, 1.51599e-02_JPRB, 1.63769e-02_JPRB, 1.76917e-02_JPRB, &
968	& 1.91120e-02_JPRB, 2.06463e-02_JPRB, 2.23038e-02_JPRB, 2.40944e-02_JPRB, 2.60287e-02_JPRB, &
969	& 2.81183e-02_JPRB, 3.03757e-02_JPRB, 3.28142e-02_JPRB, 3.54486e-02_JPRB/)
970	kbo_mn2o( 1, :, 4) = (/ &
971	& 1.18673e-01_JPRB, 1.22983e-01_JPRB, 1.27449e-01_JPRB, 1.32077e-01_JPRB, 1.36874e-01_JPRB, &
972	& 1.41845e-01_JPRB, 1.46996e-01_JPRB, 1.52334e-01_JPRB, 1.57866e-01_JPRB, 1.63599e-01_JPRB, &
973	& 1.69541e-01_JPRB, 1.75698e-01_JPRB, 1.82078e-01_JPRB, 1.88691e-01_JPRB, 1.95543e-01_JPRB, &
974	& 2.02645e-01_JPRB, 2.10004e-01_JPRB, 2.17631e-01_JPRB, 2.25534e-01_JPRB/)
975	kbo_mn2o( 2, :, 4) = (/ &
976	& 1.32161e-01_JPRB, 1.36550e-01_JPRB, 1.41084e-01_JPRB, 1.45769e-01_JPRB, 1.50610e-01_JPRB, &
977	& 1.55611e-01_JPRB, 1.60779e-01_JPRB, 1.66118e-01_JPRB, 1.71634e-01_JPRB, 1.77334e-01_JPRB, &
978	& 1.83223e-01_JPRB, 1.89307e-01_JPRB, 1.95594e-01_JPRB, 2.02089e-01_JPRB, 2.08800e-01_JPRB, &
979	& 2.15734e-01_JPRB, 2.22898e-01_JPRB, 2.30300e-01_JPRB, 2.37947e-01_JPRB/)
980	kbo_mn2o( 3, :, 4) = (/ &
981	& 1.44384e-01_JPRB, 1.48820e-01_JPRB, 1.53392e-01_JPRB, 1.58104e-01_JPRB, 1.62962e-01_JPRB, &
982	& 1.67968e-01_JPRB, 1.73128e-01_JPRB, 1.78447e-01_JPRB, 1.83929e-01_JPRB, 1.89580e-01_JPRB, &
983	& 1.95404e-01_JPRB, 2.01407e-01_JPRB, 2.07594e-01_JPRB, 2.13972e-01_JPRB, 2.20546e-01_JPRB, &
984	& 2.27321e-01_JPRB, 2.34305e-01_JPRB, 2.41503e-01_JPRB, 2.48922e-01_JPRB/)
985	kbo_mn2o( 4, :, 4) = (/ &
986	& 1.58026e-01_JPRB, 1.62626e-01_JPRB, 1.67360e-01_JPRB, 1.72232e-01_JPRB, 1.77245e-01_JPRB, &
987	& 1.82405e-01_JPRB, 1.87714e-01_JPRB, 1.93179e-01_JPRB, 1.98802e-01_JPRB, 2.04589e-01_JPRB, &
988	& 2.10544e-01_JPRB, 2.16673e-01_JPRB, 2.22980e-01_JPRB, 2.29471e-01_JPRB, 2.36151e-01_JPRB, &
989	& 2.43025e-01_JPRB, 2.50100e-01_JPRB, 2.57380e-01_JPRB, 2.64872e-01_JPRB/)
990	kbo_mn2o( 5, :, 4) = (/ &
991	& 4.04885e-02_JPRB, 4.16064e-02_JPRB, 4.27551e-02_JPRB, 4.39355e-02_JPRB, 4.51485e-02_JPRB, &
992	& 4.63950e-02_JPRB, 4.76759e-02_JPRB, 4.89921e-02_JPRB, 5.03448e-02_JPRB, 5.17347e-02_JPRB, &
993	& 5.31630e-02_JPRB, 5.46308e-02_JPRB, 5.61391e-02_JPRB, 5.76890e-02_JPRB, 5.92817e-02_JPRB, &
994	& 6.09184e-02_JPRB, 6.26003e-02_JPRB, 6.43286e-02_JPRB, 6.61047e-02_JPRB/)
995	kbo_mn2o( 1, :, 5) = (/ &
996	& 3.97757e-01_JPRB, 4.01082e-01_JPRB, 4.04434e-01_JPRB, 4.07814e-01_JPRB, 4.11223e-01_JPRB, &
997	& 4.14659e-01_JPRB, 4.18125e-01_JPRB, 4.21620e-01_JPRB, 4.25144e-01_JPRB, 4.28697e-01_JPRB, &
998	& 4.32280e-01_JPRB, 4.35893e-01_JPRB, 4.39536e-01_JPRB, 4.43209e-01_JPRB, 4.46913e-01_JPRB, &
999	& 4.50649e-01_JPRB, 4.54415e-01_JPRB, 4.58213e-01_JPRB, 4.62043e-01_JPRB/)
1000	kbo_mn2o( 2, :, 5) = (/ &
1001	& 3.99425e-01_JPRB, 4.02035e-01_JPRB, 4.04662e-01_JPRB, 4.07306e-01_JPRB, 4.09968e-01_JPRB, &
1002	& 4.12647e-01_JPRB, 4.15343e-01_JPRB, 4.18057e-01_JPRB, 4.20789e-01_JPRB, 4.23539e-01_JPRB, &
1003	& 4.26307e-01_JPRB, 4.29092e-01_JPRB, 4.31896e-01_JPRB, 4.34719e-01_JPRB, 4.37559e-01_JPRB, &
1004	& 4.40419e-01_JPRB, 4.43296e-01_JPRB, 4.46193e-01_JPRB, 4.49109e-01_JPRB/)
1005	kbo_mn2o( 3, :, 5) = (/ &
1006	& 4.00527e-01_JPRB, 4.02848e-01_JPRB, 4.05182e-01_JPRB, 4.07530e-01_JPRB, 4.09892e-01_JPRB, &
1007	& 4.12267e-01_JPRB, 4.14656e-01_JPRB, 4.17058e-01_JPRB, 4.19475e-01_JPRB, 4.21906e-01_JPRB, &
1008	& 4.24351e-01_JPRB, 4.26809e-01_JPRB, 4.29283e-01_JPRB, 4.31770e-01_JPRB, 4.34272e-01_JPRB, &
1009	& 4.36788e-01_JPRB, 4.39319e-01_JPRB, 4.41865e-01_JPRB, 4.44426e-01_JPRB/)
1010	kbo_mn2o( 4, :, 5) = (/ &
1011	& 4.11455e-01_JPRB, 4.13077e-01_JPRB, 4.14705e-01_JPRB, 4.16340e-01_JPRB, 4.17981e-01_JPRB, &
1012	& 4.19629e-01_JPRB, 4.21283e-01_JPRB, 4.22944e-01_JPRB, 4.24611e-01_JPRB, 4.26285e-01_JPRB, &
1013	& 4.27966e-01_JPRB, 4.29653e-01_JPRB, 4.31346e-01_JPRB, 4.33047e-01_JPRB, 4.34754e-01_JPRB, &
1014	& 4.36468e-01_JPRB, 4.38188e-01_JPRB, 4.39916e-01_JPRB, 4.41650e-01_JPRB/)
1015	kbo_mn2o( 5, :, 5) = (/ &
1016	& 8.65576e-02_JPRB, 8.83622e-02_JPRB, 9.02044e-02_JPRB, 9.20850e-02_JPRB, 9.40049e-02_JPRB, &
1017	& 9.59647e-02_JPRB, 9.79655e-02_JPRB, 1.00008e-01_JPRB, 1.02093e-01_JPRB, 1.04221e-01_JPRB, &
1018	& 1.06394e-01_JPRB, 1.08612e-01_JPRB, 1.10877e-01_JPRB, 1.13188e-01_JPRB, 1.15548e-01_JPRB, &
1019	& 1.17957e-01_JPRB, 1.20417e-01_JPRB, 1.22927e-01_JPRB, 1.25490e-01_JPRB/)
1020	kbo_mn2o( 1, :, 6) = (/ &
1021	& 6.98675e-01_JPRB, 7.00999e-01_JPRB, 7.03331e-01_JPRB, 7.05671e-01_JPRB, 7.08019e-01_JPRB, &
1022	& 7.10375e-01_JPRB, 7.12738e-01_JPRB, 7.15110e-01_JPRB, 7.17489e-01_JPRB, 7.19876e-01_JPRB, &
1023	& 7.22271e-01_JPRB, 7.24674e-01_JPRB, 7.27085e-01_JPRB, 7.29504e-01_JPRB, 7.31931e-01_JPRB, &
1024	& 7.34366e-01_JPRB, 7.36809e-01_JPRB, 7.39261e-01_JPRB, 7.41720e-01_JPRB/)
1025	kbo_mn2o( 2, :, 6) = (/ &
1026	& 6.98858e-01_JPRB, 7.01424e-01_JPRB, 7.03999e-01_JPRB, 7.06583e-01_JPRB, 7.09177e-01_JPRB, &
1027	& 7.11780e-01_JPRB, 7.14393e-01_JPRB, 7.17016e-01_JPRB, 7.19648e-01_JPRB, 7.22289e-01_JPRB, &
1028	& 7.24941e-01_JPRB, 7.27602e-01_JPRB, 7.30273e-01_JPRB, 7.32954e-01_JPRB, 7.35644e-01_JPRB, &
1029	& 7.38345e-01_JPRB, 7.41055e-01_JPRB, 7.43775e-01_JPRB, 7.46506e-01_JPRB/)
1030	kbo_mn2o( 3, :, 6) = (/ &
1031	& 7.08151e-01_JPRB, 7.10727e-01_JPRB, 7.13311e-01_JPRB, 7.15905e-01_JPRB, 7.18508e-01_JPRB, &
1032	& 7.21121e-01_JPRB, 7.23743e-01_JPRB, 7.26375e-01_JPRB, 7.29017e-01_JPRB, 7.31668e-01_JPRB, &
1033	& 7.34329e-01_JPRB, 7.36999e-01_JPRB, 7.39679e-01_JPRB, 7.42369e-01_JPRB, 7.45068e-01_JPRB, &
1034	& 7.47778e-01_JPRB, 7.50497e-01_JPRB, 7.53226e-01_JPRB, 7.55965e-01_JPRB/)
1035	kbo_mn2o( 4, :, 6) = (/ &
1036	& 7.22269e-01_JPRB, 7.24981e-01_JPRB, 7.27704e-01_JPRB, 7.30437e-01_JPRB, 7.33180e-01_JPRB, &
1037	& 7.35933e-01_JPRB, 7.38697e-01_JPRB, 7.41471e-01_JPRB, 7.44256e-01_JPRB, 7.47051e-01_JPRB, &
1038	& 7.49856e-01_JPRB, 7.52672e-01_JPRB, 7.55499e-01_JPRB, 7.58336e-01_JPRB, 7.61184e-01_JPRB, &
1039	& 7.64043e-01_JPRB, 7.66912e-01_JPRB, 7.69792e-01_JPRB, 7.72683e-01_JPRB/)
1040	kbo_mn2o( 5, :, 6) = (/ &
1041	& 1.75877e-01_JPRB, 1.78578e-01_JPRB, 1.81321e-01_JPRB, 1.84107e-01_JPRB, 1.86935e-01_JPRB, &
1042	& 1.89806e-01_JPRB, 1.92722e-01_JPRB, 1.95682e-01_JPRB, 1.98688e-01_JPRB, 2.01740e-01_JPRB, &
1043	& 2.04839e-01_JPRB, 2.07986e-01_JPRB, 2.11181e-01_JPRB, 2.14425e-01_JPRB, 2.17719e-01_JPRB, &
1044	& 2.21063e-01_JPRB, 2.24459e-01_JPRB, 2.27907e-01_JPRB, 2.31408e-01_JPRB/)
1045	kbo_mn2o( 1, :, 7) = (/ &
1046	& 1.82985e+00_JPRB, 1.83684e+00_JPRB, 1.84386e+00_JPRB, 1.85091e+00_JPRB, 1.85798e+00_JPRB, &
1047	& 1.86508e+00_JPRB, 1.87221e+00_JPRB, 1.87937e+00_JPRB, 1.88655e+00_JPRB, 1.89376e+00_JPRB, &
1048	& 1.90100e+00_JPRB, 1.90827e+00_JPRB, 1.91556e+00_JPRB, 1.92288e+00_JPRB, 1.93023e+00_JPRB, &
1049	& 1.93761e+00_JPRB, 1.94502e+00_JPRB, 1.95245e+00_JPRB, 1.95991e+00_JPRB/)
1050	kbo_mn2o( 2, :, 7) = (/ &
1051	& 1.83229e+00_JPRB, 1.83943e+00_JPRB, 1.84659e+00_JPRB, 1.85379e+00_JPRB, 1.86100e+00_JPRB, &
1052	& 1.86825e+00_JPRB, 1.87553e+00_JPRB, 1.88283e+00_JPRB, 1.89016e+00_JPRB, 1.89753e+00_JPRB, &
1053	& 1.90492e+00_JPRB, 1.91233e+00_JPRB, 1.91978e+00_JPRB, 1.92726e+00_JPRB, 1.93476e+00_JPRB, &
1054	& 1.94230e+00_JPRB, 1.94986e+00_JPRB, 1.95746e+00_JPRB, 1.96508e+00_JPRB/)
1055	kbo_mn2o( 3, :, 7) = (/ &
1056	& 1.84946e+00_JPRB, 1.85707e+00_JPRB, 1.86471e+00_JPRB, 1.87238e+00_JPRB, 1.88008e+00_JPRB, &
1057	& 1.88781e+00_JPRB, 1.89558e+00_JPRB, 1.90338e+00_JPRB, 1.91120e+00_JPRB, 1.91907e+00_JPRB, &
1058	& 1.92696e+00_JPRB, 1.93489e+00_JPRB, 1.94285e+00_JPRB, 1.95084e+00_JPRB, 1.95886e+00_JPRB, &
1059	& 1.96692e+00_JPRB, 1.97501e+00_JPRB, 1.98313e+00_JPRB, 1.99129e+00_JPRB/)
1060	kbo_mn2o( 4, :, 7) = (/ &
1061	& 1.88354e+00_JPRB, 1.89167e+00_JPRB, 1.89983e+00_JPRB, 1.90803e+00_JPRB, 1.91626e+00_JPRB, &
1062	& 1.92453e+00_JPRB, 1.93283e+00_JPRB, 1.94117e+00_JPRB, 1.94955e+00_JPRB, 1.95796e+00_JPRB, &
1063	& 1.96641e+00_JPRB, 1.97489e+00_JPRB, 1.98341e+00_JPRB, 1.99197e+00_JPRB, 2.00056e+00_JPRB, &
1064	& 2.00920e+00_JPRB, 2.01787e+00_JPRB, 2.02657e+00_JPRB, 2.03532e+00_JPRB/)
1065	kbo_mn2o( 5, :, 7) = (/ &
1066	& 3.35154e-01_JPRB, 3.43258e-01_JPRB, 3.51557e-01_JPRB, 3.60058e-01_JPRB, 3.68764e-01_JPRB, &
1067	& 3.77680e-01_JPRB, 3.86812e-01_JPRB, 3.96164e-01_JPRB, 4.05743e-01_JPRB, 4.15553e-01_JPRB, &
1068	& 4.25601e-01_JPRB, 4.35892e-01_JPRB, 4.46431e-01_JPRB, 4.57225e-01_JPRB, 4.68280e-01_JPRB, &
1069	& 4.79603e-01_JPRB, 4.91199e-01_JPRB, 5.03075e-01_JPRB, 5.15239e-01_JPRB/)
1070	kbo_mn2o( 1, :, 8) = (/ &
1071	& 4.46843e+00_JPRB, 4.49793e+00_JPRB, 4.52763e+00_JPRB, 4.55752e+00_JPRB, 4.58761e+00_JPRB, &
1072	& 4.61790e+00_JPRB, 4.64839e+00_JPRB, 4.67908e+00_JPRB, 4.70997e+00_JPRB, 4.74106e+00_JPRB, &
1073	& 4.77236e+00_JPRB, 4.80387e+00_JPRB, 4.83559e+00_JPRB, 4.86751e+00_JPRB, 4.89965e+00_JPRB, &
1074	& 4.93200e+00_JPRB, 4.96456e+00_JPRB, 4.99733e+00_JPRB, 5.03033e+00_JPRB/)
1075	kbo_mn2o( 2, :, 8) = (/ &
1076	& 4.44347e+00_JPRB, 4.47278e+00_JPRB, 4.50228e+00_JPRB, 4.53198e+00_JPRB, 4.56188e+00_JPRB, &
1077	& 4.59197e+00_JPRB, 4.62227e+00_JPRB, 4.65276e+00_JPRB, 4.68345e+00_JPRB, 4.71435e+00_JPRB, &
1078	& 4.74544e+00_JPRB, 4.77675e+00_JPRB, 4.80826e+00_JPRB, 4.83998e+00_JPRB, 4.87191e+00_JPRB, &
1079	& 4.90405e+00_JPRB, 4.93640e+00_JPRB, 4.96896e+00_JPRB, 5.00174e+00_JPRB/)
1080	kbo_mn2o( 3, :, 8) = (/ &
1081	& 4.43138e+00_JPRB, 4.46017e+00_JPRB, 4.48916e+00_JPRB, 4.51834e+00_JPRB, 4.54770e+00_JPRB, &
1082	& 4.57725e+00_JPRB, 4.60700e+00_JPRB, 4.63694e+00_JPRB, 4.66708e+00_JPRB, 4.69741e+00_JPRB, &
1083	& 4.72793e+00_JPRB, 4.75866e+00_JPRB, 4.78958e+00_JPRB, 4.82071e+00_JPRB, 4.85204e+00_JPRB, &
1084	& 4.88357e+00_JPRB, 4.91531e+00_JPRB, 4.94725e+00_JPRB, 4.97941e+00_JPRB/)
1085	kbo_mn2o( 4, :, 8) = (/ &
1086	& 4.47437e+00_JPRB, 4.50396e+00_JPRB, 4.53375e+00_JPRB, 4.56374e+00_JPRB, 4.59392e+00_JPRB, &
1087	& 4.62431e+00_JPRB, 4.65490e+00_JPRB, 4.68569e+00_JPRB, 4.71668e+00_JPRB, 4.74788e+00_JPRB, &
1088	& 4.77928e+00_JPRB, 4.81089e+00_JPRB, 4.84271e+00_JPRB, 4.87474e+00_JPRB, 4.90698e+00_JPRB, &
1089	& 4.93944e+00_JPRB, 4.97211e+00_JPRB, 5.00500e+00_JPRB, 5.03810e+00_JPRB/)
1090	kbo_mn2o( 5, :, 8) = (/ &
1091	& 8.82838e-01_JPRB, 8.92257e-01_JPRB, 9.01777e-01_JPRB, 9.11398e-01_JPRB, 9.21122e-01_JPRB, &
1092	& 9.30950e-01_JPRB, 9.40883e-01_JPRB, 9.50921e-01_JPRB, 9.61067e-01_JPRB, 9.71321e-01_JPRB, &
1093	& 9.81685e-01_JPRB, 9.92159e-01_JPRB, 1.00274e+00_JPRB, 1.01344e+00_JPRB, 1.02426e+00_JPRB, &
1094	& 1.03518e+00_JPRB, 1.04623e+00_JPRB, 1.05739e+00_JPRB, 1.06867e+00_JPRB/)
1095	kbo_mn2o( 1, :, 9) = (/ &
1096	& 7.92826e+00_JPRB, 7.83168e+00_JPRB, 7.73628e+00_JPRB, 7.64204e+00_JPRB, 7.54895e+00_JPRB, &
1097	& 7.45699e+00_JPRB, 7.36616e+00_JPRB, 7.27643e+00_JPRB, 7.18779e+00_JPRB, 7.10023e+00_JPRB, &
1098	& 7.01374e+00_JPRB, 6.92831e+00_JPRB, 6.84391e+00_JPRB, 6.76054e+00_JPRB, 6.67819e+00_JPRB, &
1099	& 6.59684e+00_JPRB, 6.51648e+00_JPRB, 6.43710e+00_JPRB, 6.35869e+00_JPRB/)
1100	kbo_mn2o( 2, :, 9) = (/ &
1101	& 7.89244e+00_JPRB, 7.79570e+00_JPRB, 7.70014e+00_JPRB, 7.60576e+00_JPRB, 7.51253e+00_JPRB, &
1102	& 7.42045e+00_JPRB, 7.32949e+00_JPRB, 7.23965e+00_JPRB, 7.15091e+00_JPRB, 7.06325e+00_JPRB, &
1103	& 6.97668e+00_JPRB, 6.89116e+00_JPRB, 6.80669e+00_JPRB, 6.72326e+00_JPRB, 6.64085e+00_JPRB, &
1104	& 6.55945e+00_JPRB, 6.47904e+00_JPRB, 6.39963e+00_JPRB, 6.32118e+00_JPRB/)
1105	kbo_mn2o( 3, :, 9) = (/ &
1106	& 7.79799e+00_JPRB, 7.70076e+00_JPRB, 7.60474e+00_JPRB, 7.50991e+00_JPRB, 7.41627e+00_JPRB, &
1107	& 7.32379e+00_JPRB, 7.23247e+00_JPRB, 7.14229e+00_JPRB, 7.05323e+00_JPRB, 6.96528e+00_JPRB, &
1108	& 6.87843e+00_JPRB, 6.79266e+00_JPRB, 6.70797e+00_JPRB, 6.62432e+00_JPRB, 6.54172e+00_JPRB, &
1109	& 6.46015e+00_JPRB, 6.37960e+00_JPRB, 6.30005e+00_JPRB, 6.22150e+00_JPRB/)
1110	kbo_mn2o( 4, :, 9) = (/ &
1111	& 7.53750e+00_JPRB, 7.43715e+00_JPRB, 7.33814e+00_JPRB, 7.24045e+00_JPRB, 7.14406e+00_JPRB, &
1112	& 7.04895e+00_JPRB, 6.95510e+00_JPRB, 6.86251e+00_JPRB, 6.77115e+00_JPRB, 6.68101e+00_JPRB, &
1113	& 6.59206e+00_JPRB, 6.50430e+00_JPRB, 6.41771e+00_JPRB, 6.33227e+00_JPRB, 6.24797e+00_JPRB, &
1114	& 6.16479e+00_JPRB, 6.08272e+00_JPRB, 6.00174e+00_JPRB, 5.92184e+00_JPRB/)
1115	kbo_mn2o( 5, :, 9) = (/ &
1116	& 5.06319e+00_JPRB, 5.08595e+00_JPRB, 5.10881e+00_JPRB, 5.13177e+00_JPRB, 5.15483e+00_JPRB, &
1117	& 5.17800e+00_JPRB, 5.20127e+00_JPRB, 5.22464e+00_JPRB, 5.24813e+00_JPRB, 5.27171e+00_JPRB, &
1118	& 5.29540e+00_JPRB, 5.31920e+00_JPRB, 5.34311e+00_JPRB, 5.36712e+00_JPRB, 5.39124e+00_JPRB, &
1119	& 5.41547e+00_JPRB, 5.43981e+00_JPRB, 5.46426e+00_JPRB, 5.48882e+00_JPRB/)
1120	kbo_mn2o( 1, :,10) = (/ &
1121	& 1.05265e+00_JPRB, 1.03986e+00_JPRB, 1.02723e+00_JPRB, 1.01475e+00_JPRB, 1.00243e+00_JPRB, &
1122	& 9.90250e-01_JPRB, 9.78220e-01_JPRB, 9.66338e-01_JPRB, 9.54599e-01_JPRB, 9.43003e-01_JPRB, &
1123	& 9.31548e-01_JPRB, 9.20232e-01_JPRB, 9.09054e-01_JPRB, 8.98011e-01_JPRB, 8.87102e-01_JPRB, &
1124	& 8.76326e-01_JPRB, 8.65681e-01_JPRB, 8.55165e-01_JPRB, 8.44777e-01_JPRB/)
1125	kbo_mn2o( 2, :,10) = (/ &
1126	& 1.05246e+00_JPRB, 1.03973e+00_JPRB, 1.02714e+00_JPRB, 1.01471e+00_JPRB, 1.00243e+00_JPRB, &
1127	& 9.90303e-01_JPRB, 9.78319e-01_JPRB, 9.66480e-01_JPRB, 9.54784e-01_JPRB, 9.43230e-01_JPRB, &
1128	& 9.31815e-01_JPRB, 9.20539e-01_JPRB, 9.09399e-01_JPRB, 8.98394e-01_JPRB, 8.87522e-01_JPRB, &
1129	& 8.76782e-01_JPRB, 8.66171e-01_JPRB, 8.55690e-01_JPRB, 8.45335e-01_JPRB/)
1130	kbo_mn2o( 3, :,10) = (/ &
1131	& 1.05236e+00_JPRB, 1.03963e+00_JPRB, 1.02704e+00_JPRB, 1.01461e+00_JPRB, 1.00233e+00_JPRB, &
1132	& 9.90203e-01_JPRB, 9.78219e-01_JPRB, 9.66380e-01_JPRB, 9.54684e-01_JPRB, 9.43130e-01_JPRB, &
1133	& 9.31715e-01_JPRB, 9.20439e-01_JPRB, 9.09300e-01_JPRB, 8.98295e-01_JPRB, 8.87423e-01_JPRB, &
1134	& 8.76683e-01_JPRB, 8.66073e-01_JPRB, 8.55591e-01_JPRB, 8.45236e-01_JPRB/)
1135	kbo_mn2o( 4, :,10) = (/ &
1136	& 9.30836e-01_JPRB, 9.21099e-01_JPRB, 9.11464e-01_JPRB, 9.01930e-01_JPRB, 8.92495e-01_JPRB, &
1137	& 8.83159e-01_JPRB, 8.73921e-01_JPRB, 8.64779e-01_JPRB, 8.55733e-01_JPRB, 8.46781e-01_JPRB, &
1138	& 8.37923e-01_JPRB, 8.29158e-01_JPRB, 8.20485e-01_JPRB, 8.11902e-01_JPRB, 8.03409e-01_JPRB, &
1139	& 7.95005e-01_JPRB, 7.86689e-01_JPRB, 7.78460e-01_JPRB, 7.70316e-01_JPRB/)
1140	kbo_mn2o( 5, :,10) = (/ &
1141	& 1.65786e+01_JPRB, 1.66541e+01_JPRB, 1.67299e+01_JPRB, 1.68062e+01_JPRB, 1.68827e+01_JPRB, &
1142	& 1.69596e+01_JPRB, 1.70369e+01_JPRB, 1.71145e+01_JPRB, 1.71925e+01_JPRB, 1.72708e+01_JPRB, &
1143	& 1.73495e+01_JPRB, 1.74285e+01_JPRB, 1.75079e+01_JPRB, 1.75877e+01_JPRB, 1.76678e+01_JPRB, &
1144	& 1.77483e+01_JPRB, 1.78291e+01_JPRB, 1.79103e+01_JPRB, 1.79919e+01_JPRB/)
1145	kbo_mn2o( 1, :,11) = (/ &
1146	& 1.74239e-01_JPRB, 1.77873e-01_JPRB, 1.81583e-01_JPRB, 1.85370e-01_JPRB, 1.89236e-01_JPRB, &
1147	& 1.93182e-01_JPRB, 1.97211e-01_JPRB, 2.01324e-01_JPRB, 2.05523e-01_JPRB, 2.09809e-01_JPRB, &
1148	& 2.14185e-01_JPRB, 2.18652e-01_JPRB, 2.23212e-01_JPRB, 2.27867e-01_JPRB, 2.32620e-01_JPRB, &
1149	& 2.37471e-01_JPRB, 2.42424e-01_JPRB, 2.47479e-01_JPRB, 2.52641e-01_JPRB/)
1150	kbo_mn2o( 2, :,11) = (/ &
1151	& 1.74114e-01_JPRB, 1.77756e-01_JPRB, 1.81475e-01_JPRB, 1.85271e-01_JPRB, 1.89147e-01_JPRB, &
1152	& 1.93104e-01_JPRB, 1.97144e-01_JPRB, 2.01268e-01_JPRB, 2.05479e-01_JPRB, 2.09778e-01_JPRB, &
1153	& 2.14166e-01_JPRB, 2.18647e-01_JPRB, 2.23221e-01_JPRB, 2.27890e-01_JPRB, 2.32658e-01_JPRB, &
1154	& 2.37525e-01_JPRB, 2.42494e-01_JPRB, 2.47567e-01_JPRB, 2.52746e-01_JPRB/)
1155	kbo_mn2o( 3, :,11) = (/ &
1156	& 1.74142e-01_JPRB, 1.77780e-01_JPRB, 1.81494e-01_JPRB, 1.85286e-01_JPRB, 1.89157e-01_JPRB, &
1157	& 1.93108e-01_JPRB, 1.97143e-01_JPRB, 2.01261e-01_JPRB, 2.05466e-01_JPRB, 2.09759e-01_JPRB, &
1158	& 2.14141e-01_JPRB, 2.18615e-01_JPRB, 2.23182e-01_JPRB, 2.27845e-01_JPRB, 2.32605e-01_JPRB, &
1159	& 2.37464e-01_JPRB, 2.42425e-01_JPRB, 2.47490e-01_JPRB, 2.52661e-01_JPRB/)
1160	kbo_mn2o( 4, :,11) = (/ &
1161	& 1.74074e-01_JPRB, 1.77716e-01_JPRB, 1.81435e-01_JPRB, 1.85231e-01_JPRB, 1.89107e-01_JPRB, &
1162	& 1.93064e-01_JPRB, 1.97104e-01_JPRB, 2.01229e-01_JPRB, 2.05439e-01_JPRB, 2.09738e-01_JPRB, &
1163	& 2.14127e-01_JPRB, 2.18607e-01_JPRB, 2.23181e-01_JPRB, 2.27852e-01_JPRB, 2.32619e-01_JPRB, &
1164	& 2.37487e-01_JPRB, 2.42456e-01_JPRB, 2.47529e-01_JPRB, 2.52709e-01_JPRB/)
1165	kbo_mn2o( 5, :,11) = (/ &
1166	& 2.31905e+01_JPRB, 2.33011e+01_JPRB, 2.34123e+01_JPRB, 2.35240e+01_JPRB, 2.36362e+01_JPRB, &
1167	& 2.37489e+01_JPRB, 2.38622e+01_JPRB, 2.39760e+01_JPRB, 2.40904e+01_JPRB, 2.42053e+01_JPRB, &
1168	& 2.43208e+01_JPRB, 2.44368e+01_JPRB, 2.45533e+01_JPRB, 2.46705e+01_JPRB, 2.47881e+01_JPRB, &
1169	& 2.49064e+01_JPRB, 2.50252e+01_JPRB, 2.51446e+01_JPRB, 2.52645e+01_JPRB/)
1170	kbo_mn2o( 1, :,12) = (/ &
1171	& 1.60269e-01_JPRB, 1.62873e-01_JPRB, 1.65519e-01_JPRB, 1.68208e-01_JPRB, 1.70940e-01_JPRB, &
1172	& 1.73717e-01_JPRB, 1.76540e-01_JPRB, 1.79408e-01_JPRB, 1.82322e-01_JPRB, 1.85284e-01_JPRB, &
1173	& 1.88295e-01_JPRB, 1.91354e-01_JPRB, 1.94462e-01_JPRB, 1.97622e-01_JPRB, 2.00832e-01_JPRB, &
1174	& 2.04095e-01_JPRB, 2.07411e-01_JPRB, 2.10780e-01_JPRB, 2.14205e-01_JPRB/)
1175	kbo_mn2o( 2, :,12) = (/ &
1176	& 1.60497e-01_JPRB, 1.63096e-01_JPRB, 1.65738e-01_JPRB, 1.68422e-01_JPRB, 1.71150e-01_JPRB, &
1177	& 1.73922e-01_JPRB, 1.76738e-01_JPRB, 1.79601e-01_JPRB, 1.82510e-01_JPRB, 1.85466e-01_JPRB, &
1178	& 1.88469e-01_JPRB, 1.91522e-01_JPRB, 1.94624e-01_JPRB, 1.97776e-01_JPRB, 2.00979e-01_JPRB, &
1179	& 2.04234e-01_JPRB, 2.07542e-01_JPRB, 2.10903e-01_JPRB, 2.14319e-01_JPRB/)
1180	kbo_mn2o( 3, :,12) = (/ &
1181	& 1.60407e-01_JPRB, 1.63006e-01_JPRB, 1.65648e-01_JPRB, 1.68332e-01_JPRB, 1.71060e-01_JPRB, &
1182	& 1.73832e-01_JPRB, 1.76649e-01_JPRB, 1.79511e-01_JPRB, 1.82420e-01_JPRB, 1.85376e-01_JPRB, &
1183	& 1.88380e-01_JPRB, 1.91433e-01_JPRB, 1.94535e-01_JPRB, 1.97687e-01_JPRB, 2.00891e-01_JPRB, &
1184	& 2.04146e-01_JPRB, 2.07454e-01_JPRB, 2.10816e-01_JPRB, 2.14232e-01_JPRB/)
1185	kbo_mn2o( 4, :,12) = (/ &
1186	& 1.60475e-01_JPRB, 1.63070e-01_JPRB, 1.65706e-01_JPRB, 1.68386e-01_JPRB, 1.71109e-01_JPRB, &
1187	& 1.73876e-01_JPRB, 1.76687e-01_JPRB, 1.79544e-01_JPRB, 1.82448e-01_JPRB, 1.85398e-01_JPRB, &
1188	& 1.88396e-01_JPRB, 1.91442e-01_JPRB, 1.94538e-01_JPRB, 1.97684e-01_JPRB, 2.00881e-01_JPRB, &
1189	& 2.04129e-01_JPRB, 2.07430e-01_JPRB, 2.10784e-01_JPRB, 2.14192e-01_JPRB/)
1190	kbo_mn2o( 5, :,12) = (/ &
1191	& 3.25743e+01_JPRB, 3.27992e+01_JPRB, 3.30256e+01_JPRB, 3.32536e+01_JPRB, 3.34832e+01_JPRB, &
1192	& 3.37143e+01_JPRB, 3.39471e+01_JPRB, 3.41815e+01_JPRB, 3.44174e+01_JPRB, 3.46550e+01_JPRB, &
1193	& 3.48943e+01_JPRB, 3.51352e+01_JPRB, 3.53778e+01_JPRB, 3.56220e+01_JPRB, 3.58679e+01_JPRB, &
1194	& 3.61156e+01_JPRB, 3.63649e+01_JPRB, 3.66159e+01_JPRB, 3.68687e+01_JPRB/)
1195	kbo_mn2o( 1, :,13) = (/ &
1196	& 2.01846e-01_JPRB, 2.03110e-01_JPRB, 2.04381e-01_JPRB, 2.05660e-01_JPRB, 2.06947e-01_JPRB, &
1197	& 2.08242e-01_JPRB, 2.09546e-01_JPRB, 2.10857e-01_JPRB, 2.12177e-01_JPRB, 2.13505e-01_JPRB, &
1198	& 2.14841e-01_JPRB, 2.16186e-01_JPRB, 2.17539e-01_JPRB, 2.18900e-01_JPRB, 2.20270e-01_JPRB, &
1199	& 2.21649e-01_JPRB, 2.23036e-01_JPRB, 2.24432e-01_JPRB, 2.25837e-01_JPRB/)
1200	kbo_mn2o( 2, :,13) = (/ &
1201	& 2.01756e-01_JPRB, 2.03020e-01_JPRB, 2.04291e-01_JPRB, 2.05570e-01_JPRB, 2.06857e-01_JPRB, &
1202	& 2.08152e-01_JPRB, 2.09456e-01_JPRB, 2.10767e-01_JPRB, 2.12087e-01_JPRB, 2.13415e-01_JPRB, &
1203	& 2.14751e-01_JPRB, 2.16096e-01_JPRB, 2.17449e-01_JPRB, 2.18810e-01_JPRB, 2.20181e-01_JPRB, &
1204	& 2.21559e-01_JPRB, 2.22946e-01_JPRB, 2.24342e-01_JPRB, 2.25747e-01_JPRB/)
1205	kbo_mn2o( 3, :,13) = (/ &
1206	& 2.01836e-01_JPRB, 2.03100e-01_JPRB, 2.04371e-01_JPRB, 2.05650e-01_JPRB, 2.06937e-01_JPRB, &
1207	& 2.08232e-01_JPRB, 2.09536e-01_JPRB, 2.10847e-01_JPRB, 2.12167e-01_JPRB, 2.13495e-01_JPRB, &
1208	& 2.14831e-01_JPRB, 2.16176e-01_JPRB, 2.17529e-01_JPRB, 2.18890e-01_JPRB, 2.20260e-01_JPRB, &
1209	& 2.21639e-01_JPRB, 2.23026e-01_JPRB, 2.24422e-01_JPRB, 2.25827e-01_JPRB/)
1210	kbo_mn2o( 4, :,13) = (/ &
1211	& 2.01845e-01_JPRB, 2.03103e-01_JPRB, 2.04370e-01_JPRB, 2.05644e-01_JPRB, 2.06926e-01_JPRB, &
1212	& 2.08217e-01_JPRB, 2.09515e-01_JPRB, 2.10822e-01_JPRB, 2.12136e-01_JPRB, 2.13459e-01_JPRB, &
1213	& 2.14790e-01_JPRB, 2.16129e-01_JPRB, 2.17477e-01_JPRB, 2.18833e-01_JPRB, 2.20198e-01_JPRB, &
1214	& 2.21571e-01_JPRB, 2.22952e-01_JPRB, 2.24343e-01_JPRB, 2.25741e-01_JPRB/)
1215	kbo_mn2o( 5, :,13) = (/ &
1216	& 5.34154e+01_JPRB, 5.31954e+01_JPRB, 5.29763e+01_JPRB, 5.27582e+01_JPRB, 5.25409e+01_JPRB, &
1217	& 5.23245e+01_JPRB, 5.21090e+01_JPRB, 5.18943e+01_JPRB, 5.16806e+01_JPRB, 5.14677e+01_JPRB, &
1218	& 5.12558e+01_JPRB, 5.10446e+01_JPRB, 5.08344e+01_JPRB, 5.06250e+01_JPRB, 5.04165e+01_JPRB, &
1219	& 5.02089e+01_JPRB, 5.00021e+01_JPRB, 4.97961e+01_JPRB, 4.95910e+01_JPRB/)
1220	kbo_mn2o( 1, :,14) = (/ &
1221	& 2.87818e-02_JPRB, 3.17868e-02_JPRB, 3.51056e-02_JPRB, 3.87708e-02_JPRB, 4.28187e-02_JPRB, &
1222	& 4.72893e-02_JPRB, 5.22266e-02_JPRB, 5.76794e-02_JPRB, 6.37015e-02_JPRB, 7.03523e-02_JPRB, &
1223	& 7.76976e-02_JPRB, 8.58097e-02_JPRB, 9.47688e-02_JPRB, 1.04663e-01_JPRB, 1.15591e-01_JPRB, &
1224	& 1.27659e-01_JPRB, 1.40988e-01_JPRB, 1.55708e-01_JPRB, 1.71965e-01_JPRB/)
1225	kbo_mn2o( 2, :,14) = (/ &
1226	& 2.88500e-02_JPRB, 3.18494e-02_JPRB, 3.51606e-02_JPRB, 3.88161e-02_JPRB, 4.28517e-02_JPRB, &
1227	& 4.73068e-02_JPRB, 5.22251e-02_JPRB, 5.76547e-02_JPRB, 6.36488e-02_JPRB, 7.02661e-02_JPRB, &
1228	& 7.75714e-02_JPRB, 8.56362e-02_JPRB, 9.45395e-02_JPRB, 1.04368e-01_JPRB, 1.15219e-01_JPRB, &
1229	& 1.27198e-01_JPRB, 1.40422e-01_JPRB, 1.55021e-01_JPRB, 1.71138e-01_JPRB/)
1230	kbo_mn2o( 3, :,14) = (/ &
1231	& 2.88036e-02_JPRB, 3.18109e-02_JPRB, 3.51322e-02_JPRB, 3.88002e-02_JPRB, 4.28512e-02_JPRB, &
1232	& 4.73252e-02_JPRB, 5.22663e-02_JPRB, 5.77232e-02_JPRB, 6.37499e-02_JPRB, 7.04058e-02_JPRB, &
1233	& 7.77567e-02_JPRB, 8.58751e-02_JPRB, 9.48410e-02_JPRB, 1.04743e-01_JPRB, 1.15679e-01_JPRB, &
1234	& 1.27757e-01_JPRB, 1.41095e-01_JPRB, 1.55827e-01_JPRB, 1.72096e-01_JPRB/)
1235	kbo_mn2o( 4, :,14) = (/ &
1236	& 2.87750e-02_JPRB, 3.17783e-02_JPRB, 3.50951e-02_JPRB, 3.87580e-02_JPRB, 4.28033e-02_JPRB, &
1237	& 4.72708e-02_JPRB, 5.22046e-02_JPRB, 5.76533e-02_JPRB, 6.36707e-02_JPRB, 7.03162e-02_JPRB, &
1238	& 7.76553e-02_JPRB, 8.57604e-02_JPRB, 9.47114e-02_JPRB, 1.04597e-01_JPRB, 1.15514e-01_JPRB, &
1239	& 1.27570e-01_JPRB, 1.40885e-01_JPRB, 1.55589e-01_JPRB, 1.71829e-01_JPRB/)
1240	kbo_mn2o( 5, :,14) = (/ &
1241	& 1.11848e+02_JPRB, 1.09489e+02_JPRB, 1.07179e+02_JPRB, 1.04918e+02_JPRB, 1.02705e+02_JPRB, &
1242	& 1.00538e+02_JPRB, 9.84175e+01_JPRB, 9.63414e+01_JPRB, 9.43091e+01_JPRB, 9.23196e+01_JPRB, &
1243	& 9.03722e+01_JPRB, 8.84658e+01_JPRB, 8.65996e+01_JPRB, 8.47728e+01_JPRB, 8.29845e+01_JPRB, &
1244	& 8.12339e+01_JPRB, 7.95203e+01_JPRB, 7.78428e+01_JPRB, 7.62007e+01_JPRB/)
1245	kbo_mn2o( 1, :,15) = (/ &
1246	& 1.52234e-02_JPRB, 1.69256e-02_JPRB, 1.88181e-02_JPRB, 2.09222e-02_JPRB, 2.32617e-02_JPRB, &
1247	& 2.58626e-02_JPRB, 2.87545e-02_JPRB, 3.19696e-02_JPRB, 3.55443e-02_JPRB, 3.95187e-02_JPRB, &
1248	& 4.39374e-02_JPRB, 4.88503e-02_JPRB, 5.43124e-02_JPRB, 6.03854e-02_JPRB, 6.71373e-02_JPRB, &
1249	& 7.46443e-02_JPRB, 8.29906e-02_JPRB, 9.22701e-02_JPRB, 1.02587e-01_JPRB/)
1250	kbo_mn2o( 2, :,15) = (/ &
1251	& 1.52234e-02_JPRB, 1.69256e-02_JPRB, 1.88181e-02_JPRB, 2.09222e-02_JPRB, 2.32617e-02_JPRB, &
1252	& 2.58626e-02_JPRB, 2.87545e-02_JPRB, 3.19696e-02_JPRB, 3.55443e-02_JPRB, 3.95187e-02_JPRB, &
1253	& 4.39374e-02_JPRB, 4.88503e-02_JPRB, 5.43124e-02_JPRB, 6.03854e-02_JPRB, 6.71373e-02_JPRB, &
1254	& 7.46443e-02_JPRB, 8.29906e-02_JPRB, 9.22701e-02_JPRB, 1.02587e-01_JPRB/)
1255	kbo_mn2o( 3, :,15) = (/ &
1256	& 1.52076e-02_JPRB, 1.69049e-02_JPRB, 1.87916e-02_JPRB, 2.08890e-02_JPRB, 2.32203e-02_JPRB, &
1257	& 2.58119e-02_JPRB, 2.86928e-02_JPRB, 3.18951e-02_JPRB, 3.54549e-02_JPRB, 3.94120e-02_JPRB, &
1258	& 4.38107e-02_JPRB, 4.87003e-02_JPRB, 5.41357e-02_JPRB, 6.01777e-02_JPRB, 6.68940e-02_JPRB, &
1259	& 7.43600e-02_JPRB, 8.26593e-02_JPRB, 9.18847e-02_JPRB, 1.02140e-01_JPRB/)
1260	kbo_mn2o( 4, :,15) = (/ &
1261	& 1.52422e-02_JPRB, 1.69488e-02_JPRB, 1.88464e-02_JPRB, 2.09565e-02_JPRB, 2.33028e-02_JPRB, &
1262	& 2.59118e-02_JPRB, 2.88129e-02_JPRB, 3.20389e-02_JPRB, 3.56260e-02_JPRB, 3.96148e-02_JPRB, &
1263	& 4.40501e-02_JPRB, 4.89821e-02_JPRB, 5.44662e-02_JPRB, 6.05643e-02_JPRB, 6.73452e-02_JPRB, &
1264	& 7.48853e-02_JPRB, 8.32696e-02_JPRB, 9.25927e-02_JPRB, 1.02959e-01_JPRB/)
1265	kbo_mn2o( 5, :,15) = (/ &
1266	& 6.94782e+01_JPRB, 6.73469e+01_JPRB, 6.52810e+01_JPRB, 6.32785e+01_JPRB, 6.13373e+01_JPRB, &
1267	& 5.94558e+01_JPRB, 5.76319e+01_JPRB, 5.58640e+01_JPRB, 5.41503e+01_JPRB, 5.24892e+01_JPRB, &
1268	& 5.08791e+01_JPRB, 4.93183e+01_JPRB, 4.78055e+01_JPRB, 4.63390e+01_JPRB, 4.49175e+01_JPRB, &
1269	& 4.35396e+01_JPRB, 4.22040e+01_JPRB, 4.09094e+01_JPRB, 3.96544e+01_JPRB/)
1270	kbo_mn2o( 1, :,16) = (/ &
1271	& 1.08257e-02_JPRB, 1.15188e-02_JPRB, 1.22563e-02_JPRB, 1.30410e-02_JPRB, 1.38759e-02_JPRB, &
1272	& 1.47643e-02_JPRB, 1.57096e-02_JPRB, 1.67154e-02_JPRB, 1.77857e-02_JPRB, 1.89244e-02_JPRB, &
1273	& 2.01360e-02_JPRB, 2.14252e-02_JPRB, 2.27970e-02_JPRB, 2.42565e-02_JPRB, 2.58096e-02_JPRB, &
1274	& 2.74620e-02_JPRB, 2.92203e-02_JPRB, 3.10911e-02_JPRB, 3.30817e-02_JPRB/)
1275	kbo_mn2o( 2, :,16) = (/ &
1276	& 1.08257e-02_JPRB, 1.15188e-02_JPRB, 1.22563e-02_JPRB, 1.30410e-02_JPRB, 1.38759e-02_JPRB, &
1277	& 1.47643e-02_JPRB, 1.57096e-02_JPRB, 1.67154e-02_JPRB, 1.77857e-02_JPRB, 1.89244e-02_JPRB, &
1278	& 2.01360e-02_JPRB, 2.14252e-02_JPRB, 2.27970e-02_JPRB, 2.42565e-02_JPRB, 2.58096e-02_JPRB, &
1279	& 2.74620e-02_JPRB, 2.92203e-02_JPRB, 3.10911e-02_JPRB, 3.30817e-02_JPRB/)
1280	kbo_mn2o( 3, :,16) = (/ &
1281	& 1.08257e-02_JPRB, 1.15188e-02_JPRB, 1.22563e-02_JPRB, 1.30410e-02_JPRB, 1.38759e-02_JPRB, &
1282	& 1.47643e-02_JPRB, 1.57096e-02_JPRB, 1.67154e-02_JPRB, 1.77857e-02_JPRB, 1.89244e-02_JPRB, &
1283	& 2.01360e-02_JPRB, 2.14252e-02_JPRB, 2.27970e-02_JPRB, 2.42565e-02_JPRB, 2.58096e-02_JPRB, &
1284	& 2.74620e-02_JPRB, 2.92203e-02_JPRB, 3.10911e-02_JPRB, 3.30817e-02_JPRB/)
1285	kbo_mn2o( 4, :,16) = (/ &
1286	& 1.08263e-02_JPRB, 1.15191e-02_JPRB, 1.22562e-02_JPRB, 1.30404e-02_JPRB, 1.38749e-02_JPRB, &
1287	& 1.47627e-02_JPRB, 1.57073e-02_JPRB, 1.67124e-02_JPRB, 1.77818e-02_JPRB, 1.89196e-02_JPRB, &
1288	& 2.01302e-02_JPRB, 2.14183e-02_JPRB, 2.27888e-02_JPRB, 2.42470e-02_JPRB, 2.57986e-02_JPRB, &
1289	& 2.74494e-02_JPRB, 2.92058e-02_JPRB, 3.10746e-02_JPRB, 3.30630e-02_JPRB/)
1290	kbo_mn2o( 5, :,16) = (/ &
1291	& 4.53450e-08_JPRB, 5.75193e-08_JPRB, 7.29620e-08_JPRB, 9.25509e-08_JPRB, 1.17399e-07_JPRB, &
1292	& 1.48918e-07_JPRB, 1.88900e-07_JPRB, 2.39616e-07_JPRB, 3.03948e-07_JPRB, 3.85551e-07_JPRB, &
1293	& 4.89064e-07_JPRB, 6.20369e-07_JPRB, 7.86925e-07_JPRB, 9.98199e-07_JPRB, 1.26619e-06_JPRB, &
1294	& 1.60614e-06_JPRB, 2.03736e-06_JPRB, 2.58435e-06_JPRB, 3.27819e-06_JPRB/)
1295
1296	! The array FORREFO contains the coefficient of the water vapor
1297	! foreign-continuum (including the energy term). The first
1298	! index refers to reference temperature (296,260,224,260) and
1299	! pressure (970,475,219,3 mbar) levels. The second index
1300	! runs over the g-channel (1 to 16).
1301
1302	forrefo(1,:) = (/ &
1303	&9.0039e-04_JPRB,1.1081e-03_JPRB,1.0732e-03_JPRB,1.1881e-03_JPRB,1.2488e-03_JPRB,1.3170e-03_JPRB, &
1304	&1.3317e-03_JPRB,1.3168e-03_JPRB,1.3369e-03_JPRB,1.4228e-03_JPRB,1.5385e-03_JPRB,1.7376e-03_JPRB, &
1305	&1.7122e-03_JPRB,1.9002e-03_JPRB,1.8881e-03_JPRB,2.1595e-03_JPRB/)
1306	forrefo(2,:) = (/ &
1307	&1.2726e-03_JPRB,1.3680e-03_JPRB,1.2494e-03_JPRB,1.2049e-03_JPRB,1.2048e-03_JPRB,1.1256e-03_JPRB, &
1308	&1.1170e-03_JPRB,1.0697e-03_JPRB,1.1177e-03_JPRB,1.1883e-03_JPRB,1.2219e-03_JPRB,1.2179e-03_JPRB, &
1309	&1.5692e-03_JPRB,1.9103e-03_JPRB,2.0219e-03_JPRB,1.6937e-03_JPRB/)
1310	forrefo(3,:) = (/ &
1311	&1.5527e-03_JPRB,1.6477e-03_JPRB,1.4973e-03_JPRB,1.3400e-03_JPRB,1.0820e-03_JPRB,9.3315e-04_JPRB, &
1312	&8.8132e-04_JPRB,8.1508e-04_JPRB,8.3559e-04_JPRB,7.6492e-04_JPRB,8.2343e-04_JPRB,7.1274e-04_JPRB, &
1313	&6.6011e-04_JPRB,6.7179e-04_JPRB,6.7039e-04_JPRB,6.7021e-04_JPRB/)
1314	forrefo(4,:) = (/ &
1315	&1.6763e-03_JPRB,1.6066e-03_JPRB,1.3927e-03_JPRB,1.2087e-03_JPRB,9.8463e-04_JPRB,8.8414e-04_JPRB, &
1316	&8.0976e-04_JPRB,7.8758e-04_JPRB,7.7376e-04_JPRB,7.5785e-04_JPRB,7.4152e-04_JPRB,7.3814e-04_JPRB, &
1317	&7.4278e-04_JPRB,7.1745e-04_JPRB,6.7216e-04_JPRB,6.4097e-04_JPRB/)
1318
1319	! The array SELFREFO contains the coefficient of the water vapor
1320	! self-continuum (including the energy term). The first index
1321	! refers to temperature in 7.2 degree increments. For instance,
1322	! JT = 1 refers to a temperature of 245.6, JT = 2 refers to 252.8,
1323	! etc. The second index runs over the g-channel (1 to 16).
1324
1325	selfrefo(:, 1) = (/ &
1326	& 5.11926e-01_JPRB, 4.32863e-01_JPRB, 3.66010e-01_JPRB, 3.09482e-01_JPRB, 2.61685e-01_JPRB, &
1327	& 2.21269e-01_JPRB, 1.87096e-01_JPRB, 1.58200e-01_JPRB, 1.33767e-01_JPRB, 1.13108e-01_JPRB/)
1328	selfrefo(:, 2) = (/ &
1329	& 5.02863e-01_JPRB, 4.35008e-01_JPRB, 3.76310e-01_JPRB, 3.25532e-01_JPRB, 2.81606e-01_JPRB, &
1330	& 2.43607e-01_JPRB, 2.10736e-01_JPRB, 1.82300e-01_JPRB, 1.57701e-01_JPRB, 1.36422e-01_JPRB/)
1331	selfrefo(:, 3) = (/ &
1332	& 4.57628e-01_JPRB, 3.99663e-01_JPRB, 3.49040e-01_JPRB, 3.04829e-01_JPRB, 2.66218e-01_JPRB, &
1333	& 2.32498e-01_JPRB, 2.03049e-01_JPRB, 1.77330e-01_JPRB, 1.54869e-01_JPRB, 1.35252e-01_JPRB/)
1334	selfrefo(:, 4) = (/ &
1335	& 4.28634e-01_JPRB, 3.81736e-01_JPRB, 3.39970e-01_JPRB, 3.02773e-01_JPRB, 2.69647e-01_JPRB, &
1336	& 2.40144e-01_JPRB, 2.13870e-01_JPRB, 1.90470e-01_JPRB, 1.69630e-01_JPRB, 1.51071e-01_JPRB/)
1337	selfrefo(:, 5) = (/ &
1338	& 4.21002e-01_JPRB, 3.77493e-01_JPRB, 3.38480e-01_JPRB, 3.03499e-01_JPRB, 2.72133e-01_JPRB, &
1339	& 2.44009e-01_JPRB, 2.18792e-01_JPRB, 1.96180e-01_JPRB, 1.75905e-01_JPRB, 1.57726e-01_JPRB/)
1340	selfrefo(:, 6) = (/ &
1341	& 3.97517e-01_JPRB, 3.61167e-01_JPRB, 3.28140e-01_JPRB, 2.98133e-01_JPRB, 2.70871e-01_JPRB, &
1342	& 2.46101e-01_JPRB, 2.23597e-01_JPRB, 2.03150e-01_JPRB, 1.84573e-01_JPRB, 1.67695e-01_JPRB/)
1343	selfrefo(:, 7) = (/ &
1344	& 3.92114e-01_JPRB, 3.57554e-01_JPRB, 3.26040e-01_JPRB, 2.97304e-01_JPRB, 2.71100e-01_JPRB, &
1345	& 2.47206e-01_JPRB, 2.25418e-01_JPRB, 2.05550e-01_JPRB, 1.87433e-01_JPRB, 1.70913e-01_JPRB/)
1346	selfrefo(:, 8) = (/ &
1347	& 3.79555e-01_JPRB, 3.47264e-01_JPRB, 3.17720e-01_JPRB, 2.90690e-01_JPRB, 2.65959e-01_JPRB, &
1348	& 2.43332e-01_JPRB, 2.22631e-01_JPRB, 2.03690e-01_JPRB, 1.86361e-01_JPRB, 1.70506e-01_JPRB/)
1349	selfrefo(:, 9) = (/ &
1350	& 3.92644e-01_JPRB, 3.58048e-01_JPRB, 3.26500e-01_JPRB, 2.97732e-01_JPRB, 2.71498e-01_JPRB, &
1351	& 2.47576e-01_JPRB, 2.25762e-01_JPRB, 2.05870e-01_JPRB, 1.87731e-01_JPRB, 1.71190e-01_JPRB/)
1352	selfrefo(:,10) = (/ &
1353	& 4.06542e-01_JPRB, 3.71200e-01_JPRB, 3.38930e-01_JPRB, 3.09465e-01_JPRB, 2.82562e-01_JPRB, &
1354	& 2.57998e-01_JPRB, 2.35569e-01_JPRB, 2.15090e-01_JPRB, 1.96391e-01_JPRB, 1.79318e-01_JPRB/)
1355	selfrefo(:,11) = (/ &
1356	& 4.09672e-01_JPRB, 3.76237e-01_JPRB, 3.45530e-01_JPRB, 3.17329e-01_JPRB, 2.91430e-01_JPRB, &
1357	& 2.67645e-01_JPRB, 2.45801e-01_JPRB, 2.25740e-01_JPRB, 2.07316e-01_JPRB, 1.90396e-01_JPRB/)
1358	selfrefo(:,12) = (/ &
1359	& 3.85140e-01_JPRB, 3.61989e-01_JPRB, 3.40230e-01_JPRB, 3.19779e-01_JPRB, 3.00557e-01_JPRB, &
1360	& 2.82490e-01_JPRB, 2.65510e-01_JPRB, 2.49550e-01_JPRB, 2.34549e-01_JPRB, 2.20451e-01_JPRB/)
1361	selfrefo(:,13) = (/ &
1362	& 4.87349e-01_JPRB, 4.42192e-01_JPRB, 4.01220e-01_JPRB, 3.64044e-01_JPRB, 3.30313e-01_JPRB, &
1363	& 2.99707e-01_JPRB, 2.71937e-01_JPRB, 2.46740e-01_JPRB, 2.23878e-01_JPRB, 2.03134e-01_JPRB/)
1364	selfrefo(:,14) = (/ &
1365	& 5.64339e-01_JPRB, 5.06194e-01_JPRB, 4.54040e-01_JPRB, 4.07259e-01_JPRB, 3.65298e-01_JPRB, &
1366	& 3.27661e-01_JPRB, 2.93901e-01_JPRB, 2.63620e-01_JPRB, 2.36459e-01_JPRB, 2.12096e-01_JPRB/)
1367	selfrefo(:,15) = (/ &
1368	& 5.91123e-01_JPRB, 5.26420e-01_JPRB, 4.68800e-01_JPRB, 4.17486e-01_JPRB, 3.71790e-01_JPRB, &
1369	& 3.31095e-01_JPRB, 2.94854e-01_JPRB, 2.62580e-01_JPRB, 2.33839e-01_JPRB, 2.08243e-01_JPRB/)
1370	selfrefo(:,16) = (/ &
1371	& 5.04590e-01_JPRB, 4.65235e-01_JPRB, 4.28950e-01_JPRB, 3.95495e-01_JPRB, 3.64649e-01_JPRB, &
1372	& 3.36209e-01_JPRB, 3.09987e-01_JPRB, 2.85810e-01_JPRB, 2.63519e-01_JPRB, 2.42966e-01_JPRB/)
1373
1374
1375	IF (LHOOK) CALL DR_HOOK('RRTM_KGB3',1,ZHOOK_HANDLE)
1376	RETURN
1377
1378	1001 CONTINUE
1379	CALL ABOR1("RRTM_KGB3:ERROR READING FILE RADRRTM")
1380
1381	END SUBROUTINE RRTM_KGB3

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

Original Format