LMDZ
rrtm_kgb5_B1.F90
Go to the documentation of this file.
1 !OCL SCALAR
2 SUBROUTINE rrtm_kgb5_b1
3 
4 ! Originally by Eli J. Mlawer, Atmospheric & Environmental Research.
5 ! BAND 5: 700-820 cm-1 (low - H2O,CO2; high - O3,CO2)
6 ! Reformatted for F90 by JJMorcrette, ECMWF
7 ! Reformatted for NEC by H.Gallée , LGGE (splitting)
8 
9 ! ------------------------------------------------------------------
10 
11 #include "tsmbkind.h"
12 
13 USE yoerrto5 , ONLY : kao ,kbo ,selfrefo ,fracrefao ,&
15 USE yoerrta5 , ONLY : strrat1 ,strrat2
16 
17 ! ------------------------------------------------------------------
18 
19 
20 IMPLICIT NONE
21 
22 
23 ! The array KB contains absorption coefs for each of the 16 g-intervals
24 ! for a range of pressure levels < ~100mb, temperatures, and ratios
25 ! of O3 to CO2. The first index in the array, JS, runs from 1 to 5,
26 ! and corresponds to different O3 to CO2 ratios, as expressed through
27 ! the binary species parameter eta, defined as eta = O3/(O3+RAT*CO2),
28 ! where RAT is the ratio of the integrated line strength in the band
29 ! of co2 to that of O3. For instance, JS=1 refers to no O3 (eta = 0)
30 ! and JS = 5 corresponds to eta = 1.0. The second index, JT, which
31 ! runs from 1 to 5, corresponds to different temperatures. More
32 ! specifically, JT = 3 means that the data are for the corresponding
33 ! reference temperature TREF for this pressure level, JT = 2 refers
34 ! to the TREF-15, JT = 1 is for TREF-30, JT = 4 is for TREF+15, and
35 ! JT = 5 is for TREF+30. The third index, JP, runs from 13 to 59 and
36 ! refers to the corresponding pressure level in PREF (e.g. JP = 13 is
37 ! for a pressure of 95.5835 mb). The fourth index, IG, goes from 1 to
38 ! 16, and tells us which g-interval the absorption coefficients are for.
39 
40 kbo( :, 1,13, 1) = (/&
41 &3.4470e-06_jprb,2.6372e-04_jprb,5.1063e-04_jprb,7.5257e-04_jprb,1.0534e-03_jprb/)
42 kbo( :, 2,13, 1) = (/&
43 &4.0516e-06_jprb,3.2949e-04_jprb,6.3499e-04_jprb,9.3141e-04_jprb,1.3018e-03_jprb/)
44 kbo( :, 3,13, 1) = (/&
45 &5.1108e-06_jprb,3.9538e-04_jprb,7.5778e-04_jprb,1.1060e-03_jprb,1.5459e-03_jprb/)
46 kbo( :, 4,13, 1) = (/&
47 &6.7999e-06_jprb,4.6001e-04_jprb,8.7452e-04_jprb,1.2718e-03_jprb,1.7787e-03_jprb/)
48 kbo( :, 5,13, 1) = (/&
49 &9.3241e-06_jprb,5.2270e-04_jprb,9.8350e-04_jprb,1.4243e-03_jprb,1.9970e-03_jprb/)
50 kbo( :, 1,14, 1) = (/&
51 &2.8624e-06_jprb,2.2203e-04_jprb,4.2960e-04_jprb,6.3242e-04_jprb,8.7262e-04_jprb/)
52 kbo( :, 2,14, 1) = (/&
53 &3.3872e-06_jprb,2.7597e-04_jprb,5.3199e-04_jprb,7.7931e-04_jprb,1.0726e-03_jprb/)
54 kbo( :, 3,14, 1) = (/&
55 &4.3001e-06_jprb,3.2993e-04_jprb,6.3195e-04_jprb,9.2225e-04_jprb,1.2666e-03_jprb/)
56 kbo( :, 4,14, 1) = (/&
57 &5.7406e-06_jprb,3.8294e-04_jprb,7.2707e-04_jprb,1.0576e-03_jprb,1.4495e-03_jprb/)
58 kbo( :, 5,14, 1) = (/&
59 &7.8860e-06_jprb,4.3459e-04_jprb,8.1591e-04_jprb,1.1810e-03_jprb,1.6187e-03_jprb/)
60 kbo( :, 1,15, 1) = (/&
61 &2.3825e-06_jprb,1.8697e-04_jprb,3.6183e-04_jprb,5.3195e-04_jprb,7.2587e-04_jprb/)
62 kbo( :, 2,15, 1) = (/&
63 &2.8419e-06_jprb,2.3121e-04_jprb,4.4556e-04_jprb,6.5240e-04_jprb,8.8767e-04_jprb/)
64 kbo( :, 3,15, 1) = (/&
65 &3.6307e-06_jprb,2.7550e-04_jprb,5.2710e-04_jprb,7.6940e-04_jprb,1.0435e-03_jprb/)
66 kbo( :, 4,15, 1) = (/&
67 &4.8654e-06_jprb,3.1911e-04_jprb,6.0466e-04_jprb,8.7922e-04_jprb,1.1890e-03_jprb/)
68 kbo( :, 5,15, 1) = (/&
69 &6.6952e-06_jprb,3.6172e-04_jprb,6.7720e-04_jprb,9.7928e-04_jprb,1.3218e-03_jprb/)
70 kbo( :, 1,16, 1) = (/&
71 &1.9858e-06_jprb,1.5742e-04_jprb,3.0462e-04_jprb,4.4743e-04_jprb,6.0679e-04_jprb/)
72 kbo( :, 2,16, 1) = (/&
73 &2.3893e-06_jprb,1.9376e-04_jprb,3.7303e-04_jprb,5.4624e-04_jprb,7.3818e-04_jprb/)
74 kbo( :, 3,16, 1) = (/&
75 &3.0717e-06_jprb,2.3016e-04_jprb,4.3960e-04_jprb,6.4157e-04_jprb,8.6419e-04_jprb/)
76 kbo( :, 4,16, 1) = (/&
77 &4.1308e-06_jprb,2.6599e-04_jprb,5.0281e-04_jprb,7.3058e-04_jprb,9.8120e-04_jprb/)
78 kbo( :, 5,16, 1) = (/&
79 &5.6927e-06_jprb,3.0109e-04_jprb,5.6202e-04_jprb,8.1155e-04_jprb,1.0872e-03_jprb/)
80 kbo( :, 1,17, 1) = (/&
81 &1.6559e-06_jprb,1.3226e-04_jprb,2.5580e-04_jprb,3.7568e-04_jprb,5.0686e-04_jprb/)
82 kbo( :, 2,17, 1) = (/&
83 &2.0083e-06_jprb,1.6212e-04_jprb,3.1178e-04_jprb,4.5651e-04_jprb,6.1368e-04_jprb/)
84 kbo( :, 3,17, 1) = (/&
85 &2.5968e-06_jprb,1.9205e-04_jprb,3.6613e-04_jprb,5.3405e-04_jprb,7.1563e-04_jprb/)
86 kbo( :, 4,17, 1) = (/&
87 &3.5047e-06_jprb,2.2153e-04_jprb,4.1782e-04_jprb,6.0641e-04_jprb,8.1002e-04_jprb/)
88 kbo( :, 5,17, 1) = (/&
89 &4.8351e-06_jprb,2.5056e-04_jprb,4.6632e-04_jprb,6.7217e-04_jprb,8.9508e-04_jprb/)
90 kbo( :, 1,18, 1) = (/&
91 &1.3818e-06_jprb,1.1100e-04_jprb,2.1454e-04_jprb,3.1506e-04_jprb,4.2338e-04_jprb/)
92 kbo( :, 2,18, 1) = (/&
93 &1.6887e-06_jprb,1.3556e-04_jprb,2.6035e-04_jprb,3.8099e-04_jprb,5.1025e-04_jprb/)
94 kbo( :, 3,18, 1) = (/&
95 &2.1957e-06_jprb,1.6016e-04_jprb,3.0479e-04_jprb,4.4417e-04_jprb,5.9284e-04_jprb/)
96 kbo( :, 4,18, 1) = (/&
97 &2.9733e-06_jprb,1.8444e-04_jprb,3.4704e-04_jprb,5.0300e-04_jprb,6.6896e-04_jprb/)
98 kbo( :, 5,18, 1) = (/&
99 &4.1061e-06_jprb,2.0846e-04_jprb,3.8680e-04_jprb,5.5649e-04_jprb,7.3738e-04_jprb/)
100 kbo( :, 1,19, 1) = (/&
101 &1.1530e-06_jprb,9.3038e-05_jprb,1.7970e-04_jprb,2.6380e-04_jprb,3.5309e-04_jprb/)
102 kbo( :, 2,19, 1) = (/&
103 &1.4193e-06_jprb,1.1326e-04_jprb,2.1722e-04_jprb,3.1768e-04_jprb,4.2371e-04_jprb/)
104 kbo( :, 3,19, 1) = (/&
105 &1.8551e-06_jprb,1.3348e-04_jprb,2.5355e-04_jprb,3.6914e-04_jprb,4.9054e-04_jprb/)
106 kbo( :, 4,19, 1) = (/&
107 &2.5194e-06_jprb,1.5356e-04_jprb,2.8811e-04_jprb,4.1698e-04_jprb,5.5182e-04_jprb/)
108 kbo( :, 5,19, 1) = (/&
109 &3.4823e-06_jprb,1.7336e-04_jprb,3.2068e-04_jprb,4.6050e-04_jprb,6.0663e-04_jprb/)
110 kbo( :, 1,20, 1) = (/&
111 &9.6514e-07_jprb,7.8220e-05_jprb,1.5093e-04_jprb,2.2146e-04_jprb,2.9562e-04_jprb/)
112 kbo( :, 2,20, 1) = (/&
113 &1.1977e-06_jprb,9.4837e-05_jprb,1.8160e-04_jprb,2.6538e-04_jprb,3.5295e-04_jprb/)
114 kbo( :, 3,20, 1) = (/&
115 &1.5743e-06_jprb,1.1151e-04_jprb,2.1133e-04_jprb,3.0732e-04_jprb,4.0705e-04_jprb/)
116 kbo( :, 4,20, 1) = (/&
117 &2.1452e-06_jprb,1.2810e-04_jprb,2.3959e-04_jprb,3.4625e-04_jprb,4.5647e-04_jprb/)
118 kbo( :, 5,20, 1) = (/&
119 &2.9673e-06_jprb,1.4434e-04_jprb,2.6631e-04_jprb,3.8162e-04_jprb,5.0047e-04_jprb/)
120 kbo( :, 1,21, 1) = (/&
121 &8.0884e-07_jprb,6.5739e-05_jprb,1.2670e-04_jprb,1.8581e-04_jprb,2.4748e-04_jprb/)
122 kbo( :, 2,21, 1) = (/&
123 &1.0118e-06_jprb,7.9430e-05_jprb,1.5182e-04_jprb,2.2166e-04_jprb,2.9412e-04_jprb/)
124 kbo( :, 3,21, 1) = (/&
125 &1.3370e-06_jprb,9.3177e-05_jprb,1.7611e-04_jprb,2.5580e-04_jprb,3.3790e-04_jprb/)
126 kbo( :, 4,21, 1) = (/&
127 &1.8276e-06_jprb,1.0684e-04_jprb,1.9928e-04_jprb,2.8745e-04_jprb,3.7772e-04_jprb/)
128 kbo( :, 5,21, 1) = (/&
129 &2.5289e-06_jprb,1.2011e-04_jprb,2.2122e-04_jprb,3.1628e-04_jprb,4.1308e-04_jprb/)
130 kbo( :, 1,22, 1) = (/&
131 &6.8770e-07_jprb,5.5977e-05_jprb,1.0768e-04_jprb,1.5779e-04_jprb,2.0975e-04_jprb/)
132 kbo( :, 2,22, 1) = (/&
133 &8.7051e-07_jprb,6.7267e-05_jprb,1.2822e-04_jprb,1.8696e-04_jprb,2.4752e-04_jprb/)
134 kbo( :, 3,22, 1) = (/&
135 &1.1593e-06_jprb,7.8612e-05_jprb,1.4804e-04_jprb,2.1465e-04_jprb,2.8275e-04_jprb/)
136 kbo( :, 4,22, 1) = (/&
137 &1.5914e-06_jprb,8.9752e-05_jprb,1.6700e-04_jprb,2.4024e-04_jprb,3.1462e-04_jprb/)
138 kbo( :, 5,22, 1) = (/&
139 &2.2022e-06_jprb,1.0055e-04_jprb,1.8482e-04_jprb,2.6358e-04_jprb,3.4283e-04_jprb/)
140 kbo( :, 1,23, 1) = (/&
141 &5.8681e-07_jprb,4.7674e-05_jprb,9.1507e-05_jprb,1.3393e-04_jprb,1.7770e-04_jprb/)
142 kbo( :, 2,23, 1) = (/&
143 &7.5149e-07_jprb,5.7003e-05_jprb,1.0829e-04_jprb,1.5767e-04_jprb,2.0825e-04_jprb/)
144 kbo( :, 3,23, 1) = (/&
145 &1.0080e-06_jprb,6.6289e-05_jprb,1.2450e-04_jprb,1.8010e-04_jprb,2.3658e-04_jprb/)
146 kbo( :, 4,23, 1) = (/&
147 &1.3887e-06_jprb,7.5365e-05_jprb,1.3995e-04_jprb,2.0079e-04_jprb,2.6204e-04_jprb/)
148 kbo( :, 5,23, 1) = (/&
149 &1.9208e-06_jprb,8.4126e-05_jprb,1.5435e-04_jprb,2.1972e-04_jprb,2.8449e-04_jprb/)
150 kbo( :, 1,24, 1) = (/&
151 &5.0292e-07_jprb,4.0632e-05_jprb,7.7788e-05_jprb,1.1370e-04_jprb,1.5053e-04_jprb/)
152 kbo( :, 2,24, 1) = (/&
153 &6.5118e-07_jprb,4.8318e-05_jprb,9.1504e-05_jprb,1.3299e-04_jprb,1.7517e-04_jprb/)
154 kbo( :, 3,24, 1) = (/&
155 &8.7976e-07_jprb,5.5886e-05_jprb,1.0475e-04_jprb,1.5115e-04_jprb,1.9787e-04_jprb/)
156 kbo( :, 4,24, 1) = (/&
157 &1.2151e-06_jprb,6.3269e-05_jprb,1.1727e-04_jprb,1.6792e-04_jprb,2.1820e-04_jprb/)
158 kbo( :, 5,24, 1) = (/&
159 &1.6790e-06_jprb,7.0361e-05_jprb,1.2886e-04_jprb,1.8317e-04_jprb,2.3599e-04_jprb/)
160 kbo( :, 1,25, 1) = (/&
161 &4.3320e-07_jprb,3.4672e-05_jprb,6.6172e-05_jprb,9.6557e-05_jprb,1.2755e-04_jprb/)
162 kbo( :, 2,25, 1) = (/&
163 &5.6706e-07_jprb,4.0954e-05_jprb,7.7399e-05_jprb,1.1224e-04_jprb,1.4744e-04_jprb/)
164 kbo( :, 3,25, 1) = (/&
165 &7.7121e-07_jprb,4.7130e-05_jprb,8.8173e-05_jprb,1.2695e-04_jprb,1.6559e-04_jprb/)
166 kbo( :, 4,25, 1) = (/&
167 &1.0669e-06_jprb,5.3117e-05_jprb,9.8264e-05_jprb,1.4052e-04_jprb,1.8177e-04_jprb/)
168 kbo( :, 5,25, 1) = (/&
169 &1.4722e-06_jprb,5.8854e-05_jprb,1.0754e-04_jprb,1.5271e-04_jprb,1.9584e-04_jprb/)
170 kbo( :, 1,26, 1) = (/&
171 &3.7607e-07_jprb,2.9637e-05_jprb,5.6418e-05_jprb,8.2160e-05_jprb,1.0828e-04_jprb/)
172 kbo( :, 2,26, 1) = (/&
173 &4.9757e-07_jprb,3.4761e-05_jprb,6.5581e-05_jprb,9.4869e-05_jprb,1.2424e-04_jprb/)
174 kbo( :, 3,26, 1) = (/&
175 &6.8088e-07_jprb,3.9782e-05_jprb,7.4280e-05_jprb,1.0678e-04_jprb,1.3874e-04_jprb/)
176 kbo( :, 4,26, 1) = (/&
177 &9.4259e-07_jprb,4.4634e-05_jprb,8.2385e-05_jprb,1.1768e-04_jprb,1.5157e-04_jprb/)
178 kbo( :, 5,26, 1) = (/&
179 &1.2981e-06_jprb,4.9274e-05_jprb,8.9787e-05_jprb,1.2735e-04_jprb,1.6265e-04_jprb/)
180 kbo( :, 1,27, 1) = (/&
181 &3.2783e-07_jprb,2.5292e-05_jprb,4.8063e-05_jprb,6.9840e-05_jprb,9.1852e-05_jprb/)
182 kbo( :, 2,27, 1) = (/&
183 &4.3792e-07_jprb,2.9476e-05_jprb,5.5497e-05_jprb,8.0152e-05_jprb,1.0466e-04_jprb/)
184 kbo( :, 3,27, 1) = (/&
185 &6.0227e-07_jprb,3.3553e-05_jprb,6.2514e-05_jprb,8.9762e-05_jprb,1.1621e-04_jprb/)
186 kbo( :, 4,27, 1) = (/&
187 &8.3354e-07_jprb,3.7479e-05_jprb,6.9000e-05_jprb,9.8462e-05_jprb,1.2640e-04_jprb/)
188 kbo( :, 5,27, 1) = (/&
189 &1.1448e-06_jprb,4.1239e-05_jprb,7.4917e-05_jprb,1.0612e-04_jprb,1.3514e-04_jprb/)
190 kbo( :, 1,28, 1) = (/&
191 &2.8669e-07_jprb,2.1556e-05_jprb,4.0892e-05_jprb,5.9304e-05_jprb,7.7833e-05_jprb/)
192 kbo( :, 2,28, 1) = (/&
193 &3.8635e-07_jprb,2.4960e-05_jprb,4.6902e-05_jprb,6.7670e-05_jprb,8.8103e-05_jprb/)
194 kbo( :, 3,28, 1) = (/&
195 &5.3330e-07_jprb,2.8270e-05_jprb,5.2542e-05_jprb,7.5364e-05_jprb,9.7308e-05_jprb/)
196 kbo( :, 4,28, 1) = (/&
197 &7.3734e-07_jprb,3.1446e-05_jprb,5.7727e-05_jprb,8.2286e-05_jprb,1.0537e-04_jprb/)
198 kbo( :, 5,28, 1) = (/&
199 &1.0096e-06_jprb,3.4495e-05_jprb,6.2455e-05_jprb,8.8340e-05_jprb,1.1227e-04_jprb/)
200 kbo( :, 1,29, 1) = (/&
201 &2.5201e-07_jprb,1.8361e-05_jprb,3.4763e-05_jprb,5.0351e-05_jprb,6.5987e-05_jprb/)
202 kbo( :, 2,29, 1) = (/&
203 &3.4236e-07_jprb,2.1129e-05_jprb,3.9617e-05_jprb,5.7095e-05_jprb,7.4216e-05_jprb/)
204 kbo( :, 3,29, 1) = (/&
205 &4.7361e-07_jprb,2.3813e-05_jprb,4.4138e-05_jprb,6.3255e-05_jprb,8.1563e-05_jprb/)
206 kbo( :, 4,29, 1) = (/&
207 &6.5380e-07_jprb,2.6387e-05_jprb,4.8286e-05_jprb,6.8730e-05_jprb,8.7959e-05_jprb/)
208 kbo( :, 5,29, 1) = (/&
209 &8.9193e-07_jprb,2.8857e-05_jprb,5.2062e-05_jprb,7.3497e-05_jprb,9.3411e-05_jprb/)
210 kbo( :, 1,30, 1) = (/&
211 &2.2221e-07_jprb,1.5617e-05_jprb,2.9506e-05_jprb,4.2701e-05_jprb,5.5901e-05_jprb/)
212 kbo( :, 2,30, 1) = (/&
213 &3.0397e-07_jprb,1.7865e-05_jprb,3.3414e-05_jprb,4.8107e-05_jprb,6.2491e-05_jprb/)
214 kbo( :, 3,30, 1) = (/&
215 &4.2084e-07_jprb,2.0038e-05_jprb,3.7035e-05_jprb,5.3015e-05_jprb,6.8354e-05_jprb/)
216 kbo( :, 4,30, 1) = (/&
217 &5.7974e-07_jprb,2.2125e-05_jprb,4.0351e-05_jprb,5.7341e-05_jprb,7.3435e-05_jprb/)
218 kbo( :, 5,30, 1) = (/&
219 &7.8765e-07_jprb,2.4127e-05_jprb,4.3366e-05_jprb,6.1092e-05_jprb,7.7733e-05_jprb/)
220 kbo( :, 1,31, 1) = (/&
221 &1.9681e-07_jprb,1.3270e-05_jprb,2.5018e-05_jprb,3.6169e-05_jprb,4.7371e-05_jprb/)
222 kbo( :, 2,31, 1) = (/&
223 &2.7071e-07_jprb,1.5097e-05_jprb,2.8159e-05_jprb,4.0500e-05_jprb,5.2659e-05_jprb/)
224 kbo( :, 3,31, 1) = (/&
225 &3.7475e-07_jprb,1.6858e-05_jprb,3.1057e-05_jprb,4.4392e-05_jprb,5.7349e-05_jprb/)
226 kbo( :, 4,31, 1) = (/&
227 &5.1477e-07_jprb,1.8547e-05_jprb,3.3705e-05_jprb,4.7805e-05_jprb,6.1389e-05_jprb/)
228 kbo( :, 5,31, 1) = (/&
229 &6.9625e-07_jprb,2.0170e-05_jprb,3.6118e-05_jprb,5.0758e-05_jprb,6.4797e-05_jprb/)
230 kbo( :, 1,32, 1) = (/&
231 &1.7485e-07_jprb,1.1265e-05_jprb,2.1186e-05_jprb,3.0600e-05_jprb,4.0119e-05_jprb/)
232 kbo( :, 2,32, 1) = (/&
233 &2.4148e-07_jprb,1.2747e-05_jprb,2.3704e-05_jprb,3.4052e-05_jprb,4.4364e-05_jprb/)
234 kbo( :, 3,32, 1) = (/&
235 &3.3391e-07_jprb,1.4173e-05_jprb,2.6023e-05_jprb,3.7134e-05_jprb,4.8107e-05_jprb/)
236 kbo( :, 4,32, 1) = (/&
237 &4.5712e-07_jprb,1.5544e-05_jprb,2.8139e-05_jprb,3.9822e-05_jprb,5.1320e-05_jprb/)
238 kbo( :, 5,32, 1) = (/&
239 &6.1526e-07_jprb,1.6857e-05_jprb,3.0064e-05_jprb,4.2147e-05_jprb,5.4009e-05_jprb/)
240 kbo( :, 1,33, 1) = (/&
241 &1.5570e-07_jprb,9.5475e-06_jprb,1.7911e-05_jprb,2.5842e-05_jprb,3.3957e-05_jprb/)
242 kbo( :, 2,33, 1) = (/&
243 &2.1549e-07_jprb,1.0751e-05_jprb,1.9931e-05_jprb,2.8592e-05_jprb,3.7370e-05_jprb/)
244 kbo( :, 3,33, 1) = (/&
245 &2.9746e-07_jprb,1.1906e-05_jprb,2.1783e-05_jprb,3.1027e-05_jprb,4.0353e-05_jprb/)
246 kbo( :, 4,33, 1) = (/&
247 &4.0565e-07_jprb,1.3019e-05_jprb,2.3473e-05_jprb,3.3146e-05_jprb,4.2910e-05_jprb/)
248 kbo( :, 5,33, 1) = (/&
249 &5.4308e-07_jprb,1.4082e-05_jprb,2.5010e-05_jprb,3.4973e-05_jprb,4.5040e-05_jprb/)
250 kbo( :, 1,34, 1) = (/&
251 &1.3721e-07_jprb,8.0465e-06_jprb,1.5060e-05_jprb,2.1707e-05_jprb,2.8588e-05_jprb/)
252 kbo( :, 2,34, 1) = (/&
253 &1.9002e-07_jprb,9.0232e-06_jprb,1.6681e-05_jprb,2.3900e-05_jprb,3.1327e-05_jprb/)
254 kbo( :, 3,34, 1) = (/&
255 &2.6180e-07_jprb,9.9630e-06_jprb,1.8168e-05_jprb,2.5833e-05_jprb,3.3720e-05_jprb/)
256 kbo( :, 4,34, 1) = (/&
257 &3.5566e-07_jprb,1.0865e-05_jprb,1.9523e-05_jprb,2.7511e-05_jprb,3.5767e-05_jprb/)
258 kbo( :, 5,34, 1) = (/&
259 &4.7391e-07_jprb,1.1726e-05_jprb,2.0751e-05_jprb,2.8954e-05_jprb,3.7468e-05_jprb/)
260 kbo( :, 1,35, 1) = (/&
261 &1.1723e-07_jprb,6.6964e-06_jprb,1.2516e-05_jprb,1.8031e-05_jprb,2.3821e-05_jprb/)
262 kbo( :, 2,35, 1) = (/&
263 &1.6235e-07_jprb,7.4927e-06_jprb,1.3829e-05_jprb,1.9800e-05_jprb,2.6051e-05_jprb/)
264 kbo( :, 3,35, 1) = (/&
265 &2.2335e-07_jprb,8.2568e-06_jprb,1.5029e-05_jprb,2.1350e-05_jprb,2.8000e-05_jprb/)
266 kbo( :, 4,35, 1) = (/&
267 &3.0275e-07_jprb,8.9930e-06_jprb,1.6127e-05_jprb,2.2699e-05_jprb,2.9671e-05_jprb/)
268 kbo( :, 5,35, 1) = (/&
269 &4.0236e-07_jprb,9.6965e-06_jprb,1.7121e-05_jprb,2.3858e-05_jprb,3.1064e-05_jprb/)
270 kbo( :, 1,36, 1) = (/&
271 &9.6662e-08_jprb,5.4982e-06_jprb,1.0275e-05_jprb,1.4804e-05_jprb,1.9630e-05_jprb/)
272 kbo( :, 2,36, 1) = (/&
273 &1.3386e-07_jprb,6.1501e-06_jprb,1.1348e-05_jprb,1.6247e-05_jprb,2.1474e-05_jprb/)
274 kbo( :, 3,36, 1) = (/&
275 &1.8410e-07_jprb,6.7756e-06_jprb,1.2329e-05_jprb,1.7513e-05_jprb,2.3090e-05_jprb/)
276 kbo( :, 4,36, 1) = (/&
277 &2.4947e-07_jprb,7.3775e-06_jprb,1.3225e-05_jprb,1.8612e-05_jprb,2.4479e-05_jprb/)
278 kbo( :, 5,36, 1) = (/&
279 &3.3138e-07_jprb,7.9539e-06_jprb,1.4038e-05_jprb,1.9559e-05_jprb,2.5645e-05_jprb/)
280 kbo( :, 1,37, 1) = (/&
281 &7.5833e-08_jprb,4.4319e-06_jprb,8.2961e-06_jprb,1.1965e-05_jprb,1.5922e-05_jprb/)
282 kbo( :, 2,37, 1) = (/&
283 &1.0502e-07_jprb,4.9674e-06_jprb,9.1830e-06_jprb,1.3164e-05_jprb,1.7469e-05_jprb/)
284 kbo( :, 3,37, 1) = (/&
285 &1.4465e-07_jprb,5.4834e-06_jprb,9.9967e-06_jprb,1.4218e-05_jprb,1.8834e-05_jprb/)
286 kbo( :, 4,37, 1) = (/&
287 &1.9645e-07_jprb,5.9788e-06_jprb,1.0738e-05_jprb,1.5133e-05_jprb,2.0012e-05_jprb/)
288 kbo( :, 5,37, 1) = (/&
289 &2.6166e-07_jprb,6.4529e-06_jprb,1.1414e-05_jprb,1.5924e-05_jprb,2.1010e-05_jprb/)
290 kbo( :, 1,38, 1) = (/&
291 &5.9339e-08_jprb,3.5670e-06_jprb,6.6893e-06_jprb,9.6566e-06_jprb,1.2902e-05_jprb/)
292 kbo( :, 2,38, 1) = (/&
293 &8.2155e-08_jprb,4.0080e-06_jprb,7.4233e-06_jprb,1.0653e-05_jprb,1.4205e-05_jprb/)
294 kbo( :, 3,38, 1) = (/&
295 &1.1331e-07_jprb,4.4325e-06_jprb,8.0980e-06_jprb,1.1532e-05_jprb,1.5359e-05_jprb/)
296 kbo( :, 4,38, 1) = (/&
297 &1.5427e-07_jprb,4.8410e-06_jprb,8.7132e-06_jprb,1.2297e-05_jprb,1.6364e-05_jprb/)
298 kbo( :, 5,38, 1) = (/&
299 &2.0603e-07_jprb,5.2310e-06_jprb,9.2738e-06_jprb,1.2957e-05_jprb,1.7220e-05_jprb/)
300 kbo( :, 1,39, 1) = (/&
301 &4.6457e-08_jprb,2.8706e-06_jprb,5.3922e-06_jprb,7.7916e-06_jprb,1.0463e-05_jprb/)
302 kbo( :, 2,39, 1) = (/&
303 &6.4280e-08_jprb,3.2335e-06_jprb,5.9995e-06_jprb,8.6193e-06_jprb,1.1561e-05_jprb/)
304 kbo( :, 3,39, 1) = (/&
305 &8.8753e-08_jprb,3.5826e-06_jprb,6.5580e-06_jprb,9.3509e-06_jprb,1.2539e-05_jprb/)
306 kbo( :, 4,39, 1) = (/&
307 &1.2109e-07_jprb,3.9186e-06_jprb,7.0688e-06_jprb,9.9899e-06_jprb,1.3398e-05_jprb/)
308 kbo( :, 5,39, 1) = (/&
309 &1.6221e-07_jprb,4.2407e-06_jprb,7.5350e-06_jprb,1.0543e-05_jprb,1.4137e-05_jprb/)
310 kbo( :, 1,40, 1) = (/&
311 &3.5213e-08_jprb,2.2779e-06_jprb,4.2906e-06_jprb,6.2087e-06_jprb,8.3621e-06_jprb/)
312 kbo( :, 2,40, 1) = (/&
313 &4.8621e-08_jprb,2.5769e-06_jprb,4.7967e-06_jprb,6.9026e-06_jprb,9.2884e-06_jprb/)
314 kbo( :, 3,40, 1) = (/&
315 &6.7228e-08_jprb,2.8656e-06_jprb,5.2643e-06_jprb,7.5217e-06_jprb,1.0122e-05_jprb/)
316 kbo( :, 4,40, 1) = (/&
317 &9.2051e-08_jprb,3.1437e-06_jprb,5.6919e-06_jprb,8.0632e-06_jprb,1.0858e-05_jprb/)
318 kbo( :, 5,40, 1) = (/&
319 &1.2392e-07_jprb,3.4099e-06_jprb,6.0819e-06_jprb,8.5318e-06_jprb,1.1495e-05_jprb/)
320 kbo( :, 1,41, 1) = (/&
321 &2.6618e-08_jprb,1.8019e-06_jprb,3.4036e-06_jprb,4.9321e-06_jprb,6.6614e-06_jprb/)
322 kbo( :, 2,41, 1) = (/&
323 &3.6608e-08_jprb,2.0487e-06_jprb,3.8262e-06_jprb,5.5154e-06_jprb,7.4437e-06_jprb/)
324 kbo( :, 3,41, 1) = (/&
325 &5.0672e-08_jprb,2.2872e-06_jprb,4.2170e-06_jprb,6.0380e-06_jprb,8.1516e-06_jprb/)
326 kbo( :, 4,41, 1) = (/&
327 &6.9610e-08_jprb,2.5171e-06_jprb,4.5756e-06_jprb,6.4977e-06_jprb,8.7822e-06_jprb/)
328 kbo( :, 5,41, 1) = (/&
329 &9.4152e-08_jprb,2.7376e-06_jprb,4.9025e-06_jprb,6.8959e-06_jprb,9.3313e-06_jprb/)
330 kbo( :, 1,42, 1) = (/&
331 &2.0157e-08_jprb,1.4234e-06_jprb,2.6959e-06_jprb,3.9114e-06_jprb,5.2999e-06_jprb/)
332 kbo( :, 2,42, 1) = (/&
333 &2.7569e-08_jprb,1.6266e-06_jprb,3.0478e-06_jprb,4.4003e-06_jprb,5.9585e-06_jprb/)
334 kbo( :, 3,42, 1) = (/&
335 &3.8168e-08_jprb,1.8237e-06_jprb,3.3743e-06_jprb,4.8412e-06_jprb,6.5607e-06_jprb/)
336 kbo( :, 4,42, 1) = (/&
337 &5.2578e-08_jprb,2.0137e-06_jprb,3.6751e-06_jprb,5.2309e-06_jprb,7.1001e-06_jprb/)
338 kbo( :, 5,42, 1) = (/&
339 &7.1438e-08_jprb,2.1965e-06_jprb,3.9491e-06_jprb,5.5693e-06_jprb,7.5736e-06_jprb/)
340 kbo( :, 1,43, 1) = (/&
341 &1.5048e-08_jprb,1.1128e-06_jprb,2.1143e-06_jprb,3.0719e-06_jprb,4.1759e-06_jprb/)
342 kbo( :, 2,43, 1) = (/&
343 &2.0401e-08_jprb,1.2805e-06_jprb,2.4084e-06_jprb,3.4833e-06_jprb,4.7326e-06_jprb/)
344 kbo( :, 3,43, 1) = (/&
345 &2.8205e-08_jprb,1.4438e-06_jprb,2.6828e-06_jprb,3.8579e-06_jprb,5.2466e-06_jprb/)
346 kbo( :, 4,43, 1) = (/&
347 &3.8951e-08_jprb,1.6012e-06_jprb,2.9353e-06_jprb,4.1897e-06_jprb,5.7090e-06_jprb/)
348 kbo( :, 5,43, 1) = (/&
349 &5.3191e-08_jprb,1.7525e-06_jprb,3.1662e-06_jprb,4.4792e-06_jprb,6.1200e-06_jprb/)
350 kbo( :, 1,44, 1) = (/&
351 &1.1198e-08_jprb,8.6431e-07_jprb,1.6473e-06_jprb,2.3969e-06_jprb,3.2705e-06_jprb/)
352 kbo( :, 2,44, 1) = (/&
353 &1.5007e-08_jprb,1.0027e-06_jprb,1.8931e-06_jprb,2.7433e-06_jprb,3.7404e-06_jprb/)
354 kbo( :, 3,44, 1) = (/&
355 &2.0665e-08_jprb,1.1376e-06_jprb,2.1233e-06_jprb,3.0602e-06_jprb,4.1782e-06_jprb/)
356 kbo( :, 4,44, 1) = (/&
357 &2.8586e-08_jprb,1.2680e-06_jprb,2.3363e-06_jprb,3.3439e-06_jprb,4.5764e-06_jprb/)
358 kbo( :, 5,44, 1) = (/&
359 &3.9218e-08_jprb,1.3937e-06_jprb,2.5309e-06_jprb,3.5921e-06_jprb,4.9322e-06_jprb/)
360 kbo( :, 1,45, 1) = (/&
361 &8.3759e-09_jprb,6.6910e-07_jprb,1.2788e-06_jprb,1.8633e-06_jprb,2.5541e-06_jprb/)
362 kbo( :, 2,45, 1) = (/&
363 &1.1074e-08_jprb,7.8311e-07_jprb,1.4838e-06_jprb,2.1538e-06_jprb,2.9501e-06_jprb/)
364 kbo( :, 3,45, 1) = (/&
365 &1.5144e-08_jprb,8.9455e-07_jprb,1.6769e-06_jprb,2.4217e-06_jprb,3.3225e-06_jprb/)
366 kbo( :, 4,45, 1) = (/&
367 &2.0959e-08_jprb,1.0028e-06_jprb,1.8560e-06_jprb,2.6635e-06_jprb,3.6644e-06_jprb/)
368 kbo( :, 5,45, 1) = (/&
369 &2.8861e-08_jprb,1.1068e-06_jprb,2.0205e-06_jprb,2.8768e-06_jprb,3.9736e-06_jprb/)
370 kbo( :, 1,46, 1) = (/&
371 &6.2739e-09_jprb,5.1407e-07_jprb,9.8522e-07_jprb,1.4377e-06_jprb,1.9806e-06_jprb/)
372 kbo( :, 2,46, 1) = (/&
373 &8.1529e-09_jprb,6.0797e-07_jprb,1.1561e-06_jprb,1.6807e-06_jprb,2.3136e-06_jprb/)
374 kbo( :, 3,46, 1) = (/&
375 &1.1038e-08_jprb,7.0008e-07_jprb,1.3179e-06_jprb,1.9073e-06_jprb,2.6301e-06_jprb/)
376 kbo( :, 4,46, 1) = (/&
377 &1.5249e-08_jprb,7.8964e-07_jprb,1.4688e-06_jprb,2.1133e-06_jprb,2.9239e-06_jprb/)
378 kbo( :, 5,46, 1) = (/&
379 &2.1058e-08_jprb,8.7606e-07_jprb,1.6079e-06_jprb,2.2965e-06_jprb,3.1920e-06_jprb/)
380 kbo( :, 1,47, 1) = (/&
381 &4.6949e-09_jprb,3.8992e-07_jprb,7.4927e-07_jprb,1.0952e-06_jprb,1.5159e-06_jprb/)
382 kbo( :, 2,47, 1) = (/&
383 &5.9645e-09_jprb,4.6716e-07_jprb,8.9151e-07_jprb,1.2982e-06_jprb,1.7952e-06_jprb/)
384 kbo( :, 3,47, 1) = (/&
385 &7.9612e-09_jprb,5.4321e-07_jprb,1.0272e-06_jprb,1.4897e-06_jprb,2.0633e-06_jprb/)
386 kbo( :, 4,47, 1) = (/&
387 &1.0938e-08_jprb,6.1746e-07_jprb,1.1545e-06_jprb,1.6654e-06_jprb,2.3153e-06_jprb/)
388 kbo( :, 5,47, 1) = (/&
389 &1.5132e-08_jprb,6.8917e-07_jprb,1.2721e-06_jprb,1.8228e-06_jprb,2.5468e-06_jprb/)
390 kbo( :, 1,48, 1) = (/&
391 &3.5531e-09_jprb,2.9393e-07_jprb,5.6622e-07_jprb,8.2884e-07_jprb,1.1544e-06_jprb/)
392 kbo( :, 2,48, 1) = (/&
393 &4.3982e-09_jprb,3.5721e-07_jprb,6.8388e-07_jprb,9.9751e-07_jprb,1.3878e-06_jprb/)
394 kbo( :, 3,48, 1) = (/&
395 &5.7699e-09_jprb,4.1995e-07_jprb,7.9742e-07_jprb,1.1586e-06_jprb,1.6142e-06_jprb/)
396 kbo( :, 4,48, 1) = (/&
397 &7.8542e-09_jprb,4.8132e-07_jprb,9.0450e-07_jprb,1.3078e-06_jprb,1.8297e-06_jprb/)
398 kbo( :, 5,48, 1) = (/&
399 &1.0862e-08_jprb,5.4098e-07_jprb,1.0041e-06_jprb,1.4432e-06_jprb,2.0302e-06_jprb/)
400 kbo( :, 1,49, 1) = (/&
401 &2.7223e-09_jprb,2.2011e-07_jprb,4.2480e-07_jprb,6.2273e-07_jprb,8.7522e-07_jprb/)
402 kbo( :, 2,49, 1) = (/&
403 &3.2751e-09_jprb,2.7175e-07_jprb,5.2169e-07_jprb,7.6216e-07_jprb,1.0695e-06_jprb/)
404 kbo( :, 3,49, 1) = (/&
405 &4.2074e-09_jprb,3.2338e-07_jprb,6.1638e-07_jprb,8.9710e-07_jprb,1.2605e-06_jprb/)
406 kbo( :, 4,49, 1) = (/&
407 &5.6548e-09_jprb,3.7408e-07_jprb,7.0619e-07_jprb,1.0234e-06_jprb,1.4445e-06_jprb/)
408 kbo( :, 5,49, 1) = (/&
409 &7.7931e-09_jprb,4.2353e-07_jprb,7.9036e-07_jprb,1.1391e-06_jprb,1.6183e-06_jprb/)
410 kbo( :, 1,50, 1) = (/&
411 &2.1171e-09_jprb,1.6461e-07_jprb,3.1815e-07_jprb,4.6707e-07_jprb,6.6131e-07_jprb/)
412 kbo( :, 2,50, 1) = (/&
413 &2.4767e-09_jprb,2.0654e-07_jprb,3.9751e-07_jprb,5.8161e-07_jprb,8.2129e-07_jprb/)
414 kbo( :, 3,50, 1) = (/&
415 &3.1098e-09_jprb,2.4898e-07_jprb,4.7607e-07_jprb,6.9397e-07_jprb,9.8108e-07_jprb/)
416 kbo( :, 4,50, 1) = (/&
417 &4.1196e-09_jprb,2.9082e-07_jprb,5.5125e-07_jprb,8.0034e-07_jprb,1.1364e-06_jprb/)
418 kbo( :, 5,50, 1) = (/&
419 &5.6373e-09_jprb,3.3169e-07_jprb,6.2193e-07_jprb,8.9844e-07_jprb,1.2847e-06_jprb/)
420 kbo( :, 1,51, 1) = (/&
421 &1.6645e-09_jprb,1.2257e-07_jprb,2.3718e-07_jprb,3.4865e-07_jprb,4.9717e-07_jprb/)
422 kbo( :, 2,51, 1) = (/&
423 &1.8963e-09_jprb,1.5653e-07_jprb,3.0185e-07_jprb,4.4222e-07_jprb,6.2797e-07_jprb/)
424 kbo( :, 3,51, 1) = (/&
425 &2.3235e-09_jprb,1.9123e-07_jprb,3.6667e-07_jprb,5.3530e-07_jprb,7.6057e-07_jprb/)
426 kbo( :, 4,51, 1) = (/&
427 &3.0254e-09_jprb,2.2572e-07_jprb,4.2945e-07_jprb,6.2453e-07_jprb,8.9069e-07_jprb/)
428 kbo( :, 5,51, 1) = (/&
429 &4.0995e-09_jprb,2.5950e-07_jprb,4.8873e-07_jprb,7.0742e-07_jprb,1.0163e-06_jprb/)
430 kbo( :, 1,52, 1) = (/&
431 &1.3206e-09_jprb,9.0571e-08_jprb,1.7550e-07_jprb,2.5829e-07_jprb,3.7195e-07_jprb/)
432 kbo( :, 2,52, 1) = (/&
433 &1.4670e-09_jprb,1.1797e-07_jprb,2.2784e-07_jprb,3.3424e-07_jprb,4.7844e-07_jprb/)
434 kbo( :, 3,52, 1) = (/&
435 &1.7505e-09_jprb,1.4623e-07_jprb,2.8107e-07_jprb,4.1094e-07_jprb,5.8801e-07_jprb/)
436 kbo( :, 4,52, 1) = (/&
437 &2.2339e-09_jprb,1.7460e-07_jprb,3.3329e-07_jprb,4.8542e-07_jprb,6.9695e-07_jprb/)
438 kbo( :, 5,52, 1) = (/&
439 &2.9899e-09_jprb,2.0250e-07_jprb,3.8293e-07_jprb,5.5538e-07_jprb,8.0322e-07_jprb/)
440 kbo( :, 1,53, 1) = (/&
441 &1.0570e-09_jprb,6.6355e-08_jprb,1.2871e-07_jprb,1.8963e-07_jprb,2.7719e-07_jprb/)
442 kbo( :, 2,53, 1) = (/&
443 &1.1456e-09_jprb,8.8306e-08_jprb,1.7079e-07_jprb,2.5086e-07_jprb,3.6333e-07_jprb/)
444 kbo( :, 3,53, 1) = (/&
445 &1.3304e-09_jprb,1.1127e-07_jprb,2.1434e-07_jprb,3.1381e-07_jprb,4.5369e-07_jprb/)
446 kbo( :, 4,53, 1) = (/&
447 &1.6595e-09_jprb,1.3454e-07_jprb,2.5758e-07_jprb,3.7572e-07_jprb,5.4496e-07_jprb/)
448 kbo( :, 5,53, 1) = (/&
449 &2.1883e-09_jprb,1.5755e-07_jprb,2.9906e-07_jprb,4.3451e-07_jprb,6.3482e-07_jprb/)
450 kbo( :, 1,54, 1) = (/&
451 &8.5518e-10_jprb,4.8675e-08_jprb,9.4477e-08_jprb,1.3931e-07_jprb,2.0489e-07_jprb/)
452 kbo( :, 2,54, 1) = (/&
453 &9.0530e-10_jprb,6.6186e-08_jprb,1.2814e-07_jprb,1.8845e-07_jprb,2.7365e-07_jprb/)
454 kbo( :, 3,54, 1) = (/&
455 &1.0265e-09_jprb,8.4782e-08_jprb,1.6360e-07_jprb,2.3982e-07_jprb,3.4689e-07_jprb/)
456 kbo( :, 4,54, 1) = (/&
457 &1.2515e-09_jprb,1.0381e-07_jprb,1.9922e-07_jprb,2.9100e-07_jprb,4.2180e-07_jprb/)
458 kbo( :, 5,54, 1) = (/&
459 &1.6232e-09_jprb,1.2276e-07_jprb,2.3378e-07_jprb,3.4015e-07_jprb,4.9603e-07_jprb/)
460 kbo( :, 1,55, 1) = (/&
461 &6.9700e-10_jprb,3.5570e-08_jprb,6.9080e-08_jprb,1.0195e-07_jprb,1.4991e-07_jprb/)
462 kbo( :, 2,55, 1) = (/&
463 &7.2150e-10_jprb,4.9476e-08_jprb,9.5896e-08_jprb,1.4119e-07_jprb,2.0429e-07_jprb/)
464 kbo( :, 3,55, 1) = (/&
465 &8.0028e-10_jprb,6.4502e-08_jprb,1.2464e-07_jprb,1.8291e-07_jprb,2.6311e-07_jprb/)
466 kbo( :, 4,55, 1) = (/&
467 &9.5310e-10_jprb,8.0013e-08_jprb,1.5388e-07_jprb,2.2506e-07_jprb,3.2381e-07_jprb/)
468 kbo( :, 5,55, 1) = (/&
469 &1.2140e-09_jprb,9.5569e-08_jprb,1.8254e-07_jprb,2.6597e-07_jprb,3.8428e-07_jprb/)
470 kbo( :, 1,56, 1) = (/&
471 &5.7187e-10_jprb,2.5788e-08_jprb,5.0091e-08_jprb,7.3976e-08_jprb,1.0884e-07_jprb/)
472 kbo( :, 2,56, 1) = (/&
473 &5.7915e-10_jprb,3.6758e-08_jprb,7.1316e-08_jprb,1.0509e-07_jprb,1.5165e-07_jprb/)
474 kbo( :, 3,56, 1) = (/&
475 &6.2849e-10_jprb,4.8831e-08_jprb,9.4465e-08_jprb,1.3879e-07_jprb,1.9866e-07_jprb/)
476 kbo( :, 4,56, 1) = (/&
477 &7.3094e-10_jprb,6.1436e-08_jprb,1.1839e-07_jprb,1.7336e-07_jprb,2.4772e-07_jprb/)
478 kbo( :, 5,56, 1) = (/&
479 &9.1271e-10_jprb,7.4209e-08_jprb,1.4210e-07_jprb,2.0734e-07_jprb,2.9707e-07_jprb/)
480 kbo( :, 1,57, 1) = (/&
481 &4.7220e-10_jprb,1.8526e-08_jprb,3.5969e-08_jprb,5.3151e-08_jprb,7.8305e-08_jprb/)
482 kbo( :, 2,57, 1) = (/&
483 &4.6852e-10_jprb,2.7111e-08_jprb,5.2630e-08_jprb,7.7619e-08_jprb,1.1181e-07_jprb/)
484 kbo( :, 3,57, 1) = (/&
485 &4.9708e-10_jprb,3.6762e-08_jprb,7.1191e-08_jprb,1.0471e-07_jprb,1.4926e-07_jprb/)
486 kbo( :, 4,57, 1) = (/&
487 &5.6499e-10_jprb,4.6985e-08_jprb,9.0692e-08_jprb,1.3297e-07_jprb,1.8882e-07_jprb/)
488 kbo( :, 5,57, 1) = (/&
489 &6.9035e-10_jprb,5.7429e-08_jprb,1.1024e-07_jprb,1.6105e-07_jprb,2.2899e-07_jprb/)
490 kbo( :, 1,58, 1) = (/&
491 &3.9157e-10_jprb,1.3270e-08_jprb,2.5747e-08_jprb,3.8061e-08_jprb,5.5988e-08_jprb/)
492 kbo( :, 2,58, 1) = (/&
493 &3.8162e-10_jprb,1.9958e-08_jprb,3.8768e-08_jprb,5.7217e-08_jprb,8.2152e-08_jprb/)
494 kbo( :, 3,58, 1) = (/&
495 &3.9640e-10_jprb,2.7646e-08_jprb,5.3592e-08_jprb,7.8902e-08_jprb,1.1187e-07_jprb/)
496 kbo( :, 4,58, 1) = (/&
497 &4.4118e-10_jprb,3.5913e-08_jprb,6.9407e-08_jprb,1.0187e-07_jprb,1.4365e-07_jprb/)
498 kbo( :, 5,58, 1) = (/&
499 &5.2734e-10_jprb,4.4431e-08_jprb,8.5459e-08_jprb,1.2500e-07_jprb,1.7617e-07_jprb/)
500 kbo( :, 1,59, 1) = (/&
501 &3.2257e-10_jprb,1.0274e-08_jprb,1.9927e-08_jprb,2.9461e-08_jprb,4.2293e-08_jprb/)
502 kbo( :, 2,59, 1) = (/&
503 &3.1226e-10_jprb,1.5633e-08_jprb,3.0371e-08_jprb,4.4840e-08_jprb,6.3166e-08_jprb/)
504 kbo( :, 3,59, 1) = (/&
505 &3.2148e-10_jprb,2.1846e-08_jprb,4.2369e-08_jprb,6.2405e-08_jprb,8.6964e-08_jprb/)
506 kbo( :, 4,59, 1) = (/&
507 &3.5488e-10_jprb,2.8579e-08_jprb,5.5262e-08_jprb,8.1150e-08_jprb,1.1238e-07_jprb/)
508 kbo( :, 5,59, 1) = (/&
509 &4.2035e-10_jprb,3.5535e-08_jprb,6.8411e-08_jprb,1.0012e-07_jprb,1.3828e-07_jprb/)
510 kbo( :, 1,13, 2) = (/&
511 &8.0175e-06_jprb,1.6125e-03_jprb,3.1478e-03_jprb,4.6753e-03_jprb,6.4316e-03_jprb/)
512 kbo( :, 2,13, 2) = (/&
513 &1.0426e-05_jprb,1.8783e-03_jprb,3.6140e-03_jprb,5.3229e-03_jprb,7.3431e-03_jprb/)
514 kbo( :, 3,13, 2) = (/&
515 &1.4927e-05_jprb,2.1311e-03_jprb,4.0477e-03_jprb,5.8993e-03_jprb,8.1260e-03_jprb/)
516 kbo( :, 4,13, 2) = (/&
517 &2.2809e-05_jprb,2.3738e-03_jprb,4.4493e-03_jprb,6.4056e-03_jprb,8.7767e-03_jprb/)
518 kbo( :, 5,13, 2) = (/&
519 &3.5487e-05_jprb,2.6072e-03_jprb,4.8181e-03_jprb,6.8488e-03_jprb,9.2993e-03_jprb/)
520 kbo( :, 1,14, 2) = (/&
521 &6.7524e-06_jprb,1.3623e-03_jprb,2.6470e-03_jprb,3.9213e-03_jprb,5.3373e-03_jprb/)
522 kbo( :, 2,14, 2) = (/&
523 &8.8908e-06_jprb,1.5796e-03_jprb,3.0298e-03_jprb,4.4457e-03_jprb,6.0495e-03_jprb/)
524 kbo( :, 3,14, 2) = (/&
525 &1.2884e-05_jprb,1.7866e-03_jprb,3.3866e-03_jprb,4.9144e-03_jprb,6.6539e-03_jprb/)
526 kbo( :, 4,14, 2) = (/&
527 &1.9813e-05_jprb,1.9855e-03_jprb,3.7147e-03_jprb,5.3297e-03_jprb,7.1488e-03_jprb/)
528 kbo( :, 5,14, 2) = (/&
529 &3.0910e-05_jprb,2.1779e-03_jprb,4.0162e-03_jprb,5.6950e-03_jprb,7.5412e-03_jprb/)
530 kbo( :, 1,15, 2) = (/&
531 &5.7112e-06_jprb,1.1474e-03_jprb,2.2216e-03_jprb,3.2811e-03_jprb,4.4313e-03_jprb/)
532 kbo( :, 2,15, 2) = (/&
533 &7.6208e-06_jprb,1.3247e-03_jprb,2.5364e-03_jprb,3.7071e-03_jprb,4.9919e-03_jprb/)
534 kbo( :, 3,15, 2) = (/&
535 &1.1171e-05_jprb,1.4944e-03_jprb,2.8273e-03_jprb,4.0906e-03_jprb,5.4623e-03_jprb/)
536 kbo( :, 4,15, 2) = (/&
537 &1.7286e-05_jprb,1.6573e-03_jprb,3.0948e-03_jprb,4.4313e-03_jprb,5.8428e-03_jprb/)
538 kbo( :, 5,15, 2) = (/&
539 &2.7064e-05_jprb,1.8170e-03_jprb,3.3404e-03_jprb,4.7290e-03_jprb,6.1397e-03_jprb/)
540 kbo( :, 1,16, 2) = (/&
541 &4.8419e-06_jprb,9.6341e-04_jprb,1.8620e-03_jprb,2.7407e-03_jprb,3.6858e-03_jprb/)
542 kbo( :, 2,16, 2) = (/&
543 &6.5431e-06_jprb,1.1085e-03_jprb,2.1191e-03_jprb,3.0886e-03_jprb,4.1319e-03_jprb/)
544 kbo( :, 3,16, 2) = (/&
545 &9.6991e-06_jprb,1.2471e-03_jprb,2.3556e-03_jprb,3.4027e-03_jprb,4.5021e-03_jprb/)
546 kbo( :, 4,16, 2) = (/&
547 &1.5112e-05_jprb,1.3813e-03_jprb,2.5735e-03_jprb,3.6791e-03_jprb,4.7992e-03_jprb/)
548 kbo( :, 5,16, 2) = (/&
549 &2.3687e-05_jprb,1.5146e-03_jprb,2.7739e-03_jprb,3.9205e-03_jprb,5.0294e-03_jprb/)
550 kbo( :, 1,17, 2) = (/&
551 &4.1046e-06_jprb,8.0658e-04_jprb,1.5568e-03_jprb,2.2850e-03_jprb,3.0607e-03_jprb/)
552 kbo( :, 2,17, 2) = (/&
553 &5.6128e-06_jprb,9.2491e-04_jprb,1.7657e-03_jprb,2.5701e-03_jprb,3.4165e-03_jprb/)
554 kbo( :, 3,17, 2) = (/&
555 &8.4118e-06_jprb,1.0386e-03_jprb,1.9589e-03_jprb,2.8258e-03_jprb,3.7101e-03_jprb/)
556 kbo( :, 4,17, 2) = (/&
557 &1.3163e-05_jprb,1.1499e-03_jprb,2.1360e-03_jprb,3.0493e-03_jprb,3.9433e-03_jprb/)
558 kbo( :, 5,17, 2) = (/&
559 &2.0607e-05_jprb,1.2605e-03_jprb,2.3001e-03_jprb,3.2445e-03_jprb,4.1227e-03_jprb/)
560 kbo( :, 1,18, 2) = (/&
561 &3.4787e-06_jprb,6.7375e-04_jprb,1.2987e-03_jprb,1.9033e-03_jprb,2.5394e-03_jprb/)
562 kbo( :, 2,18, 2) = (/&
563 &4.8193e-06_jprb,7.7048e-04_jprb,1.4690e-03_jprb,2.1362e-03_jprb,2.8237e-03_jprb/)
564 kbo( :, 3,18, 2) = (/&
565 &7.2913e-06_jprb,8.6393e-04_jprb,1.6256e-03_jprb,2.3423e-03_jprb,3.0558e-03_jprb/)
566 kbo( :, 4,18, 2) = (/&
567 &1.1432e-05_jprb,9.5623e-04_jprb,1.7704e-03_jprb,2.5237e-03_jprb,3.2404e-03_jprb/)
568 kbo( :, 5,18, 2) = (/&
569 &1.7868e-05_jprb,1.0481e-03_jprb,1.9053e-03_jprb,2.6812e-03_jprb,3.3808e-03_jprb/)
570 kbo( :, 1,19, 2) = (/&
571 &2.9467e-06_jprb,5.6177e-04_jprb,1.0818e-03_jprb,1.5840e-03_jprb,2.1035e-03_jprb/)
572 kbo( :, 2,19, 2) = (/&
573 &4.1364e-06_jprb,6.4090e-04_jprb,1.2199e-03_jprb,1.7723e-03_jprb,2.3300e-03_jprb/)
574 kbo( :, 3,19, 2) = (/&
575 &6.2999e-06_jprb,7.1829e-04_jprb,1.3476e-03_jprb,1.9398e-03_jprb,2.5147e-03_jprb/)
576 kbo( :, 4,19, 2) = (/&
577 &9.8879e-06_jprb,7.9456e-04_jprb,1.4667e-03_jprb,2.0867e-03_jprb,2.6608e-03_jprb/)
578 kbo( :, 5,19, 2) = (/&
579 &1.5425e-05_jprb,8.7102e-04_jprb,1.5773e-03_jprb,2.2143e-03_jprb,2.7707e-03_jprb/)
580 kbo( :, 1,20, 2) = (/&
581 &2.5100e-06_jprb,4.6893e-04_jprb,9.0169e-04_jprb,1.3192e-03_jprb,1.7452e-03_jprb/)
582 kbo( :, 2,20, 2) = (/&
583 &3.5701e-06_jprb,5.3398e-04_jprb,1.0139e-03_jprb,1.4717e-03_jprb,1.9261e-03_jprb/)
584 kbo( :, 3,20, 2) = (/&
585 &5.4715e-06_jprb,5.9772e-04_jprb,1.1181e-03_jprb,1.6068e-03_jprb,2.0724e-03_jprb/)
586 kbo( :, 4,20, 2) = (/&
587 &8.5950e-06_jprb,6.6090e-04_jprb,1.2157e-03_jprb,1.7253e-03_jprb,2.1875e-03_jprb/)
588 kbo( :, 5,20, 2) = (/&
589 &1.3366e-05_jprb,7.2450e-04_jprb,1.3064e-03_jprb,1.8293e-03_jprb,2.2741e-03_jprb/)
590 kbo( :, 1,21, 2) = (/&
591 &2.1419e-06_jprb,3.9129e-04_jprb,7.5108e-04_jprb,1.0978e-03_jprb,1.4477e-03_jprb/)
592 kbo( :, 2,21, 2) = (/&
593 &3.0823e-06_jprb,4.4480e-04_jprb,8.4226e-04_jprb,1.2211e-03_jprb,1.5919e-03_jprb/)
594 kbo( :, 3,21, 2) = (/&
595 &4.7515e-06_jprb,4.9734e-04_jprb,9.2759e-04_jprb,1.3300e-03_jprb,1.7080e-03_jprb/)
596 kbo( :, 4,21, 2) = (/&
597 &7.4611e-06_jprb,5.4971e-04_jprb,1.0075e-03_jprb,1.4263e-03_jprb,1.7988e-03_jprb/)
598 kbo( :, 5,21, 2) = (/&
599 &1.1567e-05_jprb,6.0267e-04_jprb,1.0819e-03_jprb,1.5108e-03_jprb,1.8668e-03_jprb/)
600 kbo( :, 1,22, 2) = (/&
601 &1.8692e-06_jprb,3.2930e-04_jprb,6.3020e-04_jprb,9.1986e-04_jprb,1.2087e-03_jprb/)
602 kbo( :, 2,22, 2) = (/&
603 &2.7364e-06_jprb,3.7324e-04_jprb,7.0426e-04_jprb,1.0187e-03_jprb,1.3222e-03_jprb/)
604 kbo( :, 3,22, 2) = (/&
605 &4.2483e-06_jprb,4.1663e-04_jprb,7.7378e-04_jprb,1.1062e-03_jprb,1.4133e-03_jprb/)
606 kbo( :, 4,22, 2) = (/&
607 &6.6614e-06_jprb,4.6001e-04_jprb,8.3899e-04_jprb,1.1837e-03_jprb,1.4836e-03_jprb/)
608 kbo( :, 5,22, 2) = (/&
609 &1.0283e-05_jprb,5.0444e-04_jprb,8.9986e-04_jprb,1.2517e-03_jprb,1.5358e-03_jprb/)
610 kbo( :, 1,23, 2) = (/&
611 &1.6399e-06_jprb,2.7719e-04_jprb,5.2862e-04_jprb,7.7027e-04_jprb,1.0088e-03_jprb/)
612 kbo( :, 2,23, 2) = (/&
613 &2.4391e-06_jprb,3.1328e-04_jprb,5.8895e-04_jprb,8.4951e-04_jprb,1.0980e-03_jprb/)
614 kbo( :, 3,23, 2) = (/&
615 &3.8063e-06_jprb,3.4908e-04_jprb,6.4555e-04_jprb,9.1997e-04_jprb,1.1688e-03_jprb/)
616 kbo( :, 4,23, 2) = (/&
617 &5.9548e-06_jprb,3.8523e-04_jprb,6.9879e-04_jprb,9.8233e-04_jprb,1.2233e-03_jprb/)
618 kbo( :, 5,23, 2) = (/&
619 &9.1467e-06_jprb,4.2262e-04_jprb,7.4870e-04_jprb,1.0371e-03_jprb,1.2635e-03_jprb/)
620 kbo( :, 1,24, 2) = (/&
621 &1.4486e-06_jprb,2.3343e-04_jprb,4.4362e-04_jprb,6.4490e-04_jprb,8.4150e-04_jprb/)
622 kbo( :, 2,24, 2) = (/&
623 &2.1847e-06_jprb,2.6312e-04_jprb,4.9268e-04_jprb,7.0858e-04_jprb,9.1131e-04_jprb/)
624 kbo( :, 3,24, 2) = (/&
625 &3.4199e-06_jprb,2.9273e-04_jprb,5.3880e-04_jprb,7.6525e-04_jprb,9.6646e-04_jprb/)
626 kbo( :, 4,24, 2) = (/&
627 &5.3366e-06_jprb,3.2305e-04_jprb,5.8221e-04_jprb,8.1539e-04_jprb,1.0083e-03_jprb/)
628 kbo( :, 5,24, 2) = (/&
629 &8.1557e-06_jprb,3.5422e-04_jprb,6.2350e-04_jprb,8.5963e-04_jprb,1.0390e-03_jprb/)
630 kbo( :, 1,25, 2) = (/&
631 &1.2896e-06_jprb,1.9674e-04_jprb,3.7250e-04_jprb,5.4009e-04_jprb,7.0204e-04_jprb/)
632 kbo( :, 2,25, 2) = (/&
633 &1.9685e-06_jprb,2.2117e-04_jprb,4.1236e-04_jprb,5.9119e-04_jprb,7.5627e-04_jprb/)
634 kbo( :, 3,25, 2) = (/&
635 &3.0862e-06_jprb,2.4587e-04_jprb,4.4997e-04_jprb,6.3678e-04_jprb,7.9915e-04_jprb/)
636 kbo( :, 4,25, 2) = (/&
637 &4.8005e-06_jprb,2.7122e-04_jprb,4.8550e-04_jprb,6.7707e-04_jprb,8.3122e-04_jprb/)
638 kbo( :, 5,25, 2) = (/&
639 &7.2939e-06_jprb,2.9701e-04_jprb,5.1977e-04_jprb,7.1279e-04_jprb,8.5451e-04_jprb/)
640 kbo( :, 1,26, 2) = (/&
641 &1.1608e-06_jprb,1.6612e-04_jprb,3.1323e-04_jprb,4.5281e-04_jprb,5.8594e-04_jprb/)
642 kbo( :, 2,26, 2) = (/&
643 &1.7905e-06_jprb,1.8633e-04_jprb,3.4562e-04_jprb,4.9378e-04_jprb,6.2806e-04_jprb/)
644 kbo( :, 3,26, 2) = (/&
645 &2.8083e-06_jprb,2.0700e-04_jprb,3.7628e-04_jprb,5.3030e-04_jprb,6.6095e-04_jprb/)
646 kbo( :, 4,26, 2) = (/&
647 &4.3494e-06_jprb,2.2796e-04_jprb,4.0557e-04_jprb,5.6268e-04_jprb,6.8538e-04_jprb/)
648 kbo( :, 5,26, 2) = (/&
649 &6.5643e-06_jprb,2.4920e-04_jprb,4.3382e-04_jprb,5.9177e-04_jprb,7.0285e-04_jprb/)
650 kbo( :, 1,27, 2) = (/&
651 &1.0500e-06_jprb,1.4026e-04_jprb,2.6331e-04_jprb,3.7943e-04_jprb,4.8869e-04_jprb/)
652 kbo( :, 2,27, 2) = (/&
653 &1.6326e-06_jprb,1.5709e-04_jprb,2.8964e-04_jprb,4.1228e-04_jprb,5.2142e-04_jprb/)
654 kbo( :, 3,27, 2) = (/&
655 &2.5571e-06_jprb,1.7422e-04_jprb,3.1477e-04_jprb,4.4154e-04_jprb,5.4660e-04_jprb/)
656 kbo( :, 4,27, 2) = (/&
657 &3.9402e-06_jprb,1.9156e-04_jprb,3.3894e-04_jprb,4.6764e-04_jprb,5.6523e-04_jprb/)
658 kbo( :, 5,27, 2) = (/&
659 &5.9052e-06_jprb,2.0883e-04_jprb,3.6207e-04_jprb,4.9151e-04_jprb,5.7833e-04_jprb/)
660 kbo( :, 1,28, 2) = (/&
661 &9.5343e-07_jprb,1.1844e-04_jprb,2.2122e-04_jprb,3.1775e-04_jprb,4.0735e-04_jprb/)
662 kbo( :, 2,28, 2) = (/&
663 &1.4904e-06_jprb,1.3245e-04_jprb,2.4271e-04_jprb,3.4408e-04_jprb,4.3267e-04_jprb/)
664 kbo( :, 3,28, 2) = (/&
665 &2.3285e-06_jprb,1.4658e-04_jprb,2.6343e-04_jprb,3.6757e-04_jprb,4.5198e-04_jprb/)
666 kbo( :, 4,28, 2) = (/&
667 &3.5672e-06_jprb,1.6074e-04_jprb,2.8315e-04_jprb,3.8877e-04_jprb,4.6611e-04_jprb/)
668 kbo( :, 5,28, 2) = (/&
669 &5.3086e-06_jprb,1.7472e-04_jprb,3.0190e-04_jprb,4.0830e-04_jprb,4.7586e-04_jprb/)
670 kbo( :, 1,29, 2) = (/&
671 &8.7130e-07_jprb,1.0013e-04_jprb,1.8593e-04_jprb,2.6607e-04_jprb,3.3959e-04_jprb/)
672 kbo( :, 2,29, 2) = (/&
673 &1.3662e-06_jprb,1.1169e-04_jprb,2.0357e-04_jprb,2.8717e-04_jprb,3.5915e-04_jprb/)
674 kbo( :, 3,29, 2) = (/&
675 &2.1272e-06_jprb,1.2329e-04_jprb,2.2053e-04_jprb,3.0613e-04_jprb,3.7392e-04_jprb/)
676 kbo( :, 4,29, 2) = (/&
677 &3.2367e-06_jprb,1.3475e-04_jprb,2.3655e-04_jprb,3.2340e-04_jprb,3.8475e-04_jprb/)
678 kbo( :, 5,29, 2) = (/&
679 &4.7798e-06_jprb,1.4613e-04_jprb,2.5163e-04_jprb,3.3924e-04_jprb,3.9199e-04_jprb/)
680 kbo( :, 1,30, 2) = (/&
681 &7.9857e-07_jprb,8.4615e-05_jprb,1.5625e-04_jprb,2.2266e-04_jprb,2.8295e-04_jprb/)
682 kbo( :, 2,30, 2) = (/&
683 &1.2528e-06_jprb,9.4125e-05_jprb,1.7078e-04_jprb,2.3961e-04_jprb,2.9806e-04_jprb/)
684 kbo( :, 3,30, 2) = (/&
685 &1.9419e-06_jprb,1.0355e-04_jprb,1.8452e-04_jprb,2.5499e-04_jprb,3.0943e-04_jprb/)
686 kbo( :, 4,30, 2) = (/&
687 &2.9342e-06_jprb,1.1289e-04_jprb,1.9751e-04_jprb,2.6906e-04_jprb,3.1766e-04_jprb/)
688 kbo( :, 5,30, 2) = (/&
689 &4.2987e-06_jprb,1.2210e-04_jprb,2.0947e-04_jprb,2.8172e-04_jprb,3.2307e-04_jprb/)
690 kbo( :, 1,31, 2) = (/&
691 &7.3491e-07_jprb,7.1470e-05_jprb,1.3139e-04_jprb,1.8630e-04_jprb,2.3588e-04_jprb/)
692 kbo( :, 2,31, 2) = (/&
693 &1.1514e-06_jprb,7.9261e-05_jprb,1.4322e-04_jprb,1.9997e-04_jprb,2.4758e-04_jprb/)
694 kbo( :, 3,31, 2) = (/&
695 &1.7751e-06_jprb,8.6934e-05_jprb,1.5438e-04_jprb,2.1250e-04_jprb,2.5633e-04_jprb/)
696 kbo( :, 4,31, 2) = (/&
697 &2.6619e-06_jprb,9.4503e-05_jprb,1.6470e-04_jprb,2.2379e-04_jprb,2.6262e-04_jprb/)
698 kbo( :, 5,31, 2) = (/&
699 &3.8682e-06_jprb,1.0203e-04_jprb,1.7422e-04_jprb,2.3379e-04_jprb,2.6667e-04_jprb/)
700 kbo( :, 1,32, 2) = (/&
701 &6.7761e-07_jprb,6.0344e-05_jprb,1.1046e-04_jprb,1.5585e-04_jprb,1.9661e-04_jprb/)
702 kbo( :, 2,32, 2) = (/&
703 &1.0588e-06_jprb,6.6689e-05_jprb,1.2006e-04_jprb,1.6697e-04_jprb,2.0563e-04_jprb/)
704 kbo( :, 3,32, 2) = (/&
705 &1.6222e-06_jprb,7.2918e-05_jprb,1.2900e-04_jprb,1.7702e-04_jprb,2.1238e-04_jprb/)
706 kbo( :, 4,32, 2) = (/&
707 &2.4128e-06_jprb,7.9073e-05_jprb,1.3719e-04_jprb,1.8602e-04_jprb,2.1720e-04_jprb/)
708 kbo( :, 5,32, 2) = (/&
709 &3.4779e-06_jprb,8.5263e-05_jprb,1.4481e-04_jprb,1.9388e-04_jprb,2.2025e-04_jprb/)
710 kbo( :, 1,33, 2) = (/&
711 &6.2527e-07_jprb,5.0902e-05_jprb,9.2812e-05_jprb,1.3037e-04_jprb,1.6382e-04_jprb/)
712 kbo( :, 2,33, 2) = (/&
713 &9.7334e-07_jprb,5.6048e-05_jprb,1.0055e-04_jprb,1.3935e-04_jprb,1.7082e-04_jprb/)
714 kbo( :, 3,33, 2) = (/&
715 &1.4801e-06_jprb,6.1101e-05_jprb,1.0766e-04_jprb,1.4740e-04_jprb,1.7611e-04_jprb/)
716 kbo( :, 4,33, 2) = (/&
717 &2.1838e-06_jprb,6.6144e-05_jprb,1.1420e-04_jprb,1.5452e-04_jprb,1.7978e-04_jprb/)
718 kbo( :, 5,33, 2) = (/&
719 &3.1224e-06_jprb,7.1225e-05_jprb,1.2030e-04_jprb,1.6062e-04_jprb,1.8204e-04_jprb/)
720 kbo( :, 1,34, 2) = (/&
721 &5.6731e-07_jprb,4.2730e-05_jprb,7.7685e-05_jprb,1.0877e-04_jprb,1.3615e-04_jprb/)
722 kbo( :, 2,34, 2) = (/&
723 &8.7950e-07_jprb,4.6905e-05_jprb,8.3883e-05_jprb,1.1598e-04_jprb,1.4163e-04_jprb/)
724 kbo( :, 3,34, 2) = (/&
725 &1.3287e-06_jprb,5.1034e-05_jprb,8.9565e-05_jprb,1.2242e-04_jprb,1.4574e-04_jprb/)
726 kbo( :, 4,34, 2) = (/&
727 &1.9464e-06_jprb,5.5143e-05_jprb,9.4797e-05_jprb,1.2801e-04_jprb,1.4856e-04_jprb/)
728 kbo( :, 5,34, 2) = (/&
729 &2.7640e-06_jprb,5.9346e-05_jprb,9.9732e-05_jprb,1.3280e-04_jprb,1.5030e-04_jprb/)
730 kbo( :, 1,35, 2) = (/&
731 &4.9270e-07_jprb,3.5501e-05_jprb,6.4454e-05_jprb,9.0102e-05_jprb,1.1262e-04_jprb/)
732 kbo( :, 2,35, 2) = (/&
733 &7.6173e-07_jprb,3.8902e-05_jprb,6.9450e-05_jprb,9.5970e-05_jprb,1.1707e-04_jprb/)
734 kbo( :, 3,35, 2) = (/&
735 &1.1464e-06_jprb,4.2272e-05_jprb,7.4027e-05_jprb,1.0112e-04_jprb,1.2036e-04_jprb/)
736 kbo( :, 4,35, 2) = (/&
737 &1.6726e-06_jprb,4.5640e-05_jprb,7.8266e-05_jprb,1.0556e-04_jprb,1.2264e-04_jprb/)
738 kbo( :, 5,35, 2) = (/&
739 &2.3658e-06_jprb,4.9091e-05_jprb,8.2279e-05_jprb,1.0938e-04_jprb,1.2407e-04_jprb/)
740 kbo( :, 1,36, 2) = (/&
741 &4.0753e-07_jprb,2.9178e-05_jprb,5.2991e-05_jprb,7.4090e-05_jprb,9.2739e-05_jprb/)
742 kbo( :, 2,36, 2) = (/&
743 &6.2965e-07_jprb,3.1953e-05_jprb,5.7057e-05_jprb,7.8888e-05_jprb,9.6418e-05_jprb/)
744 kbo( :, 3,36, 2) = (/&
745 &9.4705e-07_jprb,3.4706e-05_jprb,6.0784e-05_jprb,8.3065e-05_jprb,9.9161e-05_jprb/)
746 kbo( :, 4,36, 2) = (/&
747 &1.3808e-06_jprb,3.7469e-05_jprb,6.4241e-05_jprb,8.6658e-05_jprb,1.0108e-04_jprb/)
748 kbo( :, 5,36, 2) = (/&
749 &1.9520e-06_jprb,4.0294e-05_jprb,6.7509e-05_jprb,8.9744e-05_jprb,1.0229e-04_jprb/)
750 kbo( :, 1,37, 2) = (/&
751 &3.1476e-07_jprb,2.3629e-05_jprb,4.3024e-05_jprb,6.0274e-05_jprb,7.5761e-05_jprb/)
752 kbo( :, 2,37, 2) = (/&
753 &4.8773e-07_jprb,2.5900e-05_jprb,4.6378e-05_jprb,6.4261e-05_jprb,7.8929e-05_jprb/)
754 kbo( :, 3,37, 2) = (/&
755 &7.3652e-07_jprb,2.8152e-05_jprb,4.9455e-05_jprb,6.7730e-05_jprb,8.1326e-05_jprb/)
756 kbo( :, 4,37, 2) = (/&
757 &1.0783e-06_jprb,3.0411e-05_jprb,5.2306e-05_jprb,7.0712e-05_jprb,8.3006e-05_jprb/)
758 kbo( :, 5,37, 2) = (/&
759 &1.5305e-06_jprb,3.2717e-05_jprb,5.4998e-05_jprb,7.3285e-05_jprb,8.4133e-05_jprb/)
760 kbo( :, 1,38, 2) = (/&
761 &2.4210e-07_jprb,1.9112e-05_jprb,3.4895e-05_jprb,4.8985e-05_jprb,6.1887e-05_jprb/)
762 kbo( :, 2,38, 2) = (/&
763 &3.7627e-07_jprb,2.0975e-05_jprb,3.7671e-05_jprb,5.2313e-05_jprb,6.4617e-05_jprb/)
764 kbo( :, 3,38, 2) = (/&
765 &5.7052e-07_jprb,2.2818e-05_jprb,4.0210e-05_jprb,5.5193e-05_jprb,6.6701e-05_jprb/)
766 kbo( :, 4,38, 2) = (/&
767 &8.3911e-07_jprb,2.4669e-05_jprb,4.2570e-05_jprb,5.7682e-05_jprb,6.8211e-05_jprb/)
768 kbo( :, 5,38, 2) = (/&
769 &1.1958e-06_jprb,2.6548e-05_jprb,4.4784e-05_jprb,5.9818e-05_jprb,6.9237e-05_jprb/)
770 kbo( :, 1,39, 2) = (/&
771 &1.8625e-07_jprb,1.5459e-05_jprb,2.8298e-05_jprb,3.9805e-05_jprb,5.0586e-05_jprb/)
772 kbo( :, 2,39, 2) = (/&
773 &2.9016e-07_jprb,1.6986e-05_jprb,3.0594e-05_jprb,4.2577e-05_jprb,5.2943e-05_jprb/)
774 kbo( :, 3,39, 2) = (/&
775 &4.4173e-07_jprb,1.8495e-05_jprb,3.2693e-05_jprb,4.4970e-05_jprb,5.4767e-05_jprb/)
776 kbo( :, 4,39, 2) = (/&
777 &6.5253e-07_jprb,2.0005e-05_jprb,3.4636e-05_jprb,4.7036e-05_jprb,5.6106e-05_jprb/)
778 kbo( :, 5,39, 2) = (/&
779 &9.3398e-07_jprb,2.1545e-05_jprb,3.6467e-05_jprb,4.8821e-05_jprb,5.7052e-05_jprb/)
780 kbo( :, 1,40, 2) = (/&
781 &1.3668e-07_jprb,1.2370e-05_jprb,2.2736e-05_jprb,3.2075e-05_jprb,4.1000e-05_jprb/)
782 kbo( :, 2,40, 2) = (/&
783 &2.1371e-07_jprb,1.3625e-05_jprb,2.4652e-05_jprb,3.4419e-05_jprb,4.3071e-05_jprb/)
784 kbo( :, 3,40, 2) = (/&
785 &3.2755e-07_jprb,1.4863e-05_jprb,2.6404e-05_jprb,3.6442e-05_jprb,4.4686e-05_jprb/)
786 kbo( :, 4,40, 2) = (/&
787 &4.8754e-07_jprb,1.6102e-05_jprb,2.8025e-05_jprb,3.8191e-05_jprb,4.5890e-05_jprb/)
788 kbo( :, 5,40, 2) = (/&
789 &7.0305e-07_jprb,1.7351e-05_jprb,2.9541e-05_jprb,3.9702e-05_jprb,4.6757e-05_jprb/)
790 kbo( :, 1,41, 2) = (/&
791 &9.9669e-08_jprb,9.8770e-06_jprb,1.8228e-05_jprb,2.5797e-05_jprb,3.3169e-05_jprb/)
792 kbo( :, 2,41, 2) = (/&
793 &1.5628e-07_jprb,1.0911e-05_jprb,1.9833e-05_jprb,2.7783e-05_jprb,3.4989e-05_jprb/)
794 kbo( :, 3,41, 2) = (/&
795 &2.4106e-07_jprb,1.1926e-05_jprb,2.1297e-05_jprb,2.9495e-05_jprb,3.6412e-05_jprb/)
796 kbo( :, 4,41, 2) = (/&
797 &3.6163e-07_jprb,1.2938e-05_jprb,2.2645e-05_jprb,3.0975e-05_jprb,3.7495e-05_jprb/)
798 kbo( :, 5,41, 2) = (/&
799 &5.2576e-07_jprb,1.3959e-05_jprb,2.3909e-05_jprb,3.2258e-05_jprb,3.8288e-05_jprb/)
800 kbo( :, 1,42, 2) = (/&
801 &7.2678e-08_jprb,7.8801e-06_jprb,1.4600e-05_jprb,2.0724e-05_jprb,2.6808e-05_jprb/)
802 kbo( :, 2,42, 2) = (/&
803 &1.1413e-07_jprb,8.7322e-06_jprb,1.5944e-05_jprb,2.2404e-05_jprb,2.8406e-05_jprb/)
804 kbo( :, 3,42, 2) = (/&
805 &1.7705e-07_jprb,9.5648e-06_jprb,1.7165e-05_jprb,2.3855e-05_jprb,2.9660e-05_jprb/)
806 kbo( :, 4,42, 2) = (/&
807 &2.6763e-07_jprb,1.0394e-05_jprb,1.8292e-05_jprb,2.5108e-05_jprb,3.0631e-05_jprb/)
808 kbo( :, 5,42, 2) = (/&
809 &3.9231e-07_jprb,1.1225e-05_jprb,1.9340e-05_jprb,2.6194e-05_jprb,3.1357e-05_jprb/)
810 kbo( :, 1,43, 2) = (/&
811 &5.1710e-08_jprb,6.2405e-06_jprb,1.1615e-05_jprb,1.6545e-05_jprb,2.1547e-05_jprb/)
812 kbo( :, 2,43, 2) = (/&
813 &8.1128e-08_jprb,6.9428e-06_jprb,1.2742e-05_jprb,1.7971e-05_jprb,2.2964e-05_jprb/)
814 kbo( :, 3,43, 2) = (/&
815 &1.2657e-07_jprb,7.6287e-06_jprb,1.3773e-05_jprb,1.9217e-05_jprb,2.4086e-05_jprb/)
816 kbo( :, 4,43, 2) = (/&
817 &1.9308e-07_jprb,8.3079e-06_jprb,1.4717e-05_jprb,2.0287e-05_jprb,2.4962e-05_jprb/)
818 kbo( :, 5,43, 2) = (/&
819 &2.8583e-07_jprb,8.9896e-06_jprb,1.5595e-05_jprb,2.1216e-05_jprb,2.5632e-05_jprb/)
820 kbo( :, 1,44, 2) = (/&
821 &3.6495e-08_jprb,4.9199e-06_jprb,9.1989e-06_jprb,1.3152e-05_jprb,1.7255e-05_jprb/)
822 kbo( :, 2,44, 2) = (/&
823 &5.6951e-08_jprb,5.5005e-06_jprb,1.0149e-05_jprb,1.4368e-05_jprb,1.8514e-05_jprb/)
824 kbo( :, 3,44, 2) = (/&
825 &8.9239e-08_jprb,6.0652e-06_jprb,1.1016e-05_jprb,1.5437e-05_jprb,1.9519e-05_jprb/)
826 kbo( :, 4,44, 2) = (/&
827 &1.3737e-07_jprb,6.6226e-06_jprb,1.1811e-05_jprb,1.6355e-05_jprb,2.0314e-05_jprb/)
828 kbo( :, 5,44, 2) = (/&
829 &2.0554e-07_jprb,7.1784e-06_jprb,1.2547e-05_jprb,1.7152e-05_jprb,2.0929e-05_jprb/)
830 kbo( :, 1,45, 2) = (/&
831 &2.5907e-08_jprb,3.8721e-06_jprb,7.2719e-06_jprb,1.0434e-05_jprb,1.3790e-05_jprb/)
832 kbo( :, 2,45, 2) = (/&
833 &3.9986e-08_jprb,4.3511e-06_jprb,8.0697e-06_jprb,1.1466e-05_jprb,1.4905e-05_jprb/)
834 kbo( :, 3,45, 2) = (/&
835 &6.2804e-08_jprb,4.8176e-06_jprb,8.8015e-06_jprb,1.2382e-05_jprb,1.5806e-05_jprb/)
836 kbo( :, 4,45, 2) = (/&
837 &9.7423e-08_jprb,5.2749e-06_jprb,9.4698e-06_jprb,1.3171e-05_jprb,1.6523e-05_jprb/)
838 kbo( :, 5,45, 2) = (/&
839 &1.4724e-07_jprb,5.7306e-06_jprb,1.0089e-05_jprb,1.3855e-05_jprb,1.7089e-05_jprb/)
840 kbo( :, 1,46, 2) = (/&
841 &1.8373e-08_jprb,3.0320e-06_jprb,5.7197e-06_jprb,8.2358e-06_jprb,1.0971e-05_jprb/)
842 kbo( :, 2,46, 2) = (/&
843 &2.7848e-08_jprb,3.4277e-06_jprb,6.3901e-06_jprb,9.1142e-06_jprb,1.1956e-05_jprb/)
844 kbo( :, 3,46, 2) = (/&
845 &4.3687e-08_jprb,3.8134e-06_jprb,7.0085e-06_jprb,9.9001e-06_jprb,1.2766e-05_jprb/)
846 kbo( :, 4,46, 2) = (/&
847 &6.8194e-08_jprb,4.1901e-06_jprb,7.5729e-06_jprb,1.0581e-05_jprb,1.3413e-05_jprb/)
848 kbo( :, 5,46, 2) = (/&
849 &1.0416e-07_jprb,4.5633e-06_jprb,8.0938e-06_jprb,1.1169e-05_jprb,1.3933e-05_jprb/)
850 kbo( :, 1,47, 2) = (/&
851 &1.2986e-08_jprb,2.3533e-06_jprb,4.4615e-06_jprb,6.4491e-06_jprb,8.6543e-06_jprb/)
852 kbo( :, 2,47, 2) = (/&
853 &1.9128e-08_jprb,2.6815e-06_jprb,5.0257e-06_jprb,7.1971e-06_jprb,9.5261e-06_jprb/)
854 kbo( :, 3,47, 2) = (/&
855 &2.9772e-08_jprb,3.0001e-06_jprb,5.5492e-06_jprb,7.8735e-06_jprb,1.0255e-05_jprb/)
856 kbo( :, 4,47, 2) = (/&
857 &4.6702e-08_jprb,3.3116e-06_jprb,6.0282e-06_jprb,8.4652e-06_jprb,1.0843e-05_jprb/)
858 kbo( :, 5,47, 2) = (/&
859 &7.2070e-08_jprb,3.6175e-06_jprb,6.4678e-06_jprb,8.9726e-06_jprb,1.1318e-05_jprb/)
860 kbo( :, 1,48, 2) = (/&
861 &9.3416e-09_jprb,1.8200e-06_jprb,3.4670e-06_jprb,5.0294e-06_jprb,6.7990e-06_jprb/)
862 kbo( :, 2,48, 2) = (/&
863 &1.3255e-08_jprb,2.0919e-06_jprb,3.9405e-06_jprb,5.6643e-06_jprb,7.5695e-06_jprb/)
864 kbo( :, 3,48, 2) = (/&
865 &2.0305e-08_jprb,2.3557e-06_jprb,4.3829e-06_jprb,6.2449e-06_jprb,8.2237e-06_jprb/)
866 kbo( :, 4,48, 2) = (/&
867 &3.1895e-08_jprb,2.6129e-06_jprb,4.7893e-06_jprb,6.7563e-06_jprb,8.7563e-06_jprb/)
868 kbo( :, 5,48, 2) = (/&
869 &4.9634e-08_jprb,2.8647e-06_jprb,5.1614e-06_jprb,7.1978e-06_jprb,9.1908e-06_jprb/)
870 kbo( :, 1,49, 2) = (/&
871 &6.8359e-09_jprb,1.4019e-06_jprb,2.6826e-06_jprb,3.9057e-06_jprb,5.3233e-06_jprb/)
872 kbo( :, 2,49, 2) = (/&
873 &9.2996e-09_jprb,1.6269e-06_jprb,3.0793e-06_jprb,4.4431e-06_jprb,6.0005e-06_jprb/)
874 kbo( :, 3,49, 2) = (/&
875 &1.3902e-08_jprb,1.8452e-06_jprb,3.4523e-06_jprb,4.9386e-06_jprb,6.5835e-06_jprb/)
876 kbo( :, 4,49, 2) = (/&
877 &2.1742e-08_jprb,2.0580e-06_jprb,3.7970e-06_jprb,5.3806e-06_jprb,7.0678e-06_jprb/)
878 kbo( :, 5,49, 2) = (/&
879 &3.4035e-08_jprb,2.2660e-06_jprb,4.1122e-06_jprb,5.7639e-06_jprb,7.4641e-06_jprb/)
880 kbo( :, 1,50, 2) = (/&
881 &5.1178e-09_jprb,1.0792e-06_jprb,2.0739e-06_jprb,3.0301e-06_jprb,4.1532e-06_jprb/)
882 kbo( :, 2,50, 2) = (/&
883 &6.6862e-09_jprb,1.2653e-06_jprb,2.4055e-06_jprb,3.4823e-06_jprb,4.7385e-06_jprb/)
884 kbo( :, 3,50, 2) = (/&
885 &9.6897e-09_jprb,1.4463e-06_jprb,2.7192e-06_jprb,3.9039e-06_jprb,5.2519e-06_jprb/)
886 kbo( :, 4,50, 2) = (/&
887 &1.4989e-08_jprb,1.6221e-06_jprb,3.0101e-06_jprb,4.2829e-06_jprb,5.6841e-06_jprb/)
888 kbo( :, 5,50, 2) = (/&
889 &2.3540e-08_jprb,1.7939e-06_jprb,3.2769e-06_jprb,4.6145e-06_jprb,6.0402e-06_jprb/)
890 kbo( :, 1,51, 2) = (/&
891 &3.8928e-09_jprb,8.2870e-07_jprb,1.5995e-06_jprb,2.3444e-06_jprb,3.2274e-06_jprb/)
892 kbo( :, 2,51, 2) = (/&
893 &4.8976e-09_jprb,9.8251e-07_jprb,1.8756e-06_jprb,2.7234e-06_jprb,3.7274e-06_jprb/)
894 kbo( :, 3,51, 2) = (/&
895 &6.8457e-09_jprb,1.1323e-06_jprb,2.1385e-06_jprb,3.0800e-06_jprb,4.1752e-06_jprb/)
896 kbo( :, 4,51, 2) = (/&
897 &1.0404e-08_jprb,1.2777e-06_jprb,2.3837e-06_jprb,3.4044e-06_jprb,4.5574e-06_jprb/)
898 kbo( :, 5,51, 2) = (/&
899 &1.6329e-08_jprb,1.4195e-06_jprb,2.6091e-06_jprb,3.6893e-06_jprb,4.8743e-06_jprb/)
900 kbo( :, 1,52, 2) = (/&
901 &3.0020e-09_jprb,6.3363e-07_jprb,1.2279e-06_jprb,1.8052e-06_jprb,2.4975e-06_jprb/)
902 kbo( :, 2,52, 2) = (/&
903 &3.6400e-09_jprb,7.6019e-07_jprb,1.4569e-06_jprb,2.1220e-06_jprb,2.9231e-06_jprb/)
904 kbo( :, 3,52, 2) = (/&
905 &4.8925e-09_jprb,8.8432e-07_jprb,1.6773e-06_jprb,2.4234e-06_jprb,3.3127e-06_jprb/)
906 kbo( :, 4,52, 2) = (/&
907 &7.2540e-09_jprb,1.0045e-06_jprb,1.8834e-06_jprb,2.6996e-06_jprb,3.6485e-06_jprb/)
908 kbo( :, 5,52, 2) = (/&
909 &1.1316e-08_jprb,1.1218e-06_jprb,2.0739e-06_jprb,2.9444e-06_jprb,3.9318e-06_jprb/)
910 kbo( :, 1,53, 2) = (/&
911 &2.3480e-09_jprb,4.8194e-07_jprb,9.3751e-07_jprb,1.3817e-06_jprb,1.9236e-06_jprb/)
912 kbo( :, 2,53, 2) = (/&
913 &2.7431e-09_jprb,5.8562e-07_jprb,1.1268e-06_jprb,1.6465e-06_jprb,2.2857e-06_jprb/)
914 kbo( :, 3,53, 2) = (/&
915 &3.5464e-09_jprb,6.8845e-07_jprb,1.3110e-06_jprb,1.8999e-06_jprb,2.6221e-06_jprb/)
916 kbo( :, 4,53, 2) = (/&
917 &5.0907e-09_jprb,7.8797e-07_jprb,1.4844e-06_jprb,2.1348e-06_jprb,2.9184e-06_jprb/)
918 kbo( :, 5,53, 2) = (/&
919 &7.8410e-09_jprb,8.8479e-07_jprb,1.6450e-06_jprb,2.3447e-06_jprb,3.1713e-06_jprb/)
920 kbo( :, 1,54, 2) = (/&
921 &1.8594e-09_jprb,3.6706e-07_jprb,7.1625e-07_jprb,1.0575e-06_jprb,1.4721e-06_jprb/)
922 kbo( :, 2,54, 2) = (/&
923 &2.1055e-09_jprb,4.5181e-07_jprb,8.7256e-07_jprb,1.2786e-06_jprb,1.7762e-06_jprb/)
924 kbo( :, 3,54, 2) = (/&
925 &2.6291e-09_jprb,5.3666e-07_jprb,1.0257e-06_jprb,1.4904e-06_jprb,2.0598e-06_jprb/)
926 kbo( :, 4,54, 2) = (/&
927 &3.6482e-09_jprb,6.1906e-07_jprb,1.1709e-06_jprb,1.6887e-06_jprb,2.3147e-06_jprb/)
928 kbo( :, 5,54, 2) = (/&
929 &5.5210e-09_jprb,6.9901e-07_jprb,1.3059e-06_jprb,1.8680e-06_jprb,2.5342e-06_jprb/)
930 kbo( :, 1,55, 2) = (/&
931 &1.4849e-09_jprb,2.7894e-07_jprb,5.4560e-07_jprb,8.0660e-07_jprb,1.1188e-06_jprb/)
932 kbo( :, 2,55, 2) = (/&
933 &1.6383e-09_jprb,3.4819e-07_jprb,6.7462e-07_jprb,9.9127e-07_jprb,1.3721e-06_jprb/)
934 kbo( :, 3,55, 2) = (/&
935 &1.9800e-09_jprb,4.1799e-07_jprb,8.0161e-07_jprb,1.1677e-06_jprb,1.6084e-06_jprb/)
936 kbo( :, 4,55, 2) = (/&
937 &2.6536e-09_jprb,4.8615e-07_jprb,9.2306e-07_jprb,1.3349e-06_jprb,1.8249e-06_jprb/)
938 kbo( :, 5,55, 2) = (/&
939 &3.9260e-09_jprb,5.5226e-07_jprb,1.0363e-06_jprb,1.4870e-06_jprb,2.0117e-06_jprb/)
940 kbo( :, 1,56, 2) = (/&
941 &1.1936e-09_jprb,2.1075e-07_jprb,4.1302e-07_jprb,6.1132e-07_jprb,8.4513e-07_jprb/)
942 kbo( :, 2,56, 2) = (/&
943 &1.2886e-09_jprb,2.6729e-07_jprb,5.1942e-07_jprb,7.6519e-07_jprb,1.0555e-06_jprb/)
944 kbo( :, 3,56, 2) = (/&
945 &1.5077e-09_jprb,3.2455e-07_jprb,6.2452e-07_jprb,9.1202e-07_jprb,1.2523e-06_jprb/)
946 kbo( :, 4,56, 2) = (/&
947 &1.9525e-09_jprb,3.8098e-07_jprb,7.2592e-07_jprb,1.0524e-06_jprb,1.4345e-06_jprb/)
948 kbo( :, 5,56, 2) = (/&
949 &2.8077e-09_jprb,4.3561e-07_jprb,8.2084e-07_jprb,1.1815e-06_jprb,1.5940e-06_jprb/)
950 kbo( :, 1,57, 2) = (/&
951 &9.6583e-10_jprb,1.5815e-07_jprb,3.1044e-07_jprb,4.6005e-07_jprb,6.3408e-07_jprb/)
952 kbo( :, 2,57, 2) = (/&
953 &1.0215e-09_jprb,2.0426e-07_jprb,3.9810e-07_jprb,5.8767e-07_jprb,8.0766e-07_jprb/)
954 kbo( :, 3,57, 2) = (/&
955 &1.1597e-09_jprb,2.5112e-07_jprb,4.8491e-07_jprb,7.0984e-07_jprb,9.7174e-07_jprb/)
956 kbo( :, 4,57, 2) = (/&
957 &1.4523e-09_jprb,2.9779e-07_jprb,5.6934e-07_jprb,8.2739e-07_jprb,1.1242e-06_jprb/)
958 kbo( :, 5,57, 2) = (/&
959 &2.0219e-09_jprb,3.4296e-07_jprb,6.4886e-07_jprb,9.3651e-07_jprb,1.2602e-06_jprb/)
960 kbo( :, 1,58, 2) = (/&
961 &7.8662e-10_jprb,1.1835e-07_jprb,2.3255e-07_jprb,3.4498e-07_jprb,4.7381e-07_jprb/)
962 kbo( :, 2,58, 2) = (/&
963 &8.1625e-10_jprb,1.5593e-07_jprb,3.0466e-07_jprb,4.5040e-07_jprb,6.1632e-07_jprb/)
964 kbo( :, 3,58, 2) = (/&
965 &9.0341e-10_jprb,1.9427e-07_jprb,3.7628e-07_jprb,5.5215e-07_jprb,7.5284e-07_jprb/)
966 kbo( :, 4,58, 2) = (/&
967 &1.0971e-09_jprb,2.3273e-07_jprb,4.4632e-07_jprb,6.5008e-07_jprb,8.7941e-07_jprb/)
968 kbo( :, 5,58, 2) = (/&
969 &1.4779e-09_jprb,2.7004e-07_jprb,5.1274e-07_jprb,7.4188e-07_jprb,9.9429e-07_jprb/)
970 kbo( :, 1,59, 2) = (/&
971 &6.4355e-10_jprb,9.3344e-08_jprb,1.8349e-07_jprb,2.7230e-07_jprb,3.7011e-07_jprb/)
972 kbo( :, 2,59, 2) = (/&
973 &6.6262e-10_jprb,1.2407e-07_jprb,2.4261e-07_jprb,3.5886e-07_jprb,4.8556e-07_jprb/)
974 kbo( :, 3,59, 2) = (/&
975 &7.2712e-10_jprb,1.5550e-07_jprb,3.0153e-07_jprb,4.4284e-07_jprb,5.9628e-07_jprb/)
976 kbo( :, 4,59, 2) = (/&
977 &8.7156e-10_jprb,1.8704e-07_jprb,3.5919e-07_jprb,5.2368e-07_jprb,6.9842e-07_jprb/)
978 kbo( :, 5,59, 2) = (/&
979 &1.1587e-09_jprb,2.1775e-07_jprb,4.1408e-07_jprb,5.9979e-07_jprb,7.9133e-07_jprb/)
980 kbo( :, 1,13, 3) = (/&
981 &2.0353e-05_jprb,5.6795e-03_jprb,1.0879e-02_jprb,1.5836e-02_jprb,2.0631e-02_jprb/)
982 kbo( :, 2,13, 3) = (/&
983 &3.3777e-05_jprb,6.5066e-03_jprb,1.2221e-02_jprb,1.7564e-02_jprb,2.2630e-02_jprb/)
984 kbo( :, 3,13, 3) = (/&
985 &5.9522e-05_jprb,7.3512e-03_jprb,1.3499e-02_jprb,1.9109e-02_jprb,2.4328e-02_jprb/)
986 kbo( :, 4,13, 3) = (/&
987 &1.0349e-04_jprb,8.2028e-03_jprb,1.4689e-02_jprb,2.0461e-02_jprb,2.5718e-02_jprb/)
988 kbo( :, 5,13, 3) = (/&
989 &1.7303e-04_jprb,9.0516e-03_jprb,1.5806e-02_jprb,2.1651e-02_jprb,2.6820e-02_jprb/)
990 kbo( :, 1,14, 3) = (/&
991 &1.7783e-05_jprb,4.9056e-03_jprb,9.3358e-03_jprb,1.3535e-02_jprb,1.7457e-02_jprb/)
992 kbo( :, 2,14, 3) = (/&
993 &3.0011e-05_jprb,5.5977e-03_jprb,1.0428e-02_jprb,1.4906e-02_jprb,1.8958e-02_jprb/)
994 kbo( :, 3,14, 3) = (/&
995 &5.3112e-05_jprb,6.2970e-03_jprb,1.1454e-02_jprb,1.6118e-02_jprb,2.0210e-02_jprb/)
996 kbo( :, 4,14, 3) = (/&
997 &9.2284e-05_jprb,6.9980e-03_jprb,1.2425e-02_jprb,1.7194e-02_jprb,2.1221e-02_jprb/)
998 kbo( :, 5,14, 3) = (/&
999 &1.5395e-04_jprb,7.6990e-03_jprb,1.3352e-02_jprb,1.8155e-02_jprb,2.2006e-02_jprb/)
1000 kbo( :, 1,15, 3) = (/&
1001 &1.5619e-05_jprb,4.1987e-03_jprb,7.9342e-03_jprb,1.1456e-02_jprb,1.4646e-02_jprb/)
1002 kbo( :, 2,15, 3) = (/&
1003 &2.6774e-05_jprb,4.7704e-03_jprb,8.8150e-03_jprb,1.2537e-02_jprb,1.5771e-02_jprb/)
1004 kbo( :, 3,15, 3) = (/&
1005 &4.7563e-05_jprb,5.3462e-03_jprb,9.6501e-03_jprb,1.3503e-02_jprb,1.6713e-02_jprb/)
1006 kbo( :, 4,15, 3) = (/&
1007 &8.2516e-05_jprb,5.9238e-03_jprb,1.0452e-02_jprb,1.4374e-02_jprb,1.7466e-02_jprb/)
1008 kbo( :, 5,15, 3) = (/&
1009 &1.3728e-04_jprb,6.5026e-03_jprb,1.1222e-02_jprb,1.5161e-02_jprb,1.8044e-02_jprb/)
1010 kbo( :, 1,16, 3) = (/&
1011 &1.3779e-05_jprb,3.5660e-03_jprb,6.6881e-03_jprb,9.6171e-03_jprb,1.2220e-02_jprb/)
1012 kbo( :, 2,16, 3) = (/&
1013 &2.3944e-05_jprb,4.0358e-03_jprb,7.4057e-03_jprb,1.0483e-02_jprb,1.3089e-02_jprb/)
1014 kbo( :, 3,16, 3) = (/&
1015 &4.2620e-05_jprb,4.5089e-03_jprb,8.0943e-03_jprb,1.1266e-02_jprb,1.3818e-02_jprb/)
1016 kbo( :, 4,16, 3) = (/&
1017 &7.3893e-05_jprb,4.9861e-03_jprb,8.7577e-03_jprb,1.1978e-02_jprb,1.4391e-02_jprb/)
1018 kbo( :, 5,16, 3) = (/&
1019 &1.2258e-04_jprb,5.4637e-03_jprb,9.3940e-03_jprb,1.2628e-02_jprb,1.4828e-02_jprb/)
1020 kbo( :, 1,17, 3) = (/&
1021 &1.2160e-05_jprb,3.0074e-03_jprb,5.6060e-03_jprb,8.0296e-03_jprb,1.0147e-02_jprb/)
1022 kbo( :, 2,17, 3) = (/&
1023 &2.1375e-05_jprb,3.3935e-03_jprb,6.1972e-03_jprb,8.7313e-03_jprb,1.0830e-02_jprb/)
1024 kbo( :, 3,17, 3) = (/&
1025 &3.8127e-05_jprb,3.7835e-03_jprb,6.7643e-03_jprb,9.3718e-03_jprb,1.1398e-02_jprb/)
1026 kbo( :, 4,17, 3) = (/&
1027 &6.6011e-05_jprb,4.1770e-03_jprb,7.3104e-03_jprb,9.9575e-03_jprb,1.1840e-02_jprb/)
1028 kbo( :, 5,17, 3) = (/&
1029 &1.0918e-04_jprb,4.5738e-03_jprb,7.8339e-03_jprb,1.0495e-02_jprb,1.2173e-02_jprb/)
1030 kbo( :, 1,18, 3) = (/&
1031 &1.0748e-05_jprb,2.5245e-03_jprb,4.6847e-03_jprb,6.6825e-03_jprb,8.4030e-03_jprb/)
1032 kbo( :, 2,18, 3) = (/&
1033 &1.9076e-05_jprb,2.8417e-03_jprb,5.1713e-03_jprb,7.2560e-03_jprb,8.9449e-03_jprb/)
1034 kbo( :, 3,18, 3) = (/&
1035 &3.4073e-05_jprb,3.1636e-03_jprb,5.6356e-03_jprb,7.7811e-03_jprb,9.3891e-03_jprb/)
1036 kbo( :, 4,18, 3) = (/&
1037 &5.8868e-05_jprb,3.4883e-03_jprb,6.0850e-03_jprb,8.2633e-03_jprb,9.7334e-03_jprb/)
1038 kbo( :, 5,18, 3) = (/&
1039 &9.7060e-05_jprb,3.8208e-03_jprb,6.5140e-03_jprb,8.7058e-03_jprb,9.9894e-03_jprb/)
1040 kbo( :, 1,19, 3) = (/&
1041 &9.4932e-06_jprb,2.1111e-03_jprb,3.9060e-03_jprb,5.5505e-03_jprb,6.9419e-03_jprb/)
1042 kbo( :, 2,19, 3) = (/&
1043 &1.6990e-05_jprb,2.3724e-03_jprb,4.3041e-03_jprb,6.0210e-03_jprb,7.3719e-03_jprb/)
1044 kbo( :, 3,19, 3) = (/&
1045 &3.0379e-05_jprb,2.6375e-03_jprb,4.6850e-03_jprb,6.4526e-03_jprb,7.7206e-03_jprb/)
1046 kbo( :, 4,19, 3) = (/&
1047 &5.2318e-05_jprb,2.9073e-03_jprb,5.0535e-03_jprb,6.8468e-03_jprb,7.9880e-03_jprb/)
1048 kbo( :, 5,19, 3) = (/&
1049 &8.5851e-05_jprb,3.1863e-03_jprb,5.4069e-03_jprb,7.2090e-03_jprb,8.1842e-03_jprb/)
1050 kbo( :, 1,20, 3) = (/&
1051 &8.4621e-06_jprb,1.7648e-03_jprb,3.2563e-03_jprb,4.6122e-03_jprb,5.7360e-03_jprb/)
1052 kbo( :, 2,20, 3) = (/&
1053 &1.5250e-05_jprb,1.9802e-03_jprb,3.5810e-03_jprb,4.9972e-03_jprb,6.0779e-03_jprb/)
1054 kbo( :, 3,20, 3) = (/&
1055 &2.7245e-05_jprb,2.1990e-03_jprb,3.8932e-03_jprb,5.3488e-03_jprb,6.3511e-03_jprb/)
1056 kbo( :, 4,20, 3) = (/&
1057 &4.6707e-05_jprb,2.4242e-03_jprb,4.1953e-03_jprb,5.6710e-03_jprb,6.5600e-03_jprb/)
1058 kbo( :, 5,20, 3) = (/&
1059 &7.6165e-05_jprb,2.6575e-03_jprb,4.4893e-03_jprb,5.9661e-03_jprb,6.7108e-03_jprb/)
1060 kbo( :, 1,21, 3) = (/&
1061 &7.5453e-06_jprb,1.4733e-03_jprb,2.7104e-03_jprb,3.8302e-03_jprb,4.7372e-03_jprb/)
1062 kbo( :, 2,21, 3) = (/&
1063 &1.3660e-05_jprb,1.6505e-03_jprb,2.9759e-03_jprb,4.1434e-03_jprb,5.0081e-03_jprb/)
1064 kbo( :, 3,21, 3) = (/&
1065 &2.4360e-05_jprb,1.8325e-03_jprb,3.2316e-03_jprb,4.4300e-03_jprb,5.2232e-03_jprb/)
1066 kbo( :, 4,21, 3) = (/&
1067 &4.1539e-05_jprb,2.0202e-03_jprb,3.4804e-03_jprb,4.6921e-03_jprb,5.3862e-03_jprb/)
1068 kbo( :, 5,21, 3) = (/&
1069 &6.7226e-05_jprb,2.2135e-03_jprb,3.7240e-03_jprb,4.9321e-03_jprb,5.5010e-03_jprb/)
1070 kbo( :, 1,22, 3) = (/&
1071 &6.9875e-06_jprb,1.2377e-03_jprb,2.2680e-03_jprb,3.1957e-03_jprb,3.9253e-03_jprb/)
1072 kbo( :, 2,22, 3) = (/&
1073 &1.2689e-05_jprb,1.3846e-03_jprb,2.4844e-03_jprb,3.4484e-03_jprb,4.1374e-03_jprb/)
1074 kbo( :, 3,22, 3) = (/&
1075 &2.2485e-05_jprb,1.5363e-03_jprb,2.6941e-03_jprb,3.6801e-03_jprb,4.3039e-03_jprb/)
1076 kbo( :, 4,22, 3) = (/&
1077 &3.7954e-05_jprb,1.6925e-03_jprb,2.8992e-03_jprb,3.8918e-03_jprb,4.4280e-03_jprb/)
1078 kbo( :, 5,22, 3) = (/&
1079 &6.0729e-05_jprb,1.8529e-03_jprb,3.1002e-03_jprb,4.0883e-03_jprb,4.5144e-03_jprb/)
1080 kbo( :, 1,23, 3) = (/&
1081 &6.4953e-06_jprb,1.0396e-03_jprb,1.8968e-03_jprb,2.6642e-03_jprb,3.2502e-03_jprb/)
1082 kbo( :, 2,23, 3) = (/&
1083 &1.1793e-05_jprb,1.1619e-03_jprb,2.0732e-03_jprb,2.8684e-03_jprb,3.4159e-03_jprb/)
1084 kbo( :, 3,23, 3) = (/&
1085 &2.0715e-05_jprb,1.2879e-03_jprb,2.2459e-03_jprb,3.0558e-03_jprb,3.5445e-03_jprb/)
1086 kbo( :, 4,23, 3) = (/&
1087 &3.4551e-05_jprb,1.4176e-03_jprb,2.4147e-03_jprb,3.2275e-03_jprb,3.6395e-03_jprb/)
1088 kbo( :, 5,23, 3) = (/&
1089 &5.4641e-05_jprb,1.5512e-03_jprb,2.5804e-03_jprb,3.3885e-03_jprb,3.7034e-03_jprb/)
1090 kbo( :, 1,24, 3) = (/&
1091 &6.0670e-06_jprb,8.7365e-04_jprb,1.5859e-03_jprb,2.2204e-03_jprb,2.6897e-03_jprb/)
1092 kbo( :, 2,24, 3) = (/&
1093 &1.0981e-05_jprb,9.7532e-04_jprb,1.7303e-03_jprb,2.3852e-03_jprb,2.8188e-03_jprb/)
1094 kbo( :, 3,24, 3) = (/&
1095 &1.9078e-05_jprb,1.0799e-03_jprb,1.8727e-03_jprb,2.5367e-03_jprb,2.9175e-03_jprb/)
1096 kbo( :, 4,24, 3) = (/&
1097 &3.1407e-05_jprb,1.1876e-03_jprb,2.0114e-03_jprb,2.6770e-03_jprb,2.9899e-03_jprb/)
1098 kbo( :, 5,24, 3) = (/&
1099 &4.9067e-05_jprb,1.2997e-03_jprb,2.1481e-03_jprb,2.8086e-03_jprb,3.0371e-03_jprb/)
1100 kbo( :, 1,25, 3) = (/&
1101 &5.6989e-06_jprb,7.3485e-04_jprb,1.3264e-03_jprb,1.8506e-03_jprb,2.2259e-03_jprb/)
1102 kbo( :, 2,25, 3) = (/&
1103 &1.0240e-05_jprb,8.1910e-04_jprb,1.4452e-03_jprb,1.9836e-03_jprb,2.3255e-03_jprb/)
1104 kbo( :, 3,25, 3) = (/&
1105 &1.7580e-05_jprb,9.0587e-04_jprb,1.5621e-03_jprb,2.1066e-03_jprb,2.4014e-03_jprb/)
1106 kbo( :, 4,25, 3) = (/&
1107 &2.8572e-05_jprb,9.9581e-04_jprb,1.6762e-03_jprb,2.2210e-03_jprb,2.4559e-03_jprb/)
1108 kbo( :, 5,25, 3) = (/&
1109 &4.4075e-05_jprb,1.0904e-03_jprb,1.7895e-03_jprb,2.3285e-03_jprb,2.4904e-03_jprb/)
1110 kbo( :, 1,26, 3) = (/&
1111 &5.4044e-06_jprb,6.1917e-04_jprb,1.1109e-03_jprb,1.5435e-03_jprb,1.8428e-03_jprb/)
1112 kbo( :, 2,26, 3) = (/&
1113 &9.6129e-06_jprb,6.8903e-04_jprb,1.2086e-03_jprb,1.6510e-03_jprb,1.9194e-03_jprb/)
1114 kbo( :, 3,26, 3) = (/&
1115 &1.6279e-05_jprb,7.6112e-04_jprb,1.3044e-03_jprb,1.7509e-03_jprb,1.9770e-03_jprb/)
1116 kbo( :, 4,26, 3) = (/&
1117 &2.6098e-05_jprb,8.3688e-04_jprb,1.3985e-03_jprb,1.8442e-03_jprb,2.0178e-03_jprb/)
1118 kbo( :, 5,26, 3) = (/&
1119 &3.9757e-05_jprb,9.1748e-04_jprb,1.4931e-03_jprb,1.9319e-03_jprb,2.0426e-03_jprb/)
1120 kbo( :, 1,27, 3) = (/&
1121 &5.1208e-06_jprb,5.2155e-04_jprb,9.3033e-04_jprb,1.2869e-03_jprb,1.5252e-03_jprb/)
1122 kbo( :, 2,27, 3) = (/&
1123 &9.0050e-06_jprb,5.7947e-04_jprb,1.0106e-03_jprb,1.3741e-03_jprb,1.5841e-03_jprb/)
1124 kbo( :, 3,27, 3) = (/&
1125 &1.5028e-05_jprb,6.3999e-04_jprb,1.0891e-03_jprb,1.4551e-03_jprb,1.6279e-03_jprb/)
1126 kbo( :, 4,27, 3) = (/&
1127 &2.3771e-05_jprb,7.0422e-04_jprb,1.1674e-03_jprb,1.5313e-03_jprb,1.6583e-03_jprb/)
1128 kbo( :, 5,27, 3) = (/&
1129 &3.5789e-05_jprb,7.7220e-04_jprb,1.2465e-03_jprb,1.6033e-03_jprb,1.6759e-03_jprb/)
1130 kbo( :, 1,28, 3) = (/&
1131 &4.8426e-06_jprb,4.3932e-04_jprb,7.7909e-04_jprb,1.0728e-03_jprb,1.2619e-03_jprb/)
1132 kbo( :, 2,28, 3) = (/&
1133 &8.4123e-06_jprb,4.8757e-04_jprb,8.4493e-04_jprb,1.1435e-03_jprb,1.3071e-03_jprb/)
1134 kbo( :, 3,28, 3) = (/&
1135 &1.3833e-05_jprb,5.3874e-04_jprb,9.0955e-04_jprb,1.2094e-03_jprb,1.3406e-03_jprb/)
1136 kbo( :, 4,28, 3) = (/&
1137 &2.1607e-05_jprb,5.9328e-04_jprb,9.7513e-04_jprb,1.2716e-03_jprb,1.3629e-03_jprb/)
1138 kbo( :, 5,28, 3) = (/&
1139 &3.2146e-05_jprb,6.4978e-04_jprb,1.0416e-03_jprb,1.3310e-03_jprb,1.3752e-03_jprb/)
1140 kbo( :, 1,29, 3) = (/&
1141 &4.5849e-06_jprb,3.7023e-04_jprb,6.5264e-04_jprb,8.9457e-04_jprb,1.0445e-03_jprb/)
1142 kbo( :, 2,29, 3) = (/&
1143 &7.8572e-06_jprb,4.1089e-04_jprb,7.0665e-04_jprb,9.5187e-04_jprb,1.0793e-03_jprb/)
1144 kbo( :, 3,29, 3) = (/&
1145 &1.2741e-05_jprb,4.5436e-04_jprb,7.6034e-04_jprb,1.0055e-03_jprb,1.1048e-03_jprb/)
1146 kbo( :, 4,29, 3) = (/&
1147 &1.9649e-05_jprb,4.9998e-04_jprb,8.1550e-04_jprb,1.0566e-03_jprb,1.1213e-03_jprb/)
1148 kbo( :, 5,29, 3) = (/&
1149 &2.8896e-05_jprb,5.4682e-04_jprb,8.7093e-04_jprb,1.1060e-03_jprb,1.1298e-03_jprb/)
1150 kbo( :, 1,30, 3) = (/&
1151 &4.3297e-06_jprb,3.1217e-04_jprb,5.4663e-04_jprb,7.4580e-04_jprb,8.6464e-04_jprb/)
1152 kbo( :, 2,30, 3) = (/&
1153 &7.3120e-06_jprb,3.4668e-04_jprb,5.9106e-04_jprb,7.9232e-04_jprb,8.9143e-04_jprb/)
1154 kbo( :, 3,30, 3) = (/&
1155 &1.1705e-05_jprb,3.8338e-04_jprb,6.3627e-04_jprb,8.3604e-04_jprb,9.1074e-04_jprb/)
1156 kbo( :, 4,30, 3) = (/&
1157 &1.7828e-05_jprb,4.2125e-04_jprb,6.8249e-04_jprb,8.7824e-04_jprb,9.2283e-04_jprb/)
1158 kbo( :, 5,30, 3) = (/&
1159 &2.5924e-05_jprb,4.5966e-04_jprb,7.2827e-04_jprb,9.1964e-04_jprb,9.2875e-04_jprb/)
1160 kbo( :, 1,31, 3) = (/&
1161 &4.0874e-06_jprb,2.6368e-04_jprb,4.5791e-04_jprb,6.2183e-04_jprb,7.1613e-04_jprb/)
1162 kbo( :, 2,31, 3) = (/&
1163 &6.8015e-06_jprb,2.9293e-04_jprb,4.9490e-04_jprb,6.5949e-04_jprb,7.3687e-04_jprb/)
1164 kbo( :, 3,31, 3) = (/&
1165 &1.0746e-05_jprb,3.2348e-04_jprb,5.3298e-04_jprb,6.9547e-04_jprb,7.5159e-04_jprb/)
1166 kbo( :, 4,31, 3) = (/&
1167 &1.6163e-05_jprb,3.5480e-04_jprb,5.7136e-04_jprb,7.3073e-04_jprb,7.6056e-04_jprb/)
1168 kbo( :, 5,31, 3) = (/&
1169 &2.3251e-05_jprb,3.8597e-04_jprb,6.0897e-04_jprb,7.6515e-04_jprb,7.6467e-04_jprb/)
1170 kbo( :, 1,32, 3) = (/&
1171 &3.8514e-06_jprb,2.2297e-04_jprb,3.8374e-04_jprb,5.1829e-04_jprb,5.9305e-04_jprb/)
1172 kbo( :, 2,32, 3) = (/&
1173 &6.3168e-06_jprb,2.4754e-04_jprb,4.1485e-04_jprb,5.4904e-04_jprb,6.0924e-04_jprb/)
1174 kbo( :, 3,32, 3) = (/&
1175 &9.8501e-06_jprb,2.7292e-04_jprb,4.4681e-04_jprb,5.7897e-04_jprb,6.2044e-04_jprb/)
1176 kbo( :, 4,32, 3) = (/&
1177 &1.4638e-05_jprb,2.9846e-04_jprb,4.7840e-04_jprb,6.0852e-04_jprb,6.2707e-04_jprb/)
1178 kbo( :, 5,32, 3) = (/&
1179 &2.0831e-05_jprb,3.2361e-04_jprb,5.0883e-04_jprb,6.3658e-04_jprb,6.2999e-04_jprb/)
1180 kbo( :, 1,33, 3) = (/&
1181 &3.6163e-06_jprb,1.8866e-04_jprb,3.2190e-04_jprb,4.3205e-04_jprb,4.9144e-04_jprb/)
1182 kbo( :, 2,33, 3) = (/&
1183 &5.8503e-06_jprb,2.0912e-04_jprb,3.4811e-04_jprb,4.5736e-04_jprb,5.0397e-04_jprb/)
1184 kbo( :, 3,33, 3) = (/&
1185 &9.0067e-06_jprb,2.2999e-04_jprb,3.7456e-04_jprb,4.8239e-04_jprb,5.1238e-04_jprb/)
1186 kbo( :, 4,33, 3) = (/&
1187 &1.3226e-05_jprb,2.5067e-04_jprb,4.0039e-04_jprb,5.0676e-04_jprb,5.1732e-04_jprb/)
1188 kbo( :, 5,33, 3) = (/&
1189 &1.8631e-05_jprb,2.7107e-04_jprb,4.2476e-04_jprb,5.2963e-04_jprb,5.1944e-04_jprb/)
1190 kbo( :, 1,34, 3) = (/&
1191 &3.3238e-06_jprb,1.5902e-04_jprb,2.6946e-04_jprb,3.5933e-04_jprb,4.0648e-04_jprb/)
1192 kbo( :, 2,34, 3) = (/&
1193 &5.3166e-06_jprb,1.7590e-04_jprb,2.9135e-04_jprb,3.8047e-04_jprb,4.1623e-04_jprb/)
1194 kbo( :, 3,34, 3) = (/&
1195 &8.0935e-06_jprb,1.9289e-04_jprb,3.1309e-04_jprb,4.0135e-04_jprb,4.2273e-04_jprb/)
1196 kbo( :, 4,34, 3) = (/&
1197 &1.1767e-05_jprb,2.0963e-04_jprb,3.3398e-04_jprb,4.2136e-04_jprb,4.2646e-04_jprb/)
1198 kbo( :, 5,34, 3) = (/&
1199 &1.6441e-05_jprb,2.2628e-04_jprb,3.5340e-04_jprb,4.3976e-04_jprb,4.2791e-04_jprb/)
1200 kbo( :, 1,35, 3) = (/&
1201 &2.9067e-06_jprb,1.3259e-04_jprb,2.2393e-04_jprb,2.9733e-04_jprb,3.3540e-04_jprb/)
1202 kbo( :, 2,35, 3) = (/&
1203 &4.6187e-06_jprb,1.4644e-04_jprb,2.4206e-04_jprb,3.1503e-04_jprb,3.4321e-04_jprb/)
1204 kbo( :, 3,35, 3) = (/&
1205 &6.9869e-06_jprb,1.6027e-04_jprb,2.5990e-04_jprb,3.3236e-04_jprb,3.4842e-04_jprb/)
1206 kbo( :, 4,35, 3) = (/&
1207 &1.0104e-05_jprb,1.7387e-04_jprb,2.7672e-04_jprb,3.4881e-04_jprb,3.5145e-04_jprb/)
1208 kbo( :, 5,35, 3) = (/&
1209 &1.4052e-05_jprb,1.8746e-04_jprb,2.9226e-04_jprb,3.6359e-04_jprb,3.5262e-04_jprb/)
1210 kbo( :, 1,36, 3) = (/&
1211 &2.4089e-06_jprb,1.0927e-04_jprb,1.8451e-04_jprb,2.4455e-04_jprb,2.7594e-04_jprb/)
1212 kbo( :, 2,36, 3) = (/&
1213 &3.8233e-06_jprb,1.2060e-04_jprb,1.9949e-04_jprb,2.5938e-04_jprb,2.8242e-04_jprb/)
1214 kbo( :, 3,36, 3) = (/&
1215 &5.7778e-06_jprb,1.3185e-04_jprb,2.1404e-04_jprb,2.7372e-04_jprb,2.8680e-04_jprb/)
1216 kbo( :, 4,36, 3) = (/&
1217 &8.3484e-06_jprb,1.4295e-04_jprb,2.2765e-04_jprb,2.8727e-04_jprb,2.8945e-04_jprb/)
1218 kbo( :, 5,36, 3) = (/&
1219 &1.1603e-05_jprb,1.5407e-04_jprb,2.4022e-04_jprb,2.9918e-04_jprb,2.9054e-04_jprb/)
1220 kbo( :, 1,37, 3) = (/&
1221 &1.8525e-06_jprb,8.8636e-05_jprb,1.5015e-04_jprb,1.9932e-04_jprb,2.2585e-04_jprb/)
1222 kbo( :, 2,37, 3) = (/&
1223 &2.9593e-06_jprb,9.7894e-05_jprb,1.6249e-04_jprb,2.1170e-04_jprb,2.3148e-04_jprb/)
1224 kbo( :, 3,37, 3) = (/&
1225 &4.5018e-06_jprb,1.0706e-04_jprb,1.7444e-04_jprb,2.2370e-04_jprb,2.3543e-04_jprb/)
1226 kbo( :, 4,37, 3) = (/&
1227 &6.5383e-06_jprb,1.1615e-04_jprb,1.8559e-04_jprb,2.3492e-04_jprb,2.3791e-04_jprb/)
1228 kbo( :, 5,37, 3) = (/&
1229 &9.1296e-06_jprb,1.2523e-04_jprb,1.9593e-04_jprb,2.4478e-04_jprb,2.3911e-04_jprb/)
1230 kbo( :, 1,38, 3) = (/&
1231 &1.4171e-06_jprb,7.1807e-05_jprb,1.2206e-04_jprb,1.6233e-04_jprb,1.8481e-04_jprb/)
1232 kbo( :, 2,38, 3) = (/&
1233 &2.2804e-06_jprb,7.9379e-05_jprb,1.3224e-04_jprb,1.7271e-04_jprb,1.8979e-04_jprb/)
1234 kbo( :, 3,38, 3) = (/&
1235 &3.4913e-06_jprb,8.6867e-05_jprb,1.4204e-04_jprb,1.8270e-04_jprb,1.9335e-04_jprb/)
1236 kbo( :, 4,38, 3) = (/&
1237 &5.1024e-06_jprb,9.4294e-05_jprb,1.5119e-04_jprb,1.9201e-04_jprb,1.9566e-04_jprb/)
1238 kbo( :, 5,38, 3) = (/&
1239 &7.1603e-06_jprb,1.0172e-04_jprb,1.5970e-04_jprb,2.0015e-04_jprb,1.9689e-04_jprb/)
1240 kbo( :, 1,39, 3) = (/&
1241 &1.0836e-06_jprb,5.8166e-05_jprb,9.9215e-05_jprb,1.3222e-04_jprb,1.5133e-04_jprb/)
1242 kbo( :, 2,39, 3) = (/&
1243 &1.7555e-06_jprb,6.4345e-05_jprb,1.0758e-04_jprb,1.4088e-04_jprb,1.5570e-04_jprb/)
1244 kbo( :, 3,39, 3) = (/&
1245 &2.7062e-06_jprb,7.0477e-05_jprb,1.1564e-04_jprb,1.4921e-04_jprb,1.5890e-04_jprb/)
1246 kbo( :, 4,39, 3) = (/&
1247 &3.9795e-06_jprb,7.6546e-05_jprb,1.2316e-04_jprb,1.5693e-04_jprb,1.6103e-04_jprb/)
1248 kbo( :, 5,39, 3) = (/&
1249 &5.6128e-06_jprb,8.2626e-05_jprb,1.3018e-04_jprb,1.6363e-04_jprb,1.6230e-04_jprb/)
1250 kbo( :, 1,40, 3) = (/&
1251 &7.8445e-07_jprb,4.6585e-05_jprb,7.9902e-05_jprb,1.0692e-04_jprb,1.2321e-04_jprb/)
1252 kbo( :, 2,40, 3) = (/&
1253 &1.2866e-06_jprb,5.1634e-05_jprb,8.6802e-05_jprb,1.1417e-04_jprb,1.2708e-04_jprb/)
1254 kbo( :, 3,40, 3) = (/&
1255 &2.0073e-06_jprb,5.6656e-05_jprb,9.3478e-05_jprb,1.2114e-04_jprb,1.2998e-04_jprb/)
1256 kbo( :, 4,40, 3) = (/&
1257 &2.9837e-06_jprb,6.1628e-05_jprb,9.9689e-05_jprb,1.2758e-04_jprb,1.3201e-04_jprb/)
1258 kbo( :, 5,40, 3) = (/&
1259 &4.2474e-06_jprb,6.6601e-05_jprb,1.0552e-04_jprb,1.3318e-04_jprb,1.3326e-04_jprb/)
1260 kbo( :, 1,41, 3) = (/&
1261 &5.6200e-07_jprb,3.7239e-05_jprb,6.4245e-05_jprb,8.6338e-05_jprb,1.0021e-04_jprb/)
1262 kbo( :, 2,41, 3) = (/&
1263 &9.3423e-07_jprb,4.1365e-05_jprb,6.9922e-05_jprb,9.2387e-05_jprb,1.0362e-04_jprb/)
1264 kbo( :, 3,41, 3) = (/&
1265 &1.4759e-06_jprb,4.5473e-05_jprb,7.5442e-05_jprb,9.8211e-05_jprb,1.0623e-04_jprb/)
1266 kbo( :, 4,41, 3) = (/&
1267 &2.2204e-06_jprb,4.9548e-05_jprb,8.0603e-05_jprb,1.0362e-04_jprb,1.0811e-04_jprb/)
1268 kbo( :, 5,41, 3) = (/&
1269 &3.1941e-06_jprb,5.3616e-05_jprb,8.5442e-05_jprb,1.0831e-04_jprb,1.0933e-04_jprb/)
1270 kbo( :, 1,42, 3) = (/&
1271 &4.0111e-07_jprb,2.9743e-05_jprb,5.1608e-05_jprb,6.9660e-05_jprb,8.1453e-05_jprb/)
1272 kbo( :, 2,42, 3) = (/&
1273 &6.7588e-07_jprb,3.3120e-05_jprb,5.6295e-05_jprb,7.4726e-05_jprb,8.4452e-05_jprb/)
1274 kbo( :, 3,42, 3) = (/&
1275 &1.0815e-06_jprb,3.6481e-05_jprb,6.0861e-05_jprb,7.9587e-05_jprb,8.6802e-05_jprb/)
1276 kbo( :, 4,42, 3) = (/&
1277 &1.6472e-06_jprb,3.9818e-05_jprb,6.5135e-05_jprb,8.4095e-05_jprb,8.8535e-05_jprb/)
1278 kbo( :, 5,42, 3) = (/&
1279 &2.3953e-06_jprb,4.3150e-05_jprb,6.9163e-05_jprb,8.8053e-05_jprb,8.9707e-05_jprb/)
1280 kbo( :, 1,43, 3) = (/&
1281 &2.7634e-07_jprb,2.3586e-05_jprb,4.1208e-05_jprb,5.5916e-05_jprb,6.5980e-05_jprb/)
1282 kbo( :, 2,43, 3) = (/&
1283 &4.7339e-07_jprb,2.6349e-05_jprb,4.5082e-05_jprb,6.0171e-05_jprb,6.8655e-05_jprb/)
1284 kbo( :, 3,43, 3) = (/&
1285 &7.6946e-07_jprb,2.9095e-05_jprb,4.8858e-05_jprb,6.4228e-05_jprb,7.0769e-05_jprb/)
1286 kbo( :, 4,43, 3) = (/&
1287 &1.1899e-06_jprb,3.1831e-05_jprb,5.2419e-05_jprb,6.8020e-05_jprb,7.2392e-05_jprb/)
1288 kbo( :, 5,43, 3) = (/&
1289 &1.7542e-06_jprb,3.4560e-05_jprb,5.5769e-05_jprb,7.1373e-05_jprb,7.3520e-05_jprb/)
1290 kbo( :, 1,44, 3) = (/&
1291 &1.8677e-07_jprb,1.8630e-05_jprb,3.2790e-05_jprb,4.4748e-05_jprb,5.3325e-05_jprb/)
1292 kbo( :, 2,44, 3) = (/&
1293 &3.2545e-07_jprb,2.0878e-05_jprb,3.5981e-05_jprb,4.8304e-05_jprb,5.5702e-05_jprb/)
1294 kbo( :, 3,44, 3) = (/&
1295 &5.3812e-07_jprb,2.3132e-05_jprb,3.9119e-05_jprb,5.1707e-05_jprb,5.7625e-05_jprb/)
1296 kbo( :, 4,44, 3) = (/&
1297 &8.4624e-07_jprb,2.5378e-05_jprb,4.2094e-05_jprb,5.4904e-05_jprb,5.9117e-05_jprb/)
1298 kbo( :, 5,44, 3) = (/&
1299 &1.2670e-06_jprb,2.7605e-05_jprb,4.4873e-05_jprb,5.7740e-05_jprb,6.0210e-05_jprb/)
1300 kbo( :, 1,45, 3) = (/&
1301 &1.2570e-07_jprb,1.4697e-05_jprb,2.6055e-05_jprb,3.5757e-05_jprb,4.3043e-05_jprb/)
1302 kbo( :, 2,45, 3) = (/&
1303 &2.2228e-07_jprb,1.6531e-05_jprb,2.8696e-05_jprb,3.8740e-05_jprb,4.5168e-05_jprb/)
1304 kbo( :, 3,45, 3) = (/&
1305 &3.7425e-07_jprb,1.8375e-05_jprb,3.1286e-05_jprb,4.1584e-05_jprb,4.6892e-05_jprb/)
1306 kbo( :, 4,45, 3) = (/&
1307 &5.9851e-07_jprb,2.0210e-05_jprb,3.3765e-05_jprb,4.4275e-05_jprb,4.8273e-05_jprb/)
1308 kbo( :, 5,45, 3) = (/&
1309 &9.1064e-07_jprb,2.2043e-05_jprb,3.6086e-05_jprb,4.6686e-05_jprb,4.9306e-05_jprb/)
1310 kbo( :, 1,46, 3) = (/&
1311 &8.3151e-08_jprb,1.1545e-05_jprb,2.0622e-05_jprb,2.8475e-05_jprb,3.4643e-05_jprb/)
1312 kbo( :, 2,46, 3) = (/&
1313 &1.4909e-07_jprb,1.3038e-05_jprb,2.2804e-05_jprb,3.0968e-05_jprb,3.6538e-05_jprb/)
1314 kbo( :, 3,46, 3) = (/&
1315 &2.5589e-07_jprb,1.4552e-05_jprb,2.4958e-05_jprb,3.3368e-05_jprb,3.8096e-05_jprb/)
1316 kbo( :, 4,46, 3) = (/&
1317 &4.1668e-07_jprb,1.6050e-05_jprb,2.7017e-05_jprb,3.5626e-05_jprb,3.9358e-05_jprb/)
1318 kbo( :, 5,46, 3) = (/&
1319 &6.4518e-07_jprb,1.7554e-05_jprb,2.8957e-05_jprb,3.7672e-05_jprb,4.0331e-05_jprb/)
1320 kbo( :, 1,47, 3) = (/&
1321 &5.3540e-08_jprb,9.0044e-06_jprb,1.6219e-05_jprb,2.2547e-05_jprb,2.7739e-05_jprb/)
1322 kbo( :, 2,47, 3) = (/&
1323 &9.7029e-08_jprb,1.0218e-05_jprb,1.8025e-05_jprb,2.4635e-05_jprb,2.9430e-05_jprb/)
1324 kbo( :, 3,47, 3) = (/&
1325 &1.6982e-07_jprb,1.1454e-05_jprb,1.9806e-05_jprb,2.6651e-05_jprb,3.0836e-05_jprb/)
1326 kbo( :, 4,47, 3) = (/&
1327 &2.8228e-07_jprb,1.2681e-05_jprb,2.1522e-05_jprb,2.8552e-05_jprb,3.1984e-05_jprb/)
1328 kbo( :, 5,47, 3) = (/&
1329 &4.4593e-07_jprb,1.3911e-05_jprb,2.3146e-05_jprb,3.0298e-05_jprb,3.2902e-05_jprb/)
1330 kbo( :, 1,48, 3) = (/&
1331 &3.4557e-08_jprb,7.0084e-06_jprb,1.2731e-05_jprb,1.7817e-05_jprb,2.2170e-05_jprb/)
1332 kbo( :, 2,48, 3) = (/&
1333 &6.2743e-08_jprb,7.9919e-06_jprb,1.4216e-05_jprb,1.9554e-05_jprb,2.3663e-05_jprb/)
1334 kbo( :, 3,48, 3) = (/&
1335 &1.1169e-07_jprb,8.9994e-06_jprb,1.5688e-05_jprb,2.1246e-05_jprb,2.4930e-05_jprb/)
1336 kbo( :, 4,48, 3) = (/&
1337 &1.8970e-07_jprb,1.0009e-05_jprb,1.7121e-05_jprb,2.2855e-05_jprb,2.5977e-05_jprb/)
1338 kbo( :, 5,48, 3) = (/&
1339 &3.0578e-07_jprb,1.1013e-05_jprb,1.8479e-05_jprb,2.4337e-05_jprb,2.6830e-05_jprb/)
1340 kbo( :, 1,49, 3) = (/&
1341 &2.2502e-08_jprb,5.4403e-06_jprb,9.9701e-06_jprb,1.4043e-05_jprb,1.7685e-05_jprb/)
1342 kbo( :, 2,49, 3) = (/&
1343 &4.0407e-08_jprb,6.2386e-06_jprb,1.1187e-05_jprb,1.5489e-05_jprb,1.8999e-05_jprb/)
1344 kbo( :, 3,49, 3) = (/&
1345 &7.2903e-08_jprb,7.0592e-06_jprb,1.2408e-05_jprb,1.6909e-05_jprb,2.0138e-05_jprb/)
1346 kbo( :, 4,49, 3) = (/&
1347 &1.2643e-07_jprb,7.8874e-06_jprb,1.3602e-05_jprb,1.8265e-05_jprb,2.1093e-05_jprb/)
1348 kbo( :, 5,49, 3) = (/&
1349 &2.0803e-07_jprb,8.7090e-06_jprb,1.4734e-05_jprb,1.9523e-05_jprb,2.1885e-05_jprb/)
1350 kbo( :, 1,50, 3) = (/&
1351 &1.5095e-08_jprb,4.2287e-06_jprb,7.8121e-06_jprb,1.1070e-05_jprb,1.4078e-05_jprb/)
1352 kbo( :, 2,50, 3) = (/&
1353 &2.6427e-08_jprb,4.8766e-06_jprb,8.8105e-06_jprb,1.2276e-05_jprb,1.5222e-05_jprb/)
1354 kbo( :, 3,50, 3) = (/&
1355 &4.7991e-08_jprb,5.5443e-06_jprb,9.8192e-06_jprb,1.3460e-05_jprb,1.6227e-05_jprb/)
1356 kbo( :, 4,50, 3) = (/&
1357 &8.4675e-08_jprb,6.2215e-06_jprb,1.0811e-05_jprb,1.4600e-05_jprb,1.7078e-05_jprb/)
1358 kbo( :, 5,50, 3) = (/&
1359 &1.4213e-07_jprb,6.8957e-06_jprb,1.1757e-05_jprb,1.5668e-05_jprb,1.7797e-05_jprb/)
1360 kbo( :, 1,51, 3) = (/&
1361 &1.0409e-08_jprb,3.2863e-06_jprb,6.1164e-06_jprb,8.7177e-06_jprb,1.1179e-05_jprb/)
1362 kbo( :, 2,51, 3) = (/&
1363 &1.7475e-08_jprb,3.8101e-06_jprb,6.9343e-06_jprb,9.7209e-06_jprb,1.2172e-05_jprb/)
1364 kbo( :, 3,51, 3) = (/&
1365 &3.1652e-08_jprb,4.3546e-06_jprb,7.7683e-06_jprb,1.0708e-05_jprb,1.3048e-05_jprb/)
1366 kbo( :, 4,51, 3) = (/&
1367 &5.6664e-08_jprb,4.9075e-06_jprb,8.5891e-06_jprb,1.1663e-05_jprb,1.3802e-05_jprb/)
1368 kbo( :, 5,51, 3) = (/&
1369 &9.6978e-08_jprb,5.4606e-06_jprb,9.3785e-06_jprb,1.2566e-05_jprb,1.4438e-05_jprb/)
1370 kbo( :, 1,52, 3) = (/&
1371 &7.3730e-09_jprb,2.5481e-06_jprb,4.7781e-06_jprb,6.8480e-06_jprb,8.8551e-06_jprb/)
1372 kbo( :, 2,52, 3) = (/&
1373 &1.1665e-08_jprb,2.9707e-06_jprb,5.4480e-06_jprb,7.6826e-06_jprb,9.7180e-06_jprb/)
1374 kbo( :, 3,52, 3) = (/&
1375 &2.0839e-08_jprb,3.4136e-06_jprb,6.1334e-06_jprb,8.5017e-06_jprb,1.0476e-05_jprb/)
1376 kbo( :, 4,52, 3) = (/&
1377 &3.7702e-08_jprb,3.8651e-06_jprb,6.8133e-06_jprb,9.3029e-06_jprb,1.1144e-05_jprb/)
1378 kbo( :, 5,52, 3) = (/&
1379 &6.5719e-08_jprb,4.3178e-06_jprb,7.4715e-06_jprb,1.0064e-05_jprb,1.1709e-05_jprb/)
1380 kbo( :, 1,53, 3) = (/&
1381 &5.3750e-09_jprb,1.9710e-06_jprb,3.7222e-06_jprb,5.3652e-06_jprb,6.9985e-06_jprb/)
1382 kbo( :, 2,53, 3) = (/&
1383 &7.9112e-09_jprb,2.3105e-06_jprb,4.2696e-06_jprb,6.0569e-06_jprb,7.7450e-06_jprb/)
1384 kbo( :, 3,53, 3) = (/&
1385 &1.3727e-08_jprb,2.6711e-06_jprb,4.8332e-06_jprb,6.7376e-06_jprb,8.4040e-06_jprb/)
1386 kbo( :, 4,53, 3) = (/&
1387 &2.4945e-08_jprb,3.0391e-06_jprb,5.3954e-06_jprb,7.4078e-06_jprb,8.9922e-06_jprb/)
1388 kbo( :, 5,53, 3) = (/&
1389 &4.4184e-08_jprb,3.4095e-06_jprb,5.9433e-06_jprb,8.0475e-06_jprb,9.4957e-06_jprb/)
1390 kbo( :, 1,54, 3) = (/&
1391 &4.0653e-09_jprb,1.5287e-06_jprb,2.9053e-06_jprb,4.2078e-06_jprb,5.5137e-06_jprb/)
1392 kbo( :, 2,54, 3) = (/&
1393 &5.5613e-09_jprb,1.8017e-06_jprb,3.3529e-06_jprb,4.7820e-06_jprb,6.1506e-06_jprb/)
1394 kbo( :, 3,54, 3) = (/&
1395 &9.2526e-09_jprb,2.0941e-06_jprb,3.8143e-06_jprb,5.3462e-06_jprb,6.7127e-06_jprb/)
1396 kbo( :, 4,54, 3) = (/&
1397 &1.6740e-08_jprb,2.3952e-06_jprb,4.2796e-06_jprb,5.9051e-06_jprb,7.2164e-06_jprb/)
1398 kbo( :, 5,54, 3) = (/&
1399 &3.0031e-08_jprb,2.6979e-06_jprb,4.7338e-06_jprb,6.4403e-06_jprb,7.6524e-06_jprb/)
1400 kbo( :, 1,55, 3) = (/&
1401 &3.1540e-09_jprb,1.1858e-06_jprb,2.2670e-06_jprb,3.2967e-06_jprb,4.3283e-06_jprb/)
1402 kbo( :, 2,55, 3) = (/&
1403 &4.0196e-09_jprb,1.4051e-06_jprb,2.6332e-06_jprb,3.7741e-06_jprb,4.8678e-06_jprb/)
1404 kbo( :, 3,55, 3) = (/&
1405 &6.3379e-09_jprb,1.6423e-06_jprb,3.0104e-06_jprb,4.2413e-06_jprb,5.3455e-06_jprb/)
1406 kbo( :, 4,55, 3) = (/&
1407 &1.1312e-08_jprb,1.8877e-06_jprb,3.3935e-06_jprb,4.7052e-06_jprb,5.7689e-06_jprb/)
1408 kbo( :, 5,55, 3) = (/&
1409 &2.0477e-08_jprb,2.1358e-06_jprb,3.7709e-06_jprb,5.1537e-06_jprb,6.1417e-06_jprb/)
1410 kbo( :, 1,56, 3) = (/&
1411 &2.4885e-09_jprb,9.1751e-07_jprb,1.7642e-06_jprb,2.5751e-06_jprb,3.3880e-06_jprb/)
1412 kbo( :, 2,56, 3) = (/&
1413 &2.9720e-09_jprb,1.0942e-06_jprb,2.0641e-06_jprb,2.9723e-06_jprb,3.8440e-06_jprb/)
1414 kbo( :, 3,56, 3) = (/&
1415 &4.3988e-09_jprb,1.2857e-06_jprb,2.3716e-06_jprb,3.3596e-06_jprb,4.2506e-06_jprb/)
1416 kbo( :, 4,56, 3) = (/&
1417 &7.6547e-09_jprb,1.4859e-06_jprb,2.6877e-06_jprb,3.7438e-06_jprb,4.6065e-06_jprb/)
1418 kbo( :, 5,56, 3) = (/&
1419 &1.3911e-08_jprb,1.6888e-06_jprb,2.9997e-06_jprb,4.1185e-06_jprb,4.9232e-06_jprb/)
1420 kbo( :, 1,57, 3) = (/&
1421 &1.9886e-09_jprb,7.0763e-07_jprb,1.3683e-06_jprb,2.0041e-06_jprb,2.6428e-06_jprb/)
1422 kbo( :, 2,57, 3) = (/&
1423 &2.2504e-09_jprb,8.5035e-07_jprb,1.6145e-06_jprb,2.3353e-06_jprb,3.0283e-06_jprb/)
1424 kbo( :, 3,57, 3) = (/&
1425 &3.1057e-09_jprb,1.0047e-06_jprb,1.8650e-06_jprb,2.6564e-06_jprb,3.3731e-06_jprb/)
1426 kbo( :, 4,57, 3) = (/&
1427 &5.1987e-09_jprb,1.1674e-06_jprb,2.1248e-06_jprb,2.9740e-06_jprb,3.6745e-06_jprb/)
1428 kbo( :, 5,57, 3) = (/&
1429 &9.4155e-09_jprb,1.3335e-06_jprb,2.3825e-06_jprb,3.2869e-06_jprb,3.9424e-06_jprb/)
1430 kbo( :, 1,58, 3) = (/&
1431 &1.6068e-09_jprb,5.4596e-07_jprb,1.0610e-06_jprb,1.5587e-06_jprb,2.0582e-06_jprb/)
1432 kbo( :, 2,58, 3) = (/&
1433 &1.7459e-09_jprb,6.6156e-07_jprb,1.2631e-06_jprb,1.8343e-06_jprb,2.3824e-06_jprb/)
1434 kbo( :, 3,58, 3) = (/&
1435 &2.2524e-09_jprb,7.8545e-07_jprb,1.4674e-06_jprb,2.1005e-06_jprb,2.6733e-06_jprb/)
1436 kbo( :, 4,58, 3) = (/&
1437 &3.5899e-09_jprb,9.1799e-07_jprb,1.6806e-06_jprb,2.3630e-06_jprb,2.9296e-06_jprb/)
1438 kbo( :, 5,58, 3) = (/&
1439 &6.4281e-09_jprb,1.0538e-06_jprb,1.8933e-06_jprb,2.6237e-06_jprb,3.1542e-06_jprb/)
1440 kbo( :, 1,59, 3) = (/&
1441 &1.3115e-09_jprb,4.3655e-07_jprb,8.4995e-07_jprb,1.2498e-06_jprb,1.6427e-06_jprb/)
1442 kbo( :, 2,59, 3) = (/&
1443 &1.4063e-09_jprb,5.3104e-07_jprb,1.0161e-06_jprb,1.4776e-06_jprb,1.9087e-06_jprb/)
1444 kbo( :, 3,59, 3) = (/&
1445 &1.7670e-09_jprb,6.3221e-07_jprb,1.1839e-06_jprb,1.6975e-06_jprb,2.1469e-06_jprb/)
1446 kbo( :, 4,59, 3) = (/&
1447 &2.7538e-09_jprb,7.4064e-07_jprb,1.3591e-06_jprb,1.9143e-06_jprb,2.3563e-06_jprb/)
1448 kbo( :, 5,59, 3) = (/&
1449 &4.8966e-09_jprb,8.5194e-07_jprb,1.5343e-06_jprb,2.1300e-06_jprb,2.5372e-06_jprb/)
1450 kbo( :, 1,13, 4) = (/&
1451 &1.4832e-04_jprb,1.5698e-02_jprb,2.8434e-02_jprb,4.0000e-02_jprb,5.0535e-02_jprb/)
1452 kbo( :, 2,13, 4) = (/&
1453 &2.7354e-04_jprb,1.7679e-02_jprb,3.1476e-02_jprb,4.3634e-02_jprb,5.4373e-02_jprb/)
1454 kbo( :, 3,13, 4) = (/&
1455 &4.7514e-04_jprb,1.9768e-02_jprb,3.4498e-02_jprb,4.7113e-02_jprb,5.7896e-02_jprb/)
1456 kbo( :, 4,13, 4) = (/&
1457 &7.6575e-04_jprb,2.1934e-02_jprb,3.7431e-02_jprb,5.0364e-02_jprb,6.0901e-02_jprb/)
1458 kbo( :, 5,13, 4) = (/&
1459 &1.1458e-03_jprb,2.4148e-02_jprb,4.0264e-02_jprb,5.3231e-02_jprb,6.3251e-02_jprb/)
1460 kbo( :, 1,14, 4) = (/&
1461 &1.3350e-04_jprb,1.3782e-02_jprb,2.4857e-02_jprb,3.4870e-02_jprb,4.3573e-02_jprb/)
1462 kbo( :, 2,14, 4) = (/&
1463 &2.4593e-04_jprb,1.5547e-02_jprb,2.7509e-02_jprb,3.8001e-02_jprb,4.6776e-02_jprb/)
1464 kbo( :, 3,14, 4) = (/&
1465 &4.2506e-04_jprb,1.7409e-02_jprb,3.0122e-02_jprb,4.0944e-02_jprb,4.9474e-02_jprb/)
1466 kbo( :, 4,14, 4) = (/&
1467 &6.7927e-04_jprb,1.9326e-02_jprb,3.2594e-02_jprb,4.3519e-02_jprb,5.1527e-02_jprb/)
1468 kbo( :, 5,14, 4) = (/&
1469 &1.0076e-03_jprb,2.1255e-02_jprb,3.4899e-02_jprb,4.5670e-02_jprb,5.2951e-02_jprb/)
1470 kbo( :, 1,15, 4) = (/&
1471 &1.2065e-04_jprb,1.2024e-02_jprb,2.1582e-02_jprb,3.0176e-02_jprb,3.7371e-02_jprb/)
1472 kbo( :, 2,15, 4) = (/&
1473 &2.2207e-04_jprb,1.3580e-02_jprb,2.3845e-02_jprb,3.2795e-02_jprb,3.9887e-02_jprb/)
1474 kbo( :, 3,15, 4) = (/&
1475 &3.8077e-04_jprb,1.5191e-02_jprb,2.6000e-02_jprb,3.5116e-02_jprb,4.1764e-02_jprb/)
1476 kbo( :, 4,15, 4) = (/&
1477 &6.0257e-04_jprb,1.6816e-02_jprb,2.7979e-02_jprb,3.7046e-02_jprb,4.3070e-02_jprb/)
1478 kbo( :, 5,15, 4) = (/&
1479 &8.8599e-04_jprb,1.8418e-02_jprb,2.9799e-02_jprb,3.8653e-02_jprb,4.3914e-02_jprb/)
1480 kbo( :, 1,16, 4) = (/&
1481 &1.0931e-04_jprb,1.0419e-02_jprb,1.8587e-02_jprb,2.5887e-02_jprb,3.1833e-02_jprb/)
1482 kbo( :, 2,16, 4) = (/&
1483 &2.0062e-04_jprb,1.1752e-02_jprb,2.0443e-02_jprb,2.7962e-02_jprb,3.3659e-02_jprb/)
1484 kbo( :, 3,16, 4) = (/&
1485 &3.4061e-04_jprb,1.3095e-02_jprb,2.2148e-02_jprb,2.9721e-02_jprb,3.4939e-02_jprb/)
1486 kbo( :, 4,16, 4) = (/&
1487 &5.3341e-04_jprb,1.4426e-02_jprb,2.3724e-02_jprb,3.1189e-02_jprb,3.5807e-02_jprb/)
1488 kbo( :, 5,16, 4) = (/&
1489 &7.7707e-04_jprb,1.5740e-02_jprb,2.5194e-02_jprb,3.2443e-02_jprb,3.6342e-02_jprb/)
1490 kbo( :, 1,17, 4) = (/&
1491 &9.8787e-05_jprb,8.9488e-03_jprb,1.5843e-02_jprb,2.1968e-02_jprb,2.6812e-02_jprb/)
1492 kbo( :, 2,17, 4) = (/&
1493 &1.8034e-04_jprb,1.0053e-02_jprb,1.7312e-02_jprb,2.3563e-02_jprb,2.8105e-02_jprb/)
1494 kbo( :, 3,17, 4) = (/&
1495 &3.0330e-04_jprb,1.1150e-02_jprb,1.8677e-02_jprb,2.4918e-02_jprb,2.9010e-02_jprb/)
1496 kbo( :, 4,17, 4) = (/&
1497 &4.6915e-04_jprb,1.2239e-02_jprb,1.9960e-02_jprb,2.6083e-02_jprb,2.9616e-02_jprb/)
1498 kbo( :, 5,17, 4) = (/&
1499 &6.7860e-04_jprb,1.3325e-02_jprb,2.1171e-02_jprb,2.7089e-02_jprb,2.9962e-02_jprb/)
1500 kbo( :, 1,18, 4) = (/&
1501 &8.9115e-05_jprb,7.6114e-03_jprb,1.3364e-02_jprb,1.8461e-02_jprb,2.2371e-02_jprb/)
1502 kbo( :, 2,18, 4) = (/&
1503 &1.6151e-04_jprb,8.5146e-03_jprb,1.4542e-02_jprb,1.9706e-02_jprb,2.3318e-02_jprb/)
1504 kbo( :, 3,18, 4) = (/&
1505 &2.6853e-04_jprb,9.4157e-03_jprb,1.5660e-02_jprb,2.0781e-02_jprb,2.3982e-02_jprb/)
1506 kbo( :, 4,18, 4) = (/&
1507 &4.1020e-04_jprb,1.0310e-02_jprb,1.6712e-02_jprb,2.1721e-02_jprb,2.4416e-02_jprb/)
1508 kbo( :, 5,18, 4) = (/&
1509 &5.9029e-04_jprb,1.1212e-02_jprb,1.7715e-02_jprb,2.2537e-02_jprb,2.4643e-02_jprb/)
1510 kbo( :, 1,19, 4) = (/&
1511 &8.0095e-05_jprb,6.4231e-03_jprb,1.1196e-02_jprb,1.5414e-02_jprb,1.8549e-02_jprb/)
1512 kbo( :, 2,19, 4) = (/&
1513 &1.4382e-04_jprb,7.1662e-03_jprb,1.2159e-02_jprb,1.6403e-02_jprb,1.9259e-02_jprb/)
1514 kbo( :, 3,19, 4) = (/&
1515 &2.3623e-04_jprb,7.9047e-03_jprb,1.3080e-02_jprb,1.7271e-02_jprb,1.9754e-02_jprb/)
1516 kbo( :, 4,19, 4) = (/&
1517 &3.5687e-04_jprb,8.6444e-03_jprb,1.3944e-02_jprb,1.8036e-02_jprb,2.0065e-02_jprb/)
1518 kbo( :, 5,19, 4) = (/&
1519 &5.1169e-04_jprb,9.3924e-03_jprb,1.4772e-02_jprb,1.8710e-02_jprb,2.0213e-02_jprb/)
1520 kbo( :, 1,20, 4) = (/&
1521 &7.2492e-05_jprb,5.4035e-03_jprb,9.3587e-03_jprb,1.2831e-02_jprb,1.5342e-02_jprb/)
1522 kbo( :, 2,20, 4) = (/&
1523 &1.2843e-04_jprb,6.0138e-03_jprb,1.0150e-02_jprb,1.3627e-02_jprb,1.5882e-02_jprb/)
1524 kbo( :, 3,20, 4) = (/&
1525 &2.0800e-04_jprb,6.6212e-03_jprb,1.0905e-02_jprb,1.4334e-02_jprb,1.6254e-02_jprb/)
1526 kbo( :, 4,20, 4) = (/&
1527 &3.1139e-04_jprb,7.2334e-03_jprb,1.1615e-02_jprb,1.4959e-02_jprb,1.6478e-02_jprb/)
1528 kbo( :, 5,20, 4) = (/&
1529 &4.4561e-04_jprb,7.8568e-03_jprb,1.2299e-02_jprb,1.5516e-02_jprb,1.6574e-02_jprb/)
1530 kbo( :, 1,21, 4) = (/&
1531 &6.5335e-05_jprb,4.5290e-03_jprb,7.8063e-03_jprb,1.0655e-02_jprb,1.2662e-02_jprb/)
1532 kbo( :, 2,21, 4) = (/&
1533 &1.1419e-04_jprb,5.0316e-03_jprb,8.4549e-03_jprb,1.1302e-02_jprb,1.3077e-02_jprb/)
1534 kbo( :, 3,21, 4) = (/&
1535 &1.8257e-04_jprb,5.5323e-03_jprb,9.0718e-03_jprb,1.1880e-02_jprb,1.3357e-02_jprb/)
1536 kbo( :, 4,21, 4) = (/&
1537 &2.7150e-04_jprb,6.0382e-03_jprb,9.6571e-03_jprb,1.2392e-02_jprb,1.3520e-02_jprb/)
1538 kbo( :, 5,21, 4) = (/&
1539 &3.8801e-04_jprb,6.5620e-03_jprb,1.0220e-02_jprb,1.2849e-02_jprb,1.3582e-02_jprb/)
1540 kbo( :, 1,22, 4) = (/&
1541 &6.0922e-05_jprb,3.8139e-03_jprb,6.5357e-03_jprb,8.8714e-03_jprb,1.0461e-02_jprb/)
1542 kbo( :, 2,22, 4) = (/&
1543 &1.0454e-04_jprb,4.2277e-03_jprb,7.0637e-03_jprb,9.3969e-03_jprb,1.0774e-02_jprb/)
1544 kbo( :, 3,22, 4) = (/&
1545 &1.6444e-04_jprb,4.6414e-03_jprb,7.5689e-03_jprb,9.8658e-03_jprb,1.0980e-02_jprb/)
1546 kbo( :, 4,22, 4) = (/&
1547 &2.4255e-04_jprb,5.0640e-03_jprb,8.0491e-03_jprb,1.0279e-02_jprb,1.1093e-02_jprb/)
1548 kbo( :, 5,22, 4) = (/&
1549 &3.4545e-04_jprb,5.5019e-03_jprb,8.5122e-03_jprb,1.0654e-02_jprb,1.1125e-02_jprb/)
1550 kbo( :, 1,23, 4) = (/&
1551 &5.6689e-05_jprb,3.2067e-03_jprb,5.4634e-03_jprb,7.3826e-03_jprb,8.6316e-03_jprb/)
1552 kbo( :, 2,23, 4) = (/&
1553 &9.5550e-05_jprb,3.5483e-03_jprb,5.8959e-03_jprb,7.8077e-03_jprb,8.8675e-03_jprb/)
1554 kbo( :, 3,23, 4) = (/&
1555 &1.4822e-04_jprb,3.8901e-03_jprb,6.3080e-03_jprb,8.1829e-03_jprb,9.0160e-03_jprb/)
1556 kbo( :, 4,23, 4) = (/&
1557 &2.1693e-04_jprb,4.2438e-03_jprb,6.7020e-03_jprb,8.5212e-03_jprb,9.0932e-03_jprb/)
1558 kbo( :, 5,23, 4) = (/&
1559 &3.0734e-04_jprb,4.6091e-03_jprb,7.0873e-03_jprb,8.8256e-03_jprb,9.1050e-03_jprb/)
1560 kbo( :, 1,24, 4) = (/&
1561 &5.2736e-05_jprb,2.6949e-03_jprb,4.5641e-03_jprb,6.1416e-03_jprb,7.1164e-03_jprb/)
1562 kbo( :, 2,24, 4) = (/&
1563 &8.7372e-05_jprb,2.9764e-03_jprb,4.9186e-03_jprb,6.4817e-03_jprb,7.2904e-03_jprb/)
1564 kbo( :, 3,24, 4) = (/&
1565 &1.3390e-04_jprb,3.2620e-03_jprb,5.2557e-03_jprb,6.7856e-03_jprb,7.3982e-03_jprb/)
1566 kbo( :, 4,24, 4) = (/&
1567 &1.9446e-04_jprb,3.5561e-03_jprb,5.5797e-03_jprb,7.0599e-03_jprb,7.4464e-03_jprb/)
1568 kbo( :, 5,24, 4) = (/&
1569 &2.7345e-04_jprb,3.8596e-03_jprb,5.8982e-03_jprb,7.3057e-03_jprb,7.4438e-03_jprb/)
1570 kbo( :, 1,25, 4) = (/&
1571 &4.9165e-05_jprb,2.2652e-03_jprb,3.8124e-03_jprb,5.1055e-03_jprb,5.8623e-03_jprb/)
1572 kbo( :, 2,25, 4) = (/&
1573 &8.0068e-05_jprb,2.4983e-03_jprb,4.1027e-03_jprb,5.3800e-03_jprb,5.9915e-03_jprb/)
1574 kbo( :, 3,25, 4) = (/&
1575 &1.2114e-04_jprb,2.7360e-03_jprb,4.3785e-03_jprb,5.6255e-03_jprb,6.0673e-03_jprb/)
1576 kbo( :, 4,25, 4) = (/&
1577 &1.7452e-04_jprb,2.9807e-03_jprb,4.6460e-03_jprb,5.8473e-03_jprb,6.0957e-03_jprb/)
1578 kbo( :, 5,25, 4) = (/&
1579 &2.4297e-04_jprb,3.2336e-03_jprb,4.9074e-03_jprb,6.0470e-03_jprb,6.0845e-03_jprb/)
1580 kbo( :, 1,26, 4) = (/&
1581 &4.6134e-05_jprb,1.9065e-03_jprb,3.1876e-03_jprb,4.2457e-03_jprb,4.8285e-03_jprb/)
1582 kbo( :, 2,26, 4) = (/&
1583 &7.3723e-05_jprb,2.0998e-03_jprb,3.4240e-03_jprb,4.4668e-03_jprb,4.9227e-03_jprb/)
1584 kbo( :, 3,26, 4) = (/&
1585 &1.0992e-04_jprb,2.2971e-03_jprb,3.6508e-03_jprb,4.6650e-03_jprb,4.9747e-03_jprb/)
1586 kbo( :, 4,26, 4) = (/&
1587 &1.5687e-04_jprb,2.5009e-03_jprb,3.8701e-03_jprb,4.8439e-03_jprb,4.9884e-03_jprb/)
1588 kbo( :, 5,26, 4) = (/&
1589 &2.1597e-04_jprb,2.7132e-03_jprb,4.0857e-03_jprb,5.0072e-03_jprb,4.9727e-03_jprb/)
1590 kbo( :, 1,27, 4) = (/&
1591 &4.3156e-05_jprb,1.6045e-03_jprb,2.6642e-03_jprb,3.5293e-03_jprb,3.9753e-03_jprb/)
1592 kbo( :, 2,27, 4) = (/&
1593 &6.7610e-05_jprb,1.7645e-03_jprb,2.8577e-03_jprb,3.7073e-03_jprb,4.0435e-03_jprb/)
1594 kbo( :, 3,27, 4) = (/&
1595 &9.9302e-05_jprb,1.9283e-03_jprb,3.0434e-03_jprb,3.8675e-03_jprb,4.0783e-03_jprb/)
1596 kbo( :, 4,27, 4) = (/&
1597 &1.4035e-04_jprb,2.0987e-03_jprb,3.2238e-03_jprb,4.0126e-03_jprb,4.0827e-03_jprb/)
1598 kbo( :, 5,27, 4) = (/&
1599 &1.9112e-04_jprb,2.2790e-03_jprb,3.4026e-03_jprb,4.1445e-03_jprb,4.0645e-03_jprb/)
1600 kbo( :, 1,28, 4) = (/&
1601 &4.0151e-05_jprb,1.3496e-03_jprb,2.2256e-03_jprb,2.9318e-03_jprb,3.2709e-03_jprb/)
1602 kbo( :, 2,28, 4) = (/&
1603 &6.1693e-05_jprb,1.4821e-03_jprb,2.3842e-03_jprb,3.0756e-03_jprb,3.3203e-03_jprb/)
1604 kbo( :, 3,28, 4) = (/&
1605 &8.9314e-05_jprb,1.6183e-03_jprb,2.5363e-03_jprb,3.2052e-03_jprb,3.3423e-03_jprb/)
1606 kbo( :, 4,28, 4) = (/&
1607 &1.2503e-04_jprb,1.7621e-03_jprb,2.6850e-03_jprb,3.3229e-03_jprb,3.3419e-03_jprb/)
1608 kbo( :, 5,28, 4) = (/&
1609 &1.6847e-04_jprb,1.9159e-03_jprb,2.8346e-03_jprb,3.4298e-03_jprb,3.3234e-03_jprb/)
1610 kbo( :, 1,29, 4) = (/&
1611 &3.7204e-05_jprb,1.1357e-03_jprb,1.8605e-03_jprb,2.4364e-03_jprb,2.6925e-03_jprb/)
1612 kbo( :, 2,29, 4) = (/&
1613 &5.6126e-05_jprb,1.2453e-03_jprb,1.9896e-03_jprb,2.5519e-03_jprb,2.7276e-03_jprb/)
1614 kbo( :, 3,29, 4) = (/&
1615 &8.0329e-05_jprb,1.3596e-03_jprb,2.1150e-03_jprb,2.6576e-03_jprb,2.7417e-03_jprb/)
1616 kbo( :, 4,29, 4) = (/&
1617 &1.1119e-04_jprb,1.4821e-03_jprb,2.2379e-03_jprb,2.7526e-03_jprb,2.7376e-03_jprb/)
1618 kbo( :, 5,29, 4) = (/&
1619 &1.4835e-04_jprb,1.6135e-03_jprb,2.3653e-03_jprb,2.8402e-03_jprb,2.7209e-03_jprb/)
1620 kbo( :, 1,30, 4) = (/&
1621 &3.4278e-05_jprb,9.5541e-04_jprb,1.5548e-03_jprb,2.0242e-03_jprb,2.2164e-03_jprb/)
1622 kbo( :, 2,30, 4) = (/&
1623 &5.0802e-05_jprb,1.0465e-03_jprb,1.6607e-03_jprb,2.1179e-03_jprb,2.2411e-03_jprb/)
1624 kbo( :, 3,30, 4) = (/&
1625 &7.2016e-05_jprb,1.1433e-03_jprb,1.7631e-03_jprb,2.2027e-03_jprb,2.2491e-03_jprb/)
1626 kbo( :, 4,30, 4) = (/&
1627 &9.8522e-05_jprb,1.2484e-03_jprb,1.8671e-03_jprb,2.2807e-03_jprb,2.2444e-03_jprb/)
1628 kbo( :, 5,30, 4) = (/&
1629 &1.3037e-04_jprb,1.3590e-03_jprb,1.9752e-03_jprb,2.3528e-03_jprb,2.2289e-03_jprb/)
1630 kbo( :, 1,31, 4) = (/&
1631 &3.1460e-05_jprb,8.0377e-04_jprb,1.2994e-03_jprb,1.6818e-03_jprb,1.8252e-03_jprb/)
1632 kbo( :, 2,31, 4) = (/&
1633 &4.5877e-05_jprb,8.8014e-04_jprb,1.3859e-03_jprb,1.7575e-03_jprb,1.8427e-03_jprb/)
1634 kbo( :, 3,31, 4) = (/&
1635 &6.4417e-05_jprb,9.6356e-04_jprb,1.4714e-03_jprb,1.8269e-03_jprb,1.8476e-03_jprb/)
1636 kbo( :, 4,31, 4) = (/&
1637 &8.7181e-05_jprb,1.0525e-03_jprb,1.5596e-03_jprb,1.8902e-03_jprb,1.8422e-03_jprb/)
1638 kbo( :, 5,31, 4) = (/&
1639 &1.1453e-04_jprb,1.1450e-03_jprb,1.6516e-03_jprb,1.9513e-03_jprb,1.8286e-03_jprb/)
1640 kbo( :, 1,32, 4) = (/&
1641 &2.8746e-05_jprb,6.7650e-04_jprb,1.0860e-03_jprb,1.3976e-03_jprb,1.5036e-03_jprb/)
1642 kbo( :, 2,32, 4) = (/&
1643 &4.1322e-05_jprb,7.4162e-04_jprb,1.1570e-03_jprb,1.4588e-03_jprb,1.5157e-03_jprb/)
1644 kbo( :, 3,32, 4) = (/&
1645 &5.7453e-05_jprb,8.1295e-04_jprb,1.2291e-03_jprb,1.5152e-03_jprb,1.5184e-03_jprb/)
1646 kbo( :, 4,32, 4) = (/&
1647 &7.7060e-05_jprb,8.8760e-04_jprb,1.3041e-03_jprb,1.5676e-03_jprb,1.5130e-03_jprb/)
1648 kbo( :, 5,32, 4) = (/&
1649 &1.0055e-04_jprb,9.6447e-04_jprb,1.3816e-03_jprb,1.6201e-03_jprb,1.5011e-03_jprb/)
1650 kbo( :, 1,33, 4) = (/&
1651 &2.6149e-05_jprb,5.6986e-04_jprb,9.0744e-04_jprb,1.1611e-03_jprb,1.2388e-03_jprb/)
1652 kbo( :, 2,33, 4) = (/&
1653 &3.7187e-05_jprb,6.2590e-04_jprb,9.6645e-04_jprb,1.2109e-03_jprb,1.2475e-03_jprb/)
1654 kbo( :, 3,33, 4) = (/&
1655 &5.1122e-05_jprb,6.8620e-04_jprb,1.0278e-03_jprb,1.2567e-03_jprb,1.2488e-03_jprb/)
1656 kbo( :, 4,33, 4) = (/&
1657 &6.7992e-05_jprb,7.4863e-04_jprb,1.0916e-03_jprb,1.3015e-03_jprb,1.2439e-03_jprb/)
1658 kbo( :, 5,33, 4) = (/&
1659 &8.8264e-05_jprb,8.1165e-04_jprb,1.1560e-03_jprb,1.3467e-03_jprb,1.2339e-03_jprb/)
1660 kbo( :, 1,34, 4) = (/&
1661 &2.3383e-05_jprb,4.7914e-04_jprb,7.5656e-04_jprb,9.6327e-04_jprb,1.0201e-03_jprb/)
1662 kbo( :, 2,34, 4) = (/&
1663 &3.2952e-05_jprb,5.2698e-04_jprb,8.0647e-04_jprb,1.0038e-03_jprb,1.0263e-03_jprb/)
1664 kbo( :, 3,34, 4) = (/&
1665 &4.4898e-05_jprb,5.7759e-04_jprb,8.5874e-04_jprb,1.0423e-03_jprb,1.0268e-03_jprb/)
1666 kbo( :, 4,34, 4) = (/&
1667 &5.9304e-05_jprb,6.2906e-04_jprb,9.1184e-04_jprb,1.0803e-03_jprb,1.0223e-03_jprb/)
1668 kbo( :, 5,34, 4) = (/&
1669 &7.6697e-05_jprb,6.8025e-04_jprb,9.6511e-04_jprb,1.1186e-03_jprb,1.0139e-03_jprb/)
1670 kbo( :, 1,35, 4) = (/&
1671 &2.0135e-05_jprb,3.9961e-04_jprb,6.2708e-04_jprb,7.9562e-04_jprb,8.3915e-04_jprb/)
1672 kbo( :, 2,35, 4) = (/&
1673 &2.8240e-05_jprb,4.3984e-04_jprb,6.6953e-04_jprb,8.2921e-04_jprb,8.4431e-04_jprb/)
1674 kbo( :, 3,35, 4) = (/&
1675 &3.8284e-05_jprb,4.8179e-04_jprb,7.1336e-04_jprb,8.6176e-04_jprb,8.4473e-04_jprb/)
1676 kbo( :, 4,35, 4) = (/&
1677 &5.0380e-05_jprb,5.2399e-04_jprb,7.5755e-04_jprb,8.9436e-04_jprb,8.4105e-04_jprb/)
1678 kbo( :, 5,35, 4) = (/&
1679 &6.4985e-05_jprb,5.6538e-04_jprb,8.0096e-04_jprb,9.2613e-04_jprb,8.3390e-04_jprb/)
1680 kbo( :, 1,36, 4) = (/&
1681 &1.6672e-05_jprb,3.3001e-04_jprb,5.1652e-04_jprb,6.5429e-04_jprb,6.8995e-04_jprb/)
1682 kbo( :, 2,36, 4) = (/&
1683 &2.3356e-05_jprb,3.6341e-04_jprb,5.5227e-04_jprb,6.8236e-04_jprb,6.9447e-04_jprb/)
1684 kbo( :, 3,36, 4) = (/&
1685 &3.1620e-05_jprb,3.9798e-04_jprb,5.8880e-04_jprb,7.1017e-04_jprb,6.9516e-04_jprb/)
1686 kbo( :, 4,36, 4) = (/&
1687 &4.1586e-05_jprb,4.3228e-04_jprb,6.2537e-04_jprb,7.3771e-04_jprb,6.9235e-04_jprb/)
1688 kbo( :, 5,36, 4) = (/&
1689 &5.3612e-05_jprb,4.6581e-04_jprb,6.6082e-04_jprb,7.6427e-04_jprb,6.8669e-04_jprb/)
1690 kbo( :, 1,37, 4) = (/&
1691 &1.3087e-05_jprb,2.6849e-04_jprb,4.2115e-04_jprb,5.3442e-04_jprb,5.6613e-04_jprb/)
1692 kbo( :, 2,37, 4) = (/&
1693 &1.8389e-05_jprb,2.9596e-04_jprb,4.5110e-04_jprb,5.5819e-04_jprb,5.7060e-04_jprb/)
1694 kbo( :, 3,37, 4) = (/&
1695 &2.4989e-05_jprb,3.2427e-04_jprb,4.8144e-04_jprb,5.8191e-04_jprb,5.7172e-04_jprb/)
1696 kbo( :, 4,37, 4) = (/&
1697 &3.2975e-05_jprb,3.5221e-04_jprb,5.1177e-04_jprb,6.0525e-04_jprb,5.6998e-04_jprb/)
1698 kbo( :, 5,37, 4) = (/&
1699 &4.2603e-05_jprb,3.7949e-04_jprb,5.4072e-04_jprb,6.2738e-04_jprb,5.6571e-04_jprb/)
1700 kbo( :, 1,38, 4) = (/&
1701 &1.0230e-05_jprb,2.1818e-04_jprb,3.4316e-04_jprb,4.3622e-04_jprb,4.6452e-04_jprb/)
1702 kbo( :, 2,38, 4) = (/&
1703 &1.4428e-05_jprb,2.4074e-04_jprb,3.6819e-04_jprb,4.5640e-04_jprb,4.6888e-04_jprb/)
1704 kbo( :, 3,38, 4) = (/&
1705 &1.9697e-05_jprb,2.6389e-04_jprb,3.9346e-04_jprb,4.7668e-04_jprb,4.7037e-04_jprb/)
1706 kbo( :, 4,38, 4) = (/&
1707 &2.6076e-05_jprb,2.8667e-04_jprb,4.1847e-04_jprb,4.9632e-04_jprb,4.6943e-04_jprb/)
1708 kbo( :, 5,38, 4) = (/&
1709 &3.3772e-05_jprb,3.0890e-04_jprb,4.4212e-04_jprb,5.1488e-04_jprb,4.6632e-04_jprb/)
1710 kbo( :, 1,39, 4) = (/&
1711 &7.9957e-06_jprb,1.7734e-04_jprb,2.7964e-04_jprb,3.5608e-04_jprb,3.8137e-04_jprb/)
1712 kbo( :, 2,39, 4) = (/&
1713 &1.1315e-05_jprb,1.9578e-04_jprb,3.0056e-04_jprb,3.7320e-04_jprb,3.8548e-04_jprb/)
1714 kbo( :, 3,39, 4) = (/&
1715 &1.5521e-05_jprb,2.1469e-04_jprb,3.2152e-04_jprb,3.9044e-04_jprb,3.8726e-04_jprb/)
1716 kbo( :, 4,39, 4) = (/&
1717 &2.0623e-05_jprb,2.3327e-04_jprb,3.4211e-04_jprb,4.0694e-04_jprb,3.8696e-04_jprb/)
1718 kbo( :, 5,39, 4) = (/&
1719 &2.6775e-05_jprb,2.5145e-04_jprb,3.6146e-04_jprb,4.2258e-04_jprb,3.8472e-04_jprb/)
1720 kbo( :, 1,40, 4) = (/&
1721 &6.0059e-06_jprb,1.4255e-04_jprb,2.2608e-04_jprb,2.8913e-04_jprb,3.1195e-04_jprb/)
1722 kbo( :, 2,40, 4) = (/&
1723 &8.5603e-06_jprb,1.5759e-04_jprb,2.4350e-04_jprb,3.0367e-04_jprb,3.1602e-04_jprb/)
1724 kbo( :, 3,40, 4) = (/&
1725 &1.1848e-05_jprb,1.7303e-04_jprb,2.6092e-04_jprb,3.1829e-04_jprb,3.1800e-04_jprb/)
1726 kbo( :, 4,40, 4) = (/&
1727 &1.5848e-05_jprb,1.8824e-04_jprb,2.7792e-04_jprb,3.3233e-04_jprb,3.1813e-04_jprb/)
1728 kbo( :, 5,40, 4) = (/&
1729 &2.0655e-05_jprb,2.0317e-04_jprb,2.9386e-04_jprb,3.4558e-04_jprb,3.1680e-04_jprb/)
1730 kbo( :, 1,41, 4) = (/&
1731 &4.4737e-06_jprb,1.1440e-04_jprb,1.8254e-04_jprb,2.3457e-04_jprb,2.5497e-04_jprb/)
1732 kbo( :, 2,41, 4) = (/&
1733 &6.4501e-06_jprb,1.2664e-04_jprb,1.9704e-04_jprb,2.4685e-04_jprb,2.5884e-04_jprb/)
1734 kbo( :, 3,41, 4) = (/&
1735 &8.9908e-06_jprb,1.3923e-04_jprb,2.1149e-04_jprb,2.5926e-04_jprb,2.6097e-04_jprb/)
1736 kbo( :, 4,41, 4) = (/&
1737 &1.2113e-05_jprb,1.5171e-04_jprb,2.2552e-04_jprb,2.7117e-04_jprb,2.6150e-04_jprb/)
1738 kbo( :, 5,41, 4) = (/&
1739 &1.5882e-05_jprb,1.6391e-04_jprb,2.3860e-04_jprb,2.8232e-04_jprb,2.6072e-04_jprb/)
1740 kbo( :, 1,42, 4) = (/&
1741 &3.3198e-06_jprb,9.1718e-05_jprb,1.4723e-04_jprb,1.9011e-04_jprb,2.0829e-04_jprb/)
1742 kbo( :, 2,42, 4) = (/&
1743 &4.8502e-06_jprb,1.0170e-04_jprb,1.5931e-04_jprb,2.0051e-04_jprb,2.1195e-04_jprb/)
1744 kbo( :, 3,42, 4) = (/&
1745 &6.8039e-06_jprb,1.1200e-04_jprb,1.7132e-04_jprb,2.1108e-04_jprb,2.1414e-04_jprb/)
1746 kbo( :, 4,42, 4) = (/&
1747 &9.2426e-06_jprb,1.2222e-04_jprb,1.8289e-04_jprb,2.2117e-04_jprb,2.1495e-04_jprb/)
1748 kbo( :, 5,42, 4) = (/&
1749 &1.2195e-05_jprb,1.3221e-04_jprb,1.9367e-04_jprb,2.3056e-04_jprb,2.1462e-04_jprb/)
1750 kbo( :, 1,43, 4) = (/&
1751 &2.3953e-06_jprb,7.3035e-05_jprb,1.1812e-04_jprb,1.5350e-04_jprb,1.6984e-04_jprb/)
1752 kbo( :, 2,43, 4) = (/&
1753 &3.5612e-06_jprb,8.1187e-05_jprb,1.2819e-04_jprb,1.6232e-04_jprb,1.7330e-04_jprb/)
1754 kbo( :, 3,43, 4) = (/&
1755 &5.0399e-06_jprb,8.9542e-05_jprb,1.3813e-04_jprb,1.7126e-04_jprb,1.7552e-04_jprb/)
1756 kbo( :, 4,43, 4) = (/&
1757 &6.9214e-06_jprb,9.7944e-05_jprb,1.4772e-04_jprb,1.7984e-04_jprb,1.7653e-04_jprb/)
1758 kbo( :, 5,43, 4) = (/&
1759 &9.2081e-06_jprb,1.0615e-04_jprb,1.5668e-04_jprb,1.8781e-04_jprb,1.7659e-04_jprb/)
1760 kbo( :, 1,44, 4) = (/&
1761 &1.6976e-06_jprb,5.7928e-05_jprb,9.4481e-05_jprb,1.2365e-04_jprb,1.3829e-04_jprb/)
1762 kbo( :, 2,44, 4) = (/&
1763 &2.5776e-06_jprb,6.4569e-05_jprb,1.0281e-04_jprb,1.3107e-04_jprb,1.4154e-04_jprb/)
1764 kbo( :, 3,44, 4) = (/&
1765 &3.6914e-06_jprb,7.1395e-05_jprb,1.1108e-04_jprb,1.3867e-04_jprb,1.4376e-04_jprb/)
1766 kbo( :, 4,44, 4) = (/&
1767 &5.1284e-06_jprb,7.8255e-05_jprb,1.1905e-04_jprb,1.4597e-04_jprb,1.4496e-04_jprb/)
1768 kbo( :, 5,44, 4) = (/&
1769 &6.8839e-06_jprb,8.5009e-05_jprb,1.2651e-04_jprb,1.5274e-04_jprb,1.4528e-04_jprb/)
1770 kbo( :, 1,45, 4) = (/&
1771 &1.1934e-06_jprb,4.5877e-05_jprb,7.5459e-05_jprb,9.9465e-05_jprb,1.1252e-04_jprb/)
1772 kbo( :, 2,45, 4) = (/&
1773 &1.8535e-06_jprb,5.1319e-05_jprb,8.2366e-05_jprb,1.0575e-04_jprb,1.1552e-04_jprb/)
1774 kbo( :, 3,45, 4) = (/&
1775 &2.7008e-06_jprb,5.6880e-05_jprb,8.9246e-05_jprb,1.1216e-04_jprb,1.1771e-04_jprb/)
1776 kbo( :, 4,45, 4) = (/&
1777 &3.7837e-06_jprb,6.2494e-05_jprb,9.5875e-05_jprb,1.1839e-04_jprb,1.1899e-04_jprb/)
1778 kbo( :, 5,45, 4) = (/&
1779 &5.1348e-06_jprb,6.8027e-05_jprb,1.0210e-04_jprb,1.2412e-04_jprb,1.1954e-04_jprb/)
1780 kbo( :, 1,46, 4) = (/&
1781 &8.2182e-07_jprb,3.6187e-05_jprb,6.0090e-05_jprb,7.9818e-05_jprb,9.1376e-05_jprb/)
1782 kbo( :, 2,46, 4) = (/&
1783 &1.3116e-06_jprb,4.0642e-05_jprb,6.5780e-05_jprb,8.5120e-05_jprb,9.4184e-05_jprb/)
1784 kbo( :, 3,46, 4) = (/&
1785 &1.9501e-06_jprb,4.5184e-05_jprb,7.1520e-05_jprb,9.0515e-05_jprb,9.6278e-05_jprb/)
1786 kbo( :, 4,46, 4) = (/&
1787 &2.7596e-06_jprb,4.9774e-05_jprb,7.7042e-05_jprb,9.5816e-05_jprb,9.7611e-05_jprb/)
1788 kbo( :, 5,46, 4) = (/&
1789 &3.7920e-06_jprb,5.4316e-05_jprb,8.2245e-05_jprb,1.0070e-04_jprb,9.8321e-05_jprb/)
1790 kbo( :, 1,47, 4) = (/&
1791 &5.4572e-07_jprb,2.8352e-05_jprb,4.7590e-05_jprb,6.3770e-05_jprb,7.3936e-05_jprb/)
1792 kbo( :, 2,47, 4) = (/&
1793 &9.0249e-07_jprb,3.1986e-05_jprb,5.2255e-05_jprb,6.8238e-05_jprb,7.6557e-05_jprb/)
1794 kbo( :, 3,47, 4) = (/&
1795 &1.3764e-06_jprb,3.5691e-05_jprb,5.7035e-05_jprb,7.2769e-05_jprb,7.8547e-05_jprb/)
1796 kbo( :, 4,47, 4) = (/&
1797 &1.9784e-06_jprb,3.9441e-05_jprb,6.1643e-05_jprb,7.7278e-05_jprb,7.9920e-05_jprb/)
1798 kbo( :, 5,47, 4) = (/&
1799 &2.7518e-06_jprb,4.3171e-05_jprb,6.6014e-05_jprb,8.1443e-05_jprb,8.0725e-05_jprb/)
1800 kbo( :, 1,48, 4) = (/&
1801 &3.5613e-07_jprb,2.2167e-05_jprb,3.7637e-05_jprb,5.0854e-05_jprb,5.9741e-05_jprb/)
1802 kbo( :, 2,48, 4) = (/&
1803 &6.1385e-07_jprb,2.5120e-05_jprb,4.1451e-05_jprb,5.4622e-05_jprb,6.2174e-05_jprb/)
1804 kbo( :, 3,48, 4) = (/&
1805 &9.6245e-07_jprb,2.8151e-05_jprb,4.5401e-05_jprb,5.8409e-05_jprb,6.4024e-05_jprb/)
1806 kbo( :, 4,48, 4) = (/&
1807 &1.4130e-06_jprb,3.1220e-05_jprb,4.9258e-05_jprb,6.2234e-05_jprb,6.5397e-05_jprb/)
1808 kbo( :, 5,48, 4) = (/&
1809 &1.9862e-06_jprb,3.4268e-05_jprb,5.2922e-05_jprb,6.5784e-05_jprb,6.6274e-05_jprb/)
1810 kbo( :, 1,49, 4) = (/&
1811 &2.2854e-07_jprb,1.7300e-05_jprb,2.9705e-05_jprb,4.0466e-05_jprb,4.8198e-05_jprb/)
1812 kbo( :, 2,49, 4) = (/&
1813 &4.1152e-07_jprb,1.9683e-05_jprb,3.2825e-05_jprb,4.3649e-05_jprb,5.0447e-05_jprb/)
1814 kbo( :, 3,49, 4) = (/&
1815 &6.6605e-07_jprb,2.2175e-05_jprb,3.6088e-05_jprb,4.6825e-05_jprb,5.2181e-05_jprb/)
1816 kbo( :, 4,49, 4) = (/&
1817 &1.0015e-06_jprb,2.4680e-05_jprb,3.9305e-05_jprb,5.0044e-05_jprb,5.3514e-05_jprb/)
1818 kbo( :, 5,49, 4) = (/&
1819 &1.4253e-06_jprb,2.7183e-05_jprb,4.2380e-05_jprb,5.3073e-05_jprb,5.4435e-05_jprb/)
1820 kbo( :, 1,50, 4) = (/&
1821 &1.4675e-07_jprb,1.3524e-05_jprb,2.3463e-05_jprb,3.2195e-05_jprb,3.8796e-05_jprb/)
1822 kbo( :, 2,50, 4) = (/&
1823 &2.7518e-07_jprb,1.5442e-05_jprb,2.6020e-05_jprb,3.4887e-05_jprb,4.0832e-05_jprb/)
1824 kbo( :, 3,50, 4) = (/&
1825 &4.6153e-07_jprb,1.7480e-05_jprb,2.8694e-05_jprb,3.7541e-05_jprb,4.2427e-05_jprb/)
1826 kbo( :, 4,50, 4) = (/&
1827 &7.1099e-07_jprb,1.9535e-05_jprb,3.1383e-05_jprb,4.0252e-05_jprb,4.3676e-05_jprb/)
1828 kbo( :, 5,50, 4) = (/&
1829 &1.0304e-06_jprb,2.1596e-05_jprb,3.3959e-05_jprb,4.2830e-05_jprb,4.4585e-05_jprb/)
1830 kbo( :, 1,51, 4) = (/&
1831 &9.3830e-08_jprb,1.0573e-05_jprb,1.8529e-05_jprb,2.5594e-05_jprb,3.1167e-05_jprb/)
1832 kbo( :, 2,51, 4) = (/&
1833 &1.8257e-07_jprb,1.2113e-05_jprb,2.0626e-05_jprb,2.7865e-05_jprb,3.2983e-05_jprb/)
1834 kbo( :, 3,51, 4) = (/&
1835 &3.1815e-07_jprb,1.3777e-05_jprb,2.2807e-05_jprb,3.0085e-05_jprb,3.4435e-05_jprb/)
1836 kbo( :, 4,51, 4) = (/&
1837 &5.0296e-07_jprb,1.5465e-05_jprb,2.5047e-05_jprb,3.2352e-05_jprb,3.5572e-05_jprb/)
1838 kbo( :, 5,51, 4) = (/&
1839 &7.4372e-07_jprb,1.7150e-05_jprb,2.7196e-05_jprb,3.4538e-05_jprb,3.6442e-05_jprb/)
1840 kbo( :, 1,52, 4) = (/&
1841 &5.9402e-08_jprb,8.2536e-06_jprb,1.4613e-05_jprb,2.0313e-05_jprb,2.4997e-05_jprb/)
1842 kbo( :, 2,52, 4) = (/&
1843 &1.1950e-07_jprb,9.4874e-06_jprb,1.6325e-05_jprb,2.2218e-05_jprb,2.6608e-05_jprb/)
1844 kbo( :, 3,52, 4) = (/&
1845 &2.1668e-07_jprb,1.0839e-05_jprb,1.8107e-05_jprb,2.4086e-05_jprb,2.7927e-05_jprb/)
1846 kbo( :, 4,52, 4) = (/&
1847 &3.5284e-07_jprb,1.2223e-05_jprb,1.9960e-05_jprb,2.5966e-05_jprb,2.8965e-05_jprb/)
1848 kbo( :, 5,52, 4) = (/&
1849 &5.3348e-07_jprb,1.3609e-05_jprb,2.1758e-05_jprb,2.7822e-05_jprb,2.9780e-05_jprb/)
1850 kbo( :, 1,53, 4) = (/&
1851 &3.7345e-08_jprb,6.4324e-06_jprb,1.1502e-05_jprb,1.6089e-05_jprb,2.0014e-05_jprb/)
1852 kbo( :, 2,53, 4) = (/&
1853 &7.7125e-08_jprb,7.4212e-06_jprb,1.2900e-05_jprb,1.7682e-05_jprb,2.1442e-05_jprb/)
1854 kbo( :, 3,53, 4) = (/&
1855 &1.4542e-07_jprb,8.5076e-06_jprb,1.4352e-05_jprb,1.9246e-05_jprb,2.2631e-05_jprb/)
1856 kbo( :, 4,53, 4) = (/&
1857 &2.4523e-07_jprb,9.6460e-06_jprb,1.5883e-05_jprb,2.0812e-05_jprb,2.3585e-05_jprb/)
1858 kbo( :, 5,53, 4) = (/&
1859 &3.7962e-07_jprb,1.0784e-05_jprb,1.7382e-05_jprb,2.2378e-05_jprb,2.4349e-05_jprb/)
1860 kbo( :, 1,54, 4) = (/&
1861 &2.4018e-08_jprb,5.0298e-06_jprb,9.0727e-06_jprb,1.2757e-05_jprb,1.5972e-05_jprb/)
1862 kbo( :, 2,54, 4) = (/&
1863 &5.0282e-08_jprb,5.8191e-06_jprb,1.0210e-05_jprb,1.4083e-05_jprb,1.7202e-05_jprb/)
1864 kbo( :, 3,54, 4) = (/&
1865 &9.8093e-08_jprb,6.6934e-06_jprb,1.1398e-05_jprb,1.5393e-05_jprb,1.8246e-05_jprb/)
1866 kbo( :, 4,54, 4) = (/&
1867 &1.7136e-07_jprb,7.6261e-06_jprb,1.2653e-05_jprb,1.6695e-05_jprb,1.9090e-05_jprb/)
1868 kbo( :, 5,54, 4) = (/&
1869 &2.7159e-07_jprb,8.5620e-06_jprb,1.3903e-05_jprb,1.8013e-05_jprb,1.9768e-05_jprb/)
1870 kbo( :, 1,55, 4) = (/&
1871 &1.5705e-08_jprb,3.9361e-06_jprb,7.1560e-06_jprb,1.0111e-05_jprb,1.2713e-05_jprb/)
1872 kbo( :, 2,55, 4) = (/&
1873 &3.2852e-08_jprb,4.5671e-06_jprb,8.0833e-06_jprb,1.1215e-05_jprb,1.3756e-05_jprb/)
1874 kbo( :, 3,55, 4) = (/&
1875 &6.5995e-08_jprb,5.2691e-06_jprb,9.0558e-06_jprb,1.2309e-05_jprb,1.4658e-05_jprb/)
1876 kbo( :, 4,55, 4) = (/&
1877 &1.1933e-07_jprb,6.0307e-06_jprb,1.0082e-05_jprb,1.3396e-05_jprb,1.5392e-05_jprb/)
1878 kbo( :, 5,55, 4) = (/&
1879 &1.9407e-07_jprb,6.7994e-06_jprb,1.1122e-05_jprb,1.4497e-05_jprb,1.5981e-05_jprb/)
1880 kbo( :, 1,56, 4) = (/&
1881 &1.0423e-08_jprb,3.0764e-06_jprb,5.6365e-06_jprb,8.0036e-06_jprb,1.0107e-05_jprb/)
1882 kbo( :, 2,56, 4) = (/&
1883 &2.1352e-08_jprb,3.5821e-06_jprb,6.3947e-06_jprb,8.9204e-06_jprb,1.0989e-05_jprb/)
1884 kbo( :, 3,56, 4) = (/&
1885 &4.3941e-08_jprb,4.1425e-06_jprb,7.1860e-06_jprb,9.8275e-06_jprb,1.1759e-05_jprb/)
1886 kbo( :, 4,56, 4) = (/&
1887 &8.2219e-08_jprb,4.7612e-06_jprb,8.0218e-06_jprb,1.0735e-05_jprb,1.2399e-05_jprb/)
1888 kbo( :, 5,56, 4) = (/&
1889 &1.3782e-07_jprb,5.3933e-06_jprb,8.8859e-06_jprb,1.1651e-05_jprb,1.2911e-05_jprb/)
1890 kbo( :, 1,57, 4) = (/&
1891 &7.0716e-09_jprb,2.4016e-06_jprb,4.4336e-06_jprb,6.3273e-06_jprb,8.0236e-06_jprb/)
1892 kbo( :, 2,57, 4) = (/&
1893 &1.3864e-08_jprb,2.8058e-06_jprb,5.0502e-06_jprb,7.0825e-06_jprb,8.7616e-06_jprb/)
1894 kbo( :, 3,57, 4) = (/&
1895 &2.8989e-08_jprb,3.2523e-06_jprb,5.6949e-06_jprb,7.8345e-06_jprb,9.4204e-06_jprb/)
1896 kbo( :, 4,57, 4) = (/&
1897 &5.6049e-08_jprb,3.7535e-06_jprb,6.3764e-06_jprb,8.5926e-06_jprb,9.9758e-06_jprb/)
1898 kbo( :, 5,57, 4) = (/&
1899 &9.7119e-08_jprb,4.2717e-06_jprb,7.0902e-06_jprb,9.3510e-06_jprb,1.0422e-05_jprb/)
1900 kbo( :, 1,58, 4) = (/&
1901 &4.9738e-09_jprb,1.8772e-06_jprb,3.4889e-06_jprb,5.0033e-06_jprb,6.3670e-06_jprb/)
1902 kbo( :, 2,58, 4) = (/&
1903 &9.1491e-09_jprb,2.2003e-06_jprb,3.9908e-06_jprb,5.6234e-06_jprb,6.9822e-06_jprb/)
1904 kbo( :, 3,58, 4) = (/&
1905 &1.9204e-08_jprb,2.5577e-06_jprb,4.5175e-06_jprb,6.2482e-06_jprb,7.5411e-06_jprb/)
1906 kbo( :, 4,58, 4) = (/&
1907 &3.8223e-08_jprb,2.9606e-06_jprb,5.0708e-06_jprb,6.8776e-06_jprb,8.0170e-06_jprb/)
1908 kbo( :, 5,58, 4) = (/&
1909 &6.8398e-08_jprb,3.3850e-06_jprb,5.6590e-06_jprb,7.5062e-06_jprb,8.4029e-06_jprb/)
1910 kbo( :, 1,59, 4) = (/&
1911 &3.8735e-09_jprb,1.5107e-06_jprb,2.8146e-06_jprb,4.0428e-06_jprb,5.1269e-06_jprb/)
1912 kbo( :, 2,59, 4) = (/&
1913 &6.9185e-09_jprb,1.7736e-06_jprb,3.2266e-06_jprb,4.5533e-06_jprb,5.6260e-06_jprb/)
1914 kbo( :, 3,59, 4) = (/&
1915 &1.4484e-08_jprb,2.0648e-06_jprb,3.6588e-06_jprb,5.0704e-06_jprb,6.0775e-06_jprb/)
1916 kbo( :, 4,59, 4) = (/&
1917 &2.9105e-08_jprb,2.3952e-06_jprb,4.1152e-06_jprb,5.5930e-06_jprb,6.4648e-06_jprb/)
1918 kbo( :, 5,59, 4) = (/&
1919 &5.2712e-08_jprb,2.7434e-06_jprb,4.6004e-06_jprb,6.1168e-06_jprb,6.7765e-06_jprb/)
1920 
1921 
1922 ! -----------------------------------------------------------------
1923 RETURN
1924 END SUBROUTINE rrtm_kgb5_b1
real(kind=jprb) strrat2
Definition: yoerrta5.F90:24
real(kind=jprb), dimension(9, 5, 13, no5) kao
Definition: yoerrto5.F90:20
subroutine rrtm_kgb5_b1
Definition: rrtm_kgb5_B1.F90:3
real(kind=jprb), dimension(10, no5) selfrefo
Definition: yoerrto5.F90:22
real(kind=jprb), dimension(no5, 9) fracrefao
Definition: yoerrto5.F90:16
real(kind=jprb), dimension(5, 5, 13:59, no5) kbo
Definition: yoerrto5.F90:21
real(kind=jprb), dimension(no5, 5) fracrefbo
Definition: yoerrto5.F90:16
real(kind=jprb) strrat1
Definition: yoerrta5.F90:23
real(kind=jprb), dimension(no5) ccl4o
Definition: yoerrto5.F90:18