LMDZ
rrtm_kgb3_B1.F90
Go to the documentation of this file.
1 !OCL SCALAR
2 SUBROUTINE rrtm_kgb3_b1
3 
4 ! Originally by Eli J. Mlawer, Atmospheric & Environmental Research.
5 ! BAND 3: 500-630 cm-1 (low - H2O,CO2; high - H2O,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 yoerrto3 , ONLY : kao ,kbo ,selfrefo ,fracrefao ,&
15 USE yoerrta3 , ONLY : absn2oa ,absn2ob ,etaref ,h2oref ,&
17 
18 ! ------------------------------------------------------------------
19 
20 
21 IMPLICIT NONE
22 
23 
24 ! The array KBO contains absorption coefs for each of the 16 g-intervals
25 ! for a range of pressure levels < ~100mb, temperatures, and ratios
26 ! of H2O to CO2. The first index in the array, JS, runs from 1 to 5,
27 ! and corresponds to different H2O to CO2 ratios, as expressed through
28 ! the binary species parameter eta, defined as eta = H2O/(H2O+RAT*CO2),
29 ! where RAT is the ratio of the integrated line strength in the band
30 ! of CO2 to that of H2O. For instance, JS=1 refers to no H2O,
31 ! JS = 2 corresponds to eta = 0.25, etc. The second index, JT, which
32 ! runs from 1 to 5, corresponds to different temperatures. More
33 ! specifically, JT = 3 means that the data are for the corresponding
34 ! reference temperature TREF for this pressure level, JT = 2 refers
35 ! to the TREF-15, JT = 1 is for TREF-30, JT = 4 is for TREF+15, and
36 ! JT = 5 is for TREF+30. The third index, JP, runs from 13 to 59 and
37 ! refers to the corresponding pressure level in PREF (e.g. JP = 13 is
38 ! for a pressure of 95.5835 mb). The fourth index, IG, goes from 1 to
39 ! 16, and tells us which g-interval the absorption coefficients are for.
40 
41 kbo( :, 1,13, 1) = (/&
42 &7.1418e-07_jprb,7.7683e-05_jprb,1.6530e-04_jprb,3.3221e-04_jprb,3.4375e-04_jprb/)
43 kbo( :, 2,13, 1) = (/&
44 &7.2895e-07_jprb,7.7891e-05_jprb,1.5813e-04_jprb,2.9611e-04_jprb,3.5156e-04_jprb/)
45 kbo( :, 3,13, 1) = (/&
46 &8.1104e-07_jprb,8.0313e-05_jprb,1.5573e-04_jprb,2.7205e-04_jprb,3.6744e-04_jprb/)
47 kbo( :, 4,13, 1) = (/&
48 &9.8030e-07_jprb,8.4645e-05_jprb,1.5829e-04_jprb,2.5788e-04_jprb,3.9124e-04_jprb/)
49 kbo( :, 5,13, 1) = (/&
50 &1.2532e-06_jprb,9.1367e-05_jprb,1.6556e-04_jprb,2.5243e-04_jprb,4.2278e-04_jprb/)
51 kbo( :, 1,14, 1) = (/&
52 &5.8662e-07_jprb,6.3217e-05_jprb,1.3394e-04_jprb,2.6815e-04_jprb,2.8024e-04_jprb/)
53 kbo( :, 2,14, 1) = (/&
54 &6.0322e-07_jprb,6.3644e-05_jprb,1.2871e-04_jprb,2.3989e-04_jprb,2.8697e-04_jprb/)
55 kbo( :, 3,14, 1) = (/&
56 &6.7707e-07_jprb,6.5857e-05_jprb,1.2726e-04_jprb,2.2113e-04_jprb,3.0014e-04_jprb/)
57 kbo( :, 4,14, 1) = (/&
58 &8.2251e-07_jprb,6.9663e-05_jprb,1.2984e-04_jprb,2.1038e-04_jprb,3.1976e-04_jprb/)
59 kbo( :, 5,14, 1) = (/&
60 &1.0537e-06_jprb,7.5477e-05_jprb,1.3625e-04_jprb,2.0669e-04_jprb,3.4553e-04_jprb/)
61 kbo( :, 1,15, 1) = (/&
62 &4.8159e-07_jprb,5.1327e-05_jprb,1.0828e-04_jprb,2.1580e-04_jprb,2.2716e-04_jprb/)
63 kbo( :, 2,15, 1) = (/&
64 &4.9953e-07_jprb,5.1898e-05_jprb,1.0456e-04_jprb,1.9384e-04_jprb,2.3282e-04_jprb/)
65 kbo( :, 3,15, 1) = (/&
66 &5.6592e-07_jprb,5.3937e-05_jprb,1.0383e-04_jprb,1.7938e-04_jprb,2.4342e-04_jprb/)
67 kbo( :, 4,15, 1) = (/&
68 &6.9060e-07_jprb,5.7276e-05_jprb,1.0637e-04_jprb,1.7136e-04_jprb,2.5925e-04_jprb/)
69 kbo( :, 5,15, 1) = (/&
70 &8.8764e-07_jprb,6.2300e-05_jprb,1.1206e-04_jprb,1.6901e-04_jprb,2.7978e-04_jprb/)
71 kbo( :, 1,16, 1) = (/&
72 &3.9534e-07_jprb,4.1658e-05_jprb,8.7509e-05_jprb,1.7349e-04_jprb,1.8327e-04_jprb/)
73 kbo( :, 2,16, 1) = (/&
74 &4.1395e-07_jprb,4.2305e-05_jprb,8.4934e-05_jprb,1.5653e-04_jprb,1.8794e-04_jprb/)
75 kbo( :, 3,16, 1) = (/&
76 &4.7298e-07_jprb,4.4176e-05_jprb,8.4714e-05_jprb,1.4546e-04_jprb,1.9627e-04_jprb/)
77 kbo( :, 4,16, 1) = (/&
78 &5.8017e-07_jprb,4.7094e-05_jprb,8.7162e-05_jprb,1.3953e-04_jprb,2.0862e-04_jprb/)
79 kbo( :, 5,16, 1) = (/&
80 &7.4847e-07_jprb,5.1410e-05_jprb,9.2164e-05_jprb,1.3822e-04_jprb,2.2492e-04_jprb/)
81 kbo( :, 1,17, 1) = (/&
82 &3.2461e-07_jprb,3.3900e-05_jprb,7.0928e-05_jprb,1.3982e-04_jprb,1.4790e-04_jprb/)
83 kbo( :, 2,17, 1) = (/&
84 &3.4310e-07_jprb,3.4570e-05_jprb,6.9142e-05_jprb,1.2666e-04_jprb,1.5175e-04_jprb/)
85 kbo( :, 3,17, 1) = (/&
86 &3.9502e-07_jprb,3.6243e-05_jprb,6.9258e-05_jprb,1.1817e-04_jprb,1.5840e-04_jprb/)
87 kbo( :, 4,17, 1) = (/&
88 &4.8706e-07_jprb,3.8770e-05_jprb,7.1558e-05_jprb,1.1380e-04_jprb,1.6811e-04_jprb/)
89 kbo( :, 5,17, 1) = (/&
90 &6.3052e-07_jprb,4.2462e-05_jprb,7.5924e-05_jprb,1.1322e-04_jprb,1.8097e-04_jprb/)
91 kbo( :, 1,18, 1) = (/&
92 &2.6665e-07_jprb,2.7690e-05_jprb,5.7714e-05_jprb,1.1306e-04_jprb,1.1974e-04_jprb/)
93 kbo( :, 2,18, 1) = (/&
94 &2.8433e-07_jprb,2.8352e-05_jprb,5.6467e-05_jprb,1.0278e-04_jprb,1.2295e-04_jprb/)
95 kbo( :, 3,18, 1) = (/&
96 &3.2991e-07_jprb,2.9820e-05_jprb,5.6782e-05_jprb,9.6223e-05_jprb,1.2833e-04_jprb/)
97 kbo( :, 4,18, 1) = (/&
98 &4.0885e-07_jprb,3.1990e-05_jprb,5.8916e-05_jprb,9.3033e-05_jprb,1.3601e-04_jprb/)
99 kbo( :, 5,18, 1) = (/&
100 &5.3113e-07_jprb,3.5147e-05_jprb,6.2667e-05_jprb,9.2955e-05_jprb,1.4604e-04_jprb/)
101 kbo( :, 1,19, 1) = (/&
102 &2.1915e-07_jprb,2.2650e-05_jprb,4.7032e-05_jprb,9.1545e-05_jprb,9.7174e-05_jprb/)
103 kbo( :, 2,19, 1) = (/&
104 &2.3563e-07_jprb,2.3282e-05_jprb,4.6172e-05_jprb,8.3486e-05_jprb,9.9869e-05_jprb/)
105 kbo( :, 3,19, 1) = (/&
106 &2.7548e-07_jprb,2.4553e-05_jprb,4.6603e-05_jprb,7.8441e-05_jprb,1.0422e-04_jprb/)
107 kbo( :, 4,19, 1) = (/&
108 &3.4310e-07_jprb,2.6414e-05_jprb,4.8547e-05_jprb,7.6134e-05_jprb,1.1036e-04_jprb/)
109 kbo( :, 5,19, 1) = (/&
110 &4.4724e-07_jprb,2.9096e-05_jprb,5.1737e-05_jprb,7.6381e-05_jprb,1.1839e-04_jprb/)
111 kbo( :, 1,20, 1) = (/&
112 &1.8030e-07_jprb,1.8558e-05_jprb,3.8356e-05_jprb,7.4071e-05_jprb,7.9169e-05_jprb/)
113 kbo( :, 2,20, 1) = (/&
114 &1.9579e-07_jprb,1.9155e-05_jprb,3.7791e-05_jprb,6.7788e-05_jprb,8.1446e-05_jprb/)
115 kbo( :, 3,20, 1) = (/&
116 &2.3085e-07_jprb,2.0254e-05_jprb,3.8309e-05_jprb,6.3956e-05_jprb,8.5047e-05_jprb/)
117 kbo( :, 4,20, 1) = (/&
118 &2.8924e-07_jprb,2.1859e-05_jprb,4.0062e-05_jprb,6.2346e-05_jprb,9.0082e-05_jprb/)
119 kbo( :, 5,20, 1) = (/&
120 &3.7846e-07_jprb,2.4137e-05_jprb,4.2788e-05_jprb,6.2820e-05_jprb,9.6650e-05_jprb/)
121 kbo( :, 1,21, 1) = (/&
122 &1.4847e-07_jprb,1.5215e-05_jprb,3.1290e-05_jprb,5.9949e-05_jprb,6.4552e-05_jprb/)
123 kbo( :, 2,21, 1) = (/&
124 &1.6287e-07_jprb,1.5766e-05_jprb,3.0943e-05_jprb,5.5054e-05_jprb,6.6478e-05_jprb/)
125 kbo( :, 3,21, 1) = (/&
126 &1.9366e-07_jprb,1.6713e-05_jprb,3.1503e-05_jprb,5.2161e-05_jprb,6.9475e-05_jprb/)
127 kbo( :, 4,21, 1) = (/&
128 &2.4408e-07_jprb,1.8092e-05_jprb,3.3059e-05_jprb,5.1064e-05_jprb,7.3632e-05_jprb/)
129 kbo( :, 5,21, 1) = (/&
130 &3.2048e-07_jprb,2.0022e-05_jprb,3.5383e-05_jprb,5.1675e-05_jprb,7.9025e-05_jprb/)
131 kbo( :, 1,22, 1) = (/&
132 &1.2289e-07_jprb,1.2484e-05_jprb,2.5472e-05_jprb,4.8192e-05_jprb,5.2603e-05_jprb/)
133 kbo( :, 2,22, 1) = (/&
134 &1.3697e-07_jprb,1.3009e-05_jprb,2.5334e-05_jprb,4.4504e-05_jprb,5.4267e-05_jprb/)
135 kbo( :, 3,22, 1) = (/&
136 &1.6488e-07_jprb,1.3843e-05_jprb,2.5950e-05_jprb,4.2432e-05_jprb,5.6803e-05_jprb/)
137 kbo( :, 4,22, 1) = (/&
138 &2.0968e-07_jprb,1.5052e-05_jprb,2.7363e-05_jprb,4.1803e-05_jprb,6.0274e-05_jprb/)
139 kbo( :, 5,22, 1) = (/&
140 &2.7669e-07_jprb,1.6715e-05_jprb,2.9384e-05_jprb,4.2575e-05_jprb,6.4715e-05_jprb/)
141 kbo( :, 1,23, 1) = (/&
142 &1.0206e-07_jprb,1.0252e-05_jprb,2.0747e-05_jprb,3.8734e-05_jprb,4.2840e-05_jprb/)
143 kbo( :, 2,23, 1) = (/&
144 &1.1559e-07_jprb,1.0742e-05_jprb,2.0755e-05_jprb,3.5990e-05_jprb,4.4274e-05_jprb/)
145 kbo( :, 3,23, 1) = (/&
146 &1.4082e-07_jprb,1.1473e-05_jprb,2.1391e-05_jprb,3.4535e-05_jprb,4.6409e-05_jprb/)
147 kbo( :, 4,23, 1) = (/&
148 &1.8064e-07_jprb,1.2528e-05_jprb,2.2650e-05_jprb,3.4245e-05_jprb,4.9289e-05_jprb/)
149 kbo( :, 5,23, 1) = (/&
150 &2.3944e-07_jprb,1.3961e-05_jprb,2.4408e-05_jprb,3.5094e-05_jprb,5.2908e-05_jprb/)
151 kbo( :, 1,24, 1) = (/&
152 &8.5103e-08_jprb,8.4147e-06_jprb,1.6891e-05_jprb,3.1099e-05_jprb,3.4780e-05_jprb/)
153 kbo( :, 2,24, 1) = (/&
154 &9.8006e-08_jprb,8.8655e-06_jprb,1.6999e-05_jprb,2.9091e-05_jprb,3.5996e-05_jprb/)
155 kbo( :, 3,24, 1) = (/&
156 &1.2073e-07_jprb,9.5086e-06_jprb,1.7631e-05_jprb,2.8105e-05_jprb,3.7773e-05_jprb/)
157 kbo( :, 4,24, 1) = (/&
158 &1.5616e-07_jprb,1.0427e-05_jprb,1.8742e-05_jprb,2.8056e-05_jprb,4.0114e-05_jprb/)
159 kbo( :, 5,24, 1) = (/&
160 &2.0784e-07_jprb,1.1663e-05_jprb,2.0274e-05_jprb,2.8927e-05_jprb,4.3028e-05_jprb/)
161 kbo( :, 1,25, 1) = (/&
162 &7.1310e-08_jprb,6.9185e-06_jprb,1.3767e-05_jprb,2.4976e-05_jprb,2.8241e-05_jprb/)
163 kbo( :, 2,25, 1) = (/&
164 &8.3499e-08_jprb,7.3246e-06_jprb,1.3943e-05_jprb,2.3533e-05_jprb,2.9273e-05_jprb/)
165 kbo( :, 3,25, 1) = (/&
166 &1.0401e-07_jprb,7.8935e-06_jprb,1.4555e-05_jprb,2.2896e-05_jprb,3.0735e-05_jprb/)
167 kbo( :, 4,25, 1) = (/&
168 &1.3555e-07_jprb,8.6941e-06_jprb,1.5529e-05_jprb,2.3015e-05_jprb,3.2639e-05_jprb/)
169 kbo( :, 5,25, 1) = (/&
170 &1.8108e-07_jprb,9.7609e-06_jprb,1.6867e-05_jprb,2.3873e-05_jprb,3.4993e-05_jprb/)
171 kbo( :, 1,26, 1) = (/&
172 &6.0142e-08_jprb,5.7047e-06_jprb,1.1243e-05_jprb,2.0069e-05_jprb,2.2978e-05_jprb/)
173 kbo( :, 2,26, 1) = (/&
174 &7.1603e-08_jprb,6.0681e-06_jprb,1.1465e-05_jprb,1.9057e-05_jprb,2.3854e-05_jprb/)
175 kbo( :, 3,26, 1) = (/&
176 &9.0251e-08_jprb,6.5738e-06_jprb,1.2045e-05_jprb,1.8681e-05_jprb,2.5076e-05_jprb/)
177 kbo( :, 4,26, 1) = (/&
178 &1.1847e-07_jprb,7.2745e-06_jprb,1.2903e-05_jprb,1.8921e-05_jprb,2.6626e-05_jprb/)
179 kbo( :, 5,26, 1) = (/&
180 &1.5875e-07_jprb,8.1996e-06_jprb,1.4077e-05_jprb,1.9751e-05_jprb,2.8555e-05_jprb/)
181 kbo( :, 1,27, 1) = (/&
182 &5.0983e-08_jprb,4.7088e-06_jprb,9.1912e-06_jprb,1.6147e-05_jprb,1.8668e-05_jprb/)
183 kbo( :, 2,27, 1) = (/&
184 &6.1630e-08_jprb,5.0315e-06_jprb,9.4402e-06_jprb,1.5452e-05_jprb,1.9405e-05_jprb/)
185 kbo( :, 3,27, 1) = (/&
186 &7.8563e-08_jprb,5.4806e-06_jprb,9.9742e-06_jprb,1.5262e-05_jprb,2.0403e-05_jprb/)
187 kbo( :, 4,27, 1) = (/&
188 &1.0377e-07_jprb,6.0931e-06_jprb,1.0731e-05_jprb,1.5575e-05_jprb,2.1672e-05_jprb/)
189 kbo( :, 5,27, 1) = (/&
190 &1.3934e-07_jprb,6.8942e-06_jprb,1.1760e-05_jprb,1.6361e-05_jprb,2.3196e-05_jprb/)
191 kbo( :, 1,28, 1) = (/&
192 &4.3423e-08_jprb,3.8906e-06_jprb,7.5226e-06_jprb,1.3009e-05_jprb,1.5127e-05_jprb/)
193 kbo( :, 2,28, 1) = (/&
194 &5.3228e-08_jprb,4.1755e-06_jprb,7.7818e-06_jprb,1.2546e-05_jprb,1.5736e-05_jprb/)
195 kbo( :, 3,28, 1) = (/&
196 &6.8564e-08_jprb,4.5731e-06_jprb,8.2639e-06_jprb,1.2487e-05_jprb,1.6536e-05_jprb/)
197 kbo( :, 4,28, 1) = (/&
198 &9.1039e-08_jprb,5.1074e-06_jprb,8.9326e-06_jprb,1.2837e-05_jprb,1.7505e-05_jprb/)
199 kbo( :, 5,28, 1) = (/&
200 &1.2239e-07_jprb,5.8016e-06_jprb,9.8318e-06_jprb,1.3565e-05_jprb,1.8670e-05_jprb/)
201 kbo( :, 1,29, 1) = (/&
202 &3.7204e-08_jprb,3.2238e-06_jprb,6.1736e-06_jprb,1.0502e-05_jprb,1.2279e-05_jprb/)
203 kbo( :, 2,29, 1) = (/&
204 &4.6206e-08_jprb,3.4759e-06_jprb,6.4330e-06_jprb,1.0209e-05_jprb,1.2764e-05_jprb/)
205 kbo( :, 3,29, 1) = (/&
206 &6.0076e-08_jprb,3.8273e-06_jprb,6.8635e-06_jprb,1.0241e-05_jprb,1.3368e-05_jprb/)
207 kbo( :, 4,29, 1) = (/&
208 &8.0144e-08_jprb,4.2936e-06_jprb,7.4538e-06_jprb,1.0606e-05_jprb,1.4121e-05_jprb/)
209 kbo( :, 5,29, 1) = (/&
210 &1.0777e-07_jprb,4.8966e-06_jprb,8.2412e-06_jprb,1.1275e-05_jprb,1.5046e-05_jprb/)
211 kbo( :, 1,30, 1) = (/&
212 &3.1996e-08_jprb,2.6737e-06_jprb,5.0754e-06_jprb,8.4948e-06_jprb,9.8822e-06_jprb/)
213 kbo( :, 2,30, 1) = (/&
214 &4.0245e-08_jprb,2.8984e-06_jprb,5.3264e-06_jprb,8.3223e-06_jprb,1.0256e-05_jprb/)
215 kbo( :, 3,30, 1) = (/&
216 &5.2747e-08_jprb,3.2079e-06_jprb,5.7080e-06_jprb,8.4160e-06_jprb,1.0727e-05_jprb/)
217 kbo( :, 4,30, 1) = (/&
218 &7.0609e-08_jprb,3.6138e-06_jprb,6.2283e-06_jprb,8.7777e-06_jprb,1.1320e-05_jprb/)
219 kbo( :, 5,30, 1) = (/&
220 &9.4984e-08_jprb,4.1398e-06_jprb,6.9193e-06_jprb,9.3872e-06_jprb,1.2062e-05_jprb/)
221 kbo( :, 1,31, 1) = (/&
222 &2.7641e-08_jprb,2.2221e-06_jprb,4.1820e-06_jprb,6.8854e-06_jprb,7.8857e-06_jprb/)
223 kbo( :, 2,31, 1) = (/&
224 &3.5201e-08_jprb,2.4225e-06_jprb,4.4182e-06_jprb,6.7986e-06_jprb,8.1875e-06_jprb/)
225 kbo( :, 3,31, 1) = (/&
226 &4.6451e-08_jprb,2.6943e-06_jprb,4.7566e-06_jprb,6.9330e-06_jprb,8.5704e-06_jprb/)
227 kbo( :, 4,31, 1) = (/&
228 &6.2336e-08_jprb,3.0481e-06_jprb,5.2150e-06_jprb,7.2810e-06_jprb,9.0473e-06_jprb/)
229 kbo( :, 5,31, 1) = (/&
230 &8.3774e-08_jprb,3.5048e-06_jprb,5.8188e-06_jprb,7.8290e-06_jprb,9.6365e-06_jprb/)
231 kbo( :, 1,32, 1) = (/&
232 &2.3981e-08_jprb,1.8500e-06_jprb,3.4538e-06_jprb,5.5925e-06_jprb,6.2708e-06_jprb/)
233 kbo( :, 2,32, 1) = (/&
234 &3.0888e-08_jprb,2.0288e-06_jprb,3.6701e-06_jprb,5.5668e-06_jprb,6.5148e-06_jprb/)
235 kbo( :, 3,32, 1) = (/&
236 &4.1004e-08_jprb,2.2672e-06_jprb,3.9709e-06_jprb,5.7241e-06_jprb,6.8232e-06_jprb/)
237 kbo( :, 4,32, 1) = (/&
238 &5.5092e-08_jprb,2.5754e-06_jprb,4.3743e-06_jprb,6.0514e-06_jprb,7.2153e-06_jprb/)
239 kbo( :, 5,32, 1) = (/&
240 &7.3928e-08_jprb,2.9722e-06_jprb,4.9013e-06_jprb,6.5406e-06_jprb,7.6884e-06_jprb/)
241 kbo( :, 1,33, 1) = (/&
242 &2.0891e-08_jprb,1.5432e-06_jprb,2.8587e-06_jprb,4.5518e-06_jprb,4.9648e-06_jprb/)
243 kbo( :, 2,33, 1) = (/&
244 &2.7170e-08_jprb,1.7018e-06_jprb,3.0535e-06_jprb,4.5689e-06_jprb,5.1628e-06_jprb/)
245 kbo( :, 3,33, 1) = (/&
246 &3.6242e-08_jprb,1.9105e-06_jprb,3.3202e-06_jprb,4.7346e-06_jprb,5.4226e-06_jprb/)
247 kbo( :, 4,33, 1) = (/&
248 &4.8741e-08_jprb,2.1800e-06_jprb,3.6760e-06_jprb,5.0388e-06_jprb,5.7379e-06_jprb/)
249 kbo( :, 5,33, 1) = (/&
250 &6.5227e-08_jprb,2.5234e-06_jprb,4.1341e-06_jprb,5.4730e-06_jprb,6.1189e-06_jprb/)
251 kbo( :, 1,34, 1) = (/&
252 &1.8095e-08_jprb,1.2866e-06_jprb,2.3675e-06_jprb,3.7154e-06_jprb,3.9669e-06_jprb/)
253 kbo( :, 2,34, 1) = (/&
254 &2.3709e-08_jprb,1.4253e-06_jprb,2.5394e-06_jprb,3.7569e-06_jprb,4.1359e-06_jprb/)
255 kbo( :, 3,34, 1) = (/&
256 &3.1721e-08_jprb,1.6060e-06_jprb,2.7729e-06_jprb,3.9185e-06_jprb,4.3498e-06_jprb/)
257 kbo( :, 4,34, 1) = (/&
258 &4.2654e-08_jprb,1.8394e-06_jprb,3.0822e-06_jprb,4.1918e-06_jprb,4.6083e-06_jprb/)
259 kbo( :, 5,34, 1) = (/&
260 &5.6945e-08_jprb,2.1348e-06_jprb,3.4773e-06_jprb,4.5733e-06_jprb,4.9229e-06_jprb/)
261 kbo( :, 1,35, 1) = (/&
262 &1.5318e-08_jprb,1.0637e-06_jprb,1.9503e-06_jprb,3.0369e-06_jprb,3.1425e-06_jprb/)
263 kbo( :, 2,35, 1) = (/&
264 &2.0142e-08_jprb,1.1814e-06_jprb,2.0969e-06_jprb,3.0840e-06_jprb,3.2804e-06_jprb/)
265 kbo( :, 3,35, 1) = (/&
266 &2.6985e-08_jprb,1.3339e-06_jprb,2.2954e-06_jprb,3.2281e-06_jprb,3.4506e-06_jprb/)
267 kbo( :, 4,35, 1) = (/&
268 &3.6271e-08_jprb,1.5312e-06_jprb,2.5572e-06_jprb,3.4632e-06_jprb,3.6600e-06_jprb/)
269 kbo( :, 5,35, 1) = (/&
270 &4.8348e-08_jprb,1.7796e-06_jprb,2.8900e-06_jprb,3.7877e-06_jprb,3.9119e-06_jprb/)
271 kbo( :, 1,36, 1) = (/&
272 &1.2609e-08_jprb,8.7019e-07_jprb,1.5952e-06_jprb,2.4829e-06_jprb,2.4549e-06_jprb/)
273 kbo( :, 2,36, 1) = (/&
274 &1.6587e-08_jprb,9.6711e-07_jprb,1.7160e-06_jprb,2.5229e-06_jprb,2.5656e-06_jprb/)
275 kbo( :, 3,36, 1) = (/&
276 &2.2224e-08_jprb,1.0924e-06_jprb,1.8795e-06_jprb,2.6424e-06_jprb,2.6986e-06_jprb/)
277 kbo( :, 4,36, 1) = (/&
278 &2.9869e-08_jprb,1.2544e-06_jprb,2.0948e-06_jprb,2.8361e-06_jprb,2.8620e-06_jprb/)
279 kbo( :, 5,36, 1) = (/&
280 &3.9802e-08_jprb,1.4584e-06_jprb,2.3682e-06_jprb,3.1034e-06_jprb,3.0593e-06_jprb/)
281 kbo( :, 1,37, 1) = (/&
282 &9.9825e-09_jprb,7.0298e-07_jprb,1.2942e-06_jprb,2.0328e-06_jprb,1.9580e-06_jprb/)
283 kbo( :, 2,37, 1) = (/&
284 &1.3082e-08_jprb,7.7949e-07_jprb,1.3892e-06_jprb,2.0567e-06_jprb,2.0455e-06_jprb/)
285 kbo( :, 3,37, 1) = (/&
286 &1.7504e-08_jprb,8.7873e-07_jprb,1.5181e-06_jprb,2.1464e-06_jprb,2.1505e-06_jprb/)
287 kbo( :, 4,37, 1) = (/&
288 &2.3530e-08_jprb,1.0069e-06_jprb,1.6884e-06_jprb,2.2974e-06_jprb,2.2783e-06_jprb/)
289 kbo( :, 5,37, 1) = (/&
290 &3.1408e-08_jprb,1.1691e-06_jprb,1.9058e-06_jprb,2.5076e-06_jprb,2.4325e-06_jprb/)
291 kbo( :, 1,38, 1) = (/&
292 &7.8914e-09_jprb,5.6770e-07_jprb,1.0500e-06_jprb,1.6653e-06_jprb,1.5591e-06_jprb/)
293 kbo( :, 2,38, 1) = (/&
294 &1.0298e-08_jprb,6.2785e-07_jprb,1.1243e-06_jprb,1.6773e-06_jprb,1.6284e-06_jprb/)
295 kbo( :, 3,38, 1) = (/&
296 &1.3752e-08_jprb,7.0630e-07_jprb,1.2256e-06_jprb,1.7435e-06_jprb,1.7113e-06_jprb/)
297 kbo( :, 4,38, 1) = (/&
298 &1.8491e-08_jprb,8.0748e-07_jprb,1.3600e-06_jprb,1.8604e-06_jprb,1.8119e-06_jprb/)
299 kbo( :, 5,38, 1) = (/&
300 &2.4713e-08_jprb,9.3623e-07_jprb,1.5323e-06_jprb,2.0252e-06_jprb,1.9325e-06_jprb/)
301 kbo( :, 1,39, 1) = (/&
302 &6.2449e-09_jprb,4.5862e-07_jprb,8.5227e-07_jprb,1.3650e-06_jprb,1.2362e-06_jprb/)
303 kbo( :, 2,39, 1) = (/&
304 &8.1107e-09_jprb,5.0588e-07_jprb,9.1024e-07_jprb,1.3687e-06_jprb,1.2913e-06_jprb/)
305 kbo( :, 3,39, 1) = (/&
306 &1.0807e-08_jprb,5.6790e-07_jprb,9.8979e-07_jprb,1.4171e-06_jprb,1.3567e-06_jprb/)
307 kbo( :, 4,39, 1) = (/&
308 &1.4528e-08_jprb,6.4780e-07_jprb,1.0958e-06_jprb,1.5072e-06_jprb,1.4361e-06_jprb/)
309 kbo( :, 5,39, 1) = (/&
310 &1.9446e-08_jprb,7.4988e-07_jprb,1.2323e-06_jprb,1.6363e-06_jprb,1.5306e-06_jprb/)
311 kbo( :, 1,40, 1) = (/&
312 &4.8302e-09_jprb,3.6764e-07_jprb,6.8890e-07_jprb,1.1218e-06_jprb,9.8696e-07_jprb/)
313 kbo( :, 2,40, 1) = (/&
314 &6.2157e-09_jprb,4.0354e-07_jprb,7.3207e-07_jprb,1.1164e-06_jprb,1.0304e-06_jprb/)
315 kbo( :, 3,40, 1) = (/&
316 &8.2441e-09_jprb,4.5131e-07_jprb,7.9261e-07_jprb,1.1474e-06_jprb,1.0817e-06_jprb/)
317 kbo( :, 4,40, 1) = (/&
318 &1.1074e-08_jprb,5.1282e-07_jprb,8.7386e-07_jprb,1.2132e-06_jprb,1.1434e-06_jprb/)
319 kbo( :, 5,40, 1) = (/&
320 &1.4851e-08_jprb,5.9180e-07_jprb,9.7921e-07_jprb,1.3110e-06_jprb,1.2171e-06_jprb/)
321 kbo( :, 1,41, 1) = (/&
322 &3.7368e-09_jprb,2.9476e-07_jprb,5.5755e-07_jprb,9.2376e-07_jprb,7.8720e-07_jprb/)
323 kbo( :, 2,41, 1) = (/&
324 &4.7545e-09_jprb,3.2182e-07_jprb,5.8886e-07_jprb,9.1238e-07_jprb,8.2191e-07_jprb/)
325 kbo( :, 3,41, 1) = (/&
326 &6.2690e-09_jprb,3.5842e-07_jprb,6.3462e-07_jprb,9.3003e-07_jprb,8.6237e-07_jprb/)
327 kbo( :, 4,41, 1) = (/&
328 &8.4086e-09_jprb,4.0567e-07_jprb,6.9663e-07_jprb,9.7688e-07_jprb,9.1026e-07_jprb/)
329 kbo( :, 5,41, 1) = (/&
330 &1.1291e-08_jprb,4.6640e-07_jprb,7.7748e-07_jprb,1.0503e-06_jprb,9.6752e-07_jprb/)
331 kbo( :, 1,42, 1) = (/&
332 &2.9007e-09_jprb,2.3650e-07_jprb,4.5213e-07_jprb,7.6209e-07_jprb,6.2575e-07_jprb/)
333 kbo( :, 2,42, 1) = (/&
334 &3.6445e-09_jprb,2.5698e-07_jprb,4.7408e-07_jprb,7.4714e-07_jprb,6.5397e-07_jprb/)
335 kbo( :, 3,42, 1) = (/&
336 &4.7714e-09_jprb,2.8488e-07_jprb,5.0867e-07_jprb,7.5527e-07_jprb,6.8601e-07_jprb/)
337 kbo( :, 4,42, 1) = (/&
338 &6.3838e-09_jprb,3.2120e-07_jprb,5.5584e-07_jprb,7.8778e-07_jprb,7.2350e-07_jprb/)
339 kbo( :, 5,42, 1) = (/&
340 &8.5773e-09_jprb,3.6777e-07_jprb,6.1782e-07_jprb,8.4249e-07_jprb,7.6794e-07_jprb/)
341 kbo( :, 1,43, 1) = (/&
342 &2.2351e-09_jprb,1.8911e-07_jprb,3.6687e-07_jprb,6.3162e-07_jprb,4.9805e-07_jprb/)
343 kbo( :, 2,43, 1) = (/&
344 &2.7634e-09_jprb,2.0451e-07_jprb,3.8115e-07_jprb,6.1360e-07_jprb,5.2107e-07_jprb/)
345 kbo( :, 3,43, 1) = (/&
346 &3.5807e-09_jprb,2.2534e-07_jprb,4.0658e-07_jprb,6.1409e-07_jprb,5.4635e-07_jprb/)
347 kbo( :, 4,43, 1) = (/&
348 &4.7672e-09_jprb,2.5284e-07_jprb,4.4177e-07_jprb,6.3473e-07_jprb,5.7553e-07_jprb/)
349 kbo( :, 5,43, 1) = (/&
350 &6.4052e-09_jprb,2.8805e-07_jprb,4.8846e-07_jprb,6.7397e-07_jprb,6.0977e-07_jprb/)
351 kbo( :, 1,44, 1) = (/&
352 &1.7248e-09_jprb,1.5121e-07_jprb,2.9826e-07_jprb,5.2580e-07_jprb,3.9624e-07_jprb/)
353 kbo( :, 2,44, 1) = (/&
354 &2.0939e-09_jprb,1.6277e-07_jprb,3.0698e-07_jprb,5.0563e-07_jprb,4.1515e-07_jprb/)
355 kbo( :, 3,44, 1) = (/&
356 &2.6759e-09_jprb,1.7808e-07_jprb,3.2502e-07_jprb,5.0085e-07_jprb,4.3507e-07_jprb/)
357 kbo( :, 4,44, 1) = (/&
358 &3.5375e-09_jprb,1.9875e-07_jprb,3.5098e-07_jprb,5.1227e-07_jprb,4.5779e-07_jprb/)
359 kbo( :, 5,44, 1) = (/&
360 &4.7457e-09_jprb,2.2523e-07_jprb,3.8582e-07_jprb,5.3933e-07_jprb,4.8421e-07_jprb/)
361 kbo( :, 1,45, 1) = (/&
362 &1.3426e-09_jprb,1.2131e-07_jprb,2.4315e-07_jprb,4.3919e-07_jprb,3.1429e-07_jprb/)
363 kbo( :, 2,45, 1) = (/&
364 &1.5963e-09_jprb,1.2978e-07_jprb,2.4811e-07_jprb,4.1799e-07_jprb,3.2982e-07_jprb/)
365 kbo( :, 3,45, 1) = (/&
366 &2.0068e-09_jprb,1.4107e-07_jprb,2.6027e-07_jprb,4.0999e-07_jprb,3.4585e-07_jprb/)
367 kbo( :, 4,45, 1) = (/&
368 &2.6291e-09_jprb,1.5649e-07_jprb,2.7939e-07_jprb,4.1473e-07_jprb,3.6360e-07_jprb/)
369 kbo( :, 5,45, 1) = (/&
370 &3.5165e-09_jprb,1.7643e-07_jprb,3.0531e-07_jprb,4.3268e-07_jprb,3.8407e-07_jprb/)
371 kbo( :, 1,46, 1) = (/&
372 &1.0525e-09_jprb,9.7607e-08_jprb,1.9871e-07_jprb,3.6864e-07_jprb,2.4954e-07_jprb/)
373 kbo( :, 2,46, 1) = (/&
374 &1.2190e-09_jprb,1.0342e-07_jprb,2.0108e-07_jprb,3.4713e-07_jprb,2.6150e-07_jprb/)
375 kbo( :, 3,46, 1) = (/&
376 &1.5044e-09_jprb,1.1181e-07_jprb,2.0871e-07_jprb,3.3691e-07_jprb,2.7474e-07_jprb/)
377 kbo( :, 4,46, 1) = (/&
378 &1.9474e-09_jprb,1.2315e-07_jprb,2.2254e-07_jprb,3.3690e-07_jprb,2.8869e-07_jprb/)
379 kbo( :, 5,46, 1) = (/&
380 &2.5900e-09_jprb,1.3809e-07_jprb,2.4160e-07_jprb,3.4784e-07_jprb,3.0446e-07_jprb/)
381 kbo( :, 1,47, 1) = (/&
382 &8.3184e-10_jprb,7.8730e-08_jprb,1.6288e-07_jprb,3.1142e-07_jprb,1.9926e-07_jprb/)
383 kbo( :, 2,47, 1) = (/&
384 &9.3189e-10_jprb,8.2400e-08_jprb,1.6338e-07_jprb,2.9014e-07_jprb,2.0781e-07_jprb/)
385 kbo( :, 3,47, 1) = (/&
386 &1.1246e-09_jprb,8.8566e-08_jprb,1.6773e-07_jprb,2.7820e-07_jprb,2.1850e-07_jprb/)
387 kbo( :, 4,47, 1) = (/&
388 &1.4310e-09_jprb,9.6726e-08_jprb,1.7718e-07_jprb,2.7482e-07_jprb,2.2960e-07_jprb/)
389 kbo( :, 5,47, 1) = (/&
390 &1.8866e-09_jprb,1.0777e-07_jprb,1.9096e-07_jprb,2.8016e-07_jprb,2.4174e-07_jprb/)
391 kbo( :, 1,48, 1) = (/&
392 &6.6667e-10_jprb,6.3743e-08_jprb,1.3383e-07_jprb,2.6444e-07_jprb,1.5919e-07_jprb/)
393 kbo( :, 2,48, 1) = (/&
394 &7.2152e-10_jprb,6.5980e-08_jprb,1.3326e-07_jprb,2.4370e-07_jprb,1.6500e-07_jprb/)
395 kbo( :, 3,48, 1) = (/&
396 &8.4803e-10_jprb,7.0305e-08_jprb,1.3546e-07_jprb,2.3079e-07_jprb,1.7325e-07_jprb/)
397 kbo( :, 4,48, 1) = (/&
398 &1.0576e-09_jprb,7.6239e-08_jprb,1.4145e-07_jprb,2.2533e-07_jprb,1.8229e-07_jprb/)
399 kbo( :, 5,48, 1) = (/&
400 &1.3781e-09_jprb,8.4292e-08_jprb,1.5136e-07_jprb,2.2672e-07_jprb,1.9179e-07_jprb/)
401 kbo( :, 1,49, 1) = (/&
402 &5.4144e-10_jprb,5.1801e-08_jprb,1.1013e-07_jprb,2.2618e-07_jprb,1.2711e-07_jprb/)
403 kbo( :, 2,49, 1) = (/&
404 &5.6629e-10_jprb,5.3107e-08_jprb,1.0907e-07_jprb,2.0553e-07_jprb,1.3089e-07_jprb/)
405 kbo( :, 3,49, 1) = (/&
406 &6.4486e-10_jprb,5.5918e-08_jprb,1.0986e-07_jprb,1.9244e-07_jprb,1.3676e-07_jprb/)
407 kbo( :, 4,49, 1) = (/&
408 &7.8735e-10_jprb,6.0291e-08_jprb,1.1339e-07_jprb,1.8565e-07_jprb,1.4422e-07_jprb/)
409 kbo( :, 5,49, 1) = (/&
410 &1.0106e-09_jprb,6.6110e-08_jprb,1.2034e-07_jprb,1.8446e-07_jprb,1.5185e-07_jprb/)
411 kbo( :, 1,50, 1) = (/&
412 &4.4437e-10_jprb,4.2232e-08_jprb,9.0862e-08_jprb,1.9444e-07_jprb,1.0220e-07_jprb/)
413 kbo( :, 2,50, 1) = (/&
414 &4.5142e-10_jprb,4.2954e-08_jprb,8.9495e-08_jprb,1.7367e-07_jprb,1.0478e-07_jprb/)
415 kbo( :, 3,50, 1) = (/&
416 &4.9792e-10_jprb,4.4724e-08_jprb,8.9470e-08_jprb,1.6100e-07_jprb,1.0886e-07_jprb/)
417 kbo( :, 4,50, 1) = (/&
418 &5.9436e-10_jprb,4.7919e-08_jprb,9.1442e-08_jprb,1.5352e-07_jprb,1.1464e-07_jprb/)
419 kbo( :, 5,50, 1) = (/&
420 &7.4940e-10_jprb,5.2145e-08_jprb,9.6092e-08_jprb,1.5086e-07_jprb,1.2088e-07_jprb/)
421 kbo( :, 1,51, 1) = (/&
422 &3.6713e-10_jprb,3.4474e-08_jprb,7.5308e-08_jprb,1.6803e-07_jprb,8.2415e-08_jprb/)
423 kbo( :, 2,51, 1) = (/&
424 &3.6430e-10_jprb,3.4862e-08_jprb,7.3571e-08_jprb,1.4732e-07_jprb,8.4283e-08_jprb/)
425 kbo( :, 3,51, 1) = (/&
426 &3.8938e-10_jprb,3.5958e-08_jprb,7.3095e-08_jprb,1.3515e-07_jprb,8.7129e-08_jprb/)
427 kbo( :, 4,51, 1) = (/&
428 &4.5287e-10_jprb,3.8169e-08_jprb,7.4068e-08_jprb,1.2746e-07_jprb,9.1359e-08_jprb/)
429 kbo( :, 5,51, 1) = (/&
430 &5.6042e-10_jprb,4.1297e-08_jprb,7.7005e-08_jprb,1.2390e-07_jprb,9.6467e-08_jprb/)
431 kbo( :, 1,52, 1) = (/&
432 &3.0507e-10_jprb,2.8135e-08_jprb,6.2903e-08_jprb,1.4596e-07_jprb,6.6326e-08_jprb/)
433 kbo( :, 2,52, 1) = (/&
434 &2.9709e-10_jprb,2.8385e-08_jprb,6.0554e-08_jprb,1.2580e-07_jprb,6.7717e-08_jprb/)
435 kbo( :, 3,52, 1) = (/&
436 &3.0805e-10_jprb,2.9029e-08_jprb,5.9886e-08_jprb,1.1380e-07_jprb,6.9709e-08_jprb/)
437 kbo( :, 4,52, 1) = (/&
438 &3.4776e-10_jprb,3.0470e-08_jprb,6.0190e-08_jprb,1.0625e-07_jprb,7.2725e-08_jprb/)
439 kbo( :, 5,52, 1) = (/&
440 &4.2195e-10_jprb,3.2800e-08_jprb,6.1944e-08_jprb,1.0216e-07_jprb,7.6745e-08_jprb/)
441 kbo( :, 1,53, 1) = (/&
442 &2.5471e-10_jprb,2.2998e-08_jprb,5.2959e-08_jprb,1.2738e-07_jprb,5.3131e-08_jprb/)
443 kbo( :, 2,53, 1) = (/&
444 &2.4432e-10_jprb,2.3152e-08_jprb,5.0007e-08_jprb,1.0819e-07_jprb,5.4179e-08_jprb/)
445 kbo( :, 3,53, 1) = (/&
446 &2.4654e-10_jprb,2.3508e-08_jprb,4.9165e-08_jprb,9.6195e-08_jprb,5.5658e-08_jprb/)
447 kbo( :, 4,53, 1) = (/&
448 &2.6977e-10_jprb,2.4417e-08_jprb,4.9071e-08_jprb,8.8939e-08_jprb,5.7790e-08_jprb/)
449 kbo( :, 5,53, 1) = (/&
450 &3.1992e-10_jprb,2.6104e-08_jprb,5.0031e-08_jprb,8.4550e-08_jprb,6.0803e-08_jprb/)
451 kbo( :, 1,54, 1) = (/&
452 &2.1314e-10_jprb,1.8852e-08_jprb,4.4748e-08_jprb,1.1115e-07_jprb,4.3302e-08_jprb/)
453 kbo( :, 2,54, 1) = (/&
454 &2.0193e-10_jprb,1.8904e-08_jprb,4.1449e-08_jprb,9.3135e-08_jprb,4.4067e-08_jprb/)
455 kbo( :, 3,54, 1) = (/&
456 &1.9965e-10_jprb,1.9105e-08_jprb,4.0409e-08_jprb,8.1420e-08_jprb,4.5177e-08_jprb/)
457 kbo( :, 4,54, 1) = (/&
458 &2.1224e-10_jprb,1.9678e-08_jprb,4.0114e-08_jprb,7.4541e-08_jprb,4.6704e-08_jprb/)
459 kbo( :, 5,54, 1) = (/&
460 &2.4557e-10_jprb,2.0847e-08_jprb,4.0586e-08_jprb,7.0154e-08_jprb,4.8932e-08_jprb/)
461 kbo( :, 1,55, 1) = (/&
462 &1.7867e-10_jprb,1.5555e-08_jprb,3.7972e-08_jprb,9.7108e-08_jprb,3.5728e-08_jprb/)
463 kbo( :, 2,55, 1) = (/&
464 &1.6760e-10_jprb,1.5433e-08_jprb,3.4555e-08_jprb,8.0306e-08_jprb,3.6271e-08_jprb/)
465 kbo( :, 3,55, 1) = (/&
466 &1.6306e-10_jprb,1.5570e-08_jprb,3.3237e-08_jprb,6.9179e-08_jprb,3.7075e-08_jprb/)
467 kbo( :, 4,55, 1) = (/&
468 &1.6881e-10_jprb,1.5918e-08_jprb,3.2865e-08_jprb,6.2543e-08_jprb,3.8181e-08_jprb/)
469 kbo( :, 5,55, 1) = (/&
470 &1.9022e-10_jprb,1.6697e-08_jprb,3.3018e-08_jprb,5.8357e-08_jprb,3.9829e-08_jprb/)
471 kbo( :, 1,56, 1) = (/&
472 &1.5014e-10_jprb,1.2915e-08_jprb,3.2380e-08_jprb,8.5055e-08_jprb,2.9526e-08_jprb/)
473 kbo( :, 2,56, 1) = (/&
474 &1.3958e-10_jprb,1.2616e-08_jprb,2.8978e-08_jprb,6.9473e-08_jprb,2.9904e-08_jprb/)
475 kbo( :, 3,56, 1) = (/&
476 &1.3402e-10_jprb,1.2704e-08_jprb,2.7411e-08_jprb,5.9088e-08_jprb,3.0485e-08_jprb/)
477 kbo( :, 4,56, 1) = (/&
478 &1.3548e-10_jprb,1.2908e-08_jprb,2.6966e-08_jprb,5.2631e-08_jprb,3.1281e-08_jprb/)
479 kbo( :, 5,56, 1) = (/&
480 &1.4854e-10_jprb,1.3416e-08_jprb,2.6928e-08_jprb,4.8694e-08_jprb,3.2487e-08_jprb/)
481 kbo( :, 1,57, 1) = (/&
482 &1.2648e-10_jprb,1.0778e-08_jprb,2.7708e-08_jprb,7.4942e-08_jprb,2.4443e-08_jprb/)
483 kbo( :, 2,57, 1) = (/&
484 &1.1666e-10_jprb,1.0334e-08_jprb,2.4430e-08_jprb,6.0404e-08_jprb,2.4707e-08_jprb/)
485 kbo( :, 3,57, 1) = (/&
486 &1.1067e-10_jprb,1.0374e-08_jprb,2.2691e-08_jprb,5.0714e-08_jprb,2.5111e-08_jprb/)
487 kbo( :, 4,57, 1) = (/&
488 &1.0967e-10_jprb,1.0490e-08_jprb,2.2155e-08_jprb,4.4446e-08_jprb,2.5686e-08_jprb/)
489 kbo( :, 5,57, 1) = (/&
490 &1.1697e-10_jprb,1.0815e-08_jprb,2.2007e-08_jprb,4.0752e-08_jprb,2.6560e-08_jprb/)
491 kbo( :, 1,58, 1) = (/&
492 &1.0659e-10_jprb,9.0293e-09_jprb,2.3759e-08_jprb,6.6089e-08_jprb,2.0347e-08_jprb/)
493 kbo( :, 2,58, 1) = (/&
494 &9.7636e-11_jprb,8.5135e-09_jprb,2.0668e-08_jprb,5.2543e-08_jprb,2.0525e-08_jprb/)
495 kbo( :, 3,58, 1) = (/&
496 &9.1732e-11_jprb,8.4689e-09_jprb,1.8876e-08_jprb,4.3570e-08_jprb,2.0785e-08_jprb/)
497 kbo( :, 4,58, 1) = (/&
498 &8.9487e-11_jprb,8.5483e-09_jprb,1.8213e-08_jprb,3.7645e-08_jprb,2.1195e-08_jprb/)
499 kbo( :, 5,58, 1) = (/&
500 &9.3059e-11_jprb,8.7505e-09_jprb,1.8022e-08_jprb,3.4131e-08_jprb,2.1827e-08_jprb/)
501 kbo( :, 1,59, 1) = (/&
502 &8.8331e-11_jprb,7.4630e-09_jprb,1.9793e-08_jprb,5.5593e-08_jprb,1.7482e-08_jprb/)
503 kbo( :, 2,59, 1) = (/&
504 &8.0694e-11_jprb,6.9932e-09_jprb,1.7133e-08_jprb,4.3957e-08_jprb,1.7486e-08_jprb/)
505 kbo( :, 3,59, 1) = (/&
506 &7.5549e-11_jprb,6.9233e-09_jprb,1.5553e-08_jprb,3.6288e-08_jprb,1.7620e-08_jprb/)
507 kbo( :, 4,59, 1) = (/&
508 &7.3293e-11_jprb,6.9863e-09_jprb,1.4925e-08_jprb,3.1206e-08_jprb,1.7870e-08_jprb/)
509 kbo( :, 5,59, 1) = (/&
510 &7.5492e-11_jprb,7.1328e-09_jprb,1.4750e-08_jprb,2.8159e-08_jprb,1.8369e-08_jprb/)
511 kbo( :, 1,13, 2) = (/&
512 &1.7831e-06_jprb,1.1485e-04_jprb,2.2492e-04_jprb,4.1688e-04_jprb,6.0547e-04_jprb/)
513 kbo( :, 2,13, 2) = (/&
514 &2.2523e-06_jprb,1.2306e-04_jprb,2.2855e-04_jprb,3.8873e-04_jprb,6.9580e-04_jprb/)
515 kbo( :, 3,13, 2) = (/&
516 &3.1401e-06_jprb,1.3738e-04_jprb,2.4315e-04_jprb,3.7873e-04_jprb,8.1218e-04_jprb/)
517 kbo( :, 4,13, 2) = (/&
518 &4.6444e-06_jprb,1.5956e-04_jprb,2.6822e-04_jprb,3.8629e-04_jprb,9.5399e-04_jprb/)
519 kbo( :, 5,13, 2) = (/&
520 &7.0313e-06_jprb,1.8987e-04_jprb,3.0507e-04_jprb,4.1261e-04_jprb,1.1192e-03_jprb/)
521 kbo( :, 1,14, 2) = (/&
522 &1.5078e-06_jprb,9.3955e-05_jprb,1.8376e-04_jprb,3.3845e-04_jprb,5.0372e-04_jprb/)
523 kbo( :, 2,14, 2) = (/&
524 &1.9334e-06_jprb,1.0121e-04_jprb,1.8743e-04_jprb,3.1713e-04_jprb,5.7910e-04_jprb/)
525 kbo( :, 3,14, 2) = (/&
526 &2.7160e-06_jprb,1.1368e-04_jprb,2.0048e-04_jprb,3.1032e-04_jprb,6.7658e-04_jprb/)
527 kbo( :, 4,14, 2) = (/&
528 &4.0314e-06_jprb,1.3266e-04_jprb,2.2233e-04_jprb,3.1845e-04_jprb,7.9423e-04_jprb/)
529 kbo( :, 5,14, 2) = (/&
530 &6.1144e-06_jprb,1.5848e-04_jprb,2.5408e-04_jprb,3.4197e-04_jprb,9.2922e-04_jprb/)
531 kbo( :, 1,15, 2) = (/&
532 &1.2774e-06_jprb,7.6659e-05_jprb,1.4966e-04_jprb,2.7428e-04_jprb,4.0806e-04_jprb/)
533 kbo( :, 2,15, 2) = (/&
534 &1.6539e-06_jprb,8.3075e-05_jprb,1.5341e-04_jprb,2.5818e-04_jprb,4.6824e-04_jprb/)
535 kbo( :, 3,15, 2) = (/&
536 &2.3327e-06_jprb,9.3823e-05_jprb,1.6504e-04_jprb,2.5400e-04_jprb,5.4554e-04_jprb/)
537 kbo( :, 4,15, 2) = (/&
538 &3.4694e-06_jprb,1.1007e-04_jprb,1.8398e-04_jprb,2.6231e-04_jprb,6.3780e-04_jprb/)
539 kbo( :, 5,15, 2) = (/&
540 &5.2705e-06_jprb,1.3207e-04_jprb,2.1119e-04_jprb,2.8323e-04_jprb,7.4509e-04_jprb/)
541 kbo( :, 1,16, 2) = (/&
542 &1.0807e-06_jprb,6.2530e-05_jprb,1.2180e-04_jprb,2.2215e-04_jprb,3.2808e-04_jprb/)
543 kbo( :, 2,16, 2) = (/&
544 &1.4084e-06_jprb,6.8196e-05_jprb,1.2558e-04_jprb,2.1014e-04_jprb,3.7445e-04_jprb/)
545 kbo( :, 3,16, 2) = (/&
546 &1.9921e-06_jprb,7.7409e-05_jprb,1.3589e-04_jprb,2.0792e-04_jprb,4.3322e-04_jprb/)
547 kbo( :, 4,16, 2) = (/&
548 &2.9709e-06_jprb,9.1317e-05_jprb,1.5223e-04_jprb,2.1610e-04_jprb,5.0329e-04_jprb/)
549 kbo( :, 5,16, 2) = (/&
550 &4.5175e-06_jprb,1.1013e-04_jprb,1.7552e-04_jprb,2.3456e-04_jprb,5.8394e-04_jprb/)
551 kbo( :, 1,17, 2) = (/&
552 &9.1180e-07_jprb,5.1179e-05_jprb,9.9386e-05_jprb,1.8025e-04_jprb,2.6437e-04_jprb/)
553 kbo( :, 2,17, 2) = (/&
554 &1.1946e-06_jprb,5.6143e-05_jprb,1.0310e-04_jprb,1.7134e-04_jprb,2.9996e-04_jprb/)
555 kbo( :, 3,17, 2) = (/&
556 &1.6972e-06_jprb,6.4077e-05_jprb,1.1216e-04_jprb,1.7049e-04_jprb,3.4494e-04_jprb/)
557 kbo( :, 4,17, 2) = (/&
558 &2.5402e-06_jprb,7.6034e-05_jprb,1.2620e-04_jprb,1.7834e-04_jprb,3.9850e-04_jprb/)
559 kbo( :, 5,17, 2) = (/&
560 &3.8602e-06_jprb,9.2137e-05_jprb,1.4620e-04_jprb,1.9446e-04_jprb,4.6053e-04_jprb/)
561 kbo( :, 1,18, 2) = (/&
562 &7.6847e-07_jprb,4.2128e-05_jprb,8.1427e-05_jprb,1.4663e-04_jprb,2.1428e-04_jprb/)
563 kbo( :, 2,18, 2) = (/&
564 &1.0140e-06_jprb,4.6467e-05_jprb,8.5018e-05_jprb,1.4005e-04_jprb,2.4221e-04_jprb/)
565 kbo( :, 3,18, 2) = (/&
566 &1.4492e-06_jprb,5.3358e-05_jprb,9.2939e-05_jprb,1.4019e-04_jprb,2.7739e-04_jprb/)
567 kbo( :, 4,18, 2) = (/&
568 &2.1756e-06_jprb,6.3671e-05_jprb,1.0504e-04_jprb,1.4753e-04_jprb,3.1937e-04_jprb/)
569 kbo( :, 5,18, 2) = (/&
570 &3.2973e-06_jprb,7.7469e-05_jprb,1.2233e-04_jprb,1.6159e-04_jprb,3.6805e-04_jprb/)
571 kbo( :, 1,19, 2) = (/&
572 &6.4665e-07_jprb,3.4756e-05_jprb,6.6830e-05_jprb,1.1940e-04_jprb,1.7455e-04_jprb/)
573 kbo( :, 2,19, 2) = (/&
574 &8.6026e-07_jprb,3.8528e-05_jprb,7.0212e-05_jprb,1.1460e-04_jprb,1.9694e-04_jprb/)
575 kbo( :, 3,19, 2) = (/&
576 &1.2368e-06_jprb,4.4528e-05_jprb,7.7120e-05_jprb,1.1540e-04_jprb,2.2498e-04_jprb/)
577 kbo( :, 4,19, 2) = (/&
578 &1.8580e-06_jprb,5.3404e-05_jprb,8.7557e-05_jprb,1.2215e-04_jprb,2.5850e-04_jprb/)
579 kbo( :, 5,19, 2) = (/&
580 &2.8103e-06_jprb,6.5162e-05_jprb,1.0249e-04_jprb,1.3438e-04_jprb,2.9679e-04_jprb/)
581 kbo( :, 1,20, 2) = (/&
582 &5.4656e-07_jprb,2.8770e-05_jprb,5.4975e-05_jprb,9.7196e-05_jprb,1.4326e-04_jprb/)
583 kbo( :, 2,20, 2) = (/&
584 &7.3436e-07_jprb,3.2085e-05_jprb,5.8157e-05_jprb,9.3865e-05_jprb,1.6155e-04_jprb/)
585 kbo( :, 3,20, 2) = (/&
586 &1.0622e-06_jprb,3.7358e-05_jprb,6.4221e-05_jprb,9.5159e-05_jprb,1.8436e-04_jprb/)
587 kbo( :, 4,20, 2) = (/&
588 &1.5965e-06_jprb,4.4974e-05_jprb,7.3287e-05_jprb,1.0139e-04_jprb,2.1149e-04_jprb/)
589 kbo( :, 5,20, 2) = (/&
590 &2.4119e-06_jprb,5.5033e-05_jprb,8.6244e-05_jprb,1.1207e-04_jprb,2.4172e-04_jprb/)
591 kbo( :, 1,21, 2) = (/&
592 &4.6233e-07_jprb,2.3834e-05_jprb,4.5264e-05_jprb,7.9149e-05_jprb,1.1774e-04_jprb/)
593 kbo( :, 2,21, 2) = (/&
594 &6.2707e-07_jprb,2.6751e-05_jprb,4.8202e-05_jprb,7.6928e-05_jprb,1.3273e-04_jprb/)
595 kbo( :, 3,21, 2) = (/&
596 &9.1123e-07_jprb,3.1358e-05_jprb,5.3515e-05_jprb,7.8550e-05_jprb,1.5133e-04_jprb/)
597 kbo( :, 4,21, 2) = (/&
598 &1.3711e-06_jprb,3.7856e-05_jprb,6.1405e-05_jprb,8.4206e-05_jprb,1.7321e-04_jprb/)
599 kbo( :, 5,21, 2) = (/&
600 &2.0698e-06_jprb,4.6466e-05_jprb,7.2555e-05_jprb,9.3524e-05_jprb,1.9698e-04_jprb/)
601 kbo( :, 1,22, 2) = (/&
602 &3.9809e-07_jprb,1.9861e-05_jprb,3.7362e-05_jprb,6.4255e-05_jprb,9.7130e-05_jprb/)
603 kbo( :, 2,22, 2) = (/&
604 &5.4666e-07_jprb,2.2487e-05_jprb,4.0159e-05_jprb,6.3058e-05_jprb,1.0946e-04_jprb/)
605 kbo( :, 3,22, 2) = (/&
606 &8.0057e-07_jprb,2.6577e-05_jprb,4.4935e-05_jprb,6.5070e-05_jprb,1.2456e-04_jprb/)
607 kbo( :, 4,22, 2) = (/&
608 &1.2071e-06_jprb,3.2211e-05_jprb,5.1924e-05_jprb,7.0344e-05_jprb,1.4182e-04_jprb/)
609 kbo( :, 5,22, 2) = (/&
610 &1.8195e-06_jprb,3.9674e-05_jprb,6.1645e-05_jprb,7.8623e-05_jprb,1.6040e-04_jprb/)
611 kbo( :, 1,23, 2) = (/&
612 &3.4367e-07_jprb,1.6568e-05_jprb,3.0880e-05_jprb,5.2238e-05_jprb,8.0021e-05_jprb/)
613 kbo( :, 2,23, 2) = (/&
614 &4.7758e-07_jprb,1.8928e-05_jprb,3.3504e-05_jprb,5.1762e-05_jprb,9.0054e-05_jprb/)
615 kbo( :, 3,23, 2) = (/&
616 &7.0447e-07_jprb,2.2529e-05_jprb,3.7774e-05_jprb,5.3990e-05_jprb,1.0211e-04_jprb/)
617 kbo( :, 4,23, 2) = (/&
618 &1.0638e-06_jprb,2.7414e-05_jprb,4.3928e-05_jprb,5.8845e-05_jprb,1.1542e-04_jprb/)
619 kbo( :, 5,23, 2) = (/&
620 &1.6007e-06_jprb,3.3849e-05_jprb,5.2353e-05_jprb,6.6134e-05_jprb,1.3002e-04_jprb/)
621 kbo( :, 1,24, 2) = (/&
622 &2.9731e-07_jprb,1.3817e-05_jprb,2.5531e-05_jprb,4.2477e-05_jprb,6.5483e-05_jprb/)
623 kbo( :, 2,24, 2) = (/&
624 &4.1800e-07_jprb,1.5925e-05_jprb,2.7963e-05_jprb,4.2525e-05_jprb,7.3450e-05_jprb/)
625 kbo( :, 3,24, 2) = (/&
626 &6.2039e-07_jprb,1.9083e-05_jprb,3.1748e-05_jprb,4.4841e-05_jprb,8.2603e-05_jprb/)
627 kbo( :, 4,24, 2) = (/&
628 &9.3799e-07_jprb,2.3303e-05_jprb,3.7155e-05_jprb,4.9236e-05_jprb,9.2771e-05_jprb/)
629 kbo( :, 5,24, 2) = (/&
630 &1.4084e-06_jprb,2.8824e-05_jprb,4.4404e-05_jprb,5.5621e-05_jprb,1.0401e-04_jprb/)
631 kbo( :, 1,25, 2) = (/&
632 &2.5846e-07_jprb,1.1557e-05_jprb,2.1168e-05_jprb,3.4591e-05_jprb,5.3402e-05_jprb/)
633 kbo( :, 2,25, 2) = (/&
634 &3.6779e-07_jprb,1.3446e-05_jprb,2.3397e-05_jprb,3.5019e-05_jprb,5.9504e-05_jprb/)
635 kbo( :, 3,25, 2) = (/&
636 &5.4914e-07_jprb,1.6203e-05_jprb,2.6747e-05_jprb,3.7316e-05_jprb,6.6453e-05_jprb/)
637 kbo( :, 4,25, 2) = (/&
638 &8.3081e-07_jprb,1.9848e-05_jprb,3.1489e-05_jprb,4.1271e-05_jprb,7.4204e-05_jprb/)
639 kbo( :, 5,25, 2) = (/&
640 &1.2434e-06_jprb,2.4586e-05_jprb,3.7706e-05_jprb,4.6843e-05_jprb,8.2964e-05_jprb/)
641 kbo( :, 1,26, 2) = (/&
642 &2.2688e-07_jprb,9.7182e-06_jprb,1.7626e-05_jprb,2.8238e-05_jprb,4.3458e-05_jprb/)
643 kbo( :, 2,26, 2) = (/&
644 &3.2698e-07_jprb,1.1421e-05_jprb,1.9660e-05_jprb,2.8946e-05_jprb,4.8104e-05_jprb/)
645 kbo( :, 3,26, 2) = (/&
646 &4.9095e-07_jprb,1.3827e-05_jprb,2.2642e-05_jprb,3.1162e-05_jprb,5.3458e-05_jprb/)
647 kbo( :, 4,26, 2) = (/&
648 &7.4254e-07_jprb,1.6991e-05_jprb,2.6804e-05_jprb,3.4710e-05_jprb,5.9616e-05_jprb/)
649 kbo( :, 5,26, 2) = (/&
650 &1.1064e-06_jprb,2.1073e-05_jprb,3.2131e-05_jprb,3.9581e-05_jprb,6.6564e-05_jprb/)
651 kbo( :, 1,27, 2) = (/&
652 &1.9993e-07_jprb,8.1890e-06_jprb,1.4706e-05_jprb,2.3104e-05_jprb,3.4885e-05_jprb/)
653 kbo( :, 2,27, 2) = (/&
654 &2.9147e-07_jprb,9.7120e-06_jprb,1.6544e-05_jprb,2.3984e-05_jprb,3.8444e-05_jprb/)
655 kbo( :, 3,27, 2) = (/&
656 &4.3955e-07_jprb,1.1803e-05_jprb,1.9192e-05_jprb,2.6063e-05_jprb,4.2658e-05_jprb/)
657 kbo( :, 4,27, 2) = (/&
658 &6.6365e-07_jprb,1.4549e-05_jprb,2.2817e-05_jprb,2.9214e-05_jprb,4.7548e-05_jprb/)
659 kbo( :, 5,27, 2) = (/&
660 &9.8399e-07_jprb,1.8060e-05_jprb,2.7381e-05_jprb,3.3454e-05_jprb,5.3034e-05_jprb/)
661 kbo( :, 1,28, 2) = (/&
662 &1.7666e-07_jprb,6.9106e-06_jprb,1.2291e-05_jprb,1.8950e-05_jprb,2.7614e-05_jprb/)
663 kbo( :, 2,28, 2) = (/&
664 &2.6027e-07_jprb,8.2613e-06_jprb,1.3939e-05_jprb,1.9912e-05_jprb,3.0347e-05_jprb/)
665 kbo( :, 3,28, 2) = (/&
666 &3.9360e-07_jprb,1.0076e-05_jprb,1.6277e-05_jprb,2.1822e-05_jprb,3.3665e-05_jprb/)
667 kbo( :, 4,28, 2) = (/&
668 &5.9255e-07_jprb,1.2455e-05_jprb,1.9419e-05_jprb,2.4599e-05_jprb,3.7521e-05_jprb/)
669 kbo( :, 5,28, 2) = (/&
670 &8.7397e-07_jprb,1.5474e-05_jprb,2.3332e-05_jprb,2.8281e-05_jprb,4.1809e-05_jprb/)
671 kbo( :, 1,29, 2) = (/&
672 &1.5731e-07_jprb,5.8606e-06_jprb,1.0316e-05_jprb,1.5600e-05_jprb,2.1902e-05_jprb/)
673 kbo( :, 2,29, 2) = (/&
674 &2.3400e-07_jprb,7.0543e-06_jprb,1.1790e-05_jprb,1.6590e-05_jprb,2.4089e-05_jprb/)
675 kbo( :, 3,29, 2) = (/&
676 &3.5418e-07_jprb,8.6343e-06_jprb,1.3853e-05_jprb,1.8324e-05_jprb,2.6737e-05_jprb/)
677 kbo( :, 4,29, 2) = (/&
678 &5.3119e-07_jprb,1.0700e-05_jprb,1.6576e-05_jprb,2.0766e-05_jprb,2.9758e-05_jprb/)
679 kbo( :, 5,29, 2) = (/&
680 &7.7916e-07_jprb,1.3299e-05_jprb,1.9939e-05_jprb,2.3971e-05_jprb,3.3117e-05_jprb/)
681 kbo( :, 1,30, 2) = (/&
682 &1.4063e-07_jprb,4.9824e-06_jprb,8.6764e-06_jprb,1.2880e-05_jprb,1.7310e-05_jprb/)
683 kbo( :, 2,30, 2) = (/&
684 &2.1067e-07_jprb,6.0303e-06_jprb,9.9875e-06_jprb,1.3848e-05_jprb,1.9047e-05_jprb/)
685 kbo( :, 3,30, 2) = (/&
686 &3.1873e-07_jprb,7.4093e-06_jprb,1.1804e-05_jprb,1.5408e-05_jprb,2.1112e-05_jprb/)
687 kbo( :, 4,30, 2) = (/&
688 &4.7602e-07_jprb,9.1990e-06_jprb,1.4156e-05_jprb,1.7550e-05_jprb,2.3467e-05_jprb/)
689 kbo( :, 5,30, 2) = (/&
690 &6.9431e-07_jprb,1.1442e-05_jprb,1.7053e-05_jprb,2.0340e-05_jprb,2.6091e-05_jprb/)
691 kbo( :, 1,31, 2) = (/&
692 &1.2644e-07_jprb,4.2516e-06_jprb,7.3195e-06_jprb,1.0673e-05_jprb,1.3682e-05_jprb/)
693 kbo( :, 2,31, 2) = (/&
694 &1.9031e-07_jprb,5.1693e-06_jprb,8.4857e-06_jprb,1.1593e-05_jprb,1.5034e-05_jprb/)
695 kbo( :, 3,31, 2) = (/&
696 &2.8751e-07_jprb,6.3745e-06_jprb,1.0084e-05_jprb,1.2985e-05_jprb,1.6635e-05_jprb/)
697 kbo( :, 4,31, 2) = (/&
698 &4.2724e-07_jprb,7.9260e-06_jprb,1.2109e-05_jprb,1.4860e-05_jprb,1.8446e-05_jprb/)
699 kbo( :, 5,31, 2) = (/&
700 &6.1916e-07_jprb,9.8570e-06_jprb,1.4602e-05_jprb,1.7280e-05_jprb,2.0481e-05_jprb/)
701 kbo( :, 1,32, 2) = (/&
702 &1.1409e-07_jprb,3.6379e-06_jprb,6.1915e-06_jprb,8.8747e-06_jprb,1.0783e-05_jprb/)
703 kbo( :, 2,32, 2) = (/&
704 &1.7228e-07_jprb,4.4412e-06_jprb,7.2287e-06_jprb,9.7273e-06_jprb,1.1842e-05_jprb/)
705 kbo( :, 3,32, 2) = (/&
706 &2.5962e-07_jprb,5.4949e-06_jprb,8.6268e-06_jprb,1.0963e-05_jprb,1.3078e-05_jprb/)
707 kbo( :, 4,32, 2) = (/&
708 &3.8365e-07_jprb,6.8377e-06_jprb,1.0371e-05_jprb,1.2605e-05_jprb,1.4477e-05_jprb/)
709 kbo( :, 5,32, 2) = (/&
710 &5.5233e-07_jprb,8.5032e-06_jprb,1.2515e-05_jprb,1.4698e-05_jprb,1.6068e-05_jprb/)
711 kbo( :, 1,33, 2) = (/&
712 &1.0319e-07_jprb,3.1180e-06_jprb,5.2481e-06_jprb,7.4004e-06_jprb,8.4500e-06_jprb/)
713 kbo( :, 2,33, 2) = (/&
714 &1.5612e-07_jprb,3.8215e-06_jprb,6.1686e-06_jprb,8.1771e-06_jprb,9.2833e-06_jprb/)
715 kbo( :, 3,33, 2) = (/&
716 &2.3441e-07_jprb,4.7418e-06_jprb,7.3861e-06_jprb,9.2700e-06_jprb,1.0235e-05_jprb/)
717 kbo( :, 4,33, 2) = (/&
718 &3.4446e-07_jprb,5.9060e-06_jprb,8.8925e-06_jprb,1.0710e-05_jprb,1.1335e-05_jprb/)
719 kbo( :, 5,33, 2) = (/&
720 &4.9241e-07_jprb,7.3371e-06_jprb,1.0731e-05_jprb,1.2507e-05_jprb,1.2576e-05_jprb/)
721 kbo( :, 1,34, 2) = (/&
722 &9.2307e-08_jprb,2.6619e-06_jprb,4.4385e-06_jprb,6.1710e-06_jprb,6.7086e-06_jprb/)
723 kbo( :, 2,34, 2) = (/&
724 &1.3970e-07_jprb,3.2731e-06_jprb,5.2448e-06_jprb,6.8652e-06_jprb,7.3666e-06_jprb/)
725 kbo( :, 3,34, 2) = (/&
726 &2.0895e-07_jprb,4.0690e-06_jprb,6.2930e-06_jprb,7.8186e-06_jprb,8.1274e-06_jprb/)
727 kbo( :, 4,34, 2) = (/&
728 &3.0532e-07_jprb,5.0681e-06_jprb,7.5836e-06_jprb,9.0634e-06_jprb,9.0071e-06_jprb/)
729 kbo( :, 5,34, 2) = (/&
730 &4.3392e-07_jprb,6.2912e-06_jprb,9.1516e-06_jprb,1.0598e-05_jprb,1.0001e-05_jprb/)
731 kbo( :, 1,35, 2) = (/&
732 &7.9334e-08_jprb,2.2294e-06_jprb,3.6998e-06_jprb,5.1049e-06_jprb,5.2466e-06_jprb/)
733 kbo( :, 2,35, 2) = (/&
734 &1.2002e-07_jprb,2.7467e-06_jprb,4.3846e-06_jprb,5.6993e-06_jprb,5.7554e-06_jprb/)
735 kbo( :, 3,35, 2) = (/&
736 &1.7912e-07_jprb,3.4176e-06_jprb,5.2654e-06_jprb,6.5073e-06_jprb,6.3538e-06_jprb/)
737 kbo( :, 4,35, 2) = (/&
738 &2.6096e-07_jprb,4.2572e-06_jprb,6.3499e-06_jprb,7.5566e-06_jprb,7.0484e-06_jprb/)
739 kbo( :, 5,35, 2) = (/&
740 &3.6971e-07_jprb,5.2820e-06_jprb,7.6616e-06_jprb,8.8415e-06_jprb,7.8403e-06_jprb/)
741 kbo( :, 1,36, 2) = (/&
742 &6.5133e-08_jprb,1.8258e-06_jprb,3.0305e-06_jprb,4.1781e-06_jprb,4.0391e-06_jprb/)
743 kbo( :, 2,36, 2) = (/&
744 &9.8521e-08_jprb,2.2504e-06_jprb,3.5927e-06_jprb,4.6670e-06_jprb,4.4257e-06_jprb/)
745 kbo( :, 3,36, 2) = (/&
746 &1.4704e-07_jprb,2.8014e-06_jprb,4.3159e-06_jprb,5.3307e-06_jprb,4.8851e-06_jprb/)
747 kbo( :, 4,36, 2) = (/&
748 &2.1423e-07_jprb,3.4905e-06_jprb,5.2056e-06_jprb,6.1919e-06_jprb,5.4221e-06_jprb/)
749 kbo( :, 5,36, 2) = (/&
750 &3.0347e-07_jprb,4.3311e-06_jprb,6.2810e-06_jprb,7.2464e-06_jprb,6.0400e-06_jprb/)
751 kbo( :, 1,37, 2) = (/&
752 &5.0409e-08_jprb,1.4546e-06_jprb,2.4297e-06_jprb,3.3777e-06_jprb,3.1888e-06_jprb/)
753 kbo( :, 2,37, 2) = (/&
754 &7.6278e-08_jprb,1.7897e-06_jprb,2.8722e-06_jprb,3.7595e-06_jprb,3.4883e-06_jprb/)
755 kbo( :, 3,37, 2) = (/&
756 &1.1416e-07_jprb,2.2265e-06_jprb,3.4480e-06_jprb,4.2834e-06_jprb,3.8454e-06_jprb/)
757 kbo( :, 4,37, 2) = (/&
758 &1.6695e-07_jprb,2.7752e-06_jprb,4.1566e-06_jprb,4.9670e-06_jprb,4.2653e-06_jprb/)
759 kbo( :, 5,37, 2) = (/&
760 &2.3741e-07_jprb,3.4464e-06_jprb,5.0175e-06_jprb,5.8098e-06_jprb,4.7509e-06_jprb/)
761 kbo( :, 1,38, 2) = (/&
762 &3.8890e-08_jprb,1.1572e-06_jprb,1.9462e-06_jprb,2.7303e-06_jprb,2.5173e-06_jprb/)
763 kbo( :, 2,38, 2) = (/&
764 &5.8839e-08_jprb,1.4211e-06_jprb,2.2935e-06_jprb,3.0265e-06_jprb,2.7490e-06_jprb/)
765 kbo( :, 3,38, 2) = (/&
766 &8.8306e-08_jprb,1.7664e-06_jprb,2.7503e-06_jprb,3.4388e-06_jprb,3.0259e-06_jprb/)
767 kbo( :, 4,38, 2) = (/&
768 &1.2963e-07_jprb,2.2023e-06_jprb,3.3138e-06_jprb,3.9798e-06_jprb,3.3533e-06_jprb/)
769 kbo( :, 5,38, 2) = (/&
770 &1.8509e-07_jprb,2.7372e-06_jprb,4.0007e-06_jprb,4.6520e-06_jprb,3.7342e-06_jprb/)
771 kbo( :, 1,39, 2) = (/&
772 &3.0015e-08_jprb,9.2084e-07_jprb,1.5596e-06_jprb,2.2083e-06_jprb,1.9828e-06_jprb/)
773 kbo( :, 2,39, 2) = (/&
774 &4.5385e-08_jprb,1.1288e-06_jprb,1.8319e-06_jprb,2.4376e-06_jprb,2.1608e-06_jprb/)
775 kbo( :, 3,39, 2) = (/&
776 &6.8278e-08_jprb,1.4014e-06_jprb,2.1937e-06_jprb,2.7616e-06_jprb,2.3751e-06_jprb/)
777 kbo( :, 4,39, 2) = (/&
778 &1.0061e-07_jprb,1.7477e-06_jprb,2.6422e-06_jprb,3.1891e-06_jprb,2.6290e-06_jprb/)
779 kbo( :, 5,39, 2) = (/&
780 &1.4423e-07_jprb,2.1734e-06_jprb,3.1901e-06_jprb,3.7248e-06_jprb,2.9256e-06_jprb/)
781 kbo( :, 1,40, 2) = (/&
782 &2.2256e-08_jprb,7.1912e-07_jprb,1.2329e-06_jprb,1.7745e-06_jprb,1.5697e-06_jprb/)
783 kbo( :, 2,40, 2) = (/&
784 &3.3569e-08_jprb,8.7851e-07_jprb,1.4396e-06_jprb,1.9436e-06_jprb,1.7055e-06_jprb/)
785 kbo( :, 3,40, 2) = (/&
786 &5.0664e-08_jprb,1.0879e-06_jprb,1.7182e-06_jprb,2.1900e-06_jprb,1.8705e-06_jprb/)
787 kbo( :, 4,40, 2) = (/&
788 &7.5118e-08_jprb,1.3564e-06_jprb,2.0680e-06_jprb,2.5192e-06_jprb,2.0668e-06_jprb/)
789 kbo( :, 5,40, 2) = (/&
790 &1.0843e-07_jprb,1.6886e-06_jprb,2.4960e-06_jprb,2.9369e-06_jprb,2.2973e-06_jprb/)
791 kbo( :, 1,41, 2) = (/&
792 &1.6447e-08_jprb,5.6080e-07_jprb,9.7444e-07_jprb,1.4286e-06_jprb,1.2435e-06_jprb/)
793 kbo( :, 2,41, 2) = (/&
794 &2.4695e-08_jprb,6.8242e-07_jprb,1.1302e-06_jprb,1.5500e-06_jprb,1.3469e-06_jprb/)
795 kbo( :, 3,41, 2) = (/&
796 &3.7349e-08_jprb,8.4229e-07_jprb,1.3428e-06_jprb,1.7360e-06_jprb,1.4732e-06_jprb/)
797 kbo( :, 4,41, 2) = (/&
798 &5.5705e-08_jprb,1.0497e-06_jprb,1.6148e-06_jprb,1.9875e-06_jprb,1.6246e-06_jprb/)
799 kbo( :, 5,41, 2) = (/&
800 &8.0988e-08_jprb,1.3075e-06_jprb,1.9479e-06_jprb,2.3109e-06_jprb,1.8030e-06_jprb/)
801 kbo( :, 1,42, 2) = (/&
802 &1.2186e-08_jprb,4.3819e-07_jprb,7.7124e-07_jprb,1.1538e-06_jprb,9.8460e-07_jprb/)
803 kbo( :, 2,42, 2) = (/&
804 &1.8167e-08_jprb,5.3040e-07_jprb,8.8867e-07_jprb,1.2386e-06_jprb,1.0631e-06_jprb/)
805 kbo( :, 3,42, 2) = (/&
806 &2.7496e-08_jprb,6.5240e-07_jprb,1.0501e-06_jprb,1.3776e-06_jprb,1.1592e-06_jprb/)
807 kbo( :, 4,42, 2) = (/&
808 &4.1226e-08_jprb,8.1205e-07_jprb,1.2611e-06_jprb,1.5695e-06_jprb,1.2755e-06_jprb/)
809 kbo( :, 5,42, 2) = (/&
810 &6.0358e-08_jprb,1.0122e-06_jprb,1.5198e-06_jprb,1.8189e-06_jprb,1.4129e-06_jprb/)
811 kbo( :, 1,43, 2) = (/&
812 &8.8825e-09_jprb,3.4025e-07_jprb,6.0770e-07_jprb,9.3331e-07_jprb,7.8085e-07_jprb/)
813 kbo( :, 2,43, 2) = (/&
814 &1.3077e-08_jprb,4.0821e-07_jprb,6.9425e-07_jprb,9.8759e-07_jprb,8.3977e-07_jprb/)
815 kbo( :, 3,43, 2) = (/&
816 &1.9763e-08_jprb,4.9996e-07_jprb,8.1437e-07_jprb,1.0881e-06_jprb,9.1252e-07_jprb/)
817 kbo( :, 4,43, 2) = (/&
818 &2.9785e-08_jprb,6.2062e-07_jprb,9.7495e-07_jprb,1.2316e-06_jprb,1.0010e-06_jprb/)
819 kbo( :, 5,43, 2) = (/&
820 &4.3968e-08_jprb,7.7371e-07_jprb,1.1737e-06_jprb,1.4206e-06_jprb,1.1059e-06_jprb/)
821 kbo( :, 1,44, 2) = (/&
822 &6.4652e-09_jprb,2.6432e-07_jprb,4.7930e-07_jprb,7.5854e-07_jprb,6.2018e-07_jprb/)
823 kbo( :, 2,44, 2) = (/&
824 &9.3431e-09_jprb,3.1321e-07_jprb,5.4189e-07_jprb,7.8917e-07_jprb,6.6342e-07_jprb/)
825 kbo( :, 3,44, 2) = (/&
826 &1.4054e-08_jprb,3.8170e-07_jprb,6.3021e-07_jprb,8.5948e-07_jprb,7.1866e-07_jprb/)
827 kbo( :, 4,44, 2) = (/&
828 &2.1257e-08_jprb,4.7192e-07_jprb,7.5053e-07_jprb,9.6532e-07_jprb,7.8542e-07_jprb/)
829 kbo( :, 5,44, 2) = (/&
830 &3.1636e-08_jprb,5.8814e-07_jprb,9.0255e-07_jprb,1.1069e-06_jprb,8.6508e-07_jprb/)
831 kbo( :, 1,45, 2) = (/&
832 &4.7493e-09_jprb,2.0618e-07_jprb,3.7955e-07_jprb,6.2010e-07_jprb,4.9320e-07_jprb/)
833 kbo( :, 2,45, 2) = (/&
834 &6.7046e-09_jprb,2.4103e-07_jprb,4.2421e-07_jprb,6.3409e-07_jprb,5.2372e-07_jprb/)
835 kbo( :, 3,45, 2) = (/&
836 &9.9979e-09_jprb,2.9183e-07_jprb,4.8903e-07_jprb,6.8121e-07_jprb,5.6534e-07_jprb/)
837 kbo( :, 4,45, 2) = (/&
838 &1.5142e-08_jprb,3.5915e-07_jprb,5.7833e-07_jprb,7.5825e-07_jprb,6.1575e-07_jprb/)
839 kbo( :, 5,45, 2) = (/&
840 &2.2692e-08_jprb,4.4695e-07_jprb,6.9435e-07_jprb,8.6394e-07_jprb,6.7584e-07_jprb/)
841 kbo( :, 1,46, 2) = (/&
842 &3.5026e-09_jprb,1.6095e-07_jprb,3.0164e-07_jprb,5.0988e-07_jprb,3.9266e-07_jprb/)
843 kbo( :, 2,46, 2) = (/&
844 &4.8056e-09_jprb,1.8571e-07_jprb,3.3238e-07_jprb,5.1211e-07_jprb,4.1411e-07_jprb/)
845 kbo( :, 3,46, 2) = (/&
846 &7.0611e-09_jprb,2.2256e-07_jprb,3.7936e-07_jprb,5.4108e-07_jprb,4.4422e-07_jprb/)
847 kbo( :, 4,46, 2) = (/&
848 &1.0674e-08_jprb,2.7254e-07_jprb,4.4484e-07_jprb,5.9573e-07_jprb,4.8213e-07_jprb/)
849 kbo( :, 5,46, 2) = (/&
850 &1.6091e-08_jprb,3.3807e-07_jprb,5.3220e-07_jprb,6.7368e-07_jprb,5.2739e-07_jprb/)
851 kbo( :, 1,47, 2) = (/&
852 &2.5860e-09_jprb,1.2558e-07_jprb,2.4079e-07_jprb,4.2237e-07_jprb,3.1326e-07_jprb/)
853 kbo( :, 2,47, 2) = (/&
854 &3.4290e-09_jprb,1.4300e-07_jprb,2.6056e-07_jprb,4.1623e-07_jprb,3.2857e-07_jprb/)
855 kbo( :, 3,47, 2) = (/&
856 &4.9220e-09_jprb,1.6878e-07_jprb,2.9365e-07_jprb,4.3092e-07_jprb,3.4960e-07_jprb/)
857 kbo( :, 4,47, 2) = (/&
858 &7.3908e-09_jprb,2.0541e-07_jprb,3.4074e-07_jprb,4.6771e-07_jprb,3.7790e-07_jprb/)
859 kbo( :, 5,47, 2) = (/&
860 &1.1182e-08_jprb,2.5354e-07_jprb,4.0498e-07_jprb,5.2394e-07_jprb,4.1187e-07_jprb/)
861 kbo( :, 1,48, 2) = (/&
862 &1.9362e-09_jprb,9.8548e-08_jprb,1.9411e-07_jprb,3.5272e-07_jprb,2.4937e-07_jprb/)
863 kbo( :, 2,48, 2) = (/&
864 &2.4798e-09_jprb,1.1072e-07_jprb,2.0550e-07_jprb,3.4105e-07_jprb,2.6090e-07_jprb/)
865 kbo( :, 3,48, 2) = (/&
866 &3.4555e-09_jprb,1.2865e-07_jprb,2.2828e-07_jprb,3.4594e-07_jprb,2.7560e-07_jprb/)
867 kbo( :, 4,48, 2) = (/&
868 &5.1234e-09_jprb,1.5515e-07_jprb,2.6207e-07_jprb,3.6909e-07_jprb,2.9595e-07_jprb/)
869 kbo( :, 5,48, 2) = (/&
870 &7.7538e-09_jprb,1.9045e-07_jprb,3.0872e-07_jprb,4.0878e-07_jprb,3.2128e-07_jprb/)
871 kbo( :, 1,49, 2) = (/&
872 &1.4693e-09_jprb,7.7790e-08_jprb,1.5796e-07_jprb,2.9638e-07_jprb,1.9770e-07_jprb/)
873 kbo( :, 2,49, 2) = (/&
874 &1.8189e-09_jprb,8.6134e-08_jprb,1.6334e-07_jprb,2.8139e-07_jprb,2.0674e-07_jprb/)
875 kbo( :, 3,49, 2) = (/&
876 &2.4514e-09_jprb,9.8737e-08_jprb,1.7842e-07_jprb,2.8001e-07_jprb,2.1740e-07_jprb/)
877 kbo( :, 4,49, 2) = (/&
878 &3.5625e-09_jprb,1.1749e-07_jprb,2.0240e-07_jprb,2.9292e-07_jprb,2.3150e-07_jprb/)
879 kbo( :, 5,49, 2) = (/&
880 &5.3682e-09_jprb,1.4339e-07_jprb,2.3606e-07_jprb,3.2024e-07_jprb,2.5000e-07_jprb/)
881 kbo( :, 1,50, 2) = (/&
882 &1.1339e-09_jprb,6.1945e-08_jprb,1.2933e-07_jprb,2.5041e-07_jprb,1.5748e-07_jprb/)
883 kbo( :, 2,50, 2) = (/&
884 &1.3605e-09_jprb,6.7603e-08_jprb,1.3118e-07_jprb,2.3383e-07_jprb,1.6480e-07_jprb/)
885 kbo( :, 3,50, 2) = (/&
886 &1.7751e-09_jprb,7.6527e-08_jprb,1.4063e-07_jprb,2.2853e-07_jprb,1.7288e-07_jprb/)
887 kbo( :, 4,50, 2) = (/&
888 &2.5157e-09_jprb,8.9697e-08_jprb,1.5753e-07_jprb,2.3451e-07_jprb,1.8295e-07_jprb/)
889 kbo( :, 5,50, 2) = (/&
890 &3.7579e-09_jprb,1.0875e-07_jprb,1.8190e-07_jprb,2.5266e-07_jprb,1.9633e-07_jprb/)
891 kbo( :, 1,51, 2) = (/&
892 &8.8714e-10_jprb,4.9745e-08_jprb,1.0659e-07_jprb,2.1260e-07_jprb,1.2561e-07_jprb/)
893 kbo( :, 2,51, 2) = (/&
894 &1.0323e-09_jprb,5.3369e-08_jprb,1.0630e-07_jprb,1.9542e-07_jprb,1.3171e-07_jprb/)
895 kbo( :, 3,51, 2) = (/&
896 &1.3054e-09_jprb,5.9668e-08_jprb,1.1161e-07_jprb,1.8777e-07_jprb,1.3801e-07_jprb/)
897 kbo( :, 4,51, 2) = (/&
898 &1.7978e-09_jprb,6.8999e-08_jprb,1.2328e-07_jprb,1.8919e-07_jprb,1.4548e-07_jprb/)
899 kbo( :, 5,51, 2) = (/&
900 &2.6478e-09_jprb,8.2837e-08_jprb,1.4093e-07_jprb,2.0051e-07_jprb,1.5510e-07_jprb/)
901 kbo( :, 1,52, 2) = (/&
902 &7.0184e-10_jprb,4.0190e-08_jprb,8.8218e-08_jprb,1.8136e-07_jprb,9.9731e-08_jprb/)
903 kbo( :, 2,52, 2) = (/&
904 &7.9197e-10_jprb,4.2349e-08_jprb,8.6755e-08_jprb,1.6417e-07_jprb,1.0496e-07_jprb/)
905 kbo( :, 3,52, 2) = (/&
906 &9.7132e-10_jprb,4.6717e-08_jprb,8.9179e-08_jprb,1.5515e-07_jprb,1.1000e-07_jprb/)
907 kbo( :, 4,52, 2) = (/&
908 &1.2972e-09_jprb,5.3380e-08_jprb,9.6954e-08_jprb,1.5366e-07_jprb,1.1563e-07_jprb/)
909 kbo( :, 5,52, 2) = (/&
910 &1.8721e-09_jprb,6.3248e-08_jprb,1.0959e-07_jprb,1.5990e-07_jprb,1.2254e-07_jprb/)
911 kbo( :, 1,53, 2) = (/&
912 &5.6092e-10_jprb,3.2648e-08_jprb,7.3117e-08_jprb,1.5519e-07_jprb,7.8979e-08_jprb/)
913 kbo( :, 2,53, 2) = (/&
914 &6.1423e-10_jprb,3.3821e-08_jprb,7.1138e-08_jprb,1.3880e-07_jprb,8.3275e-08_jprb/)
915 kbo( :, 3,53, 2) = (/&
916 &7.3095e-10_jprb,3.6763e-08_jprb,7.1824e-08_jprb,1.2909e-07_jprb,8.7408e-08_jprb/)
917 kbo( :, 4,53, 2) = (/&
918 &9.4591e-10_jprb,4.1492e-08_jprb,7.6609e-08_jprb,1.2565e-07_jprb,9.1725e-08_jprb/)
919 kbo( :, 5,53, 2) = (/&
920 &1.3305e-09_jprb,4.8452e-08_jprb,8.5519e-08_jprb,1.2833e-07_jprb,9.6780e-08_jprb/)
921 kbo( :, 1,54, 2) = (/&
922 &4.5340e-10_jprb,2.6715e-08_jprb,6.0844e-08_jprb,1.3273e-07_jprb,6.3768e-08_jprb/)
923 kbo( :, 2,54, 2) = (/&
924 &4.8357e-10_jprb,2.7241e-08_jprb,5.8664e-08_jprb,1.1758e-07_jprb,6.7028e-08_jprb/)
925 kbo( :, 3,54, 2) = (/&
926 &5.5955e-10_jprb,2.9137e-08_jprb,5.8341e-08_jprb,1.0779e-07_jprb,7.0461e-08_jprb/)
927 kbo( :, 4,54, 2) = (/&
928 &7.0364e-10_jprb,3.2508e-08_jprb,6.1041e-08_jprb,1.0330e-07_jprb,7.3905e-08_jprb/)
929 kbo( :, 5,54, 2) = (/&
930 &9.6348e-10_jprb,3.7510e-08_jprb,6.7236e-08_jprb,1.0378e-07_jprb,7.7793e-08_jprb/)
931 kbo( :, 1,55, 2) = (/&
932 &3.7018e-10_jprb,2.1877e-08_jprb,5.0748e-08_jprb,1.1383e-07_jprb,5.2143e-08_jprb/)
933 kbo( :, 2,55, 2) = (/&
934 &3.8461e-10_jprb,2.2059e-08_jprb,4.8491e-08_jprb,9.9810e-08_jprb,5.4531e-08_jprb/)
935 kbo( :, 3,55, 2) = (/&
936 &4.3319e-10_jprb,2.3219e-08_jprb,4.7656e-08_jprb,9.0291e-08_jprb,5.7357e-08_jprb/)
937 kbo( :, 4,55, 2) = (/&
938 &5.3033e-10_jprb,2.5603e-08_jprb,4.8945e-08_jprb,8.5282e-08_jprb,6.0114e-08_jprb/)
939 kbo( :, 5,55, 2) = (/&
940 &7.0668e-10_jprb,2.9236e-08_jprb,5.3162e-08_jprb,8.4413e-08_jprb,6.3151e-08_jprb/)
941 kbo( :, 1,56, 2) = (/&
942 &3.0445e-10_jprb,1.7931e-08_jprb,4.2378e-08_jprb,9.8533e-08_jprb,4.2768e-08_jprb/)
943 kbo( :, 2,56, 2) = (/&
944 &3.0831e-10_jprb,1.7934e-08_jprb,4.0116e-08_jprb,8.4908e-08_jprb,4.4445e-08_jprb/)
945 kbo( :, 3,56, 2) = (/&
946 &3.3824e-10_jprb,1.8600e-08_jprb,3.9063e-08_jprb,7.5998e-08_jprb,4.6738e-08_jprb/)
947 kbo( :, 4,56, 2) = (/&
948 &4.0330e-10_jprb,2.0246e-08_jprb,3.9492e-08_jprb,7.0783e-08_jprb,4.8957e-08_jprb/)
949 kbo( :, 5,56, 2) = (/&
950 &5.2280e-10_jprb,2.2872e-08_jprb,4.2190e-08_jprb,6.9008e-08_jprb,5.1331e-08_jprb/)
951 kbo( :, 1,57, 2) = (/&
952 &2.5188e-10_jprb,1.4754e-08_jprb,3.5438e-08_jprb,8.5756e-08_jprb,3.5193e-08_jprb/)
953 kbo( :, 2,57, 2) = (/&
954 &2.4912e-10_jprb,1.4670e-08_jprb,3.3337e-08_jprb,7.2430e-08_jprb,3.6276e-08_jprb/)
955 kbo( :, 3,57, 2) = (/&
956 &2.6653e-10_jprb,1.4983e-08_jprb,3.2184e-08_jprb,6.4241e-08_jprb,3.8128e-08_jprb/)
957 kbo( :, 4,57, 2) = (/&
958 &3.0939e-10_jprb,1.6062e-08_jprb,3.2064e-08_jprb,5.9025e-08_jprb,3.9920e-08_jprb/)
959 kbo( :, 5,57, 2) = (/&
960 &3.9021e-10_jprb,1.7948e-08_jprb,3.3635e-08_jprb,5.6680e-08_jprb,4.1787e-08_jprb/)
961 kbo( :, 1,58, 2) = (/&
962 &2.0925e-10_jprb,1.2170e-08_jprb,2.9715e-08_jprb,7.4671e-08_jprb,2.9109e-08_jprb/)
963 kbo( :, 2,58, 2) = (/&
964 &2.0318e-10_jprb,1.2015e-08_jprb,2.7763e-08_jprb,6.1869e-08_jprb,2.9789e-08_jprb/)
965 kbo( :, 3,58, 2) = (/&
966 &2.1207e-10_jprb,1.2135e-08_jprb,2.6581e-08_jprb,5.4388e-08_jprb,3.1254e-08_jprb/)
967 kbo( :, 4,58, 2) = (/&
968 &2.3998e-10_jprb,1.2810e-08_jprb,2.6176e-08_jprb,4.9330e-08_jprb,3.2703e-08_jprb/)
969 kbo( :, 5,58, 2) = (/&
970 &2.9508e-10_jprb,1.4156e-08_jprb,2.6975e-08_jprb,4.6724e-08_jprb,3.4169e-08_jprb/)
971 kbo( :, 1,59, 2) = (/&
972 &1.7253e-10_jprb,9.9906e-09_jprb,2.4546e-08_jprb,6.2526e-08_jprb,2.4559e-08_jprb/)
973 kbo( :, 2,59, 2) = (/&
974 &1.6644e-10_jprb,9.8313e-09_jprb,2.2868e-08_jprb,5.1484e-08_jprb,2.5300e-08_jprb/)
975 kbo( :, 3,59, 2) = (/&
976 &1.7202e-10_jprb,9.8966e-09_jprb,2.1823e-08_jprb,4.5067e-08_jprb,2.6453e-08_jprb/)
977 kbo( :, 4,59, 2) = (/&
978 &1.9270e-10_jprb,1.0388e-08_jprb,2.1414e-08_jprb,4.0702e-08_jprb,2.7518e-08_jprb/)
979 kbo( :, 5,59, 2) = (/&
980 &2.3454e-10_jprb,1.1431e-08_jprb,2.1928e-08_jprb,3.8364e-08_jprb,2.8657e-08_jprb/)
981 kbo( :, 1,13, 3) = (/&
982 &9.3592e-06_jprb,1.8635e-04_jprb,3.2360e-04_jprb,5.1013e-04_jprb,1.3719e-03_jprb/)
983 kbo( :, 2,13, 3) = (/&
984 &1.3997e-05_jprb,2.2150e-04_jprb,3.6186e-04_jprb,5.0766e-04_jprb,1.6952e-03_jprb/)
985 kbo( :, 3,13, 3) = (/&
986 &2.1472e-05_jprb,2.7029e-04_jprb,4.2086e-04_jprb,5.4160e-04_jprb,2.0559e-03_jprb/)
987 kbo( :, 4,13, 3) = (/&
988 &3.2949e-05_jprb,3.3595e-04_jprb,5.0190e-04_jprb,6.0909e-04_jprb,2.4422e-03_jprb/)
989 kbo( :, 5,13, 3) = (/&
990 &5.0055e-05_jprb,4.2283e-04_jprb,6.0794e-04_jprb,7.0057e-04_jprb,2.8431e-03_jprb/)
991 kbo( :, 1,14, 3) = (/&
992 &7.7811e-06_jprb,1.5443e-04_jprb,2.6731e-04_jprb,4.1737e-04_jprb,1.1937e-03_jprb/)
993 kbo( :, 2,14, 3) = (/&
994 &1.1790e-05_jprb,1.8454e-04_jprb,3.0104e-04_jprb,4.1861e-04_jprb,1.4661e-03_jprb/)
995 kbo( :, 3,14, 3) = (/&
996 &1.8281e-05_jprb,2.2651e-04_jprb,3.5177e-04_jprb,4.5049e-04_jprb,1.7659e-03_jprb/)
997 kbo( :, 4,14, 3) = (/&
998 &2.8361e-05_jprb,2.8319e-04_jprb,4.2136e-04_jprb,5.0814e-04_jprb,2.0759e-03_jprb/)
999 kbo( :, 5,14, 3) = (/&
1000 &4.3496e-05_jprb,3.5806e-04_jprb,5.1240e-04_jprb,5.8626e-04_jprb,2.3955e-03_jprb/)
1001 kbo( :, 1,15, 3) = (/&
1002 &6.4085e-06_jprb,1.2732e-04_jprb,2.2021e-04_jprb,3.4093e-04_jprb,1.0104e-03_jprb/)
1003 kbo( :, 2,15, 3) = (/&
1004 &9.8620e-06_jprb,1.5303e-04_jprb,2.4982e-04_jprb,3.4487e-04_jprb,1.2327e-03_jprb/)
1005 kbo( :, 3,15, 3) = (/&
1006 &1.5483e-05_jprb,1.8913e-04_jprb,2.9331e-04_jprb,3.7385e-04_jprb,1.4660e-03_jprb/)
1007 kbo( :, 4,15, 3) = (/&
1008 &2.4329e-05_jprb,2.3772e-04_jprb,3.5313e-04_jprb,4.2330e-04_jprb,1.7021e-03_jprb/)
1009 kbo( :, 5,15, 3) = (/&
1010 &3.7620e-05_jprb,3.0181e-04_jprb,4.3081e-04_jprb,4.9037e-04_jprb,1.9309e-03_jprb/)
1011 kbo( :, 1,16, 3) = (/&
1012 &5.2944e-06_jprb,1.0489e-04_jprb,1.8139e-04_jprb,2.7836e-04_jprb,8.1553e-04_jprb/)
1013 kbo( :, 2,16, 3) = (/&
1014 &8.2639e-06_jprb,1.2685e-04_jprb,2.0708e-04_jprb,2.8409e-04_jprb,9.8078e-04_jprb/)
1015 kbo( :, 3,16, 3) = (/&
1016 &1.3171e-05_jprb,1.5775e-04_jprb,2.4443e-04_jprb,3.0988e-04_jprb,1.1503e-03_jprb/)
1017 kbo( :, 4,16, 3) = (/&
1018 &2.0912e-05_jprb,1.9929e-04_jprb,2.9554e-04_jprb,3.5252e-04_jprb,1.3131e-03_jprb/)
1019 kbo( :, 5,16, 3) = (/&
1020 &3.2496e-05_jprb,2.5409e-04_jprb,3.6179e-04_jprb,4.0963e-04_jprb,1.4760e-03_jprb/)
1021 kbo( :, 1,17, 3) = (/&
1022 &4.4493e-06_jprb,8.6770e-05_jprb,1.4991e-04_jprb,2.2771e-04_jprb,6.5245e-04_jprb/)
1023 kbo( :, 2,17, 3) = (/&
1024 &7.0395e-06_jprb,1.0559e-04_jprb,1.7203e-04_jprb,2.3430e-04_jprb,7.7262e-04_jprb/)
1025 kbo( :, 3,17, 3) = (/&
1026 &1.1335e-05_jprb,1.3208e-04_jprb,2.0407e-04_jprb,2.5722e-04_jprb,8.9028e-04_jprb/)
1027 kbo( :, 4,17, 3) = (/&
1028 &1.8069e-05_jprb,1.6765e-04_jprb,2.4779e-04_jprb,2.9368e-04_jprb,1.0063e-03_jprb/)
1029 kbo( :, 5,17, 3) = (/&
1030 &2.8090e-05_jprb,2.1455e-04_jprb,3.0412e-04_jprb,3.4249e-04_jprb,1.1248e-03_jprb/)
1031 kbo( :, 1,18, 3) = (/&
1032 &3.8316e-06_jprb,7.2347e-05_jprb,1.2458e-04_jprb,1.8673e-04_jprb,5.2122e-04_jprb/)
1033 kbo( :, 2,18, 3) = (/&
1034 &6.1184e-06_jprb,8.8580e-05_jprb,1.4361e-04_jprb,1.9377e-04_jprb,6.0767e-04_jprb/)
1035 kbo( :, 3,18, 3) = (/&
1036 &9.8947e-06_jprb,1.1135e-04_jprb,1.7120e-04_jprb,2.1410e-04_jprb,6.9194e-04_jprb/)
1037 kbo( :, 4,18, 3) = (/&
1038 &1.5756e-05_jprb,1.4190e-04_jprb,2.0855e-04_jprb,2.4531e-04_jprb,7.7868e-04_jprb/)
1039 kbo( :, 5,18, 3) = (/&
1040 &2.4472e-05_jprb,1.8227e-04_jprb,2.5667e-04_jprb,2.8708e-04_jprb,8.6975e-04_jprb/)
1041 kbo( :, 1,19, 3) = (/&
1042 &3.3167e-06_jprb,6.0472e-05_jprb,1.0361e-04_jprb,1.5344e-04_jprb,4.1912e-04_jprb/)
1043 kbo( :, 2,19, 3) = (/&
1044 &5.3275e-06_jprb,7.4485e-05_jprb,1.2002e-04_jprb,1.6049e-04_jprb,4.8167e-04_jprb/)
1045 kbo( :, 3,19, 3) = (/&
1046 &8.6182e-06_jprb,9.4048e-05_jprb,1.4375e-04_jprb,1.7839e-04_jprb,5.4498e-04_jprb/)
1047 kbo( :, 4,19, 3) = (/&
1048 &1.3697e-05_jprb,1.2034e-04_jprb,1.7570e-04_jprb,2.0508e-04_jprb,6.1244e-04_jprb/)
1049 kbo( :, 5,19, 3) = (/&
1050 &2.1261e-05_jprb,1.5516e-04_jprb,2.1680e-04_jprb,2.4089e-04_jprb,6.8509e-04_jprb/)
1051 kbo( :, 1,20, 3) = (/&
1052 &2.9049e-06_jprb,5.0863e-05_jprb,8.6497e-05_jprb,1.2631e-04_jprb,3.3898e-04_jprb/)
1053 kbo( :, 2,20, 3) = (/&
1054 &4.6782e-06_jprb,6.3037e-05_jprb,1.0077e-04_jprb,1.3328e-04_jprb,3.8658e-04_jprb/)
1055 kbo( :, 3,20, 3) = (/&
1056 &7.5551e-06_jprb,7.9949e-05_jprb,1.2127e-04_jprb,1.4912e-04_jprb,4.3608e-04_jprb/)
1057 kbo( :, 4,20, 3) = (/&
1058 &1.1985e-05_jprb,1.0272e-04_jprb,1.4880e-04_jprb,1.7209e-04_jprb,4.8968e-04_jprb/)
1059 kbo( :, 5,20, 3) = (/&
1060 &1.8564e-05_jprb,1.3289e-04_jprb,1.8395e-04_jprb,2.0290e-04_jprb,5.4862e-04_jprb/)
1061 kbo( :, 1,21, 3) = (/&
1062 &2.5348e-06_jprb,4.2827e-05_jprb,7.2239e-05_jprb,1.0405e-04_jprb,2.7347e-04_jprb/)
1063 kbo( :, 2,21, 3) = (/&
1064 &4.0896e-06_jprb,5.3392e-05_jprb,8.4682e-05_jprb,1.1078e-04_jprb,3.1033e-04_jprb/)
1065 kbo( :, 3,21, 3) = (/&
1066 &6.5911e-06_jprb,6.8002e-05_jprb,1.0240e-04_jprb,1.2468e-04_jprb,3.4945e-04_jprb/)
1067 kbo( :, 4,21, 3) = (/&
1068 &1.0443e-05_jprb,8.7777e-05_jprb,1.2604e-04_jprb,1.4448e-04_jprb,3.9270e-04_jprb/)
1069 kbo( :, 5,21, 3) = (/&
1070 &1.6126e-05_jprb,1.1384e-04_jprb,1.5619e-04_jprb,1.7100e-04_jprb,4.4032e-04_jprb/)
1071 kbo( :, 1,22, 3) = (/&
1072 &2.2535e-06_jprb,3.6484e-05_jprb,6.0844e-05_jprb,8.5915e-05_jprb,2.1861e-04_jprb/)
1073 kbo( :, 2,22, 3) = (/&
1074 &3.6421e-06_jprb,4.5838e-05_jprb,7.1930e-05_jprb,9.2688e-05_jprb,2.4695e-04_jprb/)
1075 kbo( :, 3,22, 3) = (/&
1076 &5.8649e-06_jprb,5.8716e-05_jprb,8.7516e-05_jprb,1.0512e-04_jprb,2.7805e-04_jprb/)
1077 kbo( :, 4,22, 3) = (/&
1078 &9.2724e-06_jprb,7.6158e-05_jprb,1.0809e-04_jprb,1.2256e-04_jprb,3.1283e-04_jprb/)
1079 kbo( :, 5,22, 3) = (/&
1080 &1.4237e-05_jprb,9.8834e-05_jprb,1.3432e-04_jprb,1.4571e-04_jprb,3.5095e-04_jprb/)
1081 kbo( :, 1,23, 3) = (/&
1082 &1.9940e-06_jprb,3.1133e-05_jprb,5.1328e-05_jprb,7.1090e-05_jprb,1.7327e-04_jprb/)
1083 kbo( :, 2,23, 3) = (/&
1084 &3.2312e-06_jprb,3.9399e-05_jprb,6.1179e-05_jprb,7.7708e-05_jprb,1.9531e-04_jprb/)
1085 kbo( :, 3,23, 3) = (/&
1086 &5.2011e-06_jprb,5.0768e-05_jprb,7.4847e-05_jprb,8.8760e-05_jprb,2.2017e-04_jprb/)
1087 kbo( :, 4,23, 3) = (/&
1088 &8.1919e-06_jprb,6.6023e-05_jprb,9.2815e-05_jprb,1.0413e-04_jprb,2.4809e-04_jprb/)
1089 kbo( :, 5,23, 3) = (/&
1090 &1.2498e-05_jprb,8.5676e-05_jprb,1.1550e-04_jprb,1.2430e-04_jprb,2.7861e-04_jprb/)
1091 kbo( :, 1,24, 3) = (/&
1092 &1.7459e-06_jprb,2.6558e-05_jprb,4.3302e-05_jprb,5.8931e-05_jprb,1.3456e-04_jprb/)
1093 kbo( :, 2,24, 3) = (/&
1094 &2.8378e-06_jprb,3.3840e-05_jprb,5.2034e-05_jprb,6.5221e-05_jprb,1.5184e-04_jprb/)
1095 kbo( :, 3,24, 3) = (/&
1096 &4.5668e-06_jprb,4.3812e-05_jprb,6.4027e-05_jprb,7.5015e-05_jprb,1.7156e-04_jprb/)
1097 kbo( :, 4,24, 3) = (/&
1098 &7.1655e-06_jprb,5.7056e-05_jprb,7.9597e-05_jprb,8.8545e-05_jprb,1.9368e-04_jprb/)
1099 kbo( :, 5,24, 3) = (/&
1100 &1.0891e-05_jprb,7.4041e-05_jprb,9.9156e-05_jprb,1.0602e-04_jprb,2.1759e-04_jprb/)
1101 kbo( :, 1,25, 3) = (/&
1102 &1.5351e-06_jprb,2.2739e-05_jprb,3.6661e-05_jprb,4.9033e-05_jprb,1.0464e-04_jprb/)
1103 kbo( :, 2,25, 3) = (/&
1104 &2.5013e-06_jprb,2.9156e-05_jprb,4.4403e-05_jprb,5.4906e-05_jprb,1.1839e-04_jprb/)
1105 kbo( :, 3,25, 3) = (/&
1106 &4.0193e-06_jprb,3.7867e-05_jprb,5.4900e-05_jprb,6.3596e-05_jprb,1.3405e-04_jprb/)
1107 kbo( :, 4,25, 3) = (/&
1108 &6.2816e-06_jprb,4.9369e-05_jprb,6.8362e-05_jprb,7.5478e-05_jprb,1.5142e-04_jprb/)
1109 kbo( :, 5,25, 3) = (/&
1110 &9.5147e-06_jprb,6.4006e-05_jprb,8.5212e-05_jprb,9.0532e-05_jprb,1.6998e-04_jprb/)
1111 kbo( :, 1,26, 3) = (/&
1112 &1.3683e-06_jprb,1.9609e-05_jprb,3.1239e-05_jprb,4.1025e-05_jprb,8.2529e-05_jprb/)
1113 kbo( :, 2,26, 3) = (/&
1114 &2.2313e-06_jprb,2.5269e-05_jprb,3.8126e-05_jprb,4.6436e-05_jprb,9.3600e-05_jprb/)
1115 kbo( :, 3,26, 3) = (/&
1116 &3.5754e-06_jprb,3.2913e-05_jprb,4.7295e-05_jprb,5.4190e-05_jprb,1.0611e-04_jprb/)
1117 kbo( :, 4,26, 3) = (/&
1118 &5.5664e-06_jprb,4.2915e-05_jprb,5.8952e-05_jprb,6.4581e-05_jprb,1.1966e-04_jprb/)
1119 kbo( :, 5,26, 3) = (/&
1120 &8.3928e-06_jprb,5.5540e-05_jprb,7.3478e-05_jprb,7.7578e-05_jprb,1.3407e-04_jprb/)
1121 kbo( :, 1,27, 3) = (/&
1122 &1.2171e-06_jprb,1.6923e-05_jprb,2.6666e-05_jprb,3.4428e-05_jprb,6.4836e-05_jprb/)
1123 kbo( :, 2,27, 3) = (/&
1124 &1.9862e-06_jprb,2.1896e-05_jprb,3.2752e-05_jprb,3.9332e-05_jprb,7.3650e-05_jprb/)
1125 kbo( :, 3,27, 3) = (/&
1126 &3.1750e-06_jprb,2.8593e-05_jprb,4.0727e-05_jprb,4.6210e-05_jprb,8.3366e-05_jprb/)
1127 kbo( :, 4,27, 3) = (/&
1128 &4.9257e-06_jprb,3.7245e-05_jprb,5.0788e-05_jprb,5.5242e-05_jprb,9.3744e-05_jprb/)
1129 kbo( :, 5,27, 3) = (/&
1130 &7.3934e-06_jprb,4.8090e-05_jprb,6.3249e-05_jprb,6.6414e-05_jprb,1.0490e-04_jprb/)
1131 kbo( :, 1,28, 3) = (/&
1132 &1.0792e-06_jprb,1.4600e-05_jprb,2.2784e-05_jprb,2.8952e-05_jprb,5.0485e-05_jprb/)
1133 kbo( :, 2,28, 3) = (/&
1134 &1.7629e-06_jprb,1.8972e-05_jprb,2.8123e-05_jprb,3.3346e-05_jprb,5.7277e-05_jprb/)
1135 kbo( :, 3,28, 3) = (/&
1136 &2.8131e-06_jprb,2.4805e-05_jprb,3.5042e-05_jprb,3.9409e-05_jprb,6.4622e-05_jprb/)
1137 kbo( :, 4,28, 3) = (/&
1138 &4.3512e-06_jprb,3.2251e-05_jprb,4.3694e-05_jprb,4.7211e-05_jprb,7.2602e-05_jprb/)
1139 kbo( :, 5,28, 3) = (/&
1140 &6.4989e-06_jprb,4.1559e-05_jprb,5.4337e-05_jprb,5.6763e-05_jprb,8.1333e-05_jprb/)
1141 kbo( :, 1,29, 3) = (/&
1142 &9.6857e-07_jprb,1.2666e-05_jprb,1.9556e-05_jprb,2.4447e-05_jprb,3.9529e-05_jprb/)
1143 kbo( :, 2,29, 3) = (/&
1144 &1.5818e-06_jprb,1.6515e-05_jprb,2.4236e-05_jprb,2.8362e-05_jprb,4.4697e-05_jprb/)
1145 kbo( :, 3,29, 3) = (/&
1146 &2.5168e-06_jprb,2.1586e-05_jprb,3.0227e-05_jprb,3.3688e-05_jprb,5.0413e-05_jprb/)
1147 kbo( :, 4,29, 3) = (/&
1148 &3.8723e-06_jprb,2.8010e-05_jprb,3.7666e-05_jprb,4.0411e-05_jprb,5.6688e-05_jprb/)
1149 kbo( :, 5,29, 3) = (/&
1150 &5.7462e-06_jprb,3.6016e-05_jprb,4.6768e-05_jprb,4.8565e-05_jprb,6.3553e-05_jprb/)
1151 kbo( :, 1,30, 3) = (/&
1152 &8.7056e-07_jprb,1.1001e-05_jprb,1.6806e-05_jprb,2.0679e-05_jprb,3.0642e-05_jprb/)
1153 kbo( :, 2,30, 3) = (/&
1154 &1.4204e-06_jprb,1.4373e-05_jprb,2.0891e-05_jprb,2.4158e-05_jprb,3.4644e-05_jprb/)
1155 kbo( :, 3,30, 3) = (/&
1156 &2.2511e-06_jprb,1.8769e-05_jprb,2.6058e-05_jprb,2.8796e-05_jprb,3.9114e-05_jprb/)
1157 kbo( :, 4,30, 3) = (/&
1158 &3.4456e-06_jprb,2.4312e-05_jprb,3.2449e-05_jprb,3.4570e-05_jprb,4.4025e-05_jprb/)
1159 kbo( :, 5,30, 3) = (/&
1160 &5.0796e-06_jprb,3.1203e-05_jprb,4.0247e-05_jprb,4.1528e-05_jprb,4.9430e-05_jprb/)
1161 kbo( :, 1,31, 3) = (/&
1162 &7.8800e-07_jprb,9.5841e-06_jprb,1.4480e-05_jprb,1.7537e-05_jprb,2.3703e-05_jprb/)
1163 kbo( :, 2,31, 3) = (/&
1164 &1.2827e-06_jprb,1.2532e-05_jprb,1.8035e-05_jprb,2.0619e-05_jprb,2.6829e-05_jprb/)
1165 kbo( :, 3,31, 3) = (/&
1166 &2.0224e-06_jprb,1.6343e-05_jprb,2.2488e-05_jprb,2.4639e-05_jprb,3.0300e-05_jprb/)
1167 kbo( :, 4,31, 3) = (/&
1168 &3.0735e-06_jprb,2.1137e-05_jprb,2.7988e-05_jprb,2.9590e-05_jprb,3.4174e-05_jprb/)
1169 kbo( :, 5,31, 3) = (/&
1170 &4.5010e-06_jprb,2.7051e-05_jprb,3.4649e-05_jprb,3.5519e-05_jprb,3.8449e-05_jprb/)
1171 kbo( :, 1,32, 3) = (/&
1172 &7.1645e-07_jprb,8.3621e-06_jprb,1.2499e-05_jprb,1.4908e-05_jprb,1.8443e-05_jprb/)
1173 kbo( :, 2,32, 3) = (/&
1174 &1.1619e-06_jprb,1.0942e-05_jprb,1.5584e-05_jprb,1.7626e-05_jprb,2.0886e-05_jprb/)
1175 kbo( :, 3,32, 3) = (/&
1176 &1.8202e-06_jprb,1.4246e-05_jprb,1.9422e-05_jprb,2.1099e-05_jprb,2.3648e-05_jprb/)
1177 kbo( :, 4,32, 3) = (/&
1178 &2.7468e-06_jprb,1.8389e-05_jprb,2.4154e-05_jprb,2.5344e-05_jprb,2.6722e-05_jprb/)
1179 kbo( :, 5,32, 3) = (/&
1180 &3.9939e-06_jprb,2.3459e-05_jprb,2.9845e-05_jprb,3.0391e-05_jprb,3.0128e-05_jprb/)
1181 kbo( :, 1,33, 3) = (/&
1182 &6.5279e-07_jprb,7.3021e-06_jprb,1.0797e-05_jprb,1.2695e-05_jprb,1.4402e-05_jprb/)
1183 kbo( :, 2,33, 3) = (/&
1184 &1.0533e-06_jprb,9.5550e-06_jprb,1.3466e-05_jprb,1.5078e-05_jprb,1.6322e-05_jprb/)
1185 kbo( :, 3,33, 3) = (/&
1186 &1.6386e-06_jprb,1.2420e-05_jprb,1.6777e-05_jprb,1.8071e-05_jprb,1.8509e-05_jprb/)
1187 kbo( :, 4,33, 3) = (/&
1188 &2.4555e-06_jprb,1.6002e-05_jprb,2.0850e-05_jprb,2.1713e-05_jprb,2.0967e-05_jprb/)
1189 kbo( :, 5,33, 3) = (/&
1190 &3.5438e-06_jprb,2.0331e-05_jprb,2.5695e-05_jprb,2.6001e-05_jprb,2.3644e-05_jprb/)
1191 kbo( :, 1,34, 3) = (/&
1192 &5.8863e-07_jprb,6.3339e-06_jprb,9.2734e-06_jprb,1.0778e-05_jprb,1.1469e-05_jprb/)
1193 kbo( :, 2,34, 3) = (/&
1194 &9.4445e-07_jprb,8.2845e-06_jprb,1.1567e-05_jprb,1.2839e-05_jprb,1.3017e-05_jprb/)
1195 kbo( :, 3,34, 3) = (/&
1196 &1.4596e-06_jprb,1.0750e-05_jprb,1.4406e-05_jprb,1.5399e-05_jprb,1.4774e-05_jprb/)
1197 kbo( :, 4,34, 3) = (/&
1198 &2.1724e-06_jprb,1.3818e-05_jprb,1.7879e-05_jprb,1.8493e-05_jprb,1.6729e-05_jprb/)
1199 kbo( :, 5,34, 3) = (/&
1200 &3.1148e-06_jprb,1.7498e-05_jprb,2.1987e-05_jprb,2.2131e-05_jprb,1.8824e-05_jprb/)
1201 kbo( :, 1,35, 3) = (/&
1202 &5.0537e-07_jprb,5.3493e-06_jprb,7.7919e-06_jprb,9.0039e-06_jprb,8.9781e-06_jprb/)
1203 kbo( :, 2,35, 3) = (/&
1204 &8.0918e-07_jprb,6.9937e-06_jprb,9.7192e-06_jprb,1.0739e-05_jprb,1.0213e-05_jprb/)
1205 kbo( :, 3,35, 3) = (/&
1206 &1.2470e-06_jprb,9.0680e-06_jprb,1.2102e-05_jprb,1.2886e-05_jprb,1.1596e-05_jprb/)
1207 kbo( :, 4,35, 3) = (/&
1208 &1.8501e-06_jprb,1.1641e-05_jprb,1.5006e-05_jprb,1.5470e-05_jprb,1.3118e-05_jprb/)
1209 kbo( :, 5,35, 3) = (/&
1210 &2.6449e-06_jprb,1.4713e-05_jprb,1.8433e-05_jprb,1.8505e-05_jprb,1.4740e-05_jprb/)
1211 kbo( :, 1,36, 3) = (/&
1212 &4.1057e-07_jprb,4.3814e-06_jprb,6.3851e-06_jprb,7.3787e-06_jprb,6.8704e-06_jprb/)
1213 kbo( :, 2,36, 3) = (/&
1214 &6.5882e-07_jprb,5.7295e-06_jprb,7.9649e-06_jprb,8.8014e-06_jprb,7.8310e-06_jprb/)
1215 kbo( :, 3,36, 3) = (/&
1216 &1.0168e-06_jprb,7.4305e-06_jprb,9.9179e-06_jprb,1.0562e-05_jprb,8.9079e-06_jprb/)
1217 kbo( :, 4,36, 3) = (/&
1218 &1.5108e-06_jprb,9.5390e-06_jprb,1.2298e-05_jprb,1.2679e-05_jprb,1.0083e-05_jprb/)
1219 kbo( :, 5,36, 3) = (/&
1220 &2.1616e-06_jprb,1.2056e-05_jprb,1.5104e-05_jprb,1.5169e-05_jprb,1.1345e-05_jprb/)
1221 kbo( :, 1,37, 3) = (/&
1222 &3.1315e-07_jprb,3.4610e-06_jprb,5.0780e-06_jprb,5.9099e-06_jprb,5.3692e-06_jprb/)
1223 kbo( :, 2,37, 3) = (/&
1224 &5.0553e-07_jprb,4.5300e-06_jprb,6.3356e-06_jprb,7.0381e-06_jprb,6.1160e-06_jprb/)
1225 kbo( :, 3,37, 3) = (/&
1226 &7.8502e-07_jprb,5.8822e-06_jprb,7.8910e-06_jprb,8.4420e-06_jprb,6.9587e-06_jprb/)
1227 kbo( :, 4,37, 3) = (/&
1228 &1.1731e-06_jprb,7.5654e-06_jprb,9.7936e-06_jprb,1.0137e-05_jprb,7.8860e-06_jprb/)
1229 kbo( :, 5,37, 3) = (/&
1230 &1.6874e-06_jprb,9.5810e-06_jprb,1.2045e-05_jprb,1.2132e-05_jprb,8.8810e-06_jprb/)
1231 kbo( :, 1,38, 3) = (/&
1232 &2.3771e-07_jprb,2.7274e-06_jprb,4.0311e-06_jprb,4.7281e-06_jprb,4.1877e-06_jprb/)
1233 kbo( :, 2,38, 3) = (/&
1234 &3.8612e-07_jprb,3.5727e-06_jprb,5.0296e-06_jprb,5.6200e-06_jprb,4.7630e-06_jprb/)
1235 kbo( :, 3,38, 3) = (/&
1236 &6.0348e-07_jprb,4.6457e-06_jprb,6.2661e-06_jprb,6.7370e-06_jprb,5.4196e-06_jprb/)
1237 kbo( :, 4,38, 3) = (/&
1238 &9.0735e-07_jprb,5.9856e-06_jprb,7.7840e-06_jprb,8.0913e-06_jprb,6.1484e-06_jprb/)
1239 kbo( :, 5,38, 3) = (/&
1240 &1.3127e-06_jprb,7.5975e-06_jprb,9.5859e-06_jprb,9.6880e-06_jprb,6.9288e-06_jprb/)
1241 kbo( :, 1,39, 3) = (/&
1242 &1.8023e-07_jprb,2.1491e-06_jprb,3.2000e-06_jprb,3.7837e-06_jprb,3.2502e-06_jprb/)
1243 kbo( :, 2,39, 3) = (/&
1244 &2.9456e-07_jprb,2.8164e-06_jprb,3.9921e-06_jprb,4.4877e-06_jprb,3.6914e-06_jprb/)
1245 kbo( :, 3,39, 3) = (/&
1246 &4.6344e-07_jprb,3.6676e-06_jprb,4.9751e-06_jprb,5.3760e-06_jprb,4.1983e-06_jprb/)
1247 kbo( :, 4,39, 3) = (/&
1248 &7.0119e-07_jprb,4.7335e-06_jprb,6.1852e-06_jprb,6.4579e-06_jprb,4.7648e-06_jprb/)
1249 kbo( :, 5,39, 3) = (/&
1250 &1.0202e-06_jprb,6.0220e-06_jprb,7.6267e-06_jprb,7.7355e-06_jprb,5.3712e-06_jprb/)
1251 kbo( :, 1,40, 3) = (/&
1252 &1.2988e-07_jprb,1.6490e-06_jprb,2.4862e-06_jprb,2.9837e-06_jprb,2.5331e-06_jprb/)
1253 kbo( :, 2,40, 3) = (/&
1254 &2.1421e-07_jprb,2.1615e-06_jprb,3.1003e-06_jprb,3.5229e-06_jprb,2.8723e-06_jprb/)
1255 kbo( :, 3,40, 3) = (/&
1256 &3.4046e-07_jprb,2.8213e-06_jprb,3.8655e-06_jprb,4.2144e-06_jprb,3.2646e-06_jprb/)
1257 kbo( :, 4,40, 3) = (/&
1258 &5.2031e-07_jprb,3.6506e-06_jprb,4.8112e-06_jprb,5.0626e-06_jprb,3.7075e-06_jprb/)
1259 kbo( :, 5,40, 3) = (/&
1260 &7.6450e-07_jprb,4.6621e-06_jprb,5.9448e-06_jprb,6.0685e-06_jprb,4.1839e-06_jprb/)
1261 kbo( :, 1,41, 3) = (/&
1262 &9.2788e-08_jprb,1.2611e-06_jprb,1.9271e-06_jprb,2.3514e-06_jprb,1.9748e-06_jprb/)
1263 kbo( :, 2,41, 3) = (/&
1264 &1.5438e-07_jprb,1.6527e-06_jprb,2.4004e-06_jprb,2.7614e-06_jprb,2.2337e-06_jprb/)
1265 kbo( :, 3,41, 3) = (/&
1266 &2.4802e-07_jprb,2.1617e-06_jprb,2.9945e-06_jprb,3.2967e-06_jprb,2.5364e-06_jprb/)
1267 kbo( :, 4,41, 3) = (/&
1268 &3.8306e-07_jprb,2.8040e-06_jprb,3.7298e-06_jprb,3.9584e-06_jprb,2.8813e-06_jprb/)
1269 kbo( :, 5,41, 3) = (/&
1270 &5.6866e-07_jprb,3.5943e-06_jprb,4.6183e-06_jprb,4.7484e-06_jprb,3.2555e-06_jprb/)
1271 kbo( :, 1,42, 3) = (/&
1272 &6.6123e-08_jprb,9.6442e-07_jprb,1.4943e-06_jprb,1.8557e-06_jprb,1.5379e-06_jprb/)
1273 kbo( :, 2,42, 3) = (/&
1274 &1.1090e-07_jprb,1.2629e-06_jprb,1.8581e-06_jprb,2.1664e-06_jprb,1.7336e-06_jprb/)
1275 kbo( :, 3,42, 3) = (/&
1276 &1.8006e-07_jprb,1.6546e-06_jprb,2.3186e-06_jprb,2.5790e-06_jprb,1.9660e-06_jprb/)
1277 kbo( :, 4,42, 3) = (/&
1278 &2.8112e-07_jprb,2.1513e-06_jprb,2.8897e-06_jprb,3.0943e-06_jprb,2.2331e-06_jprb/)
1279 kbo( :, 5,42, 3) = (/&
1280 &4.2176e-07_jprb,2.7676e-06_jprb,3.5854e-06_jprb,3.7139e-06_jprb,2.5247e-06_jprb/)
1281 kbo( :, 1,43, 3) = (/&
1282 &4.5723e-08_jprb,7.2721e-07_jprb,1.1468e-06_jprb,1.4561e-06_jprb,1.1970e-06_jprb/)
1283 kbo( :, 2,43, 3) = (/&
1284 &7.7279e-08_jprb,9.5086e-07_jprb,1.4214e-06_jprb,1.6869e-06_jprb,1.3436e-06_jprb/)
1285 kbo( :, 3,43, 3) = (/&
1286 &1.2698e-07_jprb,1.2469e-06_jprb,1.7734e-06_jprb,1.9988e-06_jprb,1.5201e-06_jprb/)
1287 kbo( :, 4,43, 3) = (/&
1288 &2.0087e-07_jprb,1.6261e-06_jprb,2.2117e-06_jprb,2.3948e-06_jprb,1.7257e-06_jprb/)
1289 kbo( :, 5,43, 3) = (/&
1290 &3.0517e-07_jprb,2.0997e-06_jprb,2.7492e-06_jprb,2.8756e-06_jprb,1.9526e-06_jprb/)
1291 kbo( :, 1,44, 3) = (/&
1292 &3.1195e-08_jprb,5.4529e-07_jprb,8.7740e-07_jprb,1.1428e-06_jprb,9.3212e-07_jprb/)
1293 kbo( :, 2,44, 3) = (/&
1294 &5.3002e-08_jprb,7.1132e-07_jprb,1.0821e-06_jprb,1.3117e-06_jprb,1.0411e-06_jprb/)
1295 kbo( :, 3,44, 3) = (/&
1296 &8.8116e-08_jprb,9.3281e-07_jprb,1.3488e-06_jprb,1.5439e-06_jprb,1.1733e-06_jprb/)
1297 kbo( :, 4,44, 3) = (/&
1298 &1.4135e-07_jprb,1.2201e-06_jprb,1.6833e-06_jprb,1.8457e-06_jprb,1.3305e-06_jprb/)
1299 kbo( :, 5,44, 3) = (/&
1300 &2.1772e-07_jprb,1.5809e-06_jprb,2.0956e-06_jprb,2.2159e-06_jprb,1.5063e-06_jprb/)
1301 kbo( :, 1,45, 3) = (/&
1302 &2.1310e-08_jprb,4.0944e-07_jprb,6.7327e-07_jprb,9.0153e-07_jprb,7.2497e-07_jprb/)
1303 kbo( :, 2,45, 3) = (/&
1304 &3.6231e-08_jprb,5.3235e-07_jprb,8.2462e-07_jprb,1.0227e-06_jprb,8.0606e-07_jprb/)
1305 kbo( :, 3,45, 3) = (/&
1306 &6.0860e-08_jprb,6.9752e-07_jprb,1.0257e-06_jprb,1.1946e-06_jprb,9.0421e-07_jprb/)
1307 kbo( :, 4,45, 3) = (/&
1308 &9.8966e-08_jprb,9.1442e-07_jprb,1.2808e-06_jprb,1.4232e-06_jprb,1.0228e-06_jprb/)
1309 kbo( :, 5,45, 3) = (/&
1310 &1.5458e-07_jprb,1.1885e-06_jprb,1.5957e-06_jprb,1.7071e-06_jprb,1.1581e-06_jprb/)
1311 kbo( :, 1,46, 3) = (/&
1312 &1.4455e-08_jprb,3.0647e-07_jprb,5.1657e-07_jprb,7.1517e-07_jprb,5.6309e-07_jprb/)
1313 kbo( :, 2,46, 3) = (/&
1314 &2.4438e-08_jprb,3.9644e-07_jprb,6.2668e-07_jprb,7.9740e-07_jprb,6.2357e-07_jprb/)
1315 kbo( :, 3,46, 3) = (/&
1316 &4.1400e-08_jprb,5.1850e-07_jprb,7.7667e-07_jprb,9.2312e-07_jprb,6.9619e-07_jprb/)
1317 kbo( :, 4,46, 3) = (/&
1318 &6.8241e-08_jprb,6.8045e-07_jprb,9.6951e-07_jprb,1.0939e-06_jprb,7.8455e-07_jprb/)
1319 kbo( :, 5,46, 3) = (/&
1320 &1.0821e-07_jprb,8.8739e-07_jprb,1.2089e-06_jprb,1.3101e-06_jprb,8.8794e-07_jprb/)
1321 kbo( :, 1,47, 3) = (/&
1322 &9.6929e-09_jprb,2.2797e-07_jprb,3.9542e-07_jprb,5.7182e-07_jprb,4.3847e-07_jprb/)
1323 kbo( :, 2,47, 3) = (/&
1324 &1.6123e-08_jprb,2.9242e-07_jprb,4.7359e-07_jprb,6.2141e-07_jprb,4.8271e-07_jprb/)
1325 kbo( :, 3,47, 3) = (/&
1326 &2.7447e-08_jprb,3.8129e-07_jprb,5.8328e-07_jprb,7.1120e-07_jprb,5.3692e-07_jprb/)
1327 kbo( :, 4,47, 3) = (/&
1328 &4.5855e-08_jprb,5.0030e-07_jprb,7.2710e-07_jprb,8.3592e-07_jprb,6.0206e-07_jprb/)
1329 kbo( :, 5,47, 3) = (/&
1330 &7.3923e-08_jprb,6.5467e-07_jprb,9.0733e-07_jprb,9.9829e-07_jprb,6.8031e-07_jprb/)
1331 kbo( :, 1,48, 3) = (/&
1332 &6.6058e-09_jprb,1.7063e-07_jprb,3.0447e-07_jprb,4.6224e-07_jprb,3.4217e-07_jprb/)
1333 kbo( :, 2,48, 3) = (/&
1334 &1.0670e-08_jprb,2.1618e-07_jprb,3.5958e-07_jprb,4.8824e-07_jprb,3.7325e-07_jprb/)
1335 kbo( :, 3,48, 3) = (/&
1336 &1.8128e-08_jprb,2.8060e-07_jprb,4.3881e-07_jprb,5.5007e-07_jprb,4.1348e-07_jprb/)
1337 kbo( :, 4,48, 3) = (/&
1338 &3.0624e-08_jprb,3.6766e-07_jprb,5.4535e-07_jprb,6.4036e-07_jprb,4.6137e-07_jprb/)
1339 kbo( :, 5,48, 3) = (/&
1340 &5.0151e-08_jprb,4.8217e-07_jprb,6.8071e-07_jprb,7.6123e-07_jprb,5.1955e-07_jprb/)
1341 kbo( :, 1,49, 3) = (/&
1342 &4.6014e-09_jprb,1.2872e-07_jprb,2.3633e-07_jprb,3.7814e-07_jprb,2.6748e-07_jprb/)
1343 kbo( :, 2,49, 3) = (/&
1344 &7.1127e-09_jprb,1.6040e-07_jprb,2.7445e-07_jprb,3.8804e-07_jprb,2.8841e-07_jprb/)
1345 kbo( :, 3,49, 3) = (/&
1346 &1.1951e-08_jprb,2.0675e-07_jprb,3.3098e-07_jprb,4.2738e-07_jprb,3.1734e-07_jprb/)
1347 kbo( :, 4,49, 3) = (/&
1348 &2.0341e-08_jprb,2.7019e-07_jprb,4.0929e-07_jprb,4.9230e-07_jprb,3.5284e-07_jprb/)
1349 kbo( :, 5,49, 3) = (/&
1350 &3.3789e-08_jprb,3.5457e-07_jprb,5.1051e-07_jprb,5.8104e-07_jprb,3.9543e-07_jprb/)
1351 kbo( :, 1,50, 3) = (/&
1352 &3.3123e-09_jprb,9.8389e-08_jprb,1.8583e-07_jprb,3.1200e-07_jprb,2.1151e-07_jprb/)
1353 kbo( :, 2,50, 3) = (/&
1354 &4.8635e-09_jprb,1.2034e-07_jprb,2.1156e-07_jprb,3.1223e-07_jprb,2.2606e-07_jprb/)
1355 kbo( :, 3,50, 3) = (/&
1356 &8.0017e-09_jprb,1.5366e-07_jprb,2.5190e-07_jprb,3.3521e-07_jprb,2.4676e-07_jprb/)
1357 kbo( :, 4,50, 3) = (/&
1358 &1.3638e-08_jprb,2.0012e-07_jprb,3.0928e-07_jprb,3.8141e-07_jprb,2.7336e-07_jprb/)
1359 kbo( :, 5,50, 3) = (/&
1360 &2.2922e-08_jprb,2.6241e-07_jprb,3.8502e-07_jprb,4.4648e-07_jprb,3.0528e-07_jprb/)
1361 kbo( :, 1,51, 3) = (/&
1362 &2.4418e-09_jprb,7.5933e-08_jprb,1.4742e-07_jprb,2.5968e-07_jprb,1.6891e-07_jprb/)
1363 kbo( :, 2,51, 3) = (/&
1364 &3.3989e-09_jprb,9.1095e-08_jprb,1.6428e-07_jprb,2.5385e-07_jprb,1.7889e-07_jprb/)
1365 kbo( :, 3,51, 3) = (/&
1366 &5.4139e-09_jprb,1.1482e-07_jprb,1.9299e-07_jprb,2.6542e-07_jprb,1.9344e-07_jprb/)
1367 kbo( :, 4,51, 3) = (/&
1368 &9.1803e-09_jprb,1.4881e-07_jprb,2.3477e-07_jprb,2.9709e-07_jprb,2.1318e-07_jprb/)
1369 kbo( :, 5,51, 3) = (/&
1370 &1.5567e-08_jprb,1.9481e-07_jprb,2.9131e-07_jprb,3.4464e-07_jprb,2.3734e-07_jprb/)
1371 kbo( :, 1,52, 3) = (/&
1372 &1.8356e-09_jprb,5.9138e-08_jprb,1.1788e-07_jprb,2.1792e-07_jprb,1.3551e-07_jprb/)
1373 kbo( :, 2,52, 3) = (/&
1374 &2.4226e-09_jprb,6.9427e-08_jprb,1.2853e-07_jprb,2.0827e-07_jprb,1.4167e-07_jprb/)
1375 kbo( :, 3,52, 3) = (/&
1376 &3.6921e-09_jprb,8.6117e-08_jprb,1.4855e-07_jprb,2.1230e-07_jprb,1.5195e-07_jprb/)
1377 kbo( :, 4,52, 3) = (/&
1378 &6.1793e-09_jprb,1.1080e-07_jprb,1.7865e-07_jprb,2.3238e-07_jprb,1.6623e-07_jprb/)
1379 kbo( :, 5,52, 3) = (/&
1380 &1.0533e-08_jprb,1.4468e-07_jprb,2.2055e-07_jprb,2.6689e-07_jprb,1.8440e-07_jprb/)
1381 kbo( :, 1,53, 3) = (/&
1382 &1.4057e-09_jprb,4.6460e-08_jprb,9.5335e-08_jprb,1.8476e-07_jprb,1.0859e-07_jprb/)
1383 kbo( :, 2,53, 3) = (/&
1384 &1.7607e-09_jprb,5.3285e-08_jprb,1.0139e-07_jprb,1.7215e-07_jprb,1.1242e-07_jprb/)
1385 kbo( :, 3,53, 3) = (/&
1386 &2.5488e-09_jprb,6.4871e-08_jprb,1.1488e-07_jprb,1.7132e-07_jprb,1.1951e-07_jprb/)
1387 kbo( :, 4,53, 3) = (/&
1388 &4.1657e-09_jprb,8.2629e-08_jprb,1.3641e-07_jprb,1.8283e-07_jprb,1.2965e-07_jprb/)
1389 kbo( :, 5,53, 3) = (/&
1390 &7.0997e-09_jprb,1.0750e-07_jprb,1.6715e-07_jprb,2.0732e-07_jprb,1.4296e-07_jprb/)
1391 kbo( :, 1,54, 3) = (/&
1392 &1.0999e-09_jprb,3.6846e-08_jprb,7.7697e-08_jprb,1.5754e-07_jprb,8.8206e-08_jprb/)
1393 kbo( :, 2,54, 3) = (/&
1394 &1.3156e-09_jprb,4.1399e-08_jprb,8.0749e-08_jprb,1.4331e-07_jprb,9.0854e-08_jprb/)
1395 kbo( :, 3,54, 3) = (/&
1396 &1.8124e-09_jprb,4.9493e-08_jprb,8.9710e-08_jprb,1.3962e-07_jprb,9.5712e-08_jprb/)
1397 kbo( :, 4,54, 3) = (/&
1398 &2.8677e-09_jprb,6.2264e-08_jprb,1.0518e-07_jprb,1.4542e-07_jprb,1.0312e-07_jprb/)
1399 kbo( :, 5,54, 3) = (/&
1400 &4.8571e-09_jprb,8.0602e-08_jprb,1.2774e-07_jprb,1.6229e-07_jprb,1.1315e-07_jprb/)
1401 kbo( :, 1,55, 3) = (/&
1402 &8.7254e-10_jprb,2.9511e-08_jprb,6.3773e-08_jprb,1.3472e-07_jprb,7.2224e-08_jprb/)
1403 kbo( :, 2,55, 3) = (/&
1404 &1.0019e-09_jprb,3.2470e-08_jprb,6.4795e-08_jprb,1.1996e-07_jprb,7.4131e-08_jprb/)
1405 kbo( :, 3,55, 3) = (/&
1406 &1.3171e-09_jprb,3.8081e-08_jprb,7.0642e-08_jprb,1.1458e-07_jprb,7.7438e-08_jprb/)
1407 kbo( :, 4,55, 3) = (/&
1408 &2.0021e-09_jprb,4.7221e-08_jprb,8.1614e-08_jprb,1.1674e-07_jprb,8.2998e-08_jprb/)
1409 kbo( :, 5,55, 3) = (/&
1410 &3.3482e-09_jprb,6.0727e-08_jprb,9.8113e-08_jprb,1.2774e-07_jprb,9.0672e-08_jprb/)
1411 kbo( :, 1,56, 3) = (/&
1412 &6.9950e-10_jprb,2.3838e-08_jprb,5.2680e-08_jprb,1.1562e-07_jprb,5.9234e-08_jprb/)
1413 kbo( :, 2,56, 3) = (/&
1414 &7.7413e-10_jprb,2.5644e-08_jprb,5.2472e-08_jprb,1.0117e-07_jprb,6.0572e-08_jprb/)
1415 kbo( :, 3,56, 3) = (/&
1416 &9.7208e-10_jprb,2.9465e-08_jprb,5.5972e-08_jprb,9.4548e-08_jprb,6.2834e-08_jprb/)
1417 kbo( :, 4,56, 3) = (/&
1418 &1.4121e-09_jprb,3.5940e-08_jprb,6.3562e-08_jprb,9.4353e-08_jprb,6.6970e-08_jprb/)
1419 kbo( :, 5,56, 3) = (/&
1420 &2.3128e-09_jprb,4.5822e-08_jprb,7.5568e-08_jprb,1.0098e-07_jprb,7.2808e-08_jprb/)
1421 kbo( :, 1,57, 3) = (/&
1422 &5.6581e-10_jprb,1.9346e-08_jprb,4.3790e-08_jprb,9.9565e-08_jprb,4.8602e-08_jprb/)
1423 kbo( :, 2,57, 3) = (/&
1424 &6.0638e-10_jprb,2.0352e-08_jprb,4.2737e-08_jprb,8.6020e-08_jprb,4.9598e-08_jprb/)
1425 kbo( :, 3,57, 3) = (/&
1426 &7.2835e-10_jprb,2.2928e-08_jprb,4.4588e-08_jprb,7.8554e-08_jprb,5.1156e-08_jprb/)
1427 kbo( :, 4,57, 3) = (/&
1428 &1.0089e-09_jprb,2.7487e-08_jprb,4.9704e-08_jprb,7.6812e-08_jprb,5.4188e-08_jprb/)
1429 kbo( :, 5,57, 3) = (/&
1430 &1.6034e-09_jprb,3.4641e-08_jprb,5.8392e-08_jprb,8.0331e-08_jprb,5.8574e-08_jprb/)
1431 kbo( :, 1,58, 3) = (/&
1432 &4.6103e-10_jprb,1.5793e-08_jprb,3.6627e-08_jprb,8.5726e-08_jprb,3.9978e-08_jprb/)
1433 kbo( :, 2,58, 3) = (/&
1434 &4.8130e-10_jprb,1.6286e-08_jprb,3.5015e-08_jprb,7.3307e-08_jprb,4.0789e-08_jprb/)
1435 kbo( :, 3,58, 3) = (/&
1436 &5.5585e-10_jprb,1.8004e-08_jprb,3.5764e-08_jprb,6.5610e-08_jprb,4.1884e-08_jprb/)
1437 kbo( :, 4,58, 3) = (/&
1438 &7.3630e-10_jprb,2.1198e-08_jprb,3.9171e-08_jprb,6.2959e-08_jprb,4.4100e-08_jprb/)
1439 kbo( :, 5,58, 3) = (/&
1440 &1.1276e-09_jprb,2.6366e-08_jprb,4.5403e-08_jprb,6.4458e-08_jprb,4.7431e-08_jprb/)
1441 kbo( :, 1,59, 3) = (/&
1442 &3.7755e-10_jprb,1.2932e-08_jprb,3.0232e-08_jprb,7.1480e-08_jprb,3.3647e-08_jprb/)
1443 kbo( :, 2,59, 3) = (/&
1444 &3.9028e-10_jprb,1.3252e-08_jprb,2.8716e-08_jprb,6.0919e-08_jprb,3.4209e-08_jprb/)
1445 kbo( :, 3,59, 3) = (/&
1446 &4.4415e-10_jprb,1.4531e-08_jprb,2.9099e-08_jprb,5.4129e-08_jprb,3.5197e-08_jprb/)
1447 kbo( :, 4,59, 3) = (/&
1448 &5.7804e-10_jprb,1.6979e-08_jprb,3.1645e-08_jprb,5.1588e-08_jprb,3.7203e-08_jprb/)
1449 kbo( :, 5,59, 3) = (/&
1450 &8.7073e-10_jprb,2.0997e-08_jprb,3.6469e-08_jprb,5.2428e-08_jprb,4.0115e-08_jprb/)
1451 kbo( :, 1,13, 4) = (/&
1452 &8.9291e-05_jprb,3.8524e-04_jprb,5.0838e-04_jprb,6.5865e-04_jprb,3.8422e-03_jprb/)
1453 kbo( :, 2,13, 4) = (/&
1454 &1.2150e-04_jprb,5.0395e-04_jprb,6.2502e-04_jprb,7.1591e-04_jprb,4.4934e-03_jprb/)
1455 kbo( :, 3,13, 4) = (/&
1456 &1.6722e-04_jprb,6.6391e-04_jprb,7.8605e-04_jprb,8.2001e-04_jprb,5.0967e-03_jprb/)
1457 kbo( :, 4,13, 4) = (/&
1458 &2.3167e-04_jprb,8.6690e-04_jprb,9.9738e-04_jprb,9.6960e-04_jprb,5.6862e-03_jprb/)
1459 kbo( :, 5,13, 4) = (/&
1460 &3.2066e-04_jprb,1.1149e-03_jprb,1.2572e-03_jprb,1.1723e-03_jprb,6.2886e-03_jprb/)
1461 kbo( :, 1,14, 4) = (/&
1462 &7.3069e-05_jprb,3.2443e-04_jprb,4.2572e-04_jprb,5.4565e-04_jprb,3.2324e-03_jprb/)
1463 kbo( :, 2,14, 4) = (/&
1464 &1.0078e-04_jprb,4.2788e-04_jprb,5.2773e-04_jprb,5.9812e-04_jprb,3.7083e-03_jprb/)
1465 kbo( :, 3,14, 4) = (/&
1466 &1.4066e-04_jprb,5.6564e-04_jprb,6.6846e-04_jprb,6.8982e-04_jprb,4.1601e-03_jprb/)
1467 kbo( :, 4,14, 4) = (/&
1468 &1.9708e-04_jprb,7.3974e-04_jprb,8.5021e-04_jprb,8.2165e-04_jprb,4.6256e-03_jprb/)
1469 kbo( :, 5,14, 4) = (/&
1470 &2.7523e-04_jprb,9.5281e-04_jprb,1.0713e-03_jprb,9.9745e-04_jprb,5.1177e-03_jprb/)
1471 kbo( :, 1,15, 4) = (/&
1472 &5.8268e-05_jprb,2.7203e-04_jprb,3.5604e-04_jprb,4.5206e-04_jprb,2.5355e-03_jprb/)
1473 kbo( :, 2,15, 4) = (/&
1474 &8.1805e-05_jprb,3.6098e-04_jprb,4.4467e-04_jprb,4.9956e-04_jprb,2.8581e-03_jprb/)
1475 kbo( :, 3,15, 4) = (/&
1476 &1.1620e-04_jprb,4.7910e-04_jprb,5.6641e-04_jprb,5.8044e-04_jprb,3.1903e-03_jprb/)
1477 kbo( :, 4,15, 4) = (/&
1478 &1.6501e-04_jprb,6.2810e-04_jprb,7.2148e-04_jprb,6.9577e-04_jprb,3.5501e-03_jprb/)
1479 kbo( :, 5,15, 4) = (/&
1480 &2.3301e-04_jprb,8.1144e-04_jprb,9.1027e-04_jprb,8.4726e-04_jprb,3.9463e-03_jprb/)
1481 kbo( :, 1,16, 4) = (/&
1482 &4.6115e-05_jprb,2.2742e-04_jprb,2.9760e-04_jprb,3.7441e-04_jprb,1.8635e-03_jprb/)
1483 kbo( :, 2,16, 4) = (/&
1484 &6.6044e-05_jprb,3.0388e-04_jprb,3.7432e-04_jprb,4.1709e-04_jprb,2.0896e-03_jprb/)
1485 kbo( :, 3,16, 4) = (/&
1486 &9.5513e-05_jprb,4.0494e-04_jprb,4.7881e-04_jprb,4.8833e-04_jprb,2.3373e-03_jprb/)
1487 kbo( :, 4,16, 4) = (/&
1488 &1.3768e-04_jprb,5.3229e-04_jprb,6.1073e-04_jprb,5.8836e-04_jprb,2.6201e-03_jprb/)
1489 kbo( :, 5,16, 4) = (/&
1490 &1.9676e-04_jprb,6.8916e-04_jprb,7.7223e-04_jprb,7.1811e-04_jprb,2.9128e-03_jprb/)
1491 kbo( :, 1,17, 4) = (/&
1492 &3.7236e-05_jprb,1.9117e-04_jprb,2.4928e-04_jprb,3.1036e-04_jprb,1.3781e-03_jprb/)
1493 kbo( :, 2,17, 4) = (/&
1494 &5.4291e-05_jprb,2.5693e-04_jprb,3.1565e-04_jprb,3.4867e-04_jprb,1.5505e-03_jprb/)
1495 kbo( :, 3,17, 4) = (/&
1496 &7.9749e-05_jprb,3.4332e-04_jprb,4.0498e-04_jprb,4.1127e-04_jprb,1.7502e-03_jprb/)
1497 kbo( :, 4,17, 4) = (/&
1498 &1.1653e-04_jprb,4.5210e-04_jprb,5.1744e-04_jprb,4.9715e-04_jprb,1.9654e-03_jprb/)
1499 kbo( :, 5,17, 4) = (/&
1500 &1.6848e-04_jprb,5.8567e-04_jprb,6.5487e-04_jprb,6.0828e-04_jprb,2.1867e-03_jprb/)
1501 kbo( :, 1,18, 4) = (/&
1502 &3.1214e-05_jprb,1.6265e-04_jprb,2.1001e-04_jprb,2.5789e-04_jprb,1.0508e-03_jprb/)
1503 kbo( :, 2,18, 4) = (/&
1504 &4.6115e-05_jprb,2.1928e-04_jprb,2.6764e-04_jprb,2.9235e-04_jprb,1.1925e-03_jprb/)
1505 kbo( :, 3,18, 4) = (/&
1506 &6.8526e-05_jprb,2.9311e-04_jprb,3.4395e-04_jprb,3.4662e-04_jprb,1.3522e-03_jprb/)
1507 kbo( :, 4,18, 4) = (/&
1508 &1.0108e-04_jprb,3.8595e-04_jprb,4.3972e-04_jprb,4.2050e-04_jprb,1.5200e-03_jprb/)
1509 kbo( :, 5,18, 4) = (/&
1510 &1.4724e-04_jprb,4.9979e-04_jprb,5.5620e-04_jprb,5.1508e-04_jprb,1.6884e-03_jprb/)
1511 kbo( :, 1,19, 4) = (/&
1512 &2.6494e-05_jprb,1.3877e-04_jprb,1.7752e-04_jprb,2.1456e-04_jprb,8.3267e-04_jprb/)
1513 kbo( :, 2,19, 4) = (/&
1514 &3.9645e-05_jprb,1.8735e-04_jprb,2.2717e-04_jprb,2.4531e-04_jprb,9.5168e-04_jprb/)
1515 kbo( :, 3,19, 4) = (/&
1516 &5.9441e-05_jprb,2.5031e-04_jprb,2.9223e-04_jprb,2.9203e-04_jprb,1.0814e-03_jprb/)
1517 kbo( :, 4,19, 4) = (/&
1518 &8.8341e-05_jprb,3.2954e-04_jprb,3.7346e-04_jprb,3.5516e-04_jprb,1.2143e-03_jprb/)
1519 kbo( :, 5,19, 4) = (/&
1520 &1.2952e-04_jprb,4.2674e-04_jprb,4.7232e-04_jprb,4.3565e-04_jprb,1.3453e-03_jprb/)
1521 kbo( :, 1,20, 4) = (/&
1522 &2.2953e-05_jprb,1.1923e-04_jprb,1.5106e-04_jprb,1.7906e-04_jprb,6.7531e-04_jprb/)
1523 kbo( :, 2,20, 4) = (/&
1524 &3.4684e-05_jprb,1.6096e-04_jprb,1.9387e-04_jprb,2.0645e-04_jprb,7.7360e-04_jprb/)
1525 kbo( :, 3,20, 4) = (/&
1526 &5.2387e-05_jprb,2.1493e-04_jprb,2.4939e-04_jprb,2.4674e-04_jprb,8.7927e-04_jprb/)
1527 kbo( :, 4,20, 4) = (/&
1528 &7.8339e-05_jprb,2.8287e-04_jprb,3.1867e-04_jprb,3.0094e-04_jprb,9.8457e-04_jprb/)
1529 kbo( :, 5,20, 4) = (/&
1530 &1.1532e-04_jprb,3.6655e-04_jprb,4.0332e-04_jprb,3.6955e-04_jprb,1.0890e-03_jprb/)
1531 kbo( :, 1,21, 4) = (/&
1532 &1.9939e-05_jprb,1.0230e-04_jprb,1.2858e-04_jprb,1.4968e-04_jprb,5.4869e-04_jprb/)
1533 kbo( :, 2,21, 4) = (/&
1534 &3.0427e-05_jprb,1.3816e-04_jprb,1.6531e-04_jprb,1.7375e-04_jprb,6.2932e-04_jprb/)
1535 kbo( :, 3,21, 4) = (/&
1536 &4.6301e-05_jprb,1.8453e-04_jprb,2.1269e-04_jprb,2.0848e-04_jprb,7.1424e-04_jprb/)
1537 kbo( :, 4,21, 4) = (/&
1538 &6.9612e-05_jprb,2.4288e-04_jprb,2.7189e-04_jprb,2.5497e-04_jprb,7.9799e-04_jprb/)
1539 kbo( :, 5,21, 4) = (/&
1540 &1.0255e-04_jprb,3.1496e-04_jprb,3.4452e-04_jprb,3.1356e-04_jprb,8.8178e-04_jprb/)
1541 kbo( :, 1,22, 4) = (/&
1542 &1.7650e-05_jprb,8.9099e-05_jprb,1.1086e-04_jprb,1.2617e-04_jprb,4.4136e-04_jprb/)
1543 kbo( :, 2,22, 4) = (/&
1544 &2.7256e-05_jprb,1.2040e-04_jprb,1.4288e-04_jprb,1.4770e-04_jprb,5.0625e-04_jprb/)
1545 kbo( :, 3,22, 4) = (/&
1546 &4.1784e-05_jprb,1.6082e-04_jprb,1.8391e-04_jprb,1.7825e-04_jprb,5.7259e-04_jprb/)
1547 kbo( :, 4,22, 4) = (/&
1548 &6.2963e-05_jprb,2.1168e-04_jprb,2.3528e-04_jprb,2.1869e-04_jprb,6.3831e-04_jprb/)
1549 kbo( :, 5,22, 4) = (/&
1550 &9.2479e-05_jprb,2.7473e-04_jprb,2.9834e-04_jprb,2.6936e-04_jprb,7.0511e-04_jprb/)
1551 kbo( :, 1,23, 4) = (/&
1552 &1.5661e-05_jprb,7.7570e-05_jprb,9.5606e-05_jprb,1.0649e-04_jprb,3.5282e-04_jprb/)
1553 kbo( :, 2,23, 4) = (/&
1554 &2.4419e-05_jprb,1.0492e-04_jprb,1.2350e-04_jprb,1.2569e-04_jprb,4.0389e-04_jprb/)
1555 kbo( :, 3,23, 4) = (/&
1556 &3.7617e-05_jprb,1.4021e-04_jprb,1.5914e-04_jprb,1.5253e-04_jprb,4.5535e-04_jprb/)
1557 kbo( :, 4,23, 4) = (/&
1558 &5.6623e-05_jprb,1.8459e-04_jprb,2.0378e-04_jprb,1.8772e-04_jprb,5.0734e-04_jprb/)
1559 kbo( :, 5,23, 4) = (/&
1560 &8.2850e-05_jprb,2.3955e-04_jprb,2.5868e-04_jprb,2.3168e-04_jprb,5.6073e-04_jprb/)
1561 kbo( :, 1,24, 4) = (/&
1562 &1.3761e-05_jprb,6.7313e-05_jprb,8.2387e-05_jprb,8.9985e-05_jprb,2.7657e-04_jprb/)
1563 kbo( :, 2,24, 4) = (/&
1564 &2.1660e-05_jprb,9.1214e-05_jprb,1.0663e-04_jprb,1.0703e-04_jprb,3.1564e-04_jprb/)
1565 kbo( :, 3,24, 4) = (/&
1566 &3.3471e-05_jprb,1.2198e-04_jprb,1.3767e-04_jprb,1.3062e-04_jprb,3.5536e-04_jprb/)
1567 kbo( :, 4,24, 4) = (/&
1568 &5.0313e-05_jprb,1.6066e-04_jprb,1.7646e-04_jprb,1.6127e-04_jprb,3.9633e-04_jprb/)
1569 kbo( :, 5,24, 4) = (/&
1570 &7.3360e-05_jprb,2.0829e-04_jprb,2.2414e-04_jprb,1.9939e-04_jprb,4.3964e-04_jprb/)
1571 kbo( :, 1,25, 4) = (/&
1572 &1.2163e-05_jprb,5.8632e-05_jprb,7.1210e-05_jprb,7.6289e-05_jprb,2.1557e-04_jprb/)
1573 kbo( :, 2,25, 4) = (/&
1574 &1.9262e-05_jprb,7.9563e-05_jprb,9.2384e-05_jprb,9.1431e-05_jprb,2.4548e-04_jprb/)
1575 kbo( :, 3,25, 4) = (/&
1576 &2.9768e-05_jprb,1.0645e-04_jprb,1.1942e-04_jprb,1.1222e-04_jprb,2.7636e-04_jprb/)
1577 kbo( :, 4,25, 4) = (/&
1578 &4.4635e-05_jprb,1.4006e-04_jprb,1.5316e-04_jprb,1.3892e-04_jprb,3.0913e-04_jprb/)
1579 kbo( :, 5,25, 4) = (/&
1580 &6.4723e-05_jprb,1.8122e-04_jprb,1.9446e-04_jprb,1.7203e-04_jprb,3.4459e-04_jprb/)
1581 kbo( :, 1,26, 4) = (/&
1582 &1.0905e-05_jprb,5.1509e-05_jprb,6.1982e-05_jprb,6.5048e-05_jprb,1.6912e-04_jprb/)
1583 kbo( :, 2,26, 4) = (/&
1584 &1.7301e-05_jprb,6.9938e-05_jprb,8.0564e-05_jprb,7.8594e-05_jprb,1.9235e-04_jprb/)
1585 kbo( :, 3,26, 4) = (/&
1586 &2.6674e-05_jprb,9.3478e-05_jprb,1.0420e-04_jprb,9.6933e-05_jprb,2.1692e-04_jprb/)
1587 kbo( :, 4,26, 4) = (/&
1588 &3.9810e-05_jprb,1.2260e-04_jprb,1.3358e-04_jprb,1.2031e-04_jprb,2.4372e-04_jprb/)
1589 kbo( :, 5,26, 4) = (/&
1590 &5.7269e-05_jprb,1.5819e-04_jprb,1.6929e-04_jprb,1.4904e-04_jprb,2.7283e-04_jprb/)
1591 kbo( :, 1,27, 4) = (/&
1592 &9.7443e-06_jprb,4.5256e-05_jprb,5.3977e-05_jprb,5.5564e-05_jprb,1.3079e-04_jprb/)
1593 kbo( :, 2,27, 4) = (/&
1594 &1.5468e-05_jprb,6.1434e-05_jprb,7.0240e-05_jprb,6.7661e-05_jprb,1.4885e-04_jprb/)
1595 kbo( :, 3,27, 4) = (/&
1596 &2.3785e-05_jprb,8.1876e-05_jprb,9.0868e-05_jprb,8.3801e-05_jprb,1.6857e-04_jprb/)
1597 kbo( :, 4,27, 4) = (/&
1598 &3.5289e-05_jprb,1.0705e-04_jprb,1.1628e-04_jprb,1.0418e-04_jprb,1.9038e-04_jprb/)
1599 kbo( :, 5,27, 4) = (/&
1600 &5.0352e-05_jprb,1.3763e-04_jprb,1.4705e-04_jprb,1.2891e-04_jprb,2.1399e-04_jprb/)
1601 kbo( :, 1,28, 4) = (/&
1602 &8.6662e-06_jprb,3.9710e-05_jprb,4.6973e-05_jprb,4.7545e-05_jprb,9.9573e-05_jprb/)
1603 kbo( :, 2,28, 4) = (/&
1604 &1.3762e-05_jprb,5.3808e-05_jprb,6.1191e-05_jprb,5.8312e-05_jprb,1.1378e-04_jprb/)
1605 kbo( :, 3,28, 4) = (/&
1606 &2.1087e-05_jprb,7.1458e-05_jprb,7.9071e-05_jprb,7.2428e-05_jprb,1.2969e-04_jprb/)
1607 kbo( :, 4,28, 4) = (/&
1608 &3.1073e-05_jprb,9.3127e-05_jprb,1.0097e-04_jprb,9.0079e-05_jprb,1.4713e-04_jprb/)
1609 kbo( :, 5,28, 4) = (/&
1610 &4.4032e-05_jprb,1.1919e-04_jprb,1.2726e-04_jprb,1.1128e-04_jprb,1.6603e-04_jprb/)
1611 kbo( :, 1,29, 4) = (/&
1612 &7.7998e-06_jprb,3.4996e-05_jprb,4.1036e-05_jprb,4.0865e-05_jprb,7.6462e-05_jprb/)
1613 kbo( :, 2,29, 4) = (/&
1614 &1.2351e-05_jprb,4.7253e-05_jprb,5.3436e-05_jprb,5.0409e-05_jprb,8.7836e-05_jprb/)
1615 kbo( :, 3,29, 4) = (/&
1616 &1.8799e-05_jprb,6.2498e-05_jprb,6.8909e-05_jprb,6.2727e-05_jprb,1.0047e-04_jprb/)
1617 kbo( :, 4,29, 4) = (/&
1618 &2.7485e-05_jprb,8.1095e-05_jprb,8.7731e-05_jprb,7.7973e-05_jprb,1.1434e-04_jprb/)
1619 kbo( :, 5,29, 4) = (/&
1620 &3.8681e-05_jprb,1.0324e-04_jprb,1.1009e-04_jprb,9.6092e-05_jprb,1.2937e-04_jprb/)
1621 kbo( :, 1,30, 4) = (/&
1622 &7.0184e-06_jprb,3.0793e-05_jprb,3.5835e-05_jprb,3.5181e-05_jprb,5.8539e-05_jprb/)
1623 kbo( :, 2,30, 4) = (/&
1624 &1.1059e-05_jprb,4.1419e-05_jprb,4.6605e-05_jprb,4.3585e-05_jprb,6.7504e-05_jprb/)
1625 kbo( :, 3,30, 4) = (/&
1626 &1.6707e-05_jprb,5.4550e-05_jprb,5.9937e-05_jprb,5.4295e-05_jprb,7.7471e-05_jprb/)
1627 kbo( :, 4,30, 4) = (/&
1628 &2.4261e-05_jprb,7.0416e-05_jprb,7.6043e-05_jprb,6.7394e-05_jprb,8.8468e-05_jprb/)
1629 kbo( :, 5,30, 4) = (/&
1630 &3.3920e-05_jprb,8.9259e-05_jprb,9.5020e-05_jprb,8.2834e-05_jprb,1.0026e-04_jprb/)
1631 kbo( :, 1,31, 4) = (/&
1632 &6.3446e-06_jprb,2.7130e-05_jprb,3.1326e-05_jprb,3.0364e-05_jprb,4.4778e-05_jprb/)
1633 kbo( :, 2,31, 4) = (/&
1634 &9.9240e-06_jprb,3.6330e-05_jprb,4.0667e-05_jprb,3.7732e-05_jprb,5.1776e-05_jprb/)
1635 kbo( :, 3,31, 4) = (/&
1636 &1.4883e-05_jprb,4.7593e-05_jprb,5.2134e-05_jprb,4.7015e-05_jprb,5.9603e-05_jprb/)
1637 kbo( :, 4,31, 4) = (/&
1638 &2.1454e-05_jprb,6.1120e-05_jprb,6.5847e-05_jprb,5.8207e-05_jprb,6.8104e-05_jprb/)
1639 kbo( :, 5,31, 4) = (/&
1640 &2.9770e-05_jprb,7.7114e-05_jprb,8.1935e-05_jprb,7.1309e-05_jprb,7.7163e-05_jprb/)
1641 kbo( :, 1,32, 4) = (/&
1642 &5.7447e-06_jprb,2.3909e-05_jprb,2.7402e-05_jprb,2.6256e-05_jprb,3.4475e-05_jprb/)
1643 kbo( :, 2,32, 4) = (/&
1644 &8.9146e-06_jprb,3.1849e-05_jprb,3.5487e-05_jprb,3.2695e-05_jprb,3.9934e-05_jprb/)
1645 kbo( :, 3,32, 4) = (/&
1646 &1.3271e-05_jprb,4.1481e-05_jprb,4.5305e-05_jprb,4.0703e-05_jprb,4.6002e-05_jprb/)
1647 kbo( :, 4,32, 4) = (/&
1648 &1.8982e-05_jprb,5.3015e-05_jprb,5.6969e-05_jprb,5.0230e-05_jprb,5.2546e-05_jprb/)
1649 kbo( :, 5,32, 4) = (/&
1650 &2.6129e-05_jprb,6.6634e-05_jprb,7.0625e-05_jprb,6.1359e-05_jprb,5.9507e-05_jprb/)
1651 kbo( :, 1,33, 4) = (/&
1652 &5.1981e-06_jprb,2.1048e-05_jprb,2.3959e-05_jprb,2.2727e-05_jprb,2.6591e-05_jprb/)
1653 kbo( :, 2,33, 4) = (/&
1654 &8.0045e-06_jprb,2.7863e-05_jprb,3.0928e-05_jprb,2.8329e-05_jprb,3.0795e-05_jprb/)
1655 kbo( :, 3,33, 4) = (/&
1656 &1.1826e-05_jprb,3.6107e-05_jprb,3.9311e-05_jprb,3.5200e-05_jprb,3.5437e-05_jprb/)
1657 kbo( :, 4,33, 4) = (/&
1658 &1.6780e-05_jprb,4.5955e-05_jprb,4.9249e-05_jprb,4.3321e-05_jprb,4.0422e-05_jprb/)
1659 kbo( :, 5,33, 4) = (/&
1660 &2.2903e-05_jprb,5.7519e-05_jprb,6.0835e-05_jprb,5.2765e-05_jprb,4.5739e-05_jprb/)
1661 kbo( :, 1,34, 4) = (/&
1662 &4.6580e-06_jprb,1.8365e-05_jprb,2.0792e-05_jprb,1.9562e-05_jprb,2.0973e-05_jprb/)
1663 kbo( :, 2,34, 4) = (/&
1664 &7.1195e-06_jprb,2.4178e-05_jprb,2.6741e-05_jprb,2.4385e-05_jprb,2.4253e-05_jprb/)
1665 kbo( :, 3,34, 4) = (/&
1666 &1.0442e-05_jprb,3.1196e-05_jprb,3.3863e-05_jprb,3.0227e-05_jprb,2.7827e-05_jprb/)
1667 kbo( :, 4,34, 4) = (/&
1668 &1.4703e-05_jprb,3.9556e-05_jprb,4.2281e-05_jprb,3.7105e-05_jprb,3.1694e-05_jprb/)
1669 kbo( :, 5,34, 4) = (/&
1670 &1.9922e-05_jprb,4.9351e-05_jprb,5.2082e-05_jprb,4.5102e-05_jprb,3.5824e-05_jprb/)
1671 kbo( :, 1,35, 4) = (/&
1672 &3.9871e-06_jprb,1.5551e-05_jprb,1.7571e-05_jprb,1.6475e-05_jprb,1.6236e-05_jprb/)
1673 kbo( :, 2,35, 4) = (/&
1674 &6.0757e-06_jprb,2.0414e-05_jprb,2.2542e-05_jprb,2.0527e-05_jprb,1.8741e-05_jprb/)
1675 kbo( :, 3,35, 4) = (/&
1676 &8.8794e-06_jprb,2.6281e-05_jprb,2.8490e-05_jprb,2.5405e-05_jprb,2.1473e-05_jprb/)
1677 kbo( :, 4,35, 4) = (/&
1678 &1.2455e-05_jprb,3.3253e-05_jprb,3.5511e-05_jprb,3.1147e-05_jprb,2.4458e-05_jprb/)
1679 kbo( :, 5,35, 4) = (/&
1680 &1.6817e-05_jprb,4.1417e-05_jprb,4.3680e-05_jprb,3.7812e-05_jprb,2.7668e-05_jprb/)
1681 kbo( :, 1,36, 4) = (/&
1682 &3.2421e-06_jprb,1.2741e-05_jprb,1.4415e-05_jprb,1.3532e-05_jprb,1.2305e-05_jprb/)
1683 kbo( :, 2,36, 4) = (/&
1684 &4.9489e-06_jprb,1.6721e-05_jprb,1.8482e-05_jprb,1.6856e-05_jprb,1.4197e-05_jprb/)
1685 kbo( :, 3,36, 4) = (/&
1686 &7.2420e-06_jprb,2.1525e-05_jprb,2.3354e-05_jprb,2.0857e-05_jprb,1.6279e-05_jprb/)
1687 kbo( :, 4,36, 4) = (/&
1688 &1.0165e-05_jprb,2.7235e-05_jprb,2.9106e-05_jprb,2.5564e-05_jprb,1.8568e-05_jprb/)
1689 kbo( :, 5,36, 4) = (/&
1690 &1.3731e-05_jprb,3.3924e-05_jprb,3.5798e-05_jprb,3.1035e-05_jprb,2.1028e-05_jprb/)
1691 kbo( :, 1,37, 4) = (/&
1692 &2.4960e-06_jprb,1.0060e-05_jprb,1.1424e-05_jprb,1.0782e-05_jprb,9.5086e-06_jprb/)
1693 kbo( :, 2,37, 4) = (/&
1694 &3.8363e-06_jprb,1.3236e-05_jprb,1.4673e-05_jprb,1.3431e-05_jprb,1.0977e-05_jprb/)
1695 kbo( :, 3,37, 4) = (/&
1696 &5.6488e-06_jprb,1.7076e-05_jprb,1.8572e-05_jprb,1.6635e-05_jprb,1.2594e-05_jprb/)
1697 kbo( :, 4,37, 4) = (/&
1698 &7.9747e-06_jprb,2.1652e-05_jprb,2.3188e-05_jprb,2.0415e-05_jprb,1.4374e-05_jprb/)
1699 kbo( :, 5,37, 4) = (/&
1700 &1.0825e-05_jprb,2.7021e-05_jprb,2.8566e-05_jprb,2.4811e-05_jprb,1.6291e-05_jprb/)
1701 kbo( :, 1,38, 4) = (/&
1702 &1.9124e-06_jprb,7.9183e-06_jprb,9.0316e-06_jprb,8.5743e-06_jprb,7.3236e-06_jprb/)
1703 kbo( :, 2,38, 4) = (/&
1704 &2.9610e-06_jprb,1.0450e-05_jprb,1.1621e-05_jprb,1.0680e-05_jprb,8.4614e-06_jprb/)
1705 kbo( :, 3,38, 4) = (/&
1706 &4.3884e-06_jprb,1.3515e-05_jprb,1.4735e-05_jprb,1.3241e-05_jprb,9.7136e-06_jprb/)
1707 kbo( :, 4,38, 4) = (/&
1708 &6.2344e-06_jprb,1.7177e-05_jprb,1.8435e-05_jprb,1.6272e-05_jprb,1.1094e-05_jprb/)
1709 kbo( :, 5,38, 4) = (/&
1710 &8.5074e-06_jprb,2.1480e-05_jprb,2.2749e-05_jprb,1.9801e-05_jprb,1.2587e-05_jprb/)
1711 kbo( :, 1,39, 4) = (/&
1712 &1.4627e-06_jprb,6.2280e-06_jprb,7.1358e-06_jprb,6.8164e-06_jprb,5.6091e-06_jprb/)
1713 kbo( :, 2,39, 4) = (/&
1714 &2.2819e-06_jprb,8.2437e-06_jprb,9.1991e-06_jprb,8.4900e-06_jprb,6.4837e-06_jprb/)
1715 kbo( :, 3,39, 4) = (/&
1716 &3.4040e-06_jprb,1.0689e-05_jprb,1.1687e-05_jprb,1.0535e-05_jprb,7.4507e-06_jprb/)
1717 kbo( :, 4,39, 4) = (/&
1718 &4.8667e-06_jprb,1.3619e-05_jprb,1.4649e-05_jprb,1.2965e-05_jprb,8.5144e-06_jprb/)
1719 kbo( :, 5,39, 4) = (/&
1720 &6.6789e-06_jprb,1.7065e-05_jprb,1.8109e-05_jprb,1.5796e-05_jprb,9.6724e-06_jprb/)
1721 kbo( :, 1,40, 4) = (/&
1722 &1.0675e-06_jprb,4.7580e-06_jprb,5.4948e-06_jprb,5.3059e-06_jprb,4.3235e-06_jprb/)
1723 kbo( :, 2,40, 4) = (/&
1724 &1.6854e-06_jprb,6.3316e-06_jprb,7.1065e-06_jprb,6.6059e-06_jprb,5.0037e-06_jprb/)
1725 kbo( :, 3,40, 4) = (/&
1726 &2.5416e-06_jprb,8.2475e-06_jprb,9.0584e-06_jprb,8.2078e-06_jprb,5.7598e-06_jprb/)
1727 kbo( :, 4,40, 4) = (/&
1728 &3.6732e-06_jprb,1.0552e-05_jprb,1.1392e-05_jprb,1.0125e-05_jprb,6.5921e-06_jprb/)
1729 kbo( :, 5,40, 4) = (/&
1730 &5.0895e-06_jprb,1.3270e-05_jprb,1.4125e-05_jprb,1.2362e-05_jprb,7.4983e-06_jprb/)
1731 kbo( :, 1,41, 4) = (/&
1732 &7.7161e-07_jprb,3.6153e-06_jprb,4.2135e-06_jprb,4.1208e-06_jprb,3.3291e-06_jprb/)
1733 kbo( :, 2,41, 4) = (/&
1734 &1.2341e-06_jprb,4.8398e-06_jprb,5.4667e-06_jprb,5.1245e-06_jprb,3.8572e-06_jprb/)
1735 kbo( :, 3,41, 4) = (/&
1736 &1.8830e-06_jprb,6.3358e-06_jprb,6.9937e-06_jprb,6.3742e-06_jprb,4.4475e-06_jprb/)
1737 kbo( :, 4,41, 4) = (/&
1738 &2.7524e-06_jprb,8.1422e-06_jprb,8.8253e-06_jprb,7.8806e-06_jprb,5.1001e-06_jprb/)
1739 kbo( :, 5,41, 4) = (/&
1740 &3.8533e-06_jprb,1.0280e-05_jprb,1.0980e-05_jprb,9.6445e-06_jprb,5.8088e-06_jprb/)
1741 kbo( :, 1,42, 4) = (/&
1742 &5.5525e-07_jprb,2.7416e-06_jprb,3.2273e-06_jprb,3.2019e-06_jprb,2.5561e-06_jprb/)
1743 kbo( :, 2,42, 4) = (/&
1744 &8.9993e-07_jprb,3.6924e-06_jprb,4.1998e-06_jprb,3.9740e-06_jprb,2.9638e-06_jprb/)
1745 kbo( :, 3,42, 4) = (/&
1746 &1.3900e-06_jprb,4.8597e-06_jprb,5.3933e-06_jprb,4.9465e-06_jprb,3.4230e-06_jprb/)
1747 kbo( :, 4,42, 4) = (/&
1748 &2.0552e-06_jprb,6.2735e-06_jprb,6.8295e-06_jprb,6.1284e-06_jprb,3.9326e-06_jprb/)
1749 kbo( :, 5,42, 4) = (/&
1750 &2.9084e-06_jprb,7.9541e-06_jprb,8.5264e-06_jprb,7.5190e-06_jprb,4.4871e-06_jprb/)
1751 kbo( :, 1,43, 4) = (/&
1752 &3.8700e-07_jprb,2.0403e-06_jprb,2.4343e-06_jprb,2.4629e-06_jprb,1.9559e-06_jprb/)
1753 kbo( :, 2,43, 4) = (/&
1754 &6.3768e-07_jprb,2.7683e-06_jprb,3.1780e-06_jprb,3.0455e-06_jprb,2.2677e-06_jprb/)
1755 kbo( :, 3,43, 4) = (/&
1756 &9.9992e-07_jprb,3.6688e-06_jprb,4.0996e-06_jprb,3.7915e-06_jprb,2.6241e-06_jprb/)
1757 kbo( :, 4,43, 4) = (/&
1758 &1.4987e-06_jprb,4.7637e-06_jprb,5.2140e-06_jprb,4.7076e-06_jprb,3.0207e-06_jprb/)
1759 kbo( :, 5,43, 4) = (/&
1760 &2.1501e-06_jprb,6.0714e-06_jprb,6.5361e-06_jprb,5.7934e-06_jprb,3.4541e-06_jprb/)
1761 kbo( :, 1,44, 4) = (/&
1762 &2.6473e-07_jprb,1.5026e-06_jprb,1.8221e-06_jprb,1.8897e-06_jprb,1.4930e-06_jprb/)
1763 kbo( :, 2,44, 4) = (/&
1764 &4.4431e-07_jprb,2.0561e-06_jprb,2.3866e-06_jprb,2.3229e-06_jprb,1.7300e-06_jprb/)
1765 kbo( :, 3,44, 4) = (/&
1766 &7.0836e-07_jprb,2.7457e-06_jprb,3.0927e-06_jprb,2.8894e-06_jprb,2.0046e-06_jprb/)
1767 kbo( :, 4,44, 4) = (/&
1768 &1.0778e-06_jprb,3.5888e-06_jprb,3.9529e-06_jprb,3.5941e-06_jprb,2.3122e-06_jprb/)
1769 kbo( :, 5,44, 4) = (/&
1770 &1.5696e-06_jprb,4.6015e-06_jprb,4.9786e-06_jprb,4.4373e-06_jprb,2.6499e-06_jprb/)
1771 kbo( :, 1,45, 4) = (/&
1772 &1.7988e-07_jprb,1.1038e-06_jprb,1.3625e-06_jprb,1.4540e-06_jprb,1.1371e-06_jprb/)
1773 kbo( :, 2,45, 4) = (/&
1774 &3.0761e-07_jprb,1.5225e-06_jprb,1.7898e-06_jprb,1.7738e-06_jprb,1.3160e-06_jprb/)
1775 kbo( :, 3,45, 4) = (/&
1776 &4.9893e-07_jprb,2.0494e-06_jprb,2.3287e-06_jprb,2.2017e-06_jprb,1.5258e-06_jprb/)
1777 kbo( :, 4,45, 4) = (/&
1778 &7.7117e-07_jprb,2.6974e-06_jprb,2.9913e-06_jprb,2.7416e-06_jprb,1.7632e-06_jprb/)
1779 kbo( :, 5,45, 4) = (/&
1780 &1.1399e-06_jprb,3.4797e-06_jprb,3.7851e-06_jprb,3.3943e-06_jprb,2.0252e-06_jprb/)
1781 kbo( :, 1,46, 4) = (/&
1782 &1.1995e-07_jprb,8.0292e-07_jprb,1.0121e-06_jprb,1.1184e-06_jprb,8.6488e-07_jprb/)
1783 kbo( :, 2,46, 4) = (/&
1784 &2.0923e-07_jprb,1.1166e-06_jprb,1.3331e-06_jprb,1.3511e-06_jprb,9.9849e-07_jprb/)
1785 kbo( :, 3,46, 4) = (/&
1786 &3.4582e-07_jprb,1.5161e-06_jprb,1.7409e-06_jprb,1.6700e-06_jprb,1.1579e-06_jprb/)
1787 kbo( :, 4,46, 4) = (/&
1788 &5.4384e-07_jprb,2.0114e-06_jprb,2.2481e-06_jprb,2.0803e-06_jprb,1.3401e-06_jprb/)
1789 kbo( :, 5,46, 4) = (/&
1790 &8.1669e-07_jprb,2.6123e-06_jprb,2.8596e-06_jprb,2.5822e-06_jprb,1.5424e-06_jprb/)
1791 kbo( :, 1,47, 4) = (/&
1792 &7.7552e-08_jprb,5.7430e-07_jprb,7.4352e-07_jprb,8.5913e-07_jprb,6.5834e-07_jprb/)
1793 kbo( :, 2,47, 4) = (/&
1794 &1.3815e-07_jprb,8.0547e-07_jprb,9.8055e-07_jprb,1.0241e-06_jprb,7.5785e-07_jprb/)
1795 kbo( :, 3,47, 4) = (/&
1796 &2.3338e-07_jprb,1.1046e-06_jprb,1.2855e-06_jprb,1.2567e-06_jprb,8.7753e-07_jprb/)
1797 kbo( :, 4,47, 4) = (/&
1798 &3.7439e-07_jprb,1.4793e-06_jprb,1.6690e-06_jprb,1.5636e-06_jprb,1.0168e-06_jprb/)
1799 kbo( :, 5,47, 4) = (/&
1800 &5.7238e-07_jprb,1.9364e-06_jprb,2.1357e-06_jprb,1.9451e-06_jprb,1.1726e-06_jprb/)
1801 kbo( :, 1,48, 4) = (/&
1802 &4.9759e-08_jprb,4.0982e-07_jprb,5.4734e-07_jprb,6.6597e-07_jprb,5.0055e-07_jprb/)
1803 kbo( :, 2,48, 4) = (/&
1804 &9.0399e-08_jprb,5.7899e-07_jprb,7.2041e-07_jprb,7.7952e-07_jprb,5.7407e-07_jprb/)
1805 kbo( :, 3,48, 4) = (/&
1806 &1.5613e-07_jprb,8.0155e-07_jprb,9.4754e-07_jprb,9.4742e-07_jprb,6.6288e-07_jprb/)
1807 kbo( :, 4,48, 4) = (/&
1808 &2.5563e-07_jprb,1.0837e-06_jprb,1.2359e-06_jprb,1.1750e-06_jprb,7.6860e-07_jprb/)
1809 kbo( :, 5,48, 4) = (/&
1810 &3.9824e-07_jprb,1.4310e-06_jprb,1.5913e-06_jprb,1.4634e-06_jprb,8.8756e-07_jprb/)
1811 kbo( :, 1,49, 4) = (/&
1812 &3.1747e-08_jprb,2.9202e-07_jprb,4.0458e-07_jprb,5.2185e-07_jprb,3.8074e-07_jprb/)
1813 kbo( :, 2,49, 4) = (/&
1814 &5.8620e-08_jprb,4.1476e-07_jprb,5.2889e-07_jprb,5.9643e-07_jprb,4.3322e-07_jprb/)
1815 kbo( :, 3,49, 4) = (/&
1816 &1.0349e-07_jprb,5.7925e-07_jprb,6.9731e-07_jprb,7.1647e-07_jprb,4.9889e-07_jprb/)
1817 kbo( :, 4,49, 4) = (/&
1818 &1.7311e-07_jprb,7.9083e-07_jprb,9.1312e-07_jprb,8.8335e-07_jprb,5.7760e-07_jprb/)
1819 kbo( :, 5,49, 4) = (/&
1820 &2.7502e-07_jprb,1.0539e-06_jprb,1.1826e-06_jprb,1.1000e-06_jprb,6.6799e-07_jprb/)
1821 kbo( :, 1,50, 4) = (/&
1822 &2.0584e-08_jprb,2.1008e-07_jprb,3.0301e-07_jprb,4.1495e-07_jprb,2.9497e-07_jprb/)
1823 kbo( :, 2,50, 4) = (/&
1824 &3.8348e-08_jprb,2.9905e-07_jprb,3.9149e-07_jprb,4.6171e-07_jprb,3.3200e-07_jprb/)
1825 kbo( :, 3,50, 4) = (/&
1826 &6.9001e-08_jprb,4.2073e-07_jprb,5.1626e-07_jprb,5.4677e-07_jprb,3.8063e-07_jprb/)
1827 kbo( :, 4,50, 4) = (/&
1828 &1.1783e-07_jprb,5.7965e-07_jprb,6.7829e-07_jprb,6.6887e-07_jprb,4.3991e-07_jprb/)
1829 kbo( :, 5,50, 4) = (/&
1830 &1.9076e-07_jprb,7.7947e-07_jprb,8.8269e-07_jprb,8.3154e-07_jprb,5.0913e-07_jprb/)
1831 kbo( :, 1,51, 4) = (/&
1832 &1.3493e-08_jprb,1.5211e-07_jprb,2.2929e-07_jprb,3.3385e-07_jprb,2.3077e-07_jprb/)
1833 kbo( :, 2,51, 4) = (/&
1834 &2.5122e-08_jprb,2.1611e-07_jprb,2.9145e-07_jprb,3.6106e-07_jprb,2.5676e-07_jprb/)
1835 kbo( :, 3,51, 4) = (/&
1836 &4.5978e-08_jprb,3.0596e-07_jprb,3.8316e-07_jprb,4.1984e-07_jprb,2.9257e-07_jprb/)
1837 kbo( :, 4,51, 4) = (/&
1838 &8.0110e-08_jprb,4.2511e-07_jprb,5.0483e-07_jprb,5.0877e-07_jprb,3.3737e-07_jprb/)
1839 kbo( :, 5,51, 4) = (/&
1840 &1.3215e-07_jprb,5.7668e-07_jprb,6.5965e-07_jprb,6.3029e-07_jprb,3.9043e-07_jprb/)
1841 kbo( :, 1,52, 4) = (/&
1842 &8.9230e-09_jprb,1.1071e-07_jprb,1.7523e-07_jprb,2.7190e-07_jprb,1.8118e-07_jprb/)
1843 kbo( :, 2,52, 4) = (/&
1844 &1.6411e-08_jprb,1.5606e-07_jprb,2.1785e-07_jprb,2.8505e-07_jprb,1.9923e-07_jprb/)
1845 kbo( :, 3,52, 4) = (/&
1846 &3.0439e-08_jprb,2.2195e-07_jprb,2.8438e-07_jprb,3.2394e-07_jprb,2.2485e-07_jprb/)
1847 kbo( :, 4,52, 4) = (/&
1848 &5.4073e-08_jprb,3.1080e-07_jprb,3.7535e-07_jprb,3.8813e-07_jprb,2.5827e-07_jprb/)
1849 kbo( :, 5,52, 4) = (/&
1850 &9.0961e-08_jprb,4.2534e-07_jprb,4.9215e-07_jprb,4.7800e-07_jprb,2.9864e-07_jprb/)
1851 kbo( :, 1,53, 4) = (/&
1852 &5.9876e-09_jprb,8.1201e-08_jprb,1.3536e-07_jprb,2.2434e-07_jprb,1.4306e-07_jprb/)
1853 kbo( :, 2,53, 4) = (/&
1854 &1.0717e-08_jprb,1.1272e-07_jprb,1.6383e-07_jprb,2.2748e-07_jprb,1.5495e-07_jprb/)
1855 kbo( :, 3,53, 4) = (/&
1856 &2.0015e-08_jprb,1.6060e-07_jprb,2.1125e-07_jprb,2.5162e-07_jprb,1.7284e-07_jprb/)
1857 kbo( :, 4,53, 4) = (/&
1858 &3.6209e-08_jprb,2.2643e-07_jprb,2.7869e-07_jprb,2.9706e-07_jprb,1.9723e-07_jprb/)
1859 kbo( :, 5,53, 4) = (/&
1860 &6.2161e-08_jprb,3.1263e-07_jprb,3.6655e-07_jprb,3.6292e-07_jprb,2.2770e-07_jprb/)
1861 kbo( :, 1,54, 4) = (/&
1862 &4.1655e-09_jprb,6.0699e-08_jprb,1.0631e-07_jprb,1.8695e-07_jprb,1.1504e-07_jprb/)
1863 kbo( :, 2,54, 4) = (/&
1864 &7.1662e-09_jprb,8.2506e-08_jprb,1.2498e-07_jprb,1.8360e-07_jprb,1.2311e-07_jprb/)
1865 kbo( :, 3,54, 4) = (/&
1866 &1.3353e-08_jprb,1.1732e-07_jprb,1.5863e-07_jprb,1.9781e-07_jprb,1.3609e-07_jprb/)
1867 kbo( :, 4,54, 4) = (/&
1868 &2.4527e-08_jprb,1.6632e-07_jprb,2.0860e-07_jprb,2.2954e-07_jprb,1.5431e-07_jprb/)
1869 kbo( :, 5,54, 4) = (/&
1870 &4.2883e-08_jprb,2.3139e-07_jprb,2.7507e-07_jprb,2.7789e-07_jprb,1.7766e-07_jprb/)
1871 kbo( :, 1,55, 4) = (/&
1872 &2.9815e-09_jprb,4.5994e-08_jprb,8.4525e-08_jprb,1.5735e-07_jprb,9.3462e-08_jprb/)
1873 kbo( :, 2,55, 4) = (/&
1874 &4.8723e-09_jprb,6.0940e-08_jprb,9.6391e-08_jprb,1.4974e-07_jprb,9.9006e-08_jprb/)
1875 kbo( :, 3,55, 4) = (/&
1876 &8.9683e-09_jprb,8.6061e-08_jprb,1.1996e-07_jprb,1.5698e-07_jprb,1.0869e-07_jprb/)
1877 kbo( :, 4,55, 4) = (/&
1878 &1.6661e-08_jprb,1.2249e-07_jprb,1.5677e-07_jprb,1.7852e-07_jprb,1.2250e-07_jprb/)
1879 kbo( :, 5,55, 4) = (/&
1880 &2.9629e-08_jprb,1.7161e-07_jprb,2.0705e-07_jprb,2.1394e-07_jprb,1.4060e-07_jprb/)
1881 kbo( :, 1,56, 4) = (/&
1882 &2.1861e-09_jprb,3.5243e-08_jprb,6.7842e-08_jprb,1.3338e-07_jprb,7.6071e-08_jprb/)
1883 kbo( :, 2,56, 4) = (/&
1884 &3.3518e-09_jprb,4.5292e-08_jprb,7.4962e-08_jprb,1.2335e-07_jprb,7.9965e-08_jprb/)
1885 kbo( :, 3,56, 4) = (/&
1886 &6.0272e-09_jprb,6.3165e-08_jprb,9.1168e-08_jprb,1.2562e-07_jprb,8.7021e-08_jprb/)
1887 kbo( :, 4,56, 4) = (/&
1888 &1.1269e-08_jprb,9.0068e-08_jprb,1.1792e-07_jprb,1.3956e-07_jprb,9.7479e-08_jprb/)
1889 kbo( :, 5,56, 4) = (/&
1890 &2.0362e-08_jprb,1.2698e-07_jprb,1.5571e-07_jprb,1.6515e-07_jprb,1.1148e-07_jprb/)
1891 kbo( :, 1,57, 4) = (/&
1892 &1.6409e-09_jprb,2.7386e-08_jprb,5.4848e-08_jprb,1.1388e-07_jprb,6.2033e-08_jprb/)
1893 kbo( :, 2,57, 4) = (/&
1894 &2.3428e-09_jprb,3.3930e-08_jprb,5.8875e-08_jprb,1.0251e-07_jprb,6.4870e-08_jprb/)
1895 kbo( :, 3,57, 4) = (/&
1896 &4.0625e-09_jprb,4.6423e-08_jprb,6.9674e-08_jprb,1.0133e-07_jprb,6.9866e-08_jprb/)
1897 kbo( :, 4,57, 4) = (/&
1898 &7.5880e-09_jprb,6.6138e-08_jprb,8.8862e-08_jprb,1.0977e-07_jprb,7.7746e-08_jprb/)
1899 kbo( :, 5,57, 4) = (/&
1900 &1.3915e-08_jprb,9.3738e-08_jprb,1.1702e-07_jprb,1.2786e-07_jprb,8.8586e-08_jprb/)
1901 kbo( :, 1,58, 4) = (/&
1902 &1.2635e-09_jprb,2.1604e-08_jprb,4.4731e-08_jprb,9.7552e-08_jprb,5.0828e-08_jprb/)
1903 kbo( :, 2,58, 4) = (/&
1904 &1.6814e-09_jprb,2.5762e-08_jprb,4.6786e-08_jprb,8.5976e-08_jprb,5.2911e-08_jprb/)
1905 kbo( :, 3,58, 4) = (/&
1906 &2.7835e-09_jprb,3.4427e-08_jprb,5.3815e-08_jprb,8.2469e-08_jprb,5.6515e-08_jprb/)
1907 kbo( :, 4,58, 4) = (/&
1908 &5.1497e-09_jprb,4.8806e-08_jprb,6.7425e-08_jprb,8.7085e-08_jprb,6.2504e-08_jprb/)
1909 kbo( :, 5,58, 4) = (/&
1910 &9.5533e-09_jprb,6.9446e-08_jprb,8.8336e-08_jprb,9.9625e-08_jprb,7.0988e-08_jprb/)
1911 kbo( :, 1,59, 4) = (/&
1912 &1.0158e-09_jprb,1.7490e-08_jprb,3.6651e-08_jprb,8.1330e-08_jprb,4.2750e-08_jprb/)
1913 kbo( :, 2,59, 4) = (/&
1914 &1.3161e-09_jprb,2.0543e-08_jprb,3.7942e-08_jprb,7.1098e-08_jprb,4.4506e-08_jprb/)
1915 kbo( :, 3,59, 4) = (/&
1916 &2.1325e-09_jprb,2.7191e-08_jprb,4.3180e-08_jprb,6.7506e-08_jprb,4.7664e-08_jprb/)
1917 kbo( :, 4,59, 4) = (/&
1918 &3.9206e-09_jprb,3.8435e-08_jprb,5.3711e-08_jprb,7.0587e-08_jprb,5.2961e-08_jprb/)
1919 kbo( :, 5,59, 4) = (/&
1920 &7.2991e-09_jprb,5.4760e-08_jprb,7.0199e-08_jprb,8.0158e-08_jprb,6.0356e-08_jprb/)
1921 
1922 
1923 ! -----------------------------------------------------------------
1924 RETURN
1925 END SUBROUTINE rrtm_kgb3_b1
real(kind=jprb), dimension(no3) forrefo
Definition: yoerrto3.F90:18
real(kind=jprb), dimension(16) absn2ob
Definition: yoerrta3.F90:20
real(kind=jprb), dimension(no3, 5) fracrefbo
Definition: yoerrto3.F90:16
real(kind=jprb), dimension(59) h2oref
Definition: yoerrta3.F90:22
real(kind=jprb), dimension(59) co2ref
Definition: yoerrta3.F90:24
real(kind=jprb), dimension(59) n2oref
Definition: yoerrta3.F90:23
real(kind=jprb), dimension(10, 5, 13, no3) kao
Definition: yoerrto3.F90:22
real(kind=jprb), dimension(16) absn2oa
Definition: yoerrta3.F90:19
real(kind=jprb), dimension(no3) absn2obo
Definition: yoerrto3.F90:20
subroutine rrtm_kgb3_b1
Definition: rrtm_kgb3_B1.F90:3
real(kind=jprb), dimension(10) etaref
Definition: yoerrta3.F90:21
real(kind=jprb), dimension(5, 5, 13:59, no3) kbo
Definition: yoerrto3.F90:23
real(kind=jprb) strrat
Definition: yoerrta3.F90:29
real(kind=jprb), dimension(10, no3) selfrefo
Definition: yoerrto3.F90:24
real(kind=jprb), dimension(no3, 10) fracrefao
Definition: yoerrto3.F90:16
real(kind=jprb), dimension(no3) absn2oao
Definition: yoerrto3.F90:19