LMDZ
rrtm_kgb3_B3.F90
Go to the documentation of this file.
1 !OCL SCALAR
2 SUBROUTINE rrtm_kgb3_b3
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, 9) = (/&
42 &6.2749e-02_jprb,7.2855e-02_jprb,6.7478e-02_jprb,5.3345e-02_jprb,4.4699e-01_jprb/)
43 kbo( :, 2,13, 9) = (/&
44 &8.6319e-02_jprb,1.0135e-01_jprb,9.4230e-02_jprb,7.4640e-02_jprb,4.8102e-01_jprb/)
45 kbo( :, 3,13, 9) = (/&
46 &1.1531e-01_jprb,1.3583e-01_jprb,1.2671e-01_jprb,1.0042e-01_jprb,5.1621e-01_jprb/)
47 kbo( :, 4,13, 9) = (/&
48 &1.4981e-01_jprb,1.7650e-01_jprb,1.6480e-01_jprb,1.3078e-01_jprb,5.5243e-01_jprb/)
49 kbo( :, 5,13, 9) = (/&
50 &1.8970e-01_jprb,2.2347e-01_jprb,2.0865e-01_jprb,1.6587e-01_jprb,5.8937e-01_jprb/)
51 kbo( :, 1,14, 9) = (/&
52 &5.7187e-02_jprb,6.7301e-02_jprb,6.2129e-02_jprb,4.9110e-02_jprb,3.7769e-01_jprb/)
53 kbo( :, 2,14, 9) = (/&
54 &7.8466e-02_jprb,9.3270e-02_jprb,8.6445e-02_jprb,6.8459e-02_jprb,4.0753e-01_jprb/)
55 kbo( :, 3,14, 9) = (/&
56 &1.0467e-01_jprb,1.2476e-01_jprb,1.1574e-01_jprb,9.1819e-02_jprb,4.3868e-01_jprb/)
57 kbo( :, 4,14, 9) = (/&
58 &1.3581e-01_jprb,1.6192e-01_jprb,1.5034e-01_jprb,1.1930e-01_jprb,4.7064e-01_jprb/)
59 kbo( :, 5,14, 9) = (/&
60 &1.7224e-01_jprb,2.0464e-01_jprb,1.9021e-01_jprb,1.5110e-01_jprb,5.0408e-01_jprb/)
61 kbo( :, 1,15, 9) = (/&
62 &5.1721e-02_jprb,6.1566e-02_jprb,5.6680e-02_jprb,4.4751e-02_jprb,2.9568e-01_jprb/)
63 kbo( :, 2,15, 9) = (/&
64 &7.0936e-02_jprb,8.5115e-02_jprb,7.8492e-02_jprb,6.2182e-02_jprb,3.2213e-01_jprb/)
65 kbo( :, 3,15, 9) = (/&
66 &9.4515e-02_jprb,1.1370e-01_jprb,1.0486e-01_jprb,8.3182e-02_jprb,3.4986e-01_jprb/)
67 kbo( :, 4,15, 9) = (/&
68 &1.2289e-01_jprb,1.4728e-01_jprb,1.3607e-01_jprb,1.0790e-01_jprb,3.7853e-01_jprb/)
69 kbo( :, 5,15, 9) = (/&
70 &1.5637e-01_jprb,1.8627e-01_jprb,1.7195e-01_jprb,1.3626e-01_jprb,4.0894e-01_jprb/)
71 kbo( :, 1,16, 9) = (/&
72 &4.6578e-02_jprb,5.5911e-02_jprb,5.1274e-02_jprb,4.0416e-02_jprb,2.2673e-01_jprb/)
73 kbo( :, 2,16, 9) = (/&
74 &6.3866e-02_jprb,7.7158e-02_jprb,7.0810e-02_jprb,5.5944e-02_jprb,2.5071e-01_jprb/)
75 kbo( :, 3,16, 9) = (/&
76 &8.5294e-02_jprb,1.0285e-01_jprb,9.4463e-02_jprb,7.4731e-02_jprb,2.7559e-01_jprb/)
77 kbo( :, 4,16, 9) = (/&
78 &1.1126e-01_jprb,1.3331e-01_jprb,1.2237e-01_jprb,9.6725e-02_jprb,3.0207e-01_jprb/)
79 kbo( :, 5,16, 9) = (/&
80 &1.4207e-01_jprb,1.6889e-01_jprb,1.5467e-01_jprb,1.2182e-01_jprb,3.3015e-01_jprb/)
81 kbo( :, 1,17, 9) = (/&
82 &4.1900e-02_jprb,5.0464e-02_jprb,4.6053e-02_jprb,3.6179e-02_jprb,1.8226e-01_jprb/)
83 kbo( :, 2,17, 9) = (/&
84 &5.7522e-02_jprb,6.9444e-02_jprb,6.3472e-02_jprb,4.9973e-02_jprb,2.0447e-01_jprb/)
85 kbo( :, 3,17, 9) = (/&
86 &7.7026e-02_jprb,9.2538e-02_jprb,8.4551e-02_jprb,6.6605e-02_jprb,2.2810e-01_jprb/)
87 kbo( :, 4,17, 9) = (/&
88 &1.0079e-01_jprb,1.2017e-01_jprb,1.0955e-01_jprb,8.5985e-02_jprb,2.5342e-01_jprb/)
89 kbo( :, 5,17, 9) = (/&
90 &1.2927e-01_jprb,1.5258e-01_jprb,1.3846e-01_jprb,1.0816e-01_jprb,2.7946e-01_jprb/)
91 kbo( :, 1,18, 9) = (/&
92 &3.7891e-02_jprb,4.5454e-02_jprb,4.1197e-02_jprb,3.2260e-02_jprb,1.5403e-01_jprb/)
93 kbo( :, 2,18, 9) = (/&
94 &5.2057e-02_jprb,6.2358e-02_jprb,5.6644e-02_jprb,4.4449e-02_jprb,1.7502e-01_jprb/)
95 kbo( :, 3,18, 9) = (/&
96 &6.9815e-02_jprb,8.3160e-02_jprb,7.5488e-02_jprb,5.9051e-02_jprb,1.9748e-01_jprb/)
97 kbo( :, 4,18, 9) = (/&
98 &9.1668e-02_jprb,1.0819e-01_jprb,9.7824e-02_jprb,7.6130e-02_jprb,2.2105e-01_jprb/)
99 kbo( :, 5,18, 9) = (/&
100 &1.1799e-01_jprb,1.3770e-01_jprb,1.2371e-01_jprb,9.5780e-02_jprb,2.4525e-01_jprb/)
101 kbo( :, 1,19, 9) = (/&
102 &3.4441e-02_jprb,4.0854e-02_jprb,3.6785e-02_jprb,2.8648e-02_jprb,1.3592e-01_jprb/)
103 kbo( :, 2,19, 9) = (/&
104 &4.7310e-02_jprb,5.6014e-02_jprb,5.0505e-02_jprb,3.9333e-02_jprb,1.5599e-01_jprb/)
105 kbo( :, 3,19, 9) = (/&
106 &6.3559e-02_jprb,7.4763e-02_jprb,6.7291e-02_jprb,5.2149e-02_jprb,1.7738e-01_jprb/)
107 kbo( :, 4,19, 9) = (/&
108 &8.3699e-02_jprb,9.7466e-02_jprb,8.7225e-02_jprb,6.7250e-02_jprb,1.9960e-01_jprb/)
109 kbo( :, 5,19, 9) = (/&
110 &1.0809e-01_jprb,1.2436e-01_jprb,1.1051e-01_jprb,8.4704e-02_jprb,2.2240e-01_jprb/)
111 kbo( :, 1,20, 9) = (/&
112 &3.1662e-02_jprb,3.7011e-02_jprb,3.3064e-02_jprb,2.5535e-02_jprb,1.2166e-01_jprb/)
113 kbo( :, 2,20, 9) = (/&
114 &4.3462e-02_jprb,5.0683e-02_jprb,4.5312e-02_jprb,3.4918e-02_jprb,1.4050e-01_jprb/)
115 kbo( :, 3,20, 9) = (/&
116 &5.8468e-02_jprb,6.7693e-02_jprb,6.0291e-02_jprb,4.6251e-02_jprb,1.6041e-01_jprb/)
117 kbo( :, 4,20, 9) = (/&
118 &7.7082e-02_jprb,8.8368e-02_jprb,7.8218e-02_jprb,5.9632e-02_jprb,1.8092e-01_jprb/)
119 kbo( :, 5,20, 9) = (/&
120 &9.9590e-02_jprb,1.1296e-01_jprb,9.9282e-02_jprb,7.5236e-02_jprb,2.0180e-01_jprb/)
121 kbo( :, 1,21, 9) = (/&
122 &2.9197e-02_jprb,3.3644e-02_jprb,2.9800e-02_jprb,2.2751e-02_jprb,1.0840e-01_jprb/)
123 kbo( :, 2,21, 9) = (/&
124 &4.0061e-02_jprb,4.6022e-02_jprb,4.0720e-02_jprb,3.1025e-02_jprb,1.2575e-01_jprb/)
125 kbo( :, 3,21, 9) = (/&
126 &5.3879e-02_jprb,6.1513e-02_jprb,5.4145e-02_jprb,4.1071e-02_jprb,1.4377e-01_jprb/)
127 kbo( :, 4,21, 9) = (/&
128 &7.1035e-02_jprb,8.0368e-02_jprb,7.0344e-02_jprb,5.2993e-02_jprb,1.6228e-01_jprb/)
129 kbo( :, 5,21, 9) = (/&
130 &9.1717e-02_jprb,1.0275e-01_jprb,8.9495e-02_jprb,6.6978e-02_jprb,1.8109e-01_jprb/)
131 kbo( :, 1,22, 9) = (/&
132 &2.7499e-02_jprb,3.1251e-02_jprb,2.7449e-02_jprb,2.0717e-02_jprb,9.5123e-02_jprb/)
133 kbo( :, 2,22, 9) = (/&
134 &3.7657e-02_jprb,4.2715e-02_jprb,3.7381e-02_jprb,2.8145e-02_jprb,1.1043e-01_jprb/)
135 kbo( :, 3,22, 9) = (/&
136 &5.0562e-02_jprb,5.6977e-02_jprb,4.9664e-02_jprb,3.7184e-02_jprb,1.2615e-01_jprb/)
137 kbo( :, 4,22, 9) = (/&
138 &6.6397e-02_jprb,7.4321e-02_jprb,6.4486e-02_jprb,4.7986e-02_jprb,1.4210e-01_jprb/)
139 kbo( :, 5,22, 9) = (/&
140 &8.5266e-02_jprb,9.4958e-02_jprb,8.2045e-02_jprb,6.0712e-02_jprb,1.5827e-01_jprb/)
141 kbo( :, 1,23, 9) = (/&
142 &2.5951e-02_jprb,2.9125e-02_jprb,2.5330e-02_jprb,1.8934e-02_jprb,8.2353e-02_jprb/)
143 kbo( :, 2,23, 9) = (/&
144 &3.5455e-02_jprb,3.9694e-02_jprb,3.4441e-02_jprb,2.5641e-02_jprb,9.5317e-02_jprb/)
145 kbo( :, 3,23, 9) = (/&
146 &4.7331e-02_jprb,5.2838e-02_jprb,4.5688e-02_jprb,3.3836e-02_jprb,1.0857e-01_jprb/)
147 kbo( :, 4,23, 9) = (/&
148 &6.1763e-02_jprb,6.8758e-02_jprb,5.9284e-02_jprb,4.3652e-02_jprb,1.2209e-01_jprb/)
149 kbo( :, 5,23, 9) = (/&
150 &7.8933e-02_jprb,8.7537e-02_jprb,7.5364e-02_jprb,5.5173e-02_jprb,1.3590e-01_jprb/)
151 kbo( :, 1,24, 9) = (/&
152 &2.4473e-02_jprb,2.7169e-02_jprb,2.3444e-02_jprb,1.7363e-02_jprb,6.9430e-02_jprb/)
153 kbo( :, 2,24, 9) = (/&
154 &3.3250e-02_jprb,3.6936e-02_jprb,3.1810e-02_jprb,2.3462e-02_jprb,8.0157e-02_jprb/)
155 kbo( :, 3,24, 9) = (/&
156 &4.4117e-02_jprb,4.8975e-02_jprb,4.2123e-02_jprb,3.0921e-02_jprb,9.1223e-02_jprb/)
157 kbo( :, 4,24, 9) = (/&
158 &5.7285e-02_jprb,6.3439e-02_jprb,5.4524e-02_jprb,3.9854e-02_jprb,1.0266e-01_jprb/)
159 kbo( :, 5,24, 9) = (/&
160 &7.2998e-02_jprb,8.0524e-02_jprb,6.9109e-02_jprb,5.0332e-02_jprb,1.1441e-01_jprb/)
161 kbo( :, 1,25, 9) = (/&
162 &2.3088e-02_jprb,2.5438e-02_jprb,2.1801e-02_jprb,1.6002e-02_jprb,5.7837e-02_jprb/)
163 kbo( :, 2,25, 9) = (/&
164 &3.1174e-02_jprb,3.4396e-02_jprb,2.9493e-02_jprb,2.1569e-02_jprb,6.6784e-02_jprb/)
165 kbo( :, 3,25, 9) = (/&
166 &4.1147e-02_jprb,4.5360e-02_jprb,3.8891e-02_jprb,2.8375e-02_jprb,7.6101e-02_jprb/)
167 kbo( :, 4,25, 9) = (/&
168 &5.3244e-02_jprb,5.8521e-02_jprb,5.0118e-02_jprb,3.6473e-02_jprb,8.5758e-02_jprb/)
169 kbo( :, 5,25, 9) = (/&
170 &6.7659e-02_jprb,7.4121e-02_jprb,6.3317e-02_jprb,4.5953e-02_jprb,9.5693e-02_jprb/)
171 kbo( :, 1,26, 9) = (/&
172 &2.1853e-02_jprb,2.3928e-02_jprb,2.0426e-02_jprb,1.4853e-02_jprb,4.8392e-02_jprb/)
173 kbo( :, 2,26, 9) = (/&
174 &2.9360e-02_jprb,3.2138e-02_jprb,2.7449e-02_jprb,1.9958e-02_jprb,5.5916e-02_jprb/)
175 kbo( :, 3,26, 9) = (/&
176 &3.8590e-02_jprb,4.2170e-02_jprb,3.5993e-02_jprb,2.6138e-02_jprb,6.3792e-02_jprb/)
177 kbo( :, 4,26, 9) = (/&
178 &4.9775e-02_jprb,5.4242e-02_jprb,4.6206e-02_jprb,3.3463e-02_jprb,7.1975e-02_jprb/)
179 kbo( :, 5,26, 9) = (/&
180 &6.3079e-02_jprb,6.8549e-02_jprb,5.8245e-02_jprb,4.2044e-02_jprb,8.0448e-02_jprb/)
181 kbo( :, 1,27, 9) = (/&
182 &2.0589e-02_jprb,2.2432e-02_jprb,1.9091e-02_jprb,1.3798e-02_jprb,3.9711e-02_jprb/)
183 kbo( :, 2,27, 9) = (/&
184 &2.7577e-02_jprb,2.9992e-02_jprb,2.5499e-02_jprb,1.8441e-02_jprb,4.5946e-02_jprb/)
185 kbo( :, 3,27, 9) = (/&
186 &3.6163e-02_jprb,3.9222e-02_jprb,3.3292e-02_jprb,2.4027e-02_jprb,5.2514e-02_jprb/)
187 kbo( :, 4,27, 9) = (/&
188 &4.6525e-02_jprb,5.0331e-02_jprb,4.2630e-02_jprb,3.0669e-02_jprb,5.9354e-02_jprb/)
189 kbo( :, 5,27, 9) = (/&
190 &5.8822e-02_jprb,6.3502e-02_jprb,5.3650e-02_jprb,3.8505e-02_jprb,6.6468e-02_jprb/)
191 kbo( :, 1,28, 9) = (/&
192 &1.9320e-02_jprb,2.0975e-02_jprb,1.7795e-02_jprb,1.2791e-02_jprb,3.1912e-02_jprb/)
193 kbo( :, 2,28, 9) = (/&
194 &2.5855e-02_jprb,2.7959e-02_jprb,2.3678e-02_jprb,1.7000e-02_jprb,3.7011e-02_jprb/)
195 kbo( :, 3,28, 9) = (/&
196 &3.3864e-02_jprb,3.6500e-02_jprb,3.0839e-02_jprb,2.2082e-02_jprb,4.2382e-02_jprb/)
197 kbo( :, 4,28, 9) = (/&
198 &4.3478e-02_jprb,4.6764e-02_jprb,3.9410e-02_jprb,2.8143e-02_jprb,4.8009e-02_jprb/)
199 kbo( :, 5,28, 9) = (/&
200 &5.4874e-02_jprb,5.8907e-02_jprb,4.9537e-02_jprb,3.5320e-02_jprb,5.3947e-02_jprb/)
201 kbo( :, 1,29, 9) = (/&
202 &1.8123e-02_jprb,1.9628e-02_jprb,1.6597e-02_jprb,1.1861e-02_jprb,2.5423e-02_jprb/)
203 kbo( :, 2,29, 9) = (/&
204 &2.4225e-02_jprb,2.6121e-02_jprb,2.2032e-02_jprb,1.5699e-02_jprb,2.9542e-02_jprb/)
205 kbo( :, 3,29, 9) = (/&
206 &3.1700e-02_jprb,3.4031e-02_jprb,2.8639e-02_jprb,2.0345e-02_jprb,3.3911e-02_jprb/)
207 kbo( :, 4,29, 9) = (/&
208 &4.0663e-02_jprb,4.3529e-02_jprb,3.6544e-02_jprb,2.5917e-02_jprb,3.8545e-02_jprb/)
209 kbo( :, 5,29, 9) = (/&
210 &5.1268e-02_jprb,5.4769e-02_jprb,4.5895e-02_jprb,3.2522e-02_jprb,4.3488e-02_jprb/)
211 kbo( :, 1,30, 9) = (/&
212 &1.6958e-02_jprb,1.8364e-02_jprb,1.5479e-02_jprb,1.0998e-02_jprb,1.9951e-02_jprb/)
213 kbo( :, 2,30, 9) = (/&
214 &2.2671e-02_jprb,2.4409e-02_jprb,2.0518e-02_jprb,1.4521e-02_jprb,2.3241e-02_jprb/)
215 kbo( :, 3,30, 9) = (/&
216 &2.9641e-02_jprb,3.1772e-02_jprb,2.6628e-02_jprb,1.8795e-02_jprb,2.6766e-02_jprb/)
217 kbo( :, 4,30, 9) = (/&
218 &3.8012e-02_jprb,4.0581e-02_jprb,3.3943e-02_jprb,2.3935e-02_jprb,3.0561e-02_jprb/)
219 kbo( :, 5,30, 9) = (/&
220 &4.7908e-02_jprb,5.1031e-02_jprb,4.2627e-02_jprb,3.0033e-02_jprb,3.4653e-02_jprb/)
221 kbo( :, 1,31, 9) = (/&
222 &1.5875e-02_jprb,1.7181e-02_jprb,1.4459e-02_jprb,1.0211e-02_jprb,1.5400e-02_jprb/)
223 kbo( :, 2,31, 9) = (/&
224 &2.1201e-02_jprb,2.2826e-02_jprb,1.9139e-02_jprb,1.3463e-02_jprb,1.8009e-02_jprb/)
225 kbo( :, 3,31, 9) = (/&
226 &2.7703e-02_jprb,2.9694e-02_jprb,2.4816e-02_jprb,1.7421e-02_jprb,2.0837e-02_jprb/)
227 kbo( :, 4,31, 9) = (/&
228 &3.5538e-02_jprb,3.7926e-02_jprb,3.1623e-02_jprb,2.2179e-02_jprb,2.3914e-02_jprb/)
229 kbo( :, 5,31, 9) = (/&
230 &4.4824e-02_jprb,4.7692e-02_jprb,3.9738e-02_jprb,2.7844e-02_jprb,2.7277e-02_jprb/)
231 kbo( :, 1,32, 9) = (/&
232 &1.4881e-02_jprb,1.6116e-02_jprb,1.3532e-02_jprb,9.5127e-03_jprb,1.1925e-02_jprb/)
233 kbo( :, 2,32, 9) = (/&
234 &1.9865e-02_jprb,2.1395e-02_jprb,1.7905e-02_jprb,1.2529e-02_jprb,1.4004e-02_jprb/)
235 kbo( :, 3,32, 9) = (/&
236 &2.5959e-02_jprb,2.7823e-02_jprb,2.3208e-02_jprb,1.6206e-02_jprb,1.6285e-02_jprb/)
237 kbo( :, 4,32, 9) = (/&
238 &3.3313e-02_jprb,3.5564e-02_jprb,2.9600e-02_jprb,2.0639e-02_jprb,1.8807e-02_jprb/)
239 kbo( :, 5,32, 9) = (/&
240 &4.2060e-02_jprb,4.4782e-02_jprb,3.7223e-02_jprb,2.5926e-02_jprb,2.1578e-02_jprb/)
241 kbo( :, 1,33, 9) = (/&
242 &1.3967e-02_jprb,1.5144e-02_jprb,1.2690e-02_jprb,8.8844e-03_jprb,9.2074e-03_jprb/)
243 kbo( :, 2,33, 9) = (/&
244 &1.8640e-02_jprb,2.0097e-02_jprb,1.6785e-02_jprb,1.1705e-02_jprb,1.0873e-02_jprb/)
245 kbo( :, 3,33, 9) = (/&
246 &2.4387e-02_jprb,2.6153e-02_jprb,2.1778e-02_jprb,1.5136e-02_jprb,1.2726e-02_jprb/)
247 kbo( :, 4,33, 9) = (/&
248 &3.1327e-02_jprb,3.3471e-02_jprb,2.7814e-02_jprb,1.9292e-02_jprb,1.4787e-02_jprb/)
249 kbo( :, 5,33, 9) = (/&
250 &3.9572e-02_jprb,4.2221e-02_jprb,3.5044e-02_jprb,2.4264e-02_jprb,1.7080e-02_jprb/)
251 kbo( :, 1,34, 9) = (/&
252 &1.3038e-02_jprb,1.4154e-02_jprb,1.1832e-02_jprb,8.2492e-03_jprb,7.3647e-03_jprb/)
253 kbo( :, 2,34, 9) = (/&
254 &1.7420e-02_jprb,1.8798e-02_jprb,1.5659e-02_jprb,1.0876e-02_jprb,8.7412e-03_jprb/)
255 kbo( :, 3,34, 9) = (/&
256 &2.2825e-02_jprb,2.4500e-02_jprb,2.0360e-02_jprb,1.4089e-02_jprb,1.0289e-02_jprb/)
257 kbo( :, 4,34, 9) = (/&
258 &2.9360e-02_jprb,3.1418e-02_jprb,2.6065e-02_jprb,1.7978e-02_jprb,1.2027e-02_jprb/)
259 kbo( :, 5,34, 9) = (/&
260 &3.7137e-02_jprb,3.9713e-02_jprb,3.2919e-02_jprb,2.2661e-02_jprb,1.3976e-02_jprb/)
261 kbo( :, 1,35, 9) = (/&
262 &1.1851e-02_jprb,1.2890e-02_jprb,1.0761e-02_jprb,7.4718e-03_jprb,5.7550e-03_jprb/)
263 kbo( :, 2,35, 9) = (/&
264 &1.5900e-02_jprb,1.7182e-02_jprb,1.4286e-02_jprb,9.8834e-03_jprb,6.8791e-03_jprb/)
265 kbo( :, 3,35, 9) = (/&
266 &2.0897e-02_jprb,2.2486e-02_jprb,1.8648e-02_jprb,1.2848e-02_jprb,8.1522e-03_jprb/)
267 kbo( :, 4,35, 9) = (/&
268 &2.6965e-02_jprb,2.8940e-02_jprb,2.3971e-02_jprb,1.6457e-02_jprb,9.5922e-03_jprb/)
269 kbo( :, 5,35, 9) = (/&
270 &3.4238e-02_jprb,3.6722e-02_jprb,3.0385e-02_jprb,2.0819e-02_jprb,1.1216e-02_jprb/)
271 kbo( :, 1,36, 9) = (/&
272 &1.0455e-02_jprb,1.1397e-02_jprb,9.5033e-03_jprb,6.5755e-03_jprb,4.3571e-03_jprb/)
273 kbo( :, 2,36, 9) = (/&
274 &1.4117e-02_jprb,1.5290e-02_jprb,1.2699e-02_jprb,8.7484e-03_jprb,5.2508e-03_jprb/)
275 kbo( :, 3,36, 9) = (/&
276 &1.8658e-02_jprb,2.0138e-02_jprb,1.6673e-02_jprb,1.1439e-02_jprb,6.2734e-03_jprb/)
277 kbo( :, 4,36, 9) = (/&
278 &2.4204e-02_jprb,2.6071e-02_jprb,2.1551e-02_jprb,1.4738e-02_jprb,7.4336e-03_jprb/)
279 kbo( :, 5,36, 9) = (/&
280 &3.0898e-02_jprb,3.3263e-02_jprb,2.7471e-02_jprb,1.8745e-02_jprb,8.7508e-03_jprb/)
281 kbo( :, 1,37, 9) = (/&
282 &8.8498e-03_jprb,9.6657e-03_jprb,8.0482e-03_jprb,5.5507e-03_jprb,3.4394e-03_jprb/)
283 kbo( :, 2,37, 9) = (/&
284 &1.2053e-02_jprb,1.3088e-02_jprb,1.0850e-02_jprb,7.4463e-03_jprb,4.1756e-03_jprb/)
285 kbo( :, 3,37, 9) = (/&
286 &1.6053e-02_jprb,1.7380e-02_jprb,1.4373e-02_jprb,9.8197e-03_jprb,5.0255e-03_jprb/)
287 kbo( :, 4,37, 9) = (/&
288 &2.0992e-02_jprb,2.2697e-02_jprb,1.8723e-02_jprb,1.2754e-02_jprb,5.9977e-03_jprb/)
289 kbo( :, 5,37, 9) = (/&
290 &2.6999e-02_jprb,2.9182e-02_jprb,2.4048e-02_jprb,1.6341e-02_jprb,7.1081e-03_jprb/)
291 kbo( :, 1,38, 9) = (/&
292 &7.4680e-03_jprb,8.1793e-03_jprb,6.8001e-03_jprb,4.6741e-03_jprb,2.7036e-03_jprb/)
293 kbo( :, 2,38, 9) = (/&
294 &1.0268e-02_jprb,1.1184e-02_jprb,9.2546e-03_jprb,6.3288e-03_jprb,3.3094e-03_jprb/)
295 kbo( :, 3,38, 9) = (/&
296 &1.3799e-02_jprb,1.4987e-02_jprb,1.2370e-02_jprb,8.4204e-03_jprb,4.0136e-03_jprb/)
297 kbo( :, 4,38, 9) = (/&
298 &1.8189e-02_jprb,1.9741e-02_jprb,1.6260e-02_jprb,1.1031e-02_jprb,4.8267e-03_jprb/)
299 kbo( :, 5,38, 9) = (/&
300 &2.3579e-02_jprb,2.5605e-02_jprb,2.1052e-02_jprb,1.4244e-02_jprb,5.7626e-03_jprb/)
301 kbo( :, 1,39, 9) = (/&
302 &6.2942e-03_jprb,6.9249e-03_jprb,5.7460e-03_jprb,3.9360e-03_jprb,2.1044e-03_jprb/)
303 kbo( :, 2,39, 9) = (/&
304 &8.7432e-03_jprb,9.5663e-03_jprb,7.9000e-03_jprb,5.3823e-03_jprb,2.5994e-03_jprb/)
305 kbo( :, 3,39, 9) = (/&
306 &1.1864e-02_jprb,1.2937e-02_jprb,1.0660e-02_jprb,7.2304e-03_jprb,3.1792e-03_jprb/)
307 kbo( :, 4,39, 9) = (/&
308 &1.5781e-02_jprb,1.7197e-02_jprb,1.4145e-02_jprb,9.5554e-03_jprb,3.8556e-03_jprb/)
309 kbo( :, 5,39, 9) = (/&
310 &2.0624e-02_jprb,2.2512e-02_jprb,1.8470e-02_jprb,1.2443e-02_jprb,4.6381e-03_jprb/)
311 kbo( :, 1,40, 9) = (/&
312 &5.1375e-03_jprb,5.6803e-03_jprb,4.7069e-03_jprb,3.2115e-03_jprb,1.6578e-03_jprb/)
313 kbo( :, 2,40, 9) = (/&
314 &7.2291e-03_jprb,7.9459e-03_jprb,6.5495e-03_jprb,4.4441e-03_jprb,2.0666e-03_jprb/)
315 kbo( :, 3,40, 9) = (/&
316 &9.9296e-03_jprb,1.0871e-02_jprb,8.9384e-03_jprb,6.0392e-03_jprb,2.5498e-03_jprb/)
317 kbo( :, 4,40, 9) = (/&
318 &1.3354e-02_jprb,1.4603e-02_jprb,1.1989e-02_jprb,8.0664e-03_jprb,3.1172e-03_jprb/)
319 kbo( :, 5,40, 9) = (/&
320 &1.7630e-02_jprb,1.9320e-02_jprb,1.5819e-02_jprb,1.0610e-02_jprb,3.7783e-03_jprb/)
321 kbo( :, 1,41, 9) = (/&
322 &4.1669e-03_jprb,4.6307e-03_jprb,3.8311e-03_jprb,2.6055e-03_jprb,1.3022e-03_jprb/)
323 kbo( :, 2,41, 9) = (/&
324 &5.9450e-03_jprb,6.5654e-03_jprb,5.4031e-03_jprb,3.6497e-03_jprb,1.6387e-03_jprb/)
325 kbo( :, 3,41, 9) = (/&
326 &8.2702e-03_jprb,9.0939e-03_jprb,7.4627e-03_jprb,5.0204e-03_jprb,2.0406e-03_jprb/)
327 kbo( :, 4,41, 9) = (/&
328 &1.1254e-02_jprb,1.2358e-02_jprb,1.0124e-02_jprb,6.7836e-03_jprb,2.5160e-03_jprb/)
329 kbo( :, 5,41, 9) = (/&
330 &1.5021e-02_jprb,1.6526e-02_jprb,1.3505e-02_jprb,9.0170e-03_jprb,3.0745e-03_jprb/)
331 kbo( :, 1,42, 9) = (/&
332 &3.3673e-03_jprb,3.7618e-03_jprb,3.1084e-03_jprb,2.1093e-03_jprb,1.0159e-03_jprb/)
333 kbo( :, 2,42, 9) = (/&
334 &4.8758e-03_jprb,5.4116e-03_jprb,4.4469e-03_jprb,2.9930e-03_jprb,1.2910e-03_jprb/)
335 kbo( :, 3,42, 9) = (/&
336 &6.8765e-03_jprb,7.5957e-03_jprb,6.2240e-03_jprb,4.1675e-03_jprb,1.6231e-03_jprb/)
337 kbo( :, 4,42, 9) = (/&
338 &9.4703e-03_jprb,1.0449e-02_jprb,8.5426e-03_jprb,5.6988e-03_jprb,2.0195e-03_jprb/)
339 kbo( :, 5,42, 9) = (/&
340 &1.2789e-02_jprb,1.4133e-02_jprb,1.1527e-02_jprb,7.6610e-03_jprb,2.4891e-03_jprb/)
341 kbo( :, 1,43, 9) = (/&
342 &2.6545e-03_jprb,2.9817e-03_jprb,2.4611e-03_jprb,1.6672e-03_jprb,7.8914e-04_jprb/)
343 kbo( :, 2,43, 9) = (/&
344 &3.9072e-03_jprb,4.3601e-03_jprb,3.5785e-03_jprb,2.4026e-03_jprb,1.0130e-03_jprb/)
345 kbo( :, 3,43, 9) = (/&
346 &5.5970e-03_jprb,6.2146e-03_jprb,5.0833e-03_jprb,3.3914e-03_jprb,1.2871e-03_jprb/)
347 kbo( :, 4,43, 9) = (/&
348 &7.8170e-03_jprb,8.6680e-03_jprb,7.0728e-03_jprb,4.6984e-03_jprb,1.6175e-03_jprb/)
349 kbo( :, 5,43, 9) = (/&
350 &1.0695e-02_jprb,1.1876e-02_jprb,9.6670e-03_jprb,6.3964e-03_jprb,2.0136e-03_jprb/)
351 kbo( :, 1,44, 9) = (/&
352 &2.0599e-03_jprb,2.3264e-03_jprb,1.9189e-03_jprb,1.2982e-03_jprb,6.1043e-04_jprb/)
353 kbo( :, 2,44, 9) = (/&
354 &3.0865e-03_jprb,3.4632e-03_jprb,2.8398e-03_jprb,1.9029e-03_jprb,7.9160e-04_jprb/)
355 kbo( :, 3,44, 9) = (/&
356 &4.4945e-03_jprb,5.0200e-03_jprb,4.1009e-03_jprb,2.7282e-03_jprb,1.0166e-03_jprb/)
357 kbo( :, 4,44, 9) = (/&
358 &6.3771e-03_jprb,7.1092e-03_jprb,5.7918e-03_jprb,3.8324e-03_jprb,1.2916e-03_jprb/)
359 kbo( :, 5,44, 9) = (/&
360 &8.8507e-03_jprb,9.8816e-03_jprb,8.0271e-03_jprb,5.2885e-03_jprb,1.6254e-03_jprb/)
361 kbo( :, 1,45, 9) = (/&
362 &1.5883e-03_jprb,1.8029e-03_jprb,1.4862e-03_jprb,1.0041e-03_jprb,4.6915e-04_jprb/)
363 kbo( :, 2,45, 9) = (/&
364 &2.4237e-03_jprb,2.7348e-03_jprb,2.2402e-03_jprb,1.4983e-03_jprb,6.1463e-04_jprb/)
365 kbo( :, 3,45, 9) = (/&
366 &3.5915e-03_jprb,4.0353e-03_jprb,3.2920e-03_jprb,2.1847e-03_jprb,7.9813e-04_jprb/)
367 kbo( :, 4,45, 9) = (/&
368 &5.1787e-03_jprb,5.8074e-03_jprb,4.7242e-03_jprb,3.1158e-03_jprb,1.0255e-03_jprb/)
369 kbo( :, 5,45, 9) = (/&
370 &7.2977e-03_jprb,8.1949e-03_jprb,6.6455e-03_jprb,4.3597e-03_jprb,1.3052e-03_jprb/)
371 kbo( :, 1,46, 9) = (/&
372 &1.2050e-03_jprb,1.3752e-03_jprb,1.1327e-03_jprb,7.6415e-04_jprb,3.5825e-04_jprb/)
373 kbo( :, 2,46, 9) = (/&
374 &1.8745e-03_jprb,2.1271e-03_jprb,1.7406e-03_jprb,1.1623e-03_jprb,4.7455e-04_jprb/)
375 kbo( :, 3,46, 9) = (/&
376 &2.8292e-03_jprb,3.1990e-03_jprb,2.6058e-03_jprb,1.7261e-03_jprb,6.2280e-04_jprb/)
377 kbo( :, 4,46, 9) = (/&
378 &4.1523e-03_jprb,4.6867e-03_jprb,3.8068e-03_jprb,2.5043e-03_jprb,8.0997e-04_jprb/)
379 kbo( :, 5,46, 9) = (/&
380 &5.9484e-03_jprb,6.7211e-03_jprb,5.4412e-03_jprb,3.5566e-03_jprb,1.0425e-03_jprb/)
381 kbo( :, 1,47, 9) = (/&
382 &8.9059e-04_jprb,1.0221e-03_jprb,8.4076e-04_jprb,5.6652e-04_jprb,2.7270e-04_jprb/)
383 kbo( :, 2,47, 9) = (/&
384 &1.4154e-03_jprb,1.6142e-03_jprb,1.3191e-03_jprb,8.8003e-04_jprb,3.6578e-04_jprb/)
385 kbo( :, 3,47, 9) = (/&
386 &2.1790e-03_jprb,2.4785e-03_jprb,2.0162e-03_jprb,1.3331e-03_jprb,4.8487e-04_jprb/)
387 kbo( :, 4,47, 9) = (/&
388 &3.2603e-03_jprb,3.7035e-03_jprb,3.0033e-03_jprb,1.9711e-03_jprb,6.3790e-04_jprb/)
389 kbo( :, 5,47, 9) = (/&
390 &4.7543e-03_jprb,5.4065e-03_jprb,4.3698e-03_jprb,2.8478e-03_jprb,8.3079e-04_jprb/)
391 kbo( :, 1,48, 9) = (/&
392 &6.5137e-04_jprb,7.5160e-04_jprb,6.1768e-04_jprb,4.1559e-04_jprb,2.0605e-04_jprb/)
393 kbo( :, 2,48, 9) = (/&
394 &1.0584e-03_jprb,1.2128e-03_jprb,9.8996e-04_jprb,6.6009e-04_jprb,2.8014e-04_jprb/)
395 kbo( :, 3,48, 9) = (/&
396 &1.6631e-03_jprb,1.9026e-03_jprb,1.5461e-03_jprb,1.0205e-03_jprb,3.7581e-04_jprb/)
397 kbo( :, 4,48, 9) = (/&
398 &2.5384e-03_jprb,2.9025e-03_jprb,2.3504e-03_jprb,1.5394e-03_jprb,4.9967e-04_jprb/)
399 kbo( :, 5,48, 9) = (/&
400 &3.7716e-03_jprb,4.3191e-03_jprb,3.4853e-03_jprb,2.2659e-03_jprb,6.5826e-04_jprb/)
401 kbo( :, 1,49, 9) = (/&
402 &4.7074e-04_jprb,5.4614e-04_jprb,4.4842e-04_jprb,3.0149e-04_jprb,1.5387e-04_jprb/)
403 kbo( :, 2,49, 9) = (/&
404 &7.8312e-04_jprb,9.0147e-04_jprb,7.3522e-04_jprb,4.8971e-04_jprb,2.1293e-04_jprb/)
405 kbo( :, 3,49, 9) = (/&
406 &1.2566e-03_jprb,1.4457e-03_jprb,1.1738e-03_jprb,7.7341e-04_jprb,2.8949e-04_jprb/)
407 kbo( :, 4,49, 9) = (/&
408 &1.9577e-03_jprb,2.2532e-03_jprb,1.8228e-03_jprb,1.1917e-03_jprb,3.8929e-04_jprb/)
409 kbo( :, 5,49, 9) = (/&
410 &2.9665e-03_jprb,3.4229e-03_jprb,2.7586e-03_jprb,1.7902e-03_jprb,5.1846e-04_jprb/)
411 kbo( :, 1,50, 9) = (/&
412 &3.4213e-04_jprb,3.9935e-04_jprb,3.2746e-04_jprb,2.1988e-04_jprb,1.1674e-04_jprb/)
413 kbo( :, 2,50, 9) = (/&
414 &5.8343e-04_jprb,6.7437e-04_jprb,5.4936e-04_jprb,3.6511e-04_jprb,1.6480e-04_jprb/)
415 kbo( :, 3,50, 9) = (/&
416 &9.5650e-04_jprb,1.1046e-03_jprb,8.9539e-04_jprb,5.8873e-04_jprb,2.2733e-04_jprb/)
417 kbo( :, 4,50, 9) = (/&
418 &1.5196e-03_jprb,1.7582e-03_jprb,1.4207e-03_jprb,9.2622e-04_jprb,3.0916e-04_jprb/)
419 kbo( :, 5,50, 9) = (/&
420 &2.3472e-03_jprb,2.7261e-03_jprb,2.1933e-03_jprb,1.4203e-03_jprb,4.1592e-04_jprb/)
421 kbo( :, 1,51, 9) = (/&
422 &2.4775e-04_jprb,2.9121e-04_jprb,2.3870e-04_jprb,1.5996e-04_jprb,8.8877e-05_jprb/)
423 kbo( :, 2,51, 9) = (/&
424 &4.3433e-04_jprb,5.0395e-04_jprb,4.0996e-04_jprb,2.7183e-04_jprb,1.2827e-04_jprb/)
425 kbo( :, 3,51, 9) = (/&
426 &7.2809e-04_jprb,8.4314e-04_jprb,6.8222e-04_jprb,4.4757e-04_jprb,1.8017e-04_jprb/)
427 kbo( :, 4,51, 9) = (/&
428 &1.1797e-03_jprb,1.3708e-03_jprb,1.1057e-03_jprb,7.1871e-04_jprb,2.4785e-04_jprb/)
429 kbo( :, 5,51, 9) = (/&
430 &1.8569e-03_jprb,2.1693e-03_jprb,1.7420e-03_jprb,1.1250e-03_jprb,3.3679e-04_jprb/)
431 kbo( :, 1,52, 9) = (/&
432 &1.7722e-04_jprb,2.0977e-04_jprb,1.7188e-04_jprb,1.1517e-04_jprb,6.6934e-05_jprb/)
433 kbo( :, 2,52, 9) = (/&
434 &3.1988e-04_jprb,3.7329e-04_jprb,3.0314e-04_jprb,2.0061e-04_jprb,9.9021e-05_jprb/)
435 kbo( :, 3,52, 9) = (/&
436 &5.4977e-04_jprb,6.3853e-04_jprb,5.1539e-04_jprb,3.3762e-04_jprb,1.4208e-04_jprb/)
437 kbo( :, 4,52, 9) = (/&
438 &9.0908e-04_jprb,1.0602e-03_jprb,8.5370e-04_jprb,5.5342e-04_jprb,1.9834e-04_jprb/)
439 kbo( :, 5,52, 9) = (/&
440 &1.4584e-03_jprb,1.7130e-03_jprb,1.3740e-03_jprb,8.8469e-04_jprb,2.7257e-04_jprb/)
441 kbo( :, 1,53, 9) = (/&
442 &1.2486e-04_jprb,1.4876e-04_jprb,1.2192e-04_jprb,8.1756e-05_jprb,4.9810e-05_jprb/)
443 kbo( :, 2,53, 9) = (/&
444 &2.3236e-04_jprb,2.7326e-04_jprb,2.2175e-04_jprb,1.4647e-04_jprb,7.5549e-05_jprb/)
445 kbo( :, 3,53, 9) = (/&
446 &4.1092e-04_jprb,4.7878e-04_jprb,3.8566e-04_jprb,2.5219e-04_jprb,1.1108e-04_jprb/)
447 kbo( :, 4,53, 9) = (/&
448 &6.9449e-04_jprb,8.1233e-04_jprb,6.5288e-04_jprb,4.2235e-04_jprb,1.5818e-04_jprb/)
449 kbo( :, 5,53, 9) = (/&
450 &1.1362e-03_jprb,1.3415e-03_jprb,1.0746e-03_jprb,6.9016e-04_jprb,2.1993e-04_jprb/)
451 kbo( :, 1,54, 9) = (/&
452 &8.9225e-05_jprb,1.0698e-04_jprb,8.7651e-05_jprb,5.8813e-05_jprb,3.8030e-05_jprb/)
453 kbo( :, 2,54, 9) = (/&
454 &1.7137e-04_jprb,2.0293e-04_jprb,1.6456e-04_jprb,1.0850e-04_jprb,5.9001e-05_jprb/)
455 kbo( :, 3,54, 9) = (/&
456 &3.1189e-04_jprb,3.6460e-04_jprb,2.9303e-04_jprb,1.9101e-04_jprb,8.8833e-05_jprb/)
457 kbo( :, 4,54, 9) = (/&
458 &5.3932e-04_jprb,6.3180e-04_jprb,5.0597e-04_jprb,3.2631e-04_jprb,1.2913e-04_jprb/)
459 kbo( :, 5,54, 9) = (/&
460 &8.9911e-04_jprb,1.0637e-03_jprb,8.5017e-04_jprb,5.4403e-04_jprb,1.8204e-04_jprb/)
461 kbo( :, 1,55, 9) = (/&
462 &6.3909e-05_jprb,7.7058e-05_jprb,6.3103e-05_jprb,4.2365e-05_jprb,2.9408e-05_jprb/)
463 kbo( :, 2,55, 9) = (/&
464 &1.2694e-04_jprb,1.5118e-04_jprb,1.2247e-04_jprb,8.0640e-05_jprb,4.6546e-05_jprb/)
465 kbo( :, 3,55, 9) = (/&
466 &2.3779e-04_jprb,2.7922e-04_jprb,2.2392e-04_jprb,1.4533e-04_jprb,7.1755e-05_jprb/)
467 kbo( :, 4,55, 9) = (/&
468 &4.2152e-04_jprb,4.9417e-04_jprb,3.9420e-04_jprb,2.5317e-04_jprb,1.0664e-04_jprb/)
469 kbo( :, 5,55, 9) = (/&
470 &7.1633e-04_jprb,8.4754e-04_jprb,6.7522e-04_jprb,4.3025e-04_jprb,1.5287e-04_jprb/)
471 kbo( :, 1,56, 9) = (/&
472 &4.5238e-05_jprb,5.4873e-05_jprb,4.4919e-05_jprb,3.0179e-05_jprb,2.2620e-05_jprb/)
473 kbo( :, 2,56, 9) = (/&
474 &9.3046e-05_jprb,1.1152e-04_jprb,9.0251e-05_jprb,5.9375e-05_jprb,3.6523e-05_jprb/)
475 kbo( :, 3,56, 9) = (/&
476 &1.7973e-04_jprb,2.1224e-04_jprb,1.6993e-04_jprb,1.0998e-04_jprb,5.7678e-05_jprb/)
477 kbo( :, 4,56, 9) = (/&
478 &3.2753e-04_jprb,3.8449e-04_jprb,3.0571e-04_jprb,1.9550e-04_jprb,8.7776e-05_jprb/)
479 kbo( :, 5,56, 9) = (/&
480 &5.6860e-04_jprb,6.7252e-04_jprb,5.3373e-04_jprb,3.3864e-04_jprb,1.2833e-04_jprb/)
481 kbo( :, 1,57, 9) = (/&
482 &3.1565e-05_jprb,3.8561e-05_jprb,3.1572e-05_jprb,2.1236e-05_jprb,1.7319e-05_jprb/)
483 kbo( :, 2,57, 9) = (/&
484 &6.7437e-05_jprb,8.1368e-05_jprb,6.5785e-05_jprb,4.3278e-05_jprb,2.8513e-05_jprb/)
485 kbo( :, 3,57, 9) = (/&
486 &1.3453e-04_jprb,1.5983e-04_jprb,1.2788e-04_jprb,8.2634e-05_jprb,4.6105e-05_jprb/)
487 kbo( :, 4,57, 9) = (/&
488 &2.5265e-04_jprb,2.9731e-04_jprb,2.3573e-04_jprb,1.5020e-04_jprb,7.1946e-05_jprb/)
489 kbo( :, 5,57, 9) = (/&
490 &4.4894e-04_jprb,5.3119e-04_jprb,4.1979e-04_jprb,2.6517e-04_jprb,1.0766e-04_jprb/)
491 kbo( :, 1,58, 9) = (/&
492 &2.2075e-05_jprb,2.7134e-05_jprb,2.2226e-05_jprb,1.4971e-05_jprb,1.3364e-05_jprb/)
493 kbo( :, 2,58, 9) = (/&
494 &4.8978e-05_jprb,5.9454e-05_jprb,4.8051e-05_jprb,3.1593e-05_jprb,2.2406e-05_jprb/)
495 kbo( :, 3,58, 9) = (/&
496 &1.0101e-04_jprb,1.2083e-04_jprb,9.6543e-05_jprb,6.2301e-05_jprb,3.7078e-05_jprb/)
497 kbo( :, 4,58, 9) = (/&
498 &1.9559e-04_jprb,2.3110e-04_jprb,1.8274e-04_jprb,1.1601e-04_jprb,5.9357e-05_jprb/)
499 kbo( :, 5,58, 9) = (/&
500 &3.5639e-04_jprb,4.2210e-04_jprb,3.3215e-04_jprb,2.0879e-04_jprb,9.0999e-05_jprb/)
501 kbo( :, 1,59, 9) = (/&
502 &1.8162e-05_jprb,2.2362e-05_jprb,1.8260e-05_jprb,1.2253e-05_jprb,1.1708e-05_jprb/)
503 kbo( :, 2,59, 9) = (/&
504 &4.1323e-05_jprb,5.0285e-05_jprb,4.0483e-05_jprb,2.6494e-05_jprb,1.9897e-05_jprb/)
505 kbo( :, 3,59, 9) = (/&
506 &8.7123e-05_jprb,1.0455e-04_jprb,8.3213e-05_jprb,5.3390e-05_jprb,3.3400e-05_jprb/)
507 kbo( :, 4,59, 9) = (/&
508 &1.7214e-04_jprb,2.0391e-04_jprb,1.6047e-04_jprb,1.0123e-04_jprb,5.4263e-05_jprb/)
509 kbo( :, 5,59, 9) = (/&
510 &3.1897e-04_jprb,3.7825e-04_jprb,2.9606e-04_jprb,1.8480e-04_jprb,8.4393e-05_jprb/)
511 kbo( :, 1,13,10) = (/&
512 &2.7341e-01_jprb,2.7526e-01_jprb,2.5183e-01_jprb,1.9261e-01_jprb,1.4210e+00_jprb/)
513 kbo( :, 2,13,10) = (/&
514 &3.8641e-01_jprb,3.8931e-01_jprb,3.5500e-01_jprb,2.7363e-01_jprb,1.5250e+00_jprb/)
515 kbo( :, 3,13,10) = (/&
516 &5.2101e-01_jprb,5.2751e-01_jprb,4.7841e-01_jprb,3.7012e-01_jprb,1.6242e+00_jprb/)
517 kbo( :, 4,13,10) = (/&
518 &6.7807e-01_jprb,6.8631e-01_jprb,6.2447e-01_jprb,4.8162e-01_jprb,1.7236e+00_jprb/)
519 kbo( :, 5,13,10) = (/&
520 &8.5732e-01_jprb,8.6502e-01_jprb,7.8632e-01_jprb,6.0788e-01_jprb,1.8353e+00_jprb/)
521 kbo( :, 1,14,10) = (/&
522 &2.6100e-01_jprb,2.7217e-01_jprb,2.4857e-01_jprb,1.9099e-01_jprb,1.3096e+00_jprb/)
523 kbo( :, 2,14,10) = (/&
524 &3.6662e-01_jprb,3.8321e-01_jprb,3.4838e-01_jprb,2.6817e-01_jprb,1.4048e+00_jprb/)
525 kbo( :, 3,14,10) = (/&
526 &4.9302e-01_jprb,5.1421e-01_jprb,4.6962e-01_jprb,3.6021e-01_jprb,1.4986e+00_jprb/)
527 kbo( :, 4,14,10) = (/&
528 &6.4068e-01_jprb,6.6503e-01_jprb,6.0806e-01_jprb,4.6655e-01_jprb,1.6008e+00_jprb/)
529 kbo( :, 5,14,10) = (/&
530 &8.0594e-01_jprb,8.3870e-01_jprb,7.6286e-01_jprb,5.8739e-01_jprb,1.6996e+00_jprb/)
531 kbo( :, 1,15,10) = (/&
532 &2.4538e-01_jprb,2.6450e-01_jprb,2.4065e-01_jprb,1.8544e-01_jprb,1.0991e+00_jprb/)
533 kbo( :, 2,15,10) = (/&
534 &3.4290e-01_jprb,3.6880e-01_jprb,3.3714e-01_jprb,2.5768e-01_jprb,1.1807e+00_jprb/)
535 kbo( :, 3,15,10) = (/&
536 &4.6008e-01_jprb,4.9212e-01_jprb,4.5111e-01_jprb,3.4351e-01_jprb,1.2655e+00_jprb/)
537 kbo( :, 4,15,10) = (/&
538 &5.9510e-01_jprb,6.3591e-01_jprb,5.8042e-01_jprb,4.4347e-01_jprb,1.3538e+00_jprb/)
539 kbo( :, 5,15,10) = (/&
540 &7.4431e-01_jprb,7.9818e-01_jprb,7.2810e-01_jprb,5.5870e-01_jprb,1.4415e+00_jprb/)
541 kbo( :, 1,16,10) = (/&
542 &2.2814e-01_jprb,2.5112e-01_jprb,2.2894e-01_jprb,1.7604e-01_jprb,8.6918e-01_jprb/)
543 kbo( :, 2,16,10) = (/&
544 &3.1740e-01_jprb,3.4815e-01_jprb,3.1813e-01_jprb,2.4321e-01_jprb,9.3794e-01_jprb/)
545 kbo( :, 3,16,10) = (/&
546 &4.2406e-01_jprb,4.6410e-01_jprb,4.2260e-01_jprb,3.2211e-01_jprb,1.0122e+00_jprb/)
547 kbo( :, 4,16,10) = (/&
548 &5.4520e-01_jprb,5.9870e-01_jprb,5.4328e-01_jprb,4.1424e-01_jprb,1.0849e+00_jprb/)
549 kbo( :, 5,16,10) = (/&
550 &6.8053e-01_jprb,7.4608e-01_jprb,6.8074e-01_jprb,5.2205e-01_jprb,1.1616e+00_jprb/)
551 kbo( :, 1,17,10) = (/&
552 &2.0942e-01_jprb,2.3428e-01_jprb,2.1300e-01_jprb,1.6357e-01_jprb,6.8856e-01_jprb/)
553 kbo( :, 2,17,10) = (/&
554 &2.9028e-01_jprb,3.2402e-01_jprb,2.9334e-01_jprb,2.2459e-01_jprb,7.5316e-01_jprb/)
555 kbo( :, 3,17,10) = (/&
556 &3.8521e-01_jprb,4.3154e-01_jprb,3.8848e-01_jprb,2.9660e-01_jprb,8.1712e-01_jprb/)
557 kbo( :, 4,17,10) = (/&
558 &4.9386e-01_jprb,5.5280e-01_jprb,4.9908e-01_jprb,3.8197e-01_jprb,8.8331e-01_jprb/)
559 kbo( :, 5,17,10) = (/&
560 &6.1488e-01_jprb,6.8821e-01_jprb,6.2452e-01_jprb,4.7879e-01_jprb,9.5857e-01_jprb/)
561 kbo( :, 1,18,10) = (/&
562 &1.9063e-01_jprb,2.1561e-01_jprb,1.9503e-01_jprb,1.4897e-01_jprb,5.8262e-01_jprb/)
563 kbo( :, 2,18,10) = (/&
564 &2.6234e-01_jprb,2.9815e-01_jprb,2.6727e-01_jprb,2.0340e-01_jprb,6.4437e-01_jprb/)
565 kbo( :, 3,18,10) = (/&
566 &3.4666e-01_jprb,3.9448e-01_jprb,3.5278e-01_jprb,2.6945e-01_jprb,7.0773e-01_jprb/)
567 kbo( :, 4,18,10) = (/&
568 &4.4310e-01_jprb,5.0370e-01_jprb,4.5197e-01_jprb,3.4624e-01_jprb,7.7610e-01_jprb/)
569 kbo( :, 5,18,10) = (/&
570 &5.4979e-01_jprb,6.2640e-01_jprb,5.6607e-01_jprb,4.3269e-01_jprb,8.4498e-01_jprb/)
571 kbo( :, 1,19,10) = (/&
572 &1.7161e-01_jprb,1.9659e-01_jprb,1.7592e-01_jprb,1.3400e-01_jprb,5.2315e-01_jprb/)
573 kbo( :, 2,19,10) = (/&
574 &2.3489e-01_jprb,2.7003e-01_jprb,2.4068e-01_jprb,1.8320e-01_jprb,5.8488e-01_jprb/)
575 kbo( :, 3,19,10) = (/&
576 &3.0942e-01_jprb,3.5576e-01_jprb,3.1712e-01_jprb,2.4210e-01_jprb,6.4789e-01_jprb/)
577 kbo( :, 4,19,10) = (/&
578 &3.9389e-01_jprb,4.5374e-01_jprb,4.0629e-01_jprb,3.0999e-01_jprb,7.1351e-01_jprb/)
579 kbo( :, 5,19,10) = (/&
580 &4.8891e-01_jprb,5.6402e-01_jprb,5.0679e-01_jprb,3.8613e-01_jprb,7.7670e-01_jprb/)
581 kbo( :, 1,20,10) = (/&
582 &1.5436e-01_jprb,1.7849e-01_jprb,1.5835e-01_jprb,1.2054e-01_jprb,4.8122e-01_jprb/)
583 kbo( :, 2,20,10) = (/&
584 &2.1037e-01_jprb,2.4329e-01_jprb,2.1594e-01_jprb,1.6475e-01_jprb,5.4083e-01_jprb/)
585 kbo( :, 3,20,10) = (/&
586 &2.7588e-01_jprb,3.1923e-01_jprb,2.8475e-01_jprb,2.1683e-01_jprb,6.0229e-01_jprb/)
587 kbo( :, 4,20,10) = (/&
588 &3.5179e-01_jprb,4.0673e-01_jprb,3.6356e-01_jprb,2.7647e-01_jprb,6.6389e-01_jprb/)
589 kbo( :, 5,20,10) = (/&
590 &4.3944e-01_jprb,5.0591e-01_jprb,4.5161e-01_jprb,3.4309e-01_jprb,7.2588e-01_jprb/)
591 kbo( :, 1,21,10) = (/&
592 &1.3931e-01_jprb,1.6061e-01_jprb,1.4210e-01_jprb,1.0800e-01_jprb,4.4082e-01_jprb/)
593 kbo( :, 2,21,10) = (/&
594 &1.8903e-01_jprb,2.1792e-01_jprb,1.9361e-01_jprb,1.4691e-01_jprb,4.9685e-01_jprb/)
595 kbo( :, 3,21,10) = (/&
596 &2.4836e-01_jprb,2.8494e-01_jprb,2.5423e-01_jprb,1.9232e-01_jprb,5.5604e-01_jprb/)
597 kbo( :, 4,21,10) = (/&
598 &3.1855e-01_jprb,3.6313e-01_jprb,3.2325e-01_jprb,2.4463e-01_jprb,6.1543e-01_jprb/)
599 kbo( :, 5,21,10) = (/&
600 &4.0034e-01_jprb,4.5346e-01_jprb,4.0071e-01_jprb,3.0346e-01_jprb,6.7562e-01_jprb/)
601 kbo( :, 1,22,10) = (/&
602 &1.2853e-01_jprb,1.4730e-01_jprb,1.3012e-01_jprb,9.8419e-02_jprb,3.9506e-01_jprb/)
603 kbo( :, 2,22,10) = (/&
604 &1.7432e-01_jprb,1.9857e-01_jprb,1.7621e-01_jprb,1.3274e-01_jprb,4.4910e-01_jprb/)
605 kbo( :, 3,22,10) = (/&
606 &2.3012e-01_jprb,2.5984e-01_jprb,2.2960e-01_jprb,1.7295e-01_jprb,5.0505e-01_jprb/)
607 kbo( :, 4,22,10) = (/&
608 &2.9716e-01_jprb,3.3163e-01_jprb,2.9126e-01_jprb,2.1891e-01_jprb,5.6304e-01_jprb/)
609 kbo( :, 5,22,10) = (/&
610 &3.7733e-01_jprb,4.1497e-01_jprb,3.6137e-01_jprb,2.7093e-01_jprb,6.2241e-01_jprb/)
611 kbo( :, 1,23,10) = (/&
612 &1.1881e-01_jprb,1.3545e-01_jprb,1.1944e-01_jprb,8.9244e-02_jprb,3.5223e-01_jprb/)
613 kbo( :, 2,23,10) = (/&
614 &1.6173e-01_jprb,1.8250e-01_jprb,1.6019e-01_jprb,1.1960e-01_jprb,4.0380e-01_jprb/)
615 kbo( :, 3,23,10) = (/&
616 &2.1531e-01_jprb,2.3918e-01_jprb,2.0828e-01_jprb,1.5508e-01_jprb,4.5685e-01_jprb/)
617 kbo( :, 4,23,10) = (/&
618 &2.8111e-01_jprb,3.0634e-01_jprb,2.6433e-01_jprb,1.9616e-01_jprb,5.1050e-01_jprb/)
619 kbo( :, 5,23,10) = (/&
620 &3.5862e-01_jprb,3.8538e-01_jprb,3.2913e-01_jprb,2.4336e-01_jprb,5.6512e-01_jprb/)
621 kbo( :, 1,24,10) = (/&
622 &1.1051e-01_jprb,1.2496e-01_jprb,1.0957e-01_jprb,8.1032e-02_jprb,3.1062e-01_jprb/)
623 kbo( :, 2,24,10) = (/&
624 &1.5172e-01_jprb,1.6880e-01_jprb,1.4660e-01_jprb,1.0802e-01_jprb,3.5601e-01_jprb/)
625 kbo( :, 3,24,10) = (/&
626 &2.0376e-01_jprb,2.2212e-01_jprb,1.9093e-01_jprb,1.3969e-01_jprb,4.0151e-01_jprb/)
627 kbo( :, 4,24,10) = (/&
628 &2.6595e-01_jprb,2.8670e-01_jprb,2.4290e-01_jprb,1.7693e-01_jprb,4.4655e-01_jprb/)
629 kbo( :, 5,24,10) = (/&
630 &3.3711e-01_jprb,3.6154e-01_jprb,3.0421e-01_jprb,2.2016e-01_jprb,4.9307e-01_jprb/)
631 kbo( :, 1,25,10) = (/&
632 &1.0420e-01_jprb,1.1612e-01_jprb,1.0071e-01_jprb,7.3994e-02_jprb,2.6769e-01_jprb/)
633 kbo( :, 2,25,10) = (/&
634 &1.4379e-01_jprb,1.5740e-01_jprb,1.3501e-01_jprb,9.8353e-02_jprb,3.0486e-01_jprb/)
635 kbo( :, 3,25,10) = (/&
636 &1.9217e-01_jprb,2.0868e-01_jprb,1.7650e-01_jprb,1.2735e-01_jprb,3.4236e-01_jprb/)
637 kbo( :, 4,25,10) = (/&
638 &2.4870e-01_jprb,2.6919e-01_jprb,2.2634e-01_jprb,1.6171e-01_jprb,3.8148e-01_jprb/)
639 kbo( :, 5,25,10) = (/&
640 &3.1377e-01_jprb,3.3803e-01_jprb,2.8442e-01_jprb,2.0146e-01_jprb,4.2272e-01_jprb/)
641 kbo( :, 1,26,10) = (/&
642 &9.9675e-02_jprb,1.0913e-01_jprb,9.3389e-02_jprb,6.8204e-02_jprb,2.2702e-01_jprb/)
643 kbo( :, 2,26,10) = (/&
644 &1.3608e-01_jprb,1.4866e-01_jprb,1.2587e-01_jprb,9.0548e-02_jprb,2.5831e-01_jprb/)
645 kbo( :, 3,26,10) = (/&
646 &1.7987e-01_jprb,1.9629e-01_jprb,1.6531e-01_jprb,1.1761e-01_jprb,2.9077e-01_jprb/)
647 kbo( :, 4,26,10) = (/&
648 &2.3141e-01_jprb,2.5133e-01_jprb,2.1184e-01_jprb,1.5002e-01_jprb,3.2521e-01_jprb/)
649 kbo( :, 5,26,10) = (/&
650 &2.9168e-01_jprb,3.1498e-01_jprb,2.6568e-01_jprb,1.8754e-01_jprb,3.6164e-01_jprb/)
651 kbo( :, 1,27,10) = (/&
652 &9.4961e-02_jprb,1.0334e-01_jprb,8.7374e-02_jprb,6.3126e-02_jprb,1.8683e-01_jprb/)
653 kbo( :, 2,27,10) = (/&
654 &1.2783e-01_jprb,1.3969e-01_jprb,1.1790e-01_jprb,8.4112e-02_jprb,2.1332e-01_jprb/)
655 kbo( :, 3,27,10) = (/&
656 &1.6762e-01_jprb,1.8278e-01_jprb,1.5442e-01_jprb,1.0984e-01_jprb,2.4142e-01_jprb/)
657 kbo( :, 4,27,10) = (/&
658 &2.1518e-01_jprb,2.3329e-01_jprb,1.9719e-01_jprb,1.3996e-01_jprb,2.7159e-01_jprb/)
659 kbo( :, 5,27,10) = (/&
660 &2.7088e-01_jprb,2.9228e-01_jprb,2.4666e-01_jprb,1.7442e-01_jprb,3.0352e-01_jprb/)
661 kbo( :, 1,28,10) = (/&
662 &8.9894e-02_jprb,9.7468e-02_jprb,8.2177e-02_jprb,5.8889e-02_jprb,1.5060e-01_jprb/)
663 kbo( :, 2,28,10) = (/&
664 &1.1988e-01_jprb,1.3035e-01_jprb,1.1000e-01_jprb,7.8738e-02_jprb,1.7287e-01_jprb/)
665 kbo( :, 3,28,10) = (/&
666 &1.5649e-01_jprb,1.6957e-01_jprb,1.4329e-01_jprb,1.0256e-01_jprb,1.9707e-01_jprb/)
667 kbo( :, 4,28,10) = (/&
668 &2.0046e-01_jprb,2.1640e-01_jprb,1.8266e-01_jprb,1.3021e-01_jprb,2.2305e-01_jprb/)
669 kbo( :, 5,28,10) = (/&
670 &2.5209e-01_jprb,2.7147e-01_jprb,2.2856e-01_jprb,1.6182e-01_jprb,2.5048e-01_jprb/)
671 kbo( :, 1,29,10) = (/&
672 &8.4975e-02_jprb,9.1564e-02_jprb,7.7119e-02_jprb,5.5320e-02_jprb,1.2031e-01_jprb/)
673 kbo( :, 2,29,10) = (/&
674 &1.1279e-01_jprb,1.2154e-01_jprb,1.0248e-01_jprb,7.3699e-02_jprb,1.3921e-01_jprb/)
675 kbo( :, 3,29,10) = (/&
676 &1.4673e-01_jprb,1.5792e-01_jprb,1.3309e-01_jprb,9.5449e-02_jprb,1.5984e-01_jprb/)
677 kbo( :, 4,29,10) = (/&
678 &1.8741e-01_jprb,2.0158e-01_jprb,1.6951e-01_jprb,1.2082e-01_jprb,1.8203e-01_jprb/)
679 kbo( :, 5,29,10) = (/&
680 &2.3506e-01_jprb,2.5337e-01_jprb,2.1224e-01_jprb,1.5053e-01_jprb,2.0549e-01_jprb/)
681 kbo( :, 1,30,10) = (/&
682 &8.0540e-02_jprb,8.5979e-02_jprb,7.2248e-02_jprb,5.1838e-02_jprb,9.5257e-02_jprb/)
683 kbo( :, 2,30,10) = (/&
684 &1.0659e-01_jprb,1.1363e-01_jprb,9.5542e-02_jprb,6.8630e-02_jprb,1.1116e-01_jprb/)
685 kbo( :, 3,30,10) = (/&
686 &1.3811e-01_jprb,1.4769e-01_jprb,1.2398e-01_jprb,8.8651e-02_jprb,1.2851e-01_jprb/)
687 kbo( :, 4,30,10) = (/&
688 &1.7576e-01_jprb,1.8885e-01_jprb,1.5795e-01_jprb,1.1230e-01_jprb,1.4704e-01_jprb/)
689 kbo( :, 5,30,10) = (/&
690 &2.1968e-01_jprb,2.3750e-01_jprb,1.9778e-01_jprb,1.4034e-01_jprb,1.6746e-01_jprb/)
691 kbo( :, 1,31,10) = (/&
692 &7.6568e-02_jprb,8.1013e-02_jprb,6.7877e-02_jprb,4.8531e-02_jprb,7.4566e-02_jprb/)
693 kbo( :, 2,31,10) = (/&
694 &1.0109e-01_jprb,1.0699e-01_jprb,8.9628e-02_jprb,6.3973e-02_jprb,8.7642e-02_jprb/)
695 kbo( :, 3,31,10) = (/&
696 &1.3062e-01_jprb,1.3896e-01_jprb,1.1618e-01_jprb,8.2665e-02_jprb,1.0209e-01_jprb/)
697 kbo( :, 4,31,10) = (/&
698 &1.6550e-01_jprb,1.7774e-01_jprb,1.4814e-01_jprb,1.0503e-01_jprb,1.1802e-01_jprb/)
699 kbo( :, 5,31,10) = (/&
700 &2.0675e-01_jprb,2.2327e-01_jprb,1.8555e-01_jprb,1.3151e-01_jprb,1.3544e-01_jprb/)
701 kbo( :, 1,32,10) = (/&
702 &7.2888e-02_jprb,7.6838e-02_jprb,6.4126e-02_jprb,4.5495e-02_jprb,5.8817e-02_jprb/)
703 kbo( :, 2,32,10) = (/&
704 &9.6267e-02_jprb,1.0140e-01_jprb,8.4579e-02_jprb,5.9945e-02_jprb,6.9773e-02_jprb/)
705 kbo( :, 3,32,10) = (/&
706 &1.2398e-01_jprb,1.3170e-01_jprb,1.0960e-01_jprb,7.7555e-02_jprb,8.1997e-02_jprb/)
707 kbo( :, 4,32,10) = (/&
708 &1.5682e-01_jprb,1.6810e-01_jprb,1.3960e-01_jprb,9.8812e-02_jprb,9.5528e-02_jprb/)
709 kbo( :, 5,32,10) = (/&
710 &1.9594e-01_jprb,2.1107e-01_jprb,1.7505e-01_jprb,1.2416e-01_jprb,1.1090e-01_jprb/)
711 kbo( :, 1,33,10) = (/&
712 &6.9635e-02_jprb,7.3317e-02_jprb,6.1010e-02_jprb,4.2865e-02_jprb,4.6660e-02_jprb/)
713 kbo( :, 2,33,10) = (/&
714 &9.1701e-02_jprb,9.6759e-02_jprb,8.0326e-02_jprb,5.6501e-02_jprb,5.5833e-02_jprb/)
715 kbo( :, 3,33,10) = (/&
716 &1.1801e-01_jprb,1.2540e-01_jprb,1.0406e-01_jprb,7.3316e-02_jprb,6.6138e-02_jprb/)
717 kbo( :, 4,33,10) = (/&
718 &1.4953e-01_jprb,1.5985e-01_jprb,1.3238e-01_jprb,9.3601e-02_jprb,7.7808e-02_jprb/)
719 kbo( :, 5,33,10) = (/&
720 &1.8727e-01_jprb,2.0108e-01_jprb,1.6621e-01_jprb,1.1789e-01_jprb,9.1029e-02_jprb/)
721 kbo( :, 1,34,10) = (/&
722 &6.6051e-02_jprb,6.9606e-02_jprb,5.7793e-02_jprb,4.0300e-02_jprb,3.8390e-02_jprb/)
723 kbo( :, 2,34,10) = (/&
724 &8.6850e-02_jprb,9.2010e-02_jprb,7.6104e-02_jprb,5.3129e-02_jprb,4.6300e-02_jprb/)
725 kbo( :, 3,34,10) = (/&
726 &1.1190e-01_jprb,1.1902e-01_jprb,9.8376e-02_jprb,6.9059e-02_jprb,5.5243e-02_jprb/)
727 kbo( :, 4,34,10) = (/&
728 &1.4227e-01_jprb,1.5193e-01_jprb,1.2534e-01_jprb,8.8424e-02_jprb,6.5503e-02_jprb/)
729 kbo( :, 5,34,10) = (/&
730 &1.7893e-01_jprb,1.9164e-01_jprb,1.5780e-01_jprb,1.1159e-01_jprb,7.7108e-02_jprb/)
731 kbo( :, 1,35,10) = (/&
732 &6.1061e-02_jprb,6.4589e-02_jprb,5.3472e-02_jprb,3.7076e-02_jprb,3.0936e-02_jprb/)
733 kbo( :, 2,35,10) = (/&
734 &8.0413e-02_jprb,8.5518e-02_jprb,7.0631e-02_jprb,4.9033e-02_jprb,3.7630e-02_jprb/)
735 kbo( :, 3,35,10) = (/&
736 &1.0418e-01_jprb,1.1098e-01_jprb,9.1376e-02_jprb,6.3892e-02_jprb,4.5348e-02_jprb/)
737 kbo( :, 4,35,10) = (/&
738 &1.3326e-01_jprb,1.4218e-01_jprb,1.1684e-01_jprb,8.2004e-02_jprb,5.4177e-02_jprb/)
739 kbo( :, 5,35,10) = (/&
740 &1.6818e-01_jprb,1.8014e-01_jprb,1.4791e-01_jprb,1.0383e-01_jprb,6.4352e-02_jprb/)
741 kbo( :, 1,36,10) = (/&
742 &5.4859e-02_jprb,5.8269e-02_jprb,4.8182e-02_jprb,3.3253e-02_jprb,2.4204e-02_jprb/)
743 kbo( :, 2,36,10) = (/&
744 &7.2626e-02_jprb,7.7491e-02_jprb,6.3949e-02_jprb,4.4186e-02_jprb,2.9747e-02_jprb/)
745 kbo( :, 3,36,10) = (/&
746 &9.4867e-02_jprb,1.0121e-01_jprb,8.3126e-02_jprb,5.7761e-02_jprb,3.6183e-02_jprb/)
747 kbo( :, 4,36,10) = (/&
748 &1.2215e-01_jprb,1.3045e-01_jprb,1.0693e-01_jprb,7.4445e-02_jprb,4.3693e-02_jprb/)
749 kbo( :, 5,36,10) = (/&
750 &1.5514e-01_jprb,1.6646e-01_jprb,1.3613e-01_jprb,9.4760e-02_jprb,5.2444e-02_jprb/)
751 kbo( :, 1,37,10) = (/&
752 &4.7230e-02_jprb,5.0376e-02_jprb,4.1606e-02_jprb,2.8650e-02_jprb,1.9576e-02_jprb/)
753 kbo( :, 2,37,10) = (/&
754 &6.3162e-02_jprb,6.7559e-02_jprb,5.5737e-02_jprb,3.8366e-02_jprb,2.4307e-02_jprb/)
755 kbo( :, 3,37,10) = (/&
756 &8.3382e-02_jprb,8.9100e-02_jprb,7.3096e-02_jprb,5.0404e-02_jprb,2.9845e-02_jprb/)
757 kbo( :, 4,37,10) = (/&
758 &1.0831e-01_jprb,1.1578e-01_jprb,9.4747e-02_jprb,6.5399e-02_jprb,3.6334e-02_jprb/)
759 kbo( :, 5,37,10) = (/&
760 &1.3872e-01_jprb,1.4912e-01_jprb,1.2153e-01_jprb,8.3890e-02_jprb,4.3970e-02_jprb/)
761 kbo( :, 1,38,10) = (/&
762 &4.0594e-02_jprb,4.3482e-02_jprb,3.5882e-02_jprb,2.4652e-02_jprb,1.5796e-02_jprb/)
763 kbo( :, 2,38,10) = (/&
764 &5.4893e-02_jprb,5.8859e-02_jprb,4.8535e-02_jprb,3.3342e-02_jprb,1.9838e-02_jprb/)
765 kbo( :, 3,38,10) = (/&
766 &7.3270e-02_jprb,7.8442e-02_jprb,6.4299e-02_jprb,4.4057e-02_jprb,2.4587e-02_jprb/)
767 kbo( :, 4,38,10) = (/&
768 &9.6131e-02_jprb,1.0297e-01_jprb,8.4062e-02_jprb,5.7542e-02_jprb,3.0194e-02_jprb/)
769 kbo( :, 5,38,10) = (/&
770 &1.2425e-01_jprb,1.3371e-01_jprb,1.0871e-01_jprb,7.4376e-02_jprb,3.6826e-02_jprb/)
771 kbo( :, 1,39,10) = (/&
772 &3.4960e-02_jprb,3.7584e-02_jprb,3.1001e-02_jprb,2.1253e-02_jprb,1.2659e-02_jprb/)
773 kbo( :, 2,39,10) = (/&
774 &4.7796e-02_jprb,5.1412e-02_jprb,4.2333e-02_jprb,2.9006e-02_jprb,1.6073e-02_jprb/)
775 kbo( :, 3,39,10) = (/&
776 &6.4510e-02_jprb,6.9244e-02_jprb,5.6690e-02_jprb,3.8671e-02_jprb,2.0130e-02_jprb/)
777 kbo( :, 4,39,10) = (/&
778 &8.5561e-02_jprb,9.1904e-02_jprb,7.4800e-02_jprb,5.0873e-02_jprb,2.4941e-02_jprb/)
779 kbo( :, 5,39,10) = (/&
780 &1.1163e-01_jprb,1.2022e-01_jprb,9.7628e-02_jprb,6.6235e-02_jprb,3.0668e-02_jprb/)
781 kbo( :, 1,40,10) = (/&
782 &2.9268e-02_jprb,3.1482e-02_jprb,2.5935e-02_jprb,1.7721e-02_jprb,1.0217e-02_jprb/)
783 kbo( :, 2,40,10) = (/&
784 &4.0459e-02_jprb,4.3586e-02_jprb,3.5852e-02_jprb,2.4486e-02_jprb,1.3110e-02_jprb/)
785 kbo( :, 3,40,10) = (/&
786 &5.5229e-02_jprb,5.9449e-02_jprb,4.8588e-02_jprb,3.3038e-02_jprb,1.6586e-02_jprb/)
787 kbo( :, 4,40,10) = (/&
788 &7.4117e-02_jprb,7.9872e-02_jprb,6.4885e-02_jprb,4.3907e-02_jprb,2.0725e-02_jprb/)
789 kbo( :, 5,40,10) = (/&
790 &9.7865e-02_jprb,1.0550e-01_jprb,8.5568e-02_jprb,5.7643e-02_jprb,2.5662e-02_jprb/)
791 kbo( :, 1,41,10) = (/&
792 &2.4397e-02_jprb,2.6231e-02_jprb,2.1586e-02_jprb,1.4682e-02_jprb,8.2353e-03_jprb/)
793 kbo( :, 2,41,10) = (/&
794 &3.4139e-02_jprb,3.6786e-02_jprb,3.0230e-02_jprb,2.0568e-02_jprb,1.0674e-02_jprb/)
795 kbo( :, 3,41,10) = (/&
796 &4.7106e-02_jprb,5.0858e-02_jprb,4.1459e-02_jprb,2.8115e-02_jprb,1.3635e-02_jprb/)
797 kbo( :, 4,41,10) = (/&
798 &6.4000e-02_jprb,6.9180e-02_jprb,5.6062e-02_jprb,3.7799e-02_jprb,1.7204e-02_jprb/)
799 kbo( :, 5,41,10) = (/&
800 &8.5517e-02_jprb,9.2400e-02_jprb,7.4782e-02_jprb,5.0099e-02_jprb,2.1450e-02_jprb/)
801 kbo( :, 1,42,10) = (/&
802 &2.0268e-02_jprb,2.1845e-02_jprb,1.7956e-02_jprb,1.2140e-02_jprb,6.5991e-03_jprb/)
803 kbo( :, 2,42,10) = (/&
804 &2.8789e-02_jprb,3.1021e-02_jprb,2.5467e-02_jprb,1.7246e-02_jprb,8.6477e-03_jprb/)
805 kbo( :, 3,42,10) = (/&
806 &4.0194e-02_jprb,4.3474e-02_jprb,3.5363e-02_jprb,2.3902e-02_jprb,1.1154e-02_jprb/)
807 kbo( :, 4,42,10) = (/&
808 &5.5258e-02_jprb,5.9919e-02_jprb,4.8429e-02_jprb,3.2536e-02_jprb,1.4210e-02_jprb/)
809 kbo( :, 5,42,10) = (/&
810 &7.4696e-02_jprb,8.0962e-02_jprb,6.5393e-02_jprb,4.3618e-02_jprb,1.7849e-02_jprb/)
811 kbo( :, 1,43,10) = (/&
812 &1.6426e-02_jprb,1.7804e-02_jprb,1.4613e-02_jprb,9.8050e-03_jprb,5.2617e-03_jprb/)
813 kbo( :, 2,43,10) = (/&
814 &2.3747e-02_jprb,2.5630e-02_jprb,2.1011e-02_jprb,1.4160e-02_jprb,6.9847e-03_jprb/)
815 kbo( :, 3,43,10) = (/&
816 &3.3653e-02_jprb,3.6412e-02_jprb,2.9592e-02_jprb,1.9925e-02_jprb,9.1040e-03_jprb/)
817 kbo( :, 4,43,10) = (/&
818 &4.6868e-02_jprb,5.0938e-02_jprb,4.1108e-02_jprb,2.7526e-02_jprb,1.1710e-02_jprb/)
819 kbo( :, 5,43,10) = (/&
820 &6.4129e-02_jprb,6.9760e-02_jprb,5.6238e-02_jprb,3.7383e-02_jprb,1.4823e-02_jprb/)
821 kbo( :, 1,44,10) = (/&
822 &1.3100e-02_jprb,1.4316e-02_jprb,1.1742e-02_jprb,7.8185e-03_jprb,4.1731e-03_jprb/)
823 kbo( :, 2,44,10) = (/&
824 &1.9306e-02_jprb,2.0946e-02_jprb,1.7130e-02_jprb,1.1488e-02_jprb,5.6253e-03_jprb/)
825 kbo( :, 3,44,10) = (/&
826 &2.7839e-02_jprb,3.0159e-02_jprb,2.4497e-02_jprb,1.6420e-02_jprb,7.4177e-03_jprb/)
827 kbo( :, 4,44,10) = (/&
828 &3.9351e-02_jprb,4.2845e-02_jprb,3.4542e-02_jprb,2.3036e-02_jprb,9.6323e-03_jprb/)
829 kbo( :, 5,44,10) = (/&
830 &5.4545e-02_jprb,5.9565e-02_jprb,4.7916e-02_jprb,3.1766e-02_jprb,1.2297e-02_jprb/)
831 kbo( :, 1,45,10) = (/&
832 &1.0365e-02_jprb,1.1432e-02_jprb,9.3767e-03_jprb,6.2117e-03_jprb,3.2839e-03_jprb/)
833 kbo( :, 2,45,10) = (/&
834 &1.5589e-02_jprb,1.7063e-02_jprb,1.3930e-02_jprb,9.2859e-03_jprb,4.5005e-03_jprb/)
835 kbo( :, 3,45,10) = (/&
836 &2.2910e-02_jprb,2.4924e-02_jprb,2.0227e-02_jprb,1.3494e-02_jprb,6.0165e-03_jprb/)
837 kbo( :, 4,45,10) = (/&
838 &3.2938e-02_jprb,3.5933e-02_jprb,2.8944e-02_jprb,1.9215e-02_jprb,7.8901e-03_jprb/)
839 kbo( :, 5,45,10) = (/&
840 &4.6288e-02_jprb,5.0739e-02_jprb,4.0755e-02_jprb,2.6930e-02_jprb,1.0163e-02_jprb/)
841 kbo( :, 1,46,10) = (/&
842 &8.0611e-03_jprb,8.9687e-03_jprb,7.3616e-03_jprb,4.8649e-03_jprb,2.5630e-03_jprb/)
843 kbo( :, 2,46,10) = (/&
844 &1.2384e-02_jprb,1.3700e-02_jprb,1.1187e-02_jprb,7.4141e-03_jprb,3.5736e-03_jprb/)
845 kbo( :, 3,46,10) = (/&
846 &1.8589e-02_jprb,2.0376e-02_jprb,1.6514e-02_jprb,1.0949e-02_jprb,4.8546e-03_jprb/)
847 kbo( :, 4,46,10) = (/&
848 &2.7228e-02_jprb,2.9798e-02_jprb,2.3986e-02_jprb,1.5867e-02_jprb,6.4395e-03_jprb/)
849 kbo( :, 5,46,10) = (/&
850 &3.8907e-02_jprb,4.2772e-02_jprb,3.4328e-02_jprb,2.2598e-02_jprb,8.3793e-03_jprb/)
851 kbo( :, 1,47,10) = (/&
852 &6.0942e-03_jprb,6.8373e-03_jprb,5.6151e-03_jprb,3.7108e-03_jprb,1.9874e-03_jprb/)
853 kbo( :, 2,47,10) = (/&
854 &9.5830e-03_jprb,1.0720e-02_jprb,8.7687e-03_jprb,5.7830e-03_jprb,2.8149e-03_jprb/)
855 kbo( :, 3,47,10) = (/&
856 &1.4719e-02_jprb,1.6286e-02_jprb,1.3206e-02_jprb,8.7082e-03_jprb,3.8989e-03_jprb/)
857 kbo( :, 4,47,10) = (/&
858 &2.2034e-02_jprb,2.4248e-02_jprb,1.9496e-02_jprb,1.2839e-02_jprb,5.2464e-03_jprb/)
859 kbo( :, 5,47,10) = (/&
860 &3.2068e-02_jprb,3.5385e-02_jprb,2.8366e-02_jprb,1.8611e-02_jprb,6.9087e-03_jprb/)
861 kbo( :, 1,48,10) = (/&
862 &4.5510e-03_jprb,5.1515e-03_jprb,4.2286e-03_jprb,2.7938e-03_jprb,1.5324e-03_jprb/)
863 kbo( :, 2,48,10) = (/&
864 &7.3293e-03_jprb,8.3022e-03_jprb,6.7958e-03_jprb,4.4708e-03_jprb,2.2018e-03_jprb/)
865 kbo( :, 3,48,10) = (/&
866 &1.1532e-02_jprb,1.2909e-02_jprb,1.0485e-02_jprb,6.8896e-03_jprb,3.1032e-03_jprb/)
867 kbo( :, 4,48,10) = (/&
868 &1.7669e-02_jprb,1.9619e-02_jprb,1.5768e-02_jprb,1.0334e-02_jprb,4.2526e-03_jprb/)
869 kbo( :, 5,48,10) = (/&
870 &2.6263e-02_jprb,2.9134e-02_jprb,2.3325e-02_jprb,1.5244e-02_jprb,5.6768e-03_jprb/)
871 kbo( :, 1,49,10) = (/&
872 &3.3560e-03_jprb,3.8327e-03_jprb,3.1391e-03_jprb,2.0743e-03_jprb,1.1802e-03_jprb/)
873 kbo( :, 2,49,10) = (/&
874 &5.5342e-03_jprb,6.3542e-03_jprb,5.1981e-03_jprb,3.4211e-03_jprb,1.7096e-03_jprb/)
875 kbo( :, 3,49,10) = (/&
876 &8.9294e-03_jprb,1.0143e-02_jprb,8.2468e-03_jprb,5.4196e-03_jprb,2.4470e-03_jprb/)
877 kbo( :, 4,49,10) = (/&
878 &1.4024e-02_jprb,1.5765e-02_jprb,1.2684e-02_jprb,8.2734e-03_jprb,3.4129e-03_jprb/)
879 kbo( :, 5,49,10) = (/&
880 &2.1352e-02_jprb,2.3866e-02_jprb,1.9075e-02_jprb,1.2411e-02_jprb,4.6279e-03_jprb/)
881 kbo( :, 1,50,10) = (/&
882 &2.4929e-03_jprb,2.8632e-03_jprb,2.3379e-03_jprb,1.5440e-03_jprb,9.3225e-04_jprb/)
883 kbo( :, 2,50,10) = (/&
884 &4.2029e-03_jprb,4.8752e-03_jprb,3.9805e-03_jprb,2.6198e-03_jprb,1.3576e-03_jprb/)
885 kbo( :, 3,50,10) = (/&
886 &6.9325e-03_jprb,7.9925e-03_jprb,6.4974e-03_jprb,4.2674e-03_jprb,1.9613e-03_jprb/)
887 kbo( :, 4,50,10) = (/&
888 &1.1158e-02_jprb,1.2709e-02_jprb,1.0229e-02_jprb,6.6644e-03_jprb,2.7832e-03_jprb/)
889 kbo( :, 5,50,10) = (/&
890 &1.7403e-02_jprb,1.9642e-02_jprb,1.5691e-02_jprb,1.0155e-02_jprb,3.8333e-03_jprb/)
891 kbo( :, 1,51,10) = (/&
892 &1.8532e-03_jprb,2.1364e-03_jprb,1.7376e-03_jprb,1.1454e-03_jprb,7.4878e-04_jprb/)
893 kbo( :, 2,51,10) = (/&
894 &3.1888e-03_jprb,3.7291e-03_jprb,3.0357e-03_jprb,1.9945e-03_jprb,1.0922e-03_jprb/)
895 kbo( :, 3,51,10) = (/&
896 &5.3638e-03_jprb,6.2780e-03_jprb,5.0968e-03_jprb,3.3419e-03_jprb,1.5858e-03_jprb/)
897 kbo( :, 4,51,10) = (/&
898 &8.8501e-03_jprb,1.0219e-02_jprb,8.2277e-03_jprb,5.3639e-03_jprb,2.2832e-03_jprb/)
899 kbo( :, 5,51,10) = (/&
900 &1.4149e-02_jprb,1.6146e-02_jprb,1.2912e-02_jprb,8.3171e-03_jprb,3.2000e-03_jprb/)
901 kbo( :, 1,52,10) = (/&
902 &1.3628e-03_jprb,1.5783e-03_jprb,1.2808e-03_jprb,8.4055e-04_jprb,6.0012e-04_jprb/)
903 kbo( :, 2,52,10) = (/&
904 &2.4017e-03_jprb,2.8236e-03_jprb,2.2905e-03_jprb,1.5011e-03_jprb,8.8126e-04_jprb/)
905 kbo( :, 3,52,10) = (/&
906 &4.1169e-03_jprb,4.8815e-03_jprb,3.9607e-03_jprb,2.5906e-03_jprb,1.2847e-03_jprb/)
907 kbo( :, 4,52,10) = (/&
908 &6.9536e-03_jprb,8.1559e-03_jprb,6.5664e-03_jprb,4.2815e-03_jprb,1.8638e-03_jprb/)
909 kbo( :, 5,52,10) = (/&
910 &1.1409e-02_jprb,1.3194e-02_jprb,1.0553e-02_jprb,6.7875e-03_jprb,2.6534e-03_jprb/)
911 kbo( :, 1,53,10) = (/&
912 &9.8606e-04_jprb,1.1540e-03_jprb,9.3384e-04_jprb,6.1040e-04_jprb,4.7709e-04_jprb/)
913 kbo( :, 2,53,10) = (/&
914 &1.7920e-03_jprb,2.1145e-03_jprb,1.7063e-03_jprb,1.1169e-03_jprb,7.1312e-04_jprb/)
915 kbo( :, 3,53,10) = (/&
916 &3.1294e-03_jprb,3.7546e-03_jprb,3.0421e-03_jprb,1.9861e-03_jprb,1.0419e-03_jprb/)
917 kbo( :, 4,53,10) = (/&
918 &5.4059e-03_jprb,6.4522e-03_jprb,5.1921e-03_jprb,3.3816e-03_jprb,1.5130e-03_jprb/)
919 kbo( :, 5,53,10) = (/&
920 &9.1118e-03_jprb,1.0696e-02_jprb,8.5534e-03_jprb,5.5066e-03_jprb,2.1843e-03_jprb/)
921 kbo( :, 1,54,10) = (/&
922 &7.2513e-04_jprb,8.5732e-04_jprb,6.9183e-04_jprb,4.5039e-04_jprb,3.8769e-04_jprb/)
923 kbo( :, 2,54,10) = (/&
924 &1.3639e-03_jprb,1.6067e-03_jprb,1.2902e-03_jprb,8.3972e-04_jprb,5.9341e-04_jprb/)
925 kbo( :, 3,54,10) = (/&
926 &2.4214e-03_jprb,2.9176e-03_jprb,2.3545e-03_jprb,1.5328e-03_jprb,8.7214e-04_jprb/)
927 kbo( :, 4,54,10) = (/&
928 &4.2490e-03_jprb,5.1414e-03_jprb,4.1362e-03_jprb,2.6851e-03_jprb,1.2710e-03_jprb/)
929 kbo( :, 5,54,10) = (/&
930 &7.3277e-03_jprb,8.7352e-03_jprb,6.9866e-03_jprb,4.4974e-03_jprb,1.8463e-03_jprb/)
931 kbo( :, 1,55,10) = (/&
932 &5.3536e-04_jprb,6.3819e-04_jprb,5.1429e-04_jprb,3.3384e-04_jprb,3.1787e-04_jprb/)
933 kbo( :, 2,55,10) = (/&
934 &1.0434e-03_jprb,1.2286e-03_jprb,9.8197e-04_jprb,6.3464e-04_jprb,5.0051e-04_jprb/)
935 kbo( :, 3,55,10) = (/&
936 &1.8896e-03_jprb,2.2759e-03_jprb,1.8255e-03_jprb,1.1820e-03_jprb,7.4689e-04_jprb/)
937 kbo( :, 4,55,10) = (/&
938 &3.3543e-03_jprb,4.1000e-03_jprb,3.2922e-03_jprb,2.1289e-03_jprb,1.0910e-03_jprb/)
939 kbo( :, 5,55,10) = (/&
940 &5.8957e-03_jprb,7.1360e-03_jprb,5.7072e-03_jprb,3.6721e-03_jprb,1.5883e-03_jprb/)
941 kbo( :, 1,56,10) = (/&
942 &3.9041e-04_jprb,4.6983e-04_jprb,3.7827e-04_jprb,2.4495e-04_jprb,2.5822e-04_jprb/)
943 kbo( :, 2,56,10) = (/&
944 &7.9041e-04_jprb,9.3554e-04_jprb,7.4444e-04_jprb,4.7743e-04_jprb,4.2098e-04_jprb/)
945 kbo( :, 3,56,10) = (/&
946 &1.4711e-03_jprb,1.7706e-03_jprb,1.4085e-03_jprb,9.0462e-04_jprb,6.4135e-04_jprb/)
947 kbo( :, 4,56,10) = (/&
948 &2.6410e-03_jprb,3.2487e-03_jprb,2.5994e-03_jprb,1.6753e-03_jprb,9.4189e-04_jprb/)
949 kbo( :, 5,56,10) = (/&
950 &4.7180e-03_jprb,5.7942e-03_jprb,4.6339e-03_jprb,2.9753e-03_jprb,1.3744e-03_jprb/)
951 kbo( :, 1,57,10) = (/&
952 &2.8112e-04_jprb,3.4134e-04_jprb,2.7460e-04_jprb,1.7739e-04_jprb,2.0810e-04_jprb/)
953 kbo( :, 2,57,10) = (/&
954 &5.9233e-04_jprb,7.0612e-04_jprb,5.6036e-04_jprb,3.5724e-04_jprb,3.5218e-04_jprb/)
955 kbo( :, 3,57,10) = (/&
956 &1.1404e-03_jprb,1.3698e-03_jprb,1.0818e-03_jprb,6.8867e-04_jprb,5.5095e-04_jprb/)
957 kbo( :, 4,57,10) = (/&
958 &2.0756e-03_jprb,2.5598e-03_jprb,2.0389e-03_jprb,1.3071e-03_jprb,8.1947e-04_jprb/)
959 kbo( :, 5,57,10) = (/&
960 &3.7565e-03_jprb,4.6715e-03_jprb,3.7372e-03_jprb,2.3897e-03_jprb,1.1970e-03_jprb/)
961 kbo( :, 1,58,10) = (/&
962 &2.0287e-04_jprb,2.4841e-04_jprb,1.9950e-04_jprb,1.2870e-04_jprb,1.6873e-04_jprb/)
963 kbo( :, 2,58,10) = (/&
964 &4.4472e-04_jprb,5.3470e-04_jprb,4.2292e-04_jprb,2.6899e-04_jprb,2.9556e-04_jprb/)
965 kbo( :, 3,58,10) = (/&
966 &8.8909e-04_jprb,1.0668e-03_jprb,8.3669e-04_jprb,5.2917e-04_jprb,4.7698e-04_jprb/)
967 kbo( :, 4,58,10) = (/&
968 &1.6472e-03_jprb,2.0319e-03_jprb,1.6079e-03_jprb,1.0235e-03_jprb,7.2222e-04_jprb/)
969 kbo( :, 5,58,10) = (/&
970 &3.0142e-03_jprb,3.7808e-03_jprb,3.0200e-03_jprb,1.9230e-03_jprb,1.0578e-03_jprb/)
971 kbo( :, 1,59,10) = (/&
972 &1.7264e-04_jprb,2.1252e-04_jprb,1.6979e-04_jprb,1.0877e-04_jprb,1.5535e-04_jprb/)
973 kbo( :, 2,59,10) = (/&
974 &3.8844e-04_jprb,4.6892e-04_jprb,3.6892e-04_jprb,2.3285e-04_jprb,2.7770e-04_jprb/)
975 kbo( :, 3,59,10) = (/&
976 &7.9313e-04_jprb,9.5358e-04_jprb,7.4242e-04_jprb,4.6490e-04_jprb,4.5611e-04_jprb/)
977 kbo( :, 4,59,10) = (/&
978 &1.4888e-03_jprb,1.8362e-03_jprb,1.4437e-03_jprb,9.0907e-04_jprb,6.9878e-04_jprb/)
979 kbo( :, 5,59,10) = (/&
980 &2.7412e-03_jprb,3.4444e-03_jprb,2.7403e-03_jprb,1.7293e-03_jprb,1.0280e-03_jprb/)
981 kbo( :, 1,13,11) = (/&
982 &4.6582e-01_jprb,4.3126e-01_jprb,3.9148e-01_jprb,2.9782e-01_jprb,2.0038e+00_jprb/)
983 kbo( :, 2,13,11) = (/&
984 &6.6015e-01_jprb,6.1362e-01_jprb,5.5564e-01_jprb,4.1997e-01_jprb,2.1506e+00_jprb/)
985 kbo( :, 3,13,11) = (/&
986 &8.9186e-01_jprb,8.3255e-01_jprb,7.5032e-01_jprb,5.6975e-01_jprb,2.2970e+00_jprb/)
987 kbo( :, 4,13,11) = (/&
988 &1.1586e+00_jprb,1.0869e+00_jprb,9.7359e-01_jprb,7.4196e-01_jprb,2.4271e+00_jprb/)
989 kbo( :, 5,13,11) = (/&
990 &1.4563e+00_jprb,1.3761e+00_jprb,1.2287e+00_jprb,9.3624e-01_jprb,2.5537e+00_jprb/)
991 kbo( :, 1,14,11) = (/&
992 &4.6622e-01_jprb,4.4694e-01_jprb,4.0621e-01_jprb,3.0517e-01_jprb,1.9239e+00_jprb/)
993 kbo( :, 2,14,11) = (/&
994 &6.5626e-01_jprb,6.3097e-01_jprb,5.7029e-01_jprb,4.3017e-01_jprb,2.0659e+00_jprb/)
995 kbo( :, 3,14,11) = (/&
996 &8.8153e-01_jprb,8.5029e-01_jprb,7.6391e-01_jprb,5.8015e-01_jprb,2.1968e+00_jprb/)
997 kbo( :, 4,14,11) = (/&
998 &1.1396e+00_jprb,1.1043e+00_jprb,9.8836e-01_jprb,7.5006e-01_jprb,2.3180e+00_jprb/)
999 kbo( :, 5,14,11) = (/&
1000 &1.4290e+00_jprb,1.3870e+00_jprb,1.2407e+00_jprb,9.4051e-01_jprb,2.4548e+00_jprb/)
1001 kbo( :, 1,15,11) = (/&
1002 &4.5814e-01_jprb,4.5398e-01_jprb,4.1054e-01_jprb,3.0839e-01_jprb,1.6835e+00_jprb/)
1003 kbo( :, 2,15,11) = (/&
1004 &6.4005e-01_jprb,6.3563e-01_jprb,5.7202e-01_jprb,4.3265e-01_jprb,1.8044e+00_jprb/)
1005 kbo( :, 3,15,11) = (/&
1006 &8.5481e-01_jprb,8.5188e-01_jprb,7.6325e-01_jprb,5.7776e-01_jprb,1.9216e+00_jprb/)
1007 kbo( :, 4,15,11) = (/&
1008 &1.1011e+00_jprb,1.0984e+00_jprb,9.8470e-01_jprb,7.4242e-01_jprb,2.0480e+00_jprb/)
1009 kbo( :, 5,15,11) = (/&
1010 &1.3789e+00_jprb,1.3707e+00_jprb,1.2263e+00_jprb,9.2692e-01_jprb,2.1662e+00_jprb/)
1011 kbo( :, 1,16,11) = (/&
1012 &4.3936e-01_jprb,4.5055e-01_jprb,4.0610e-01_jprb,3.0607e-01_jprb,1.3891e+00_jprb/)
1013 kbo( :, 2,16,11) = (/&
1014 &6.0980e-01_jprb,6.2580e-01_jprb,5.6205e-01_jprb,4.2411e-01_jprb,1.4937e+00_jprb/)
1015 kbo( :, 3,16,11) = (/&
1016 &8.1051e-01_jprb,8.3041e-01_jprb,7.4762e-01_jprb,5.6219e-01_jprb,1.6024e+00_jprb/)
1017 kbo( :, 4,16,11) = (/&
1018 &1.0423e+00_jprb,1.0629e+00_jprb,9.5636e-01_jprb,7.1926e-01_jprb,1.7074e+00_jprb/)
1019 kbo( :, 5,16,11) = (/&
1020 &1.3012e+00_jprb,1.3270e+00_jprb,1.1867e+00_jprb,8.9662e-01_jprb,1.8065e+00_jprb/)
1021 kbo( :, 1,17,11) = (/&
1022 &4.1226e-01_jprb,4.3606e-01_jprb,3.9203e-01_jprb,2.9614e-01_jprb,1.1476e+00_jprb/)
1023 kbo( :, 2,17,11) = (/&
1024 &5.6889e-01_jprb,6.0078e-01_jprb,5.4100e-01_jprb,4.0607e-01_jprb,1.2378e+00_jprb/)
1025 kbo( :, 3,17,11) = (/&
1026 &7.5475e-01_jprb,7.9223e-01_jprb,7.1421e-01_jprb,5.3429e-01_jprb,1.3294e+00_jprb/)
1027 kbo( :, 4,17,11) = (/&
1028 &9.6747e-01_jprb,1.0124e+00_jprb,9.0807e-01_jprb,6.8194e-01_jprb,1.4124e+00_jprb/)
1029 kbo( :, 5,17,11) = (/&
1030 &1.1994e+00_jprb,1.2593e+00_jprb,1.1261e+00_jprb,8.5185e-01_jprb,1.4955e+00_jprb/)
1031 kbo( :, 1,18,11) = (/&
1032 &3.8064e-01_jprb,4.1279e-01_jprb,3.7089e-01_jprb,2.7981e-01_jprb,9.7150e-01_jprb/)
1033 kbo( :, 2,18,11) = (/&
1034 &5.2358e-01_jprb,5.6462e-01_jprb,5.0829e-01_jprb,3.8105e-01_jprb,1.0549e+00_jprb/)
1035 kbo( :, 3,18,11) = (/&
1036 &6.9263e-01_jprb,7.4312e-01_jprb,6.6621e-01_jprb,4.9871e-01_jprb,1.1339e+00_jprb/)
1037 kbo( :, 4,18,11) = (/&
1038 &8.8229e-01_jprb,9.4872e-01_jprb,8.4607e-01_jprb,6.3576e-01_jprb,1.2109e+00_jprb/)
1039 kbo( :, 5,18,11) = (/&
1040 &1.0918e+00_jprb,1.1715e+00_jprb,1.0485e+00_jprb,7.9321e-01_jprb,1.2966e+00_jprb/)
1041 kbo( :, 1,19,11) = (/&
1042 &3.4707e-01_jprb,3.8254e-01_jprb,3.4362e-01_jprb,2.5858e-01_jprb,8.6524e-01_jprb/)
1043 kbo( :, 2,19,11) = (/&
1044 &4.7624e-01_jprb,5.2177e-01_jprb,4.6660e-01_jprb,3.5041e-01_jprb,9.4567e-01_jprb/)
1045 kbo( :, 3,19,11) = (/&
1046 &6.2671e-01_jprb,6.8651e-01_jprb,6.0965e-01_jprb,4.5831e-01_jprb,1.0244e+00_jprb/)
1047 kbo( :, 4,19,11) = (/&
1048 &7.9653e-01_jprb,8.7098e-01_jprb,7.7442e-01_jprb,5.8401e-01_jprb,1.1073e+00_jprb/)
1049 kbo( :, 5,19,11) = (/&
1050 &9.8427e-01_jprb,1.0726e+00_jprb,9.5997e-01_jprb,7.2540e-01_jprb,1.1966e+00_jprb/)
1051 kbo( :, 1,20,11) = (/&
1052 &3.1567e-01_jprb,3.5181e-01_jprb,3.1444e-01_jprb,2.3622e-01_jprb,8.0158e-01_jprb/)
1053 kbo( :, 2,20,11) = (/&
1054 &4.3131e-01_jprb,4.7923e-01_jprb,4.2436e-01_jprb,3.1880e-01_jprb,8.8081e-01_jprb/)
1055 kbo( :, 3,20,11) = (/&
1056 &5.6512e-01_jprb,6.2700e-01_jprb,5.5312e-01_jprb,4.1741e-01_jprb,9.6113e-01_jprb/)
1057 kbo( :, 4,20,11) = (/&
1058 &7.1661e-01_jprb,7.9159e-01_jprb,7.0178e-01_jprb,5.3032e-01_jprb,1.0489e+00_jprb/)
1059 kbo( :, 5,20,11) = (/&
1060 &8.8236e-01_jprb,9.7468e-01_jprb,8.6952e-01_jprb,6.5743e-01_jprb,1.1372e+00_jprb/)
1061 kbo( :, 1,21,11) = (/&
1062 &2.8592e-01_jprb,3.2074e-01_jprb,2.8394e-01_jprb,2.1333e-01_jprb,7.4290e-01_jprb/)
1063 kbo( :, 2,21,11) = (/&
1064 &3.8826e-01_jprb,4.3502e-01_jprb,3.8223e-01_jprb,2.8797e-01_jprb,8.2178e-01_jprb/)
1065 kbo( :, 3,21,11) = (/&
1066 &5.0741e-01_jprb,5.6572e-01_jprb,4.9792e-01_jprb,3.7590e-01_jprb,9.0519e-01_jprb/)
1067 kbo( :, 4,21,11) = (/&
1068 &6.4058e-01_jprb,7.1340e-01_jprb,6.3080e-01_jprb,4.7663e-01_jprb,9.9225e-01_jprb/)
1069 kbo( :, 5,21,11) = (/&
1070 &7.8811e-01_jprb,8.7944e-01_jprb,7.7953e-01_jprb,5.8917e-01_jprb,1.0812e+00_jprb/)
1071 kbo( :, 1,22,11) = (/&
1072 &2.6349e-01_jprb,2.9660e-01_jprb,2.5964e-01_jprb,1.9557e-01_jprb,6.7570e-01_jprb/)
1073 kbo( :, 2,22,11) = (/&
1074 &3.5527e-01_jprb,3.9835e-01_jprb,3.4850e-01_jprb,2.6305e-01_jprb,7.5224e-01_jprb/)
1075 kbo( :, 3,22,11) = (/&
1076 &4.6050e-01_jprb,5.1538e-01_jprb,4.5315e-01_jprb,3.4161e-01_jprb,8.3620e-01_jprb/)
1077 kbo( :, 4,22,11) = (/&
1078 &5.8034e-01_jprb,6.4971e-01_jprb,5.7124e-01_jprb,4.3148e-01_jprb,9.2191e-01_jprb/)
1079 kbo( :, 5,22,11) = (/&
1080 &7.1598e-01_jprb,7.9992e-01_jprb,7.0387e-01_jprb,5.3098e-01_jprb,1.0108e+00_jprb/)
1081 kbo( :, 1,23,11) = (/&
1082 &2.4294e-01_jprb,2.7306e-01_jprb,2.3732e-01_jprb,1.7872e-01_jprb,6.0705e-01_jprb/)
1083 kbo( :, 2,23,11) = (/&
1084 &3.2497e-01_jprb,3.6372e-01_jprb,3.1788e-01_jprb,2.3869e-01_jprb,6.8421e-01_jprb/)
1085 kbo( :, 3,23,11) = (/&
1086 &4.2067e-01_jprb,4.6941e-01_jprb,4.1072e-01_jprb,3.0874e-01_jprb,7.6600e-01_jprb/)
1087 kbo( :, 4,23,11) = (/&
1088 &5.3164e-01_jprb,5.9097e-01_jprb,5.1614e-01_jprb,3.8792e-01_jprb,8.5300e-01_jprb/)
1089 kbo( :, 5,23,11) = (/&
1090 &6.5861e-01_jprb,7.2844e-01_jprb,6.3392e-01_jprb,4.7757e-01_jprb,9.4241e-01_jprb/)
1091 kbo( :, 1,24,11) = (/&
1092 &2.2482e-01_jprb,2.5108e-01_jprb,2.1802e-01_jprb,1.6286e-01_jprb,5.3854e-01_jprb/)
1093 kbo( :, 2,24,11) = (/&
1094 &2.9997e-01_jprb,3.3291e-01_jprb,2.8985e-01_jprb,2.1640e-01_jprb,6.1678e-01_jprb/)
1095 kbo( :, 3,24,11) = (/&
1096 &3.8949e-01_jprb,4.2945e-01_jprb,3.7259e-01_jprb,2.7841e-01_jprb,6.9947e-01_jprb/)
1097 kbo( :, 4,24,11) = (/&
1098 &4.9475e-01_jprb,5.4040e-01_jprb,4.6781e-01_jprb,3.4874e-01_jprb,7.8678e-01_jprb/)
1099 kbo( :, 5,24,11) = (/&
1100 &6.1688e-01_jprb,6.6845e-01_jprb,5.7526e-01_jprb,4.2946e-01_jprb,8.7638e-01_jprb/)
1101 kbo( :, 1,25,11) = (/&
1102 &2.0867e-01_jprb,2.3175e-01_jprb,2.0085e-01_jprb,1.4849e-01_jprb,4.8336e-01_jprb/)
1103 kbo( :, 2,25,11) = (/&
1104 &2.7944e-01_jprb,3.0729e-01_jprb,2.6487e-01_jprb,1.9609e-01_jprb,5.5823e-01_jprb/)
1105 kbo( :, 3,25,11) = (/&
1106 &3.6506e-01_jprb,3.9632e-01_jprb,3.4020e-01_jprb,2.5115e-01_jprb,6.3661e-01_jprb/)
1107 kbo( :, 4,25,11) = (/&
1108 &4.6727e-01_jprb,5.0070e-01_jprb,4.2731e-01_jprb,3.1512e-01_jprb,7.1582e-01_jprb/)
1109 kbo( :, 5,25,11) = (/&
1110 &5.8636e-01_jprb,6.2209e-01_jprb,5.2796e-01_jprb,3.8925e-01_jprb,7.9834e-01_jprb/)
1111 kbo( :, 1,26,11) = (/&
1112 &1.9587e-01_jprb,2.1594e-01_jprb,1.8576e-01_jprb,1.3602e-01_jprb,4.3426e-01_jprb/)
1113 kbo( :, 2,26,11) = (/&
1114 &2.6382e-01_jprb,2.8676e-01_jprb,2.4459e-01_jprb,1.7873e-01_jprb,5.0085e-01_jprb/)
1115 kbo( :, 3,26,11) = (/&
1116 &3.4692e-01_jprb,3.7120e-01_jprb,3.1465e-01_jprb,2.2874e-01_jprb,5.6934e-01_jprb/)
1117 kbo( :, 4,26,11) = (/&
1118 &4.4520e-01_jprb,4.7181e-01_jprb,3.9637e-01_jprb,2.8766e-01_jprb,6.3969e-01_jprb/)
1119 kbo( :, 5,26,11) = (/&
1120 &5.5605e-01_jprb,5.8855e-01_jprb,4.9195e-01_jprb,3.5675e-01_jprb,7.1476e-01_jprb/)
1121 kbo( :, 1,27,11) = (/&
1122 &1.8539e-01_jprb,2.0232e-01_jprb,1.7242e-01_jprb,1.2491e-01_jprb,3.7468e-01_jprb/)
1123 kbo( :, 2,27,11) = (/&
1124 &2.5096e-01_jprb,2.6936e-01_jprb,2.2766e-01_jprb,1.6372e-01_jprb,4.3134e-01_jprb/)
1125 kbo( :, 3,27,11) = (/&
1126 &3.2985e-01_jprb,3.5118e-01_jprb,2.9380e-01_jprb,2.1018e-01_jprb,4.9024e-01_jprb/)
1127 kbo( :, 4,27,11) = (/&
1128 &4.2050e-01_jprb,4.4779e-01_jprb,3.7245e-01_jprb,2.6552e-01_jprb,5.5373e-01_jprb/)
1129 kbo( :, 5,27,11) = (/&
1130 &5.2353e-01_jprb,5.5799e-01_jprb,4.6451e-01_jprb,3.2979e-01_jprb,6.2244e-01_jprb/)
1131 kbo( :, 1,28,11) = (/&
1132 &1.7670e-01_jprb,1.9079e-01_jprb,1.6081e-01_jprb,1.1550e-01_jprb,3.1173e-01_jprb/)
1133 kbo( :, 2,28,11) = (/&
1134 &2.3816e-01_jprb,2.5545e-01_jprb,2.1349e-01_jprb,1.5165e-01_jprb,3.6015e-01_jprb/)
1135 kbo( :, 3,28,11) = (/&
1136 &3.1046e-01_jprb,3.3329e-01_jprb,2.7692e-01_jprb,1.9535e-01_jprb,4.1203e-01_jprb/)
1137 kbo( :, 4,28,11) = (/&
1138 &3.9421e-01_jprb,4.2355e-01_jprb,3.5226e-01_jprb,2.4753e-01_jprb,4.6881e-01_jprb/)
1139 kbo( :, 5,28,11) = (/&
1140 &4.9113e-01_jprb,5.2757e-01_jprb,4.3988e-01_jprb,3.0817e-01_jprb,5.2989e-01_jprb/)
1141 kbo( :, 1,29,11) = (/&
1142 &1.6843e-01_jprb,1.8154e-01_jprb,1.5154e-01_jprb,1.0767e-01_jprb,2.5441e-01_jprb/)
1143 kbo( :, 2,29,11) = (/&
1144 &2.2466e-01_jprb,2.4270e-01_jprb,2.0190e-01_jprb,1.4201e-01_jprb,2.9556e-01_jprb/)
1145 kbo( :, 3,29,11) = (/&
1146 &2.9126e-01_jprb,3.1537e-01_jprb,2.6232e-01_jprb,1.8387e-01_jprb,3.4113e-01_jprb/)
1147 kbo( :, 4,29,11) = (/&
1148 &3.6983e-01_jprb,4.0011e-01_jprb,3.3340e-01_jprb,2.3338e-01_jprb,3.9100e-01_jprb/)
1149 kbo( :, 5,29,11) = (/&
1150 &4.6101e-01_jprb,4.9867e-01_jprb,4.1663e-01_jprb,2.9053e-01_jprb,4.4464e-01_jprb/)
1151 kbo( :, 1,30,11) = (/&
1152 &1.5959e-01_jprb,1.7262e-01_jprb,1.4374e-01_jprb,1.0130e-01_jprb,2.0471e-01_jprb/)
1153 kbo( :, 2,30,11) = (/&
1154 &2.1115e-01_jprb,2.2963e-01_jprb,1.9116e-01_jprb,1.3421e-01_jprb,2.4020e-01_jprb/)
1155 kbo( :, 3,30,11) = (/&
1156 &2.7360e-01_jprb,2.9740e-01_jprb,2.4795e-01_jprb,1.7403e-01_jprb,2.7968e-01_jprb/)
1157 kbo( :, 4,30,11) = (/&
1158 &3.4764e-01_jprb,3.7756e-01_jprb,3.1549e-01_jprb,2.2070e-01_jprb,3.2281e-01_jprb/)
1159 kbo( :, 5,30,11) = (/&
1160 &4.3440e-01_jprb,4.7219e-01_jprb,3.9465e-01_jprb,2.7465e-01_jprb,3.6896e-01_jprb/)
1161 kbo( :, 1,31,11) = (/&
1162 &1.5091e-01_jprb,1.6391e-01_jprb,1.3645e-01_jprb,9.6278e-02_jprb,1.6289e-01_jprb/)
1163 kbo( :, 2,31,11) = (/&
1164 &1.9931e-01_jprb,2.1721e-01_jprb,1.8079e-01_jprb,1.2771e-01_jprb,1.9309e-01_jprb/)
1165 kbo( :, 3,31,11) = (/&
1166 &2.5821e-01_jprb,2.8109e-01_jprb,2.3449e-01_jprb,1.6502e-01_jprb,2.2676e-01_jprb/)
1167 kbo( :, 4,31,11) = (/&
1168 &3.2875e-01_jprb,3.5829e-01_jprb,2.9898e-01_jprb,2.0919e-01_jprb,2.6370e-01_jprb/)
1169 kbo( :, 5,31,11) = (/&
1170 &4.1157e-01_jprb,4.5002e-01_jprb,3.7499e-01_jprb,2.6064e-01_jprb,3.0365e-01_jprb/)
1171 kbo( :, 1,32,11) = (/&
1172 &1.4350e-01_jprb,1.5577e-01_jprb,1.2948e-01_jprb,9.1911e-02_jprb,1.3126e-01_jprb/)
1173 kbo( :, 2,32,11) = (/&
1174 &1.8927e-01_jprb,2.0591e-01_jprb,1.7137e-01_jprb,1.2148e-01_jprb,1.5712e-01_jprb/)
1175 kbo( :, 3,32,11) = (/&
1176 &2.4542e-01_jprb,2.6745e-01_jprb,2.2265e-01_jprb,1.5686e-01_jprb,1.8606e-01_jprb/)
1177 kbo( :, 4,32,11) = (/&
1178 &3.1299e-01_jprb,3.4211e-01_jprb,2.8464e-01_jprb,1.9879e-01_jprb,2.1776e-01_jprb/)
1179 kbo( :, 5,32,11) = (/&
1180 &3.9189e-01_jprb,4.3154e-01_jprb,3.5784e-01_jprb,2.4869e-01_jprb,2.5261e-01_jprb/)
1181 kbo( :, 1,33,11) = (/&
1182 &1.3727e-01_jprb,1.4838e-01_jprb,1.2325e-01_jprb,8.7723e-02_jprb,1.0656e-01_jprb/)
1183 kbo( :, 2,33,11) = (/&
1184 &1.8110e-01_jprb,1.9647e-01_jprb,1.6322e-01_jprb,1.1562e-01_jprb,1.2867e-01_jprb/)
1185 kbo( :, 3,33,11) = (/&
1186 &2.3493e-01_jprb,2.5633e-01_jprb,2.1260e-01_jprb,1.4945e-01_jprb,1.5344e-01_jprb/)
1187 kbo( :, 4,33,11) = (/&
1188 &2.9930e-01_jprb,3.2911e-01_jprb,2.7241e-01_jprb,1.8991e-01_jprb,1.8112e-01_jprb/)
1189 kbo( :, 5,33,11) = (/&
1190 &3.7491e-01_jprb,4.1658e-01_jprb,3.4340e-01_jprb,2.3867e-01_jprb,2.1188e-01_jprb/)
1191 kbo( :, 1,34,11) = (/&
1192 &1.3092e-01_jprb,1.4094e-01_jprb,1.1667e-01_jprb,8.2911e-02_jprb,8.9471e-02_jprb/)
1193 kbo( :, 2,34,11) = (/&
1194 &1.7283e-01_jprb,1.8720e-01_jprb,1.5498e-01_jprb,1.0945e-01_jprb,1.0879e-01_jprb/)
1195 kbo( :, 3,34,11) = (/&
1196 &2.2423e-01_jprb,2.4508e-01_jprb,2.0247e-01_jprb,1.4175e-01_jprb,1.3067e-01_jprb/)
1197 kbo( :, 4,34,11) = (/&
1198 &2.8568e-01_jprb,3.1613e-01_jprb,2.6022e-01_jprb,1.8119e-01_jprb,1.5551e-01_jprb/)
1199 kbo( :, 5,34,11) = (/&
1200 &3.5836e-01_jprb,4.0157e-01_jprb,3.2942e-01_jprb,2.2886e-01_jprb,1.8335e-01_jprb/)
1201 kbo( :, 1,35,11) = (/&
1202 &1.2228e-01_jprb,1.3118e-01_jprb,1.0815e-01_jprb,7.6480e-02_jprb,7.3770e-02_jprb/)
1203 kbo( :, 2,35,11) = (/&
1204 &1.6172e-01_jprb,1.7516e-01_jprb,1.4419e-01_jprb,1.0138e-01_jprb,9.0532e-02_jprb/)
1205 kbo( :, 3,35,11) = (/&
1206 &2.1005e-01_jprb,2.3024e-01_jprb,1.8936e-01_jprb,1.3212e-01_jprb,1.0977e-01_jprb/)
1207 kbo( :, 4,35,11) = (/&
1208 &2.6823e-01_jprb,2.9837e-01_jprb,2.4450e-01_jprb,1.7010e-01_jprb,1.3152e-01_jprb/)
1209 kbo( :, 5,35,11) = (/&
1210 &3.3803e-01_jprb,3.8069e-01_jprb,3.1151e-01_jprb,2.1623e-01_jprb,1.5639e-01_jprb/)
1211 kbo( :, 1,36,11) = (/&
1212 &1.1127e-01_jprb,1.1902e-01_jprb,9.7790e-02_jprb,6.8652e-02_jprb,5.9294e-02_jprb/)
1213 kbo( :, 2,36,11) = (/&
1214 &1.4779e-01_jprb,1.5991e-01_jprb,1.3100e-01_jprb,9.1678e-02_jprb,7.3428e-02_jprb/)
1215 kbo( :, 3,36,11) = (/&
1216 &1.9248e-01_jprb,2.1152e-01_jprb,1.7310e-01_jprb,1.2044e-01_jprb,8.9931e-02_jprb/)
1217 kbo( :, 4,36,11) = (/&
1218 &2.4698e-01_jprb,2.7546e-01_jprb,2.2513e-01_jprb,1.5635e-01_jprb,1.0865e-01_jprb/)
1219 kbo( :, 5,36,11) = (/&
1220 &3.1312e-01_jprb,3.5357e-01_jprb,2.8900e-01_jprb,2.0028e-01_jprb,1.3007e-01_jprb/)
1221 kbo( :, 1,37,11) = (/&
1222 &9.7171e-02_jprb,1.0370e-01_jprb,8.4930e-02_jprb,5.9132e-02_jprb,4.8800e-02_jprb/)
1223 kbo( :, 2,37,11) = (/&
1224 &1.3022e-01_jprb,1.4042e-01_jprb,1.1467e-01_jprb,7.9788e-02_jprb,6.1101e-02_jprb/)
1225 kbo( :, 3,37,11) = (/&
1226 &1.7053e-01_jprb,1.8732e-01_jprb,1.5267e-01_jprb,1.0592e-01_jprb,7.5549e-02_jprb/)
1227 kbo( :, 4,37,11) = (/&
1228 &2.2021e-01_jprb,2.4584e-01_jprb,2.0025e-01_jprb,1.3887e-01_jprb,9.2123e-02_jprb/)
1229 kbo( :, 5,37,11) = (/&
1230 &2.8142e-01_jprb,3.1806e-01_jprb,2.5954e-01_jprb,1.7970e-01_jprb,1.1114e-01_jprb/)
1231 kbo( :, 1,38,11) = (/&
1232 &8.4750e-02_jprb,9.0447e-02_jprb,7.3862e-02_jprb,5.1024e-02_jprb,4.0120e-02_jprb/)
1233 kbo( :, 2,38,11) = (/&
1234 &1.1472e-01_jprb,1.2347e-01_jprb,1.0053e-01_jprb,6.9437e-02_jprb,5.0776e-02_jprb/)
1235 kbo( :, 3,38,11) = (/&
1236 &1.5136e-01_jprb,1.6607e-01_jprb,1.3499e-01_jprb,9.3219e-02_jprb,6.3385e-02_jprb/)
1237 kbo( :, 4,38,11) = (/&
1238 &1.9680e-01_jprb,2.1978e-01_jprb,1.7847e-01_jprb,1.2347e-01_jprb,7.8006e-02_jprb/)
1239 kbo( :, 5,38,11) = (/&
1240 &2.5341e-01_jprb,2.8675e-01_jprb,2.3338e-01_jprb,1.6145e-01_jprb,9.4840e-02_jprb/)
1241 kbo( :, 1,39,11) = (/&
1242 &7.4011e-02_jprb,7.9191e-02_jprb,6.4478e-02_jprb,4.4207e-02_jprb,3.2805e-02_jprb/)
1243 kbo( :, 2,39,11) = (/&
1244 &1.0122e-01_jprb,1.0907e-01_jprb,8.8541e-02_jprb,6.0759e-02_jprb,4.1971e-02_jprb/)
1245 kbo( :, 3,39,11) = (/&
1246 &1.3478e-01_jprb,1.4779e-01_jprb,1.1992e-01_jprb,8.2325e-02_jprb,5.2901e-02_jprb/)
1247 kbo( :, 4,39,11) = (/&
1248 &1.7660e-01_jprb,1.9727e-01_jprb,1.5986e-01_jprb,1.1017e-01_jprb,6.5730e-02_jprb/)
1249 kbo( :, 5,39,11) = (/&
1250 &2.2909e-01_jprb,2.5986e-01_jprb,2.1074e-01_jprb,1.4557e-01_jprb,8.0505e-02_jprb/)
1251 kbo( :, 1,40,11) = (/&
1252 &6.2473e-02_jprb,6.7073e-02_jprb,5.4566e-02_jprb,3.7187e-02_jprb,2.6885e-02_jprb/)
1253 kbo( :, 2,40,11) = (/&
1254 &8.6606e-02_jprb,9.3644e-02_jprb,7.5801e-02_jprb,5.1661e-02_jprb,3.4836e-02_jprb/)
1255 kbo( :, 3,40,11) = (/&
1256 &1.1680e-01_jprb,1.2799e-01_jprb,1.0372e-01_jprb,7.0693e-02_jprb,4.4368e-02_jprb/)
1257 kbo( :, 4,40,11) = (/&
1258 &1.5470e-01_jprb,1.7247e-01_jprb,1.3960e-01_jprb,9.5679e-02_jprb,5.5687e-02_jprb/)
1259 kbo( :, 5,40,11) = (/&
1260 &2.0237e-01_jprb,2.2977e-01_jprb,1.8573e-01_jprb,1.2793e-01_jprb,6.8850e-02_jprb/)
1261 kbo( :, 1,41,11) = (/&
1262 &5.2446e-02_jprb,5.6507e-02_jprb,4.5959e-02_jprb,3.1195e-02_jprb,2.1948e-02_jprb/)
1263 kbo( :, 2,41,11) = (/&
1264 &7.3701e-02_jprb,8.0111e-02_jprb,6.4714e-02_jprb,4.3819e-02_jprb,2.8834e-02_jprb/)
1265 kbo( :, 3,41,11) = (/&
1266 &1.0076e-01_jprb,1.1070e-01_jprb,8.9512e-02_jprb,6.0576e-02_jprb,3.7158e-02_jprb/)
1267 kbo( :, 4,41,11) = (/&
1268 &1.3508e-01_jprb,1.5057e-01_jprb,1.2175e-01_jprb,8.2892e-02_jprb,4.7100e-02_jprb/)
1269 kbo( :, 5,41,11) = (/&
1270 &1.7854e-01_jprb,2.0269e-01_jprb,1.6356e-01_jprb,1.1214e-01_jprb,5.8823e-02_jprb/)
1271 kbo( :, 1,42,11) = (/&
1272 &4.3993e-02_jprb,4.7543e-02_jprb,3.8628e-02_jprb,2.6175e-02_jprb,1.7822e-02_jprb/)
1273 kbo( :, 2,42,11) = (/&
1274 &6.2618e-02_jprb,6.8461e-02_jprb,5.5301e-02_jprb,3.7217e-02_jprb,2.3728e-02_jprb/)
1275 kbo( :, 3,42,11) = (/&
1276 &8.6814e-02_jprb,9.5948e-02_jprb,7.7328e-02_jprb,5.2009e-02_jprb,3.0953e-02_jprb/)
1277 kbo( :, 4,42,11) = (/&
1278 &1.1793e-01_jprb,1.3165e-01_jprb,1.0635e-01_jprb,7.1967e-02_jprb,3.9679e-02_jprb/)
1279 kbo( :, 5,42,11) = (/&
1280 &1.5767e-01_jprb,1.7909e-01_jprb,1.4430e-01_jprb,9.8414e-02_jprb,5.0031e-02_jprb/)
1281 kbo( :, 1,43,11) = (/&
1282 &3.6051e-02_jprb,3.9068e-02_jprb,3.1700e-02_jprb,2.1500e-02_jprb,1.4336e-02_jprb/)
1283 kbo( :, 2,43,11) = (/&
1284 &5.2131e-02_jprb,5.7262e-02_jprb,4.6240e-02_jprb,3.1003e-02_jprb,1.9367e-02_jprb/)
1285 kbo( :, 3,43,11) = (/&
1286 &7.3341e-02_jprb,8.1590e-02_jprb,6.5706e-02_jprb,4.3880e-02_jprb,2.5604e-02_jprb/)
1287 kbo( :, 4,43,11) = (/&
1288 &1.0113e-01_jprb,1.1336e-01_jprb,9.1355e-02_jprb,6.1391e-02_jprb,3.3210e-02_jprb/)
1289 kbo( :, 5,43,11) = (/&
1290 &1.3704e-01_jprb,1.5566e-01_jprb,1.2530e-01_jprb,8.4984e-02_jprb,4.2357e-02_jprb/)
1291 kbo( :, 1,44,11) = (/&
1292 &2.9153e-02_jprb,3.1689e-02_jprb,2.5651e-02_jprb,1.7398e-02_jprb,1.1452e-02_jprb/)
1293 kbo( :, 2,44,11) = (/&
1294 &4.2894e-02_jprb,4.7271e-02_jprb,3.8161e-02_jprb,2.5559e-02_jprb,1.5702e-02_jprb/)
1295 kbo( :, 3,44,11) = (/&
1296 &6.1316e-02_jprb,6.8606e-02_jprb,5.5241e-02_jprb,3.6706e-02_jprb,2.1051e-02_jprb/)
1297 kbo( :, 4,44,11) = (/&
1298 &8.5809e-02_jprb,9.6811e-02_jprb,7.7867e-02_jprb,5.1972e-02_jprb,2.7643e-02_jprb/)
1299 kbo( :, 5,44,11) = (/&
1300 &1.1804e-01_jprb,1.3427e-01_jprb,1.0805e-01_jprb,7.2832e-02_jprb,3.5698e-02_jprb/)
1301 kbo( :, 1,45,11) = (/&
1302 &2.3474e-02_jprb,2.5620e-02_jprb,2.0683e-02_jprb,1.3992e-02_jprb,9.0872e-03_jprb/)
1303 kbo( :, 2,45,11) = (/&
1304 &3.5168e-02_jprb,3.8884e-02_jprb,3.1357e-02_jprb,2.0998e-02_jprb,1.2650e-02_jprb/)
1305 kbo( :, 3,45,11) = (/&
1306 &5.1125e-02_jprb,5.7479e-02_jprb,4.6268e-02_jprb,3.0685e-02_jprb,1.7188e-02_jprb/)
1307 kbo( :, 4,45,11) = (/&
1308 &7.2642e-02_jprb,8.2540e-02_jprb,6.6385e-02_jprb,4.3982e-02_jprb,2.2878e-02_jprb/)
1309 kbo( :, 5,45,11) = (/&
1310 &1.0141e-01_jprb,1.1593e-01_jprb,9.3129e-02_jprb,6.2384e-02_jprb,2.9912e-02_jprb/)
1311 kbo( :, 1,46,11) = (/&
1312 &1.8622e-02_jprb,2.0419e-02_jprb,1.6446e-02_jprb,1.1089e-02_jprb,7.1508e-03_jprb/)
1313 kbo( :, 2,46,11) = (/&
1314 &2.8465e-02_jprb,3.1591e-02_jprb,2.5425e-02_jprb,1.7003e-02_jprb,1.0100e-02_jprb/)
1315 kbo( :, 3,46,11) = (/&
1316 &4.2115e-02_jprb,4.7558e-02_jprb,3.8296e-02_jprb,2.5381e-02_jprb,1.3928e-02_jprb/)
1317 kbo( :, 4,46,11) = (/&
1318 &6.0884e-02_jprb,6.9606e-02_jprb,5.6000e-02_jprb,3.6888e-02_jprb,1.8798e-02_jprb/)
1319 kbo( :, 5,46,11) = (/&
1320 &8.6271e-02_jprb,9.9295e-02_jprb,7.9645e-02_jprb,5.2994e-02_jprb,2.4873e-02_jprb/)
1321 kbo( :, 1,47,11) = (/&
1322 &1.4376e-02_jprb,1.5849e-02_jprb,1.2756e-02_jprb,8.5637e-03_jprb,5.5846e-03_jprb/)
1323 kbo( :, 2,47,11) = (/&
1324 &2.2523e-02_jprb,2.5091e-02_jprb,2.0133e-02_jprb,1.3433e-02_jprb,8.0135e-03_jprb/)
1325 kbo( :, 3,47,11) = (/&
1326 &3.3987e-02_jprb,3.8521e-02_jprb,3.0971e-02_jprb,2.0498e-02_jprb,1.1217e-02_jprb/)
1327 kbo( :, 4,47,11) = (/&
1328 &4.9995e-02_jprb,5.7475e-02_jprb,4.6271e-02_jprb,3.0427e-02_jprb,1.5354e-02_jprb/)
1329 kbo( :, 5,47,11) = (/&
1330 &7.2095e-02_jprb,8.3553e-02_jprb,6.7099e-02_jprb,4.4249e-02_jprb,2.0567e-02_jprb/)
1331 kbo( :, 1,48,11) = (/&
1332 &1.0948e-02_jprb,1.2187e-02_jprb,9.8197e-03_jprb,6.5686e-03_jprb,4.3309e-03_jprb/)
1333 kbo( :, 2,48,11) = (/&
1334 &1.7678e-02_jprb,1.9773e-02_jprb,1.5847e-02_jprb,1.0523e-02_jprb,6.3196e-03_jprb/)
1335 kbo( :, 3,48,11) = (/&
1336 &2.7272e-02_jprb,3.1035e-02_jprb,2.4886e-02_jprb,1.6427e-02_jprb,8.9753e-03_jprb/)
1337 kbo( :, 4,48,11) = (/&
1338 &4.0847e-02_jprb,4.7231e-02_jprb,3.7989e-02_jprb,2.4968e-02_jprb,1.2435e-02_jprb/)
1339 kbo( :, 5,48,11) = (/&
1340 &5.9943e-02_jprb,6.9928e-02_jprb,5.6261e-02_jprb,3.6863e-02_jprb,1.6884e-02_jprb/)
1341 kbo( :, 1,49,11) = (/&
1342 &8.2227e-03_jprb,9.2751e-03_jprb,7.4918e-03_jprb,4.9857e-03_jprb,3.3179e-03_jprb/)
1343 kbo( :, 2,49,11) = (/&
1344 &1.3710e-02_jprb,1.5461e-02_jprb,1.2382e-02_jprb,8.1837e-03_jprb,4.9416e-03_jprb/)
1345 kbo( :, 3,49,11) = (/&
1346 &2.1752e-02_jprb,2.4824e-02_jprb,1.9870e-02_jprb,1.3064e-02_jprb,7.1199e-03_jprb/)
1347 kbo( :, 4,49,11) = (/&
1348 &3.3202e-02_jprb,3.8592e-02_jprb,3.0992e-02_jprb,2.0326e-02_jprb,9.9895e-03_jprb/)
1349 kbo( :, 5,49,11) = (/&
1350 &4.9564e-02_jprb,5.8206e-02_jprb,4.6898e-02_jprb,3.0661e-02_jprb,1.3734e-02_jprb/)
1351 kbo( :, 1,50,11) = (/&
1352 &6.1915e-03_jprb,7.0808e-03_jprb,5.7341e-03_jprb,3.7933e-03_jprb,2.6014e-03_jprb/)
1353 kbo( :, 2,50,11) = (/&
1354 &1.0634e-02_jprb,1.2140e-02_jprb,9.7185e-03_jprb,6.3965e-03_jprb,3.9374e-03_jprb/)
1355 kbo( :, 3,50,11) = (/&
1356 &1.7391e-02_jprb,1.9945e-02_jprb,1.5955e-02_jprb,1.0445e-02_jprb,5.7678e-03_jprb/)
1357 kbo( :, 4,50,11) = (/&
1358 &2.7125e-02_jprb,3.1701e-02_jprb,2.5413e-02_jprb,1.6599e-02_jprb,8.1975e-03_jprb/)
1359 kbo( :, 5,50,11) = (/&
1360 &4.1193e-02_jprb,4.8726e-02_jprb,3.9234e-02_jprb,2.5636e-02_jprb,1.1392e-02_jprb/)
1361 kbo( :, 1,51,11) = (/&
1362 &4.6415e-03_jprb,5.3779e-03_jprb,4.3645e-03_jprb,2.8762e-03_jprb,2.0670e-03_jprb/)
1363 kbo( :, 2,51,11) = (/&
1364 &8.1982e-03_jprb,9.4964e-03_jprb,7.6128e-03_jprb,4.9899e-03_jprb,3.1638e-03_jprb/)
1365 kbo( :, 3,51,11) = (/&
1366 &1.3839e-02_jprb,1.6014e-02_jprb,1.2808e-02_jprb,8.3362e-03_jprb,4.7173e-03_jprb/)
1367 kbo( :, 4,51,11) = (/&
1368 &2.2155e-02_jprb,2.6015e-02_jprb,2.0833e-02_jprb,1.3537e-02_jprb,6.8071e-03_jprb/)
1369 kbo( :, 5,51,11) = (/&
1370 &3.4266e-02_jprb,4.0819e-02_jprb,3.2809e-02_jprb,2.1399e-02_jprb,9.5494e-03_jprb/)
1371 kbo( :, 1,52,11) = (/&
1372 &3.4450e-03_jprb,4.0419e-03_jprb,3.2822e-03_jprb,2.1593e-03_jprb,1.6475e-03_jprb/)
1373 kbo( :, 2,52,11) = (/&
1374 &6.2508e-03_jprb,7.3537e-03_jprb,5.9181e-03_jprb,3.8603e-03_jprb,2.5371e-03_jprb/)
1375 kbo( :, 3,52,11) = (/&
1376 &1.0900e-02_jprb,1.2773e-02_jprb,1.0216e-02_jprb,6.6126e-03_jprb,3.8348e-03_jprb/)
1377 kbo( :, 4,52,11) = (/&
1378 &1.7975e-02_jprb,2.1233e-02_jprb,1.7001e-02_jprb,1.0994e-02_jprb,5.6303e-03_jprb/)
1379 kbo( :, 5,52,11) = (/&
1380 &2.8375e-02_jprb,3.4038e-02_jprb,2.7332e-02_jprb,1.7744e-02_jprb,7.9843e-03_jprb/)
1381 kbo( :, 1,53,11) = (/&
1382 &2.5331e-03_jprb,3.0017e-03_jprb,2.4368e-03_jprb,1.5998e-03_jprb,1.3193e-03_jprb/)
1383 kbo( :, 2,53,11) = (/&
1384 &4.7088e-03_jprb,5.6274e-03_jprb,4.5483e-03_jprb,2.9549e-03_jprb,2.0294e-03_jprb/)
1385 kbo( :, 3,53,11) = (/&
1386 &8.4774e-03_jprb,1.0097e-02_jprb,8.0775e-03_jprb,5.2092e-03_jprb,3.0959e-03_jprb/)
1387 kbo( :, 4,53,11) = (/&
1388 &1.4441e-02_jprb,1.7209e-02_jprb,1.3780e-02_jprb,8.8745e-03_jprb,4.6172e-03_jprb/)
1389 kbo( :, 5,53,11) = (/&
1390 &2.3385e-02_jprb,2.8212e-02_jprb,2.2650e-02_jprb,1.4615e-02_jprb,6.6511e-03_jprb/)
1391 kbo( :, 1,54,11) = (/&
1392 &1.8954e-03_jprb,2.2607e-03_jprb,1.8278e-03_jprb,1.1946e-03_jprb,1.0985e-03_jprb/)
1393 kbo( :, 2,54,11) = (/&
1394 &3.5862e-03_jprb,4.3471e-03_jprb,3.5189e-03_jprb,2.2822e-03_jprb,1.6895e-03_jprb/)
1395 kbo( :, 3,54,11) = (/&
1396 &6.6312e-03_jprb,8.0424e-03_jprb,6.4523e-03_jprb,4.1406e-03_jprb,2.5940e-03_jprb/)
1397 kbo( :, 4,54,11) = (/&
1398 &1.1671e-02_jprb,1.4089e-02_jprb,1.1281e-02_jprb,7.2279e-03_jprb,3.9122e-03_jprb/)
1399 kbo( :, 5,54,11) = (/&
1400 &1.9432e-02_jprb,2.3598e-02_jprb,1.8940e-02_jprb,1.2154e-02_jprb,5.7337e-03_jprb/)
1401 kbo( :, 1,55,11) = (/&
1402 &1.4290e-03_jprb,1.7125e-03_jprb,1.3776e-03_jprb,8.9347e-04_jprb,9.3784e-04_jprb/)
1403 kbo( :, 2,55,11) = (/&
1404 &2.7457e-03_jprb,3.3623e-03_jprb,2.7182e-03_jprb,1.7597e-03_jprb,1.4453e-03_jprb/)
1405 kbo( :, 3,55,11) = (/&
1406 &5.1874e-03_jprb,6.3979e-03_jprb,5.1511e-03_jprb,3.2930e-03_jprb,2.2221e-03_jprb/)
1407 kbo( :, 4,55,11) = (/&
1408 &9.4226e-03_jprb,1.1550e-02_jprb,9.2557e-03_jprb,5.8990e-03_jprb,3.3851e-03_jprb/)
1409 kbo( :, 5,55,11) = (/&
1410 &1.6150e-02_jprb,1.9777e-02_jprb,1.5877e-02_jprb,1.0138e-02_jprb,5.0396e-03_jprb/)
1411 kbo( :, 1,56,11) = (/&
1412 &1.0680e-03_jprb,1.2890e-03_jprb,1.0316e-03_jprb,6.6446e-04_jprb,8.0430e-04_jprb/)
1413 kbo( :, 2,56,11) = (/&
1414 &2.0978e-03_jprb,2.5858e-03_jprb,2.0823e-03_jprb,1.3442e-03_jprb,1.2456e-03_jprb/)
1415 kbo( :, 3,56,11) = (/&
1416 &4.0301e-03_jprb,5.0435e-03_jprb,4.0770e-03_jprb,2.5996e-03_jprb,1.9142e-03_jprb/)
1417 kbo( :, 4,56,11) = (/&
1418 &7.5402e-03_jprb,9.4035e-03_jprb,7.5479e-03_jprb,4.7898e-03_jprb,2.9393e-03_jprb/)
1419 kbo( :, 5,56,11) = (/&
1420 &1.3330e-02_jprb,1.6498e-02_jprb,1.3248e-02_jprb,8.4281e-03_jprb,4.4305e-03_jprb/)
1421 kbo( :, 1,57,11) = (/&
1422 &7.8801e-04_jprb,9.6289e-04_jprb,7.6691e-04_jprb,4.9097e-04_jprb,6.8859e-04_jprb/)
1423 kbo( :, 2,57,11) = (/&
1424 &1.5966e-03_jprb,1.9777e-03_jprb,1.5840e-03_jprb,1.0164e-03_jprb,1.0803e-03_jprb/)
1425 kbo( :, 3,57,11) = (/&
1426 &3.1118e-03_jprb,3.9473e-03_jprb,3.1938e-03_jprb,2.0343e-03_jprb,1.6622e-03_jprb/)
1427 kbo( :, 4,57,11) = (/&
1428 &5.9752e-03_jprb,7.5907e-03_jprb,6.1119e-03_jprb,3.8625e-03_jprb,2.5583e-03_jprb/)
1429 kbo( :, 5,57,11) = (/&
1430 &1.0909e-02_jprb,1.3694e-02_jprb,1.0990e-02_jprb,6.9630e-03_jprb,3.8987e-03_jprb/)
1431 kbo( :, 1,58,11) = (/&
1432 &5.8173e-04_jprb,7.2041e-04_jprb,5.7279e-04_jprb,3.6474e-04_jprb,5.9355e-04_jprb/)
1433 kbo( :, 2,58,11) = (/&
1434 &1.2258e-03_jprb,1.5249e-03_jprb,1.2145e-03_jprb,7.7245e-04_jprb,9.5456e-04_jprb/)
1435 kbo( :, 3,58,11) = (/&
1436 &2.4241e-03_jprb,3.1044e-03_jprb,2.5087e-03_jprb,1.5934e-03_jprb,1.4697e-03_jprb/)
1437 kbo( :, 4,58,11) = (/&
1438 &4.7512e-03_jprb,6.1351e-03_jprb,4.9587e-03_jprb,3.1245e-03_jprb,2.2636e-03_jprb/)
1439 kbo( :, 5,58,11) = (/&
1440 &8.9451e-03_jprb,1.1404e-02_jprb,9.1570e-03_jprb,5.7752e-03_jprb,3.4844e-03_jprb/)
1441 kbo( :, 1,59,11) = (/&
1442 &5.0522e-04_jprb,6.3041e-04_jprb,4.9923e-04_jprb,3.1529e-04_jprb,5.7581e-04_jprb/)
1443 kbo( :, 2,59,11) = (/&
1444 &1.0885e-03_jprb,1.3595e-03_jprb,1.0775e-03_jprb,6.7742e-04_jprb,9.3929e-04_jprb/)
1445 kbo( :, 3,59,11) = (/&
1446 &2.1758e-03_jprb,2.7928e-03_jprb,2.2487e-03_jprb,1.4181e-03_jprb,1.4518e-03_jprb/)
1447 kbo( :, 4,59,11) = (/&
1448 &4.2933e-03_jprb,5.5813e-03_jprb,4.5166e-03_jprb,2.8320e-03_jprb,2.2456e-03_jprb/)
1449 kbo( :, 5,59,11) = (/&
1450 &8.1802e-03_jprb,1.0526e-02_jprb,8.4597e-03_jprb,5.3170e-03_jprb,3.4840e-03_jprb/)
1451 kbo( :, 1,13,12) = (/&
1452 &7.9228e-01_jprb,6.7739e-01_jprb,5.9851e-01_jprb,4.7753e-01_jprb,2.7637e+00_jprb/)
1453 kbo( :, 2,13,12) = (/&
1454 &1.1298e+00_jprb,9.7146e-01_jprb,8.5148e-01_jprb,6.6642e-01_jprb,2.9701e+00_jprb/)
1455 kbo( :, 3,13,12) = (/&
1456 &1.5315e+00_jprb,1.3283e+00_jprb,1.1586e+00_jprb,8.9312e-01_jprb,3.2188e+00_jprb/)
1457 kbo( :, 4,13,12) = (/&
1458 &1.9944e+00_jprb,1.7422e+00_jprb,1.5174e+00_jprb,1.1641e+00_jprb,3.5302e+00_jprb/)
1459 kbo( :, 5,13,12) = (/&
1460 &2.5089e+00_jprb,2.2052e+00_jprb,1.9170e+00_jprb,1.4741e+00_jprb,3.8622e+00_jprb/)
1461 kbo( :, 1,14,12) = (/&
1462 &8.3949e-01_jprb,7.3093e-01_jprb,6.4746e-01_jprb,4.9215e-01_jprb,2.7289e+00_jprb/)
1463 kbo( :, 2,14,12) = (/&
1464 &1.1838e+00_jprb,1.0392e+00_jprb,9.1530e-01_jprb,6.8593e-01_jprb,2.9374e+00_jprb/)
1465 kbo( :, 3,14,12) = (/&
1466 &1.5936e+00_jprb,1.4080e+00_jprb,1.2362e+00_jprb,9.1792e-01_jprb,3.1661e+00_jprb/)
1467 kbo( :, 4,14,12) = (/&
1468 &2.0618e+00_jprb,1.8318e+00_jprb,1.6006e+00_jprb,1.1951e+00_jprb,3.4133e+00_jprb/)
1469 kbo( :, 5,14,12) = (/&
1470 &2.5782e+00_jprb,2.3016e+00_jprb,2.0067e+00_jprb,1.5032e+00_jprb,3.6330e+00_jprb/)
1471 kbo( :, 1,15,12) = (/&
1472 &8.6850e-01_jprb,7.7816e-01_jprb,6.8988e-01_jprb,5.1142e-01_jprb,2.4839e+00_jprb/)
1473 kbo( :, 2,15,12) = (/&
1474 &1.2152e+00_jprb,1.0938e+00_jprb,9.6727e-01_jprb,7.1145e-01_jprb,2.6794e+00_jprb/)
1475 kbo( :, 3,15,12) = (/&
1476 &1.6231e+00_jprb,1.4682e+00_jprb,1.2912e+00_jprb,9.5405e-01_jprb,2.8636e+00_jprb/)
1477 kbo( :, 4,15,12) = (/&
1478 &2.0833e+00_jprb,1.8933e+00_jprb,1.6562e+00_jprb,1.2315e+00_jprb,3.0203e+00_jprb/)
1479 kbo( :, 5,15,12) = (/&
1480 &2.5907e+00_jprb,2.3660e+00_jprb,2.0692e+00_jprb,1.5407e+00_jprb,3.1955e+00_jprb/)
1481 kbo( :, 1,16,12) = (/&
1482 &8.7903e-01_jprb,8.1154e-01_jprb,7.2017e-01_jprb,5.2966e-01_jprb,2.1487e+00_jprb/)
1483 kbo( :, 2,16,12) = (/&
1484 &1.2196e+00_jprb,1.1290e+00_jprb,9.9867e-01_jprb,7.3589e-01_jprb,2.2979e+00_jprb/)
1485 kbo( :, 3,16,12) = (/&
1486 &1.6158e+00_jprb,1.5020e+00_jprb,1.3215e+00_jprb,9.8028e-01_jprb,2.4332e+00_jprb/)
1487 kbo( :, 4,16,12) = (/&
1488 &2.0608e+00_jprb,1.9258e+00_jprb,1.6884e+00_jprb,1.2547e+00_jprb,2.5777e+00_jprb/)
1489 kbo( :, 5,16,12) = (/&
1490 &2.5444e+00_jprb,2.3922e+00_jprb,2.0979e+00_jprb,1.5613e+00_jprb,2.7073e+00_jprb/)
1491 kbo( :, 1,17,12) = (/&
1492 &8.6797e-01_jprb,8.2657e-01_jprb,7.3338e-01_jprb,5.3823e-01_jprb,1.8450e+00_jprb/)
1493 kbo( :, 2,17,12) = (/&
1494 &1.1929e+00_jprb,1.1407e+00_jprb,1.0074e+00_jprb,7.4525e-01_jprb,1.9691e+00_jprb/)
1495 kbo( :, 3,17,12) = (/&
1496 &1.5694e+00_jprb,1.5051e+00_jprb,1.3270e+00_jprb,9.8535e-01_jprb,2.0903e+00_jprb/)
1497 kbo( :, 4,17,12) = (/&
1498 &1.9886e+00_jprb,1.9165e+00_jprb,1.6896e+00_jprb,1.2533e+00_jprb,2.2071e+00_jprb/)
1499 kbo( :, 5,17,12) = (/&
1500 &2.4525e+00_jprb,2.3619e+00_jprb,2.0849e+00_jprb,1.5524e+00_jprb,2.3229e+00_jprb/)
1501 kbo( :, 1,18,12) = (/&
1502 &8.3385e-01_jprb,8.2168e-01_jprb,7.2749e-01_jprb,5.3649e-01_jprb,1.6234e+00_jprb/)
1503 kbo( :, 2,18,12) = (/&
1504 &1.1389e+00_jprb,1.1231e+00_jprb,9.9306e-01_jprb,7.3634e-01_jprb,1.7307e+00_jprb/)
1505 kbo( :, 3,18,12) = (/&
1506 &1.4887e+00_jprb,1.4739e+00_jprb,1.3034e+00_jprb,9.6635e-01_jprb,1.8435e+00_jprb/)
1507 kbo( :, 4,18,12) = (/&
1508 &1.8815e+00_jprb,1.8634e+00_jprb,1.6522e+00_jprb,1.2254e+00_jprb,1.9484e+00_jprb/)
1509 kbo( :, 5,18,12) = (/&
1510 &2.3106e+00_jprb,2.2920e+00_jprb,2.0285e+00_jprb,1.5162e+00_jprb,2.0551e+00_jprb/)
1511 kbo( :, 1,19,12) = (/&
1512 &7.8530e-01_jprb,7.9679e-01_jprb,7.0528e-01_jprb,5.2265e-01_jprb,1.4533e+00_jprb/)
1513 kbo( :, 2,19,12) = (/&
1514 &1.0644e+00_jprb,1.0830e+00_jprb,9.5920e-01_jprb,7.1045e-01_jprb,1.5651e+00_jprb/)
1515 kbo( :, 3,19,12) = (/&
1516 &1.3856e+00_jprb,1.4087e+00_jprb,1.2542e+00_jprb,9.2677e-01_jprb,1.6748e+00_jprb/)
1517 kbo( :, 4,19,12) = (/&
1518 &1.7452e+00_jprb,1.7745e+00_jprb,1.5782e+00_jprb,1.1737e+00_jprb,1.7839e+00_jprb/)
1519 kbo( :, 5,19,12) = (/&
1520 &2.1398e+00_jprb,2.1794e+00_jprb,1.9373e+00_jprb,1.4553e+00_jprb,1.9023e+00_jprb/)
1521 kbo( :, 1,20,12) = (/&
1522 &7.2778e-01_jprb,7.6194e-01_jprb,6.7390e-01_jprb,5.0077e-01_jprb,1.3617e+00_jprb/)
1523 kbo( :, 2,20,12) = (/&
1524 &9.8068e-01_jprb,1.0262e+00_jprb,9.1245e-01_jprb,6.7491e-01_jprb,1.4807e+00_jprb/)
1525 kbo( :, 3,20,12) = (/&
1526 &1.2722e+00_jprb,1.3293e+00_jprb,1.1831e+00_jprb,8.7574e-01_jprb,1.5966e+00_jprb/)
1527 kbo( :, 4,20,12) = (/&
1528 &1.5991e+00_jprb,1.6714e+00_jprb,1.4853e+00_jprb,1.1090e+00_jprb,1.7163e+00_jprb/)
1529 kbo( :, 5,20,12) = (/&
1530 &1.9535e+00_jprb,2.0500e+00_jprb,1.8231e+00_jprb,1.3754e+00_jprb,1.8494e+00_jprb/)
1531 kbo( :, 1,21,12) = (/&
1532 &6.6504e-01_jprb,7.1378e-01_jprb,6.3305e-01_jprb,4.7002e-01_jprb,1.2946e+00_jprb/)
1533 kbo( :, 2,21,12) = (/&
1534 &8.9278e-01_jprb,9.5693e-01_jprb,8.4967e-01_jprb,6.2960e-01_jprb,1.4170e+00_jprb/)
1535 kbo( :, 3,21,12) = (/&
1536 &1.1553e+00_jprb,1.2382e+00_jprb,1.0968e+00_jprb,8.1599e-01_jprb,1.5400e+00_jprb/)
1537 kbo( :, 4,21,12) = (/&
1538 &1.4482e+00_jprb,1.5551e+00_jprb,1.3761e+00_jprb,1.0330e+00_jprb,1.6737e+00_jprb/)
1539 kbo( :, 5,21,12) = (/&
1540 &1.7635e+00_jprb,1.8984e+00_jprb,1.6920e+00_jprb,1.2782e+00_jprb,1.8148e+00_jprb/)
1541 kbo( :, 1,22,12) = (/&
1542 &6.1409e-01_jprb,6.7210e-01_jprb,5.9517e-01_jprb,4.4205e-01_jprb,1.2140e+00_jprb/)
1543 kbo( :, 2,22,12) = (/&
1544 &8.2009e-01_jprb,8.9690e-01_jprb,7.9134e-01_jprb,5.8900e-01_jprb,1.3388e+00_jprb/)
1545 kbo( :, 3,22,12) = (/&
1546 &1.0573e+00_jprb,1.1562e+00_jprb,1.0170e+00_jprb,7.6239e-01_jprb,1.4674e+00_jprb/)
1547 kbo( :, 4,22,12) = (/&
1548 &1.3173e+00_jprb,1.4441e+00_jprb,1.2773e+00_jprb,9.6111e-01_jprb,1.6103e+00_jprb/)
1549 kbo( :, 5,22,12) = (/&
1550 &1.6008e+00_jprb,1.7593e+00_jprb,1.5714e+00_jprb,1.1859e+00_jprb,1.7554e+00_jprb/)
1551 kbo( :, 1,23,12) = (/&
1552 &5.6489e-01_jprb,6.2643e-01_jprb,5.5181e-01_jprb,4.1055e-01_jprb,1.1296e+00_jprb/)
1553 kbo( :, 2,23,12) = (/&
1554 &7.5136e-01_jprb,8.3205e-01_jprb,7.2882e-01_jprb,5.4587e-01_jprb,1.2556e+00_jprb/)
1555 kbo( :, 3,23,12) = (/&
1556 &9.6147e-01_jprb,1.0673e+00_jprb,9.3622e-01_jprb,7.0474e-01_jprb,1.3939e+00_jprb/)
1557 kbo( :, 4,23,12) = (/&
1558 &1.1945e+00_jprb,1.3292e+00_jprb,1.1758e+00_jprb,8.8540e-01_jprb,1.5380e+00_jprb/)
1559 kbo( :, 5,23,12) = (/&
1560 &1.4498e+00_jprb,1.6203e+00_jprb,1.4443e+00_jprb,1.0897e+00_jprb,1.6879e+00_jprb/)
1561 kbo( :, 1,24,12) = (/&
1562 &5.2019e-01_jprb,5.8108e-01_jprb,5.0714e-01_jprb,3.7894e-01_jprb,1.0335e+00_jprb/)
1563 kbo( :, 2,24,12) = (/&
1564 &6.8678e-01_jprb,7.6753e-01_jprb,6.6836e-01_jprb,5.0261e-01_jprb,1.1623e+00_jprb/)
1565 kbo( :, 3,24,12) = (/&
1566 &8.7490e-01_jprb,9.8000e-01_jprb,8.5888e-01_jprb,6.4559e-01_jprb,1.3047e+00_jprb/)
1567 kbo( :, 4,24,12) = (/&
1568 &1.0855e+00_jprb,1.2194e+00_jprb,1.0757e+00_jprb,8.1029e-01_jprb,1.4513e+00_jprb/)
1569 kbo( :, 5,24,12) = (/&
1570 &1.3195e+00_jprb,1.4875e+00_jprb,1.3176e+00_jprb,9.9617e-01_jprb,1.6042e+00_jprb/)
1571 kbo( :, 1,25,12) = (/&
1572 &4.8125e-01_jprb,5.3776e-01_jprb,4.6543e-01_jprb,3.4920e-01_jprb,9.4296e-01_jprb/)
1573 kbo( :, 2,25,12) = (/&
1574 &6.3062e-01_jprb,7.0671e-01_jprb,6.1374e-01_jprb,4.6025e-01_jprb,1.0786e+00_jprb/)
1575 kbo( :, 3,25,12) = (/&
1576 &8.0138e-01_jprb,8.9961e-01_jprb,7.8690e-01_jprb,5.8999e-01_jprb,1.2219e+00_jprb/)
1577 kbo( :, 4,25,12) = (/&
1578 &9.9501e-01_jprb,1.1200e+00_jprb,9.8131e-01_jprb,7.3979e-01_jprb,1.3746e+00_jprb/)
1579 kbo( :, 5,25,12) = (/&
1580 &1.2133e+00_jprb,1.3690e+00_jprb,1.2002e+00_jprb,9.0848e-01_jprb,1.5310e+00_jprb/)
1581 kbo( :, 1,26,12) = (/&
1582 &4.4718e-01_jprb,5.0045e-01_jprb,4.3026e-01_jprb,3.2190e-01_jprb,8.7401e-01_jprb/)
1583 kbo( :, 2,26,12) = (/&
1584 &5.8377e-01_jprb,6.5329e-01_jprb,5.6669e-01_jprb,4.2222e-01_jprb,1.0132e+00_jprb/)
1585 kbo( :, 3,26,12) = (/&
1586 &7.4225e-01_jprb,8.3122e-01_jprb,7.2142e-01_jprb,5.4093e-01_jprb,1.1599e+00_jprb/)
1587 kbo( :, 4,26,12) = (/&
1588 &9.2576e-01_jprb,1.0363e+00_jprb,8.9875e-01_jprb,6.7651e-01_jprb,1.3150e+00_jprb/)
1589 kbo( :, 5,26,12) = (/&
1590 &1.1359e+00_jprb,1.2689e+00_jprb,1.1003e+00_jprb,8.3128e-01_jprb,1.4725e+00_jprb/)
1591 kbo( :, 1,27,12) = (/&
1592 &4.1742e-01_jprb,4.6589e-01_jprb,4.0014e-01_jprb,2.9607e-01_jprb,8.0311e-01_jprb/)
1593 kbo( :, 2,27,12) = (/&
1594 &5.4534e-01_jprb,6.0694e-01_jprb,5.2254e-01_jprb,3.8814e-01_jprb,9.3748e-01_jprb/)
1595 kbo( :, 3,27,12) = (/&
1596 &6.9705e-01_jprb,7.7317e-01_jprb,6.6432e-01_jprb,4.9566e-01_jprb,1.0808e+00_jprb/)
1597 kbo( :, 4,27,12) = (/&
1598 &8.7421e-01_jprb,9.6588e-01_jprb,8.2816e-01_jprb,6.1915e-01_jprb,1.2270e+00_jprb/)
1599 kbo( :, 5,27,12) = (/&
1600 &1.0783e+00_jprb,1.1900e+00_jprb,1.0151e+00_jprb,7.6356e-01_jprb,1.3781e+00_jprb/)
1601 kbo( :, 1,28,12) = (/&
1602 &3.9237e-01_jprb,4.3515e-01_jprb,3.7248e-01_jprb,2.7305e-01_jprb,7.2280e-01_jprb/)
1603 kbo( :, 2,28,12) = (/&
1604 &5.1563e-01_jprb,5.6757e-01_jprb,4.8403e-01_jprb,3.5700e-01_jprb,8.4677e-01_jprb/)
1605 kbo( :, 3,28,12) = (/&
1606 &6.6308e-01_jprb,7.2519e-01_jprb,6.1590e-01_jprb,4.5472e-01_jprb,9.7710e-01_jprb/)
1607 kbo( :, 4,28,12) = (/&
1608 &8.3646e-01_jprb,9.1152e-01_jprb,7.6997e-01_jprb,5.6988e-01_jprb,1.1096e+00_jprb/)
1609 kbo( :, 5,28,12) = (/&
1610 &1.0359e+00_jprb,1.1276e+00_jprb,9.4962e-01_jprb,7.0526e-01_jprb,1.2485e+00_jprb/)
1611 kbo( :, 1,29,12) = (/&
1612 &3.7279e-01_jprb,4.1014e-01_jprb,3.4774e-01_jprb,2.5341e-01_jprb,6.3269e-01_jprb/)
1613 kbo( :, 2,29,12) = (/&
1614 &4.9283e-01_jprb,5.3769e-01_jprb,4.5233e-01_jprb,3.3021e-01_jprb,7.4294e-01_jprb/)
1615 kbo( :, 3,29,12) = (/&
1616 &6.3731e-01_jprb,6.8994e-01_jprb,5.7780e-01_jprb,4.2070e-01_jprb,8.5678e-01_jprb/)
1617 kbo( :, 4,29,12) = (/&
1618 &8.0637e-01_jprb,8.7025e-01_jprb,7.2644e-01_jprb,5.2908e-01_jprb,9.7595e-01_jprb/)
1619 kbo( :, 5,29,12) = (/&
1620 &9.9943e-01_jprb,1.0813e+00_jprb,9.0128e-01_jprb,6.5866e-01_jprb,1.1019e+00_jprb/)
1621 kbo( :, 1,30,12) = (/&
1622 &3.5722e-01_jprb,3.9080e-01_jprb,3.2710e-01_jprb,2.3601e-01_jprb,5.4037e-01_jprb/)
1623 kbo( :, 2,30,12) = (/&
1624 &4.7448e-01_jprb,5.1429e-01_jprb,4.2783e-01_jprb,3.0716e-01_jprb,6.3503e-01_jprb/)
1625 kbo( :, 3,30,12) = (/&
1626 &6.1439e-01_jprb,6.6308e-01_jprb,5.4920e-01_jprb,3.9345e-01_jprb,7.3381e-01_jprb/)
1627 kbo( :, 4,30,12) = (/&
1628 &7.7644e-01_jprb,8.4062e-01_jprb,6.9350e-01_jprb,4.9782e-01_jprb,8.4010e-01_jprb/)
1629 kbo( :, 5,30,12) = (/&
1630 &9.6226e-01_jprb,1.0478e+00_jprb,8.6468e-01_jprb,6.2256e-01_jprb,9.5398e-01_jprb/)
1631 kbo( :, 1,31,12) = (/&
1632 &3.4498e-01_jprb,3.7545e-01_jprb,3.1150e-01_jprb,2.2122e-01_jprb,4.4905e-01_jprb/)
1633 kbo( :, 2,31,12) = (/&
1634 &4.5820e-01_jprb,4.9653e-01_jprb,4.0983e-01_jprb,2.8888e-01_jprb,5.2917e-01_jprb/)
1635 kbo( :, 3,31,12) = (/&
1636 &5.9170e-01_jprb,6.4378e-01_jprb,5.2810e-01_jprb,3.7284e-01_jprb,6.1590e-01_jprb/)
1637 kbo( :, 4,31,12) = (/&
1638 &7.4787e-01_jprb,8.1835e-01_jprb,6.7064e-01_jprb,4.7448e-01_jprb,7.0953e-01_jprb/)
1639 kbo( :, 5,31,12) = (/&
1640 &9.2776e-01_jprb,1.0238e+00_jprb,8.4020e-01_jprb,5.9540e-01_jprb,8.0850e-01_jprb/)
1641 kbo( :, 1,32,12) = (/&
1642 &3.3387e-01_jprb,3.6397e-01_jprb,2.9979e-01_jprb,2.0962e-01_jprb,3.7307e-01_jprb/)
1643 kbo( :, 2,32,12) = (/&
1644 &4.4163e-01_jprb,4.8363e-01_jprb,3.9607e-01_jprb,2.7594e-01_jprb,4.4216e-01_jprb/)
1645 kbo( :, 3,32,12) = (/&
1646 &5.7015e-01_jprb,6.2876e-01_jprb,5.1363e-01_jprb,3.5765e-01_jprb,5.1788e-01_jprb/)
1647 kbo( :, 4,32,12) = (/&
1648 &7.2141e-01_jprb,8.0151e-01_jprb,6.5517e-01_jprb,4.5717e-01_jprb,6.0016e-01_jprb/)
1649 kbo( :, 5,32,12) = (/&
1650 &8.9922e-01_jprb,1.0062e+00_jprb,8.2407e-01_jprb,5.7459e-01_jprb,6.8536e-01_jprb/)
1651 kbo( :, 1,33,12) = (/&
1652 &3.2293e-01_jprb,3.5547e-01_jprb,2.9093e-01_jprb,2.0149e-01_jprb,3.0917e-01_jprb/)
1653 kbo( :, 2,33,12) = (/&
1654 &4.2627e-01_jprb,4.7355e-01_jprb,3.8619e-01_jprb,2.6640e-01_jprb,3.6920e-01_jprb/)
1655 kbo( :, 3,33,12) = (/&
1656 &5.5058e-01_jprb,6.1665e-01_jprb,5.0346e-01_jprb,3.4679e-01_jprb,4.3505e-01_jprb/)
1657 kbo( :, 4,33,12) = (/&
1658 &6.9980e-01_jprb,7.8852e-01_jprb,6.4475e-01_jprb,4.4442e-01_jprb,5.0488e-01_jprb/)
1659 kbo( :, 5,33,12) = (/&
1660 &8.7592e-01_jprb,9.9390e-01_jprb,8.1496e-01_jprb,5.6029e-01_jprb,5.7746e-01_jprb/)
1661 kbo( :, 1,34,12) = (/&
1662 &3.0940e-01_jprb,3.4528e-01_jprb,2.8156e-01_jprb,1.9363e-01_jprb,2.6611e-01_jprb/)
1663 kbo( :, 2,34,12) = (/&
1664 &4.0894e-01_jprb,4.6074e-01_jprb,3.7565e-01_jprb,2.5763e-01_jprb,3.1938e-01_jprb/)
1665 kbo( :, 3,34,12) = (/&
1666 &5.3041e-01_jprb,6.0251e-01_jprb,4.9185e-01_jprb,3.3679e-01_jprb,3.7762e-01_jprb/)
1667 kbo( :, 4,34,12) = (/&
1668 &6.7786e-01_jprb,7.7350e-01_jprb,6.3399e-01_jprb,4.3276e-01_jprb,4.3880e-01_jprb/)
1669 kbo( :, 5,34,12) = (/&
1670 &8.5216e-01_jprb,9.8050e-01_jprb,8.0443e-01_jprb,5.4758e-01_jprb,5.0384e-01_jprb/)
1671 kbo( :, 1,35,12) = (/&
1672 &2.8939e-01_jprb,3.2702e-01_jprb,2.6622e-01_jprb,1.8249e-01_jprb,2.2426e-01_jprb/)
1673 kbo( :, 2,35,12) = (/&
1674 &3.8432e-01_jprb,4.3860e-01_jprb,3.5768e-01_jprb,2.4461e-01_jprb,2.7044e-01_jprb/)
1675 kbo( :, 3,35,12) = (/&
1676 &5.0227e-01_jprb,5.7687e-01_jprb,4.7133e-01_jprb,3.2156e-01_jprb,3.2047e-01_jprb/)
1677 kbo( :, 4,35,12) = (/&
1678 &6.4522e-01_jprb,7.4630e-01_jprb,6.1202e-01_jprb,4.1516e-01_jprb,3.7356e-01_jprb/)
1679 kbo( :, 5,35,12) = (/&
1680 &8.1623e-01_jprb,9.5325e-01_jprb,7.8163e-01_jprb,5.2821e-01_jprb,4.3272e-01_jprb/)
1681 kbo( :, 1,36,12) = (/&
1682 &2.6330e-01_jprb,3.0070e-01_jprb,2.4442e-01_jprb,1.6757e-01_jprb,1.8310e-01_jprb/)
1683 kbo( :, 2,36,12) = (/&
1684 &3.5255e-01_jprb,4.0667e-01_jprb,3.3144e-01_jprb,2.2644e-01_jprb,2.2200e-01_jprb/)
1685 kbo( :, 3,36,12) = (/&
1686 &4.6468e-01_jprb,5.3948e-01_jprb,4.4110e-01_jprb,3.0012e-01_jprb,2.6412e-01_jprb/)
1687 kbo( :, 4,36,12) = (/&
1688 &6.0155e-01_jprb,7.0486e-01_jprb,5.7783e-01_jprb,3.9058e-01_jprb,3.1002e-01_jprb/)
1689 kbo( :, 5,36,12) = (/&
1690 &7.6703e-01_jprb,9.0873e-01_jprb,7.4457e-01_jprb,5.0060e-01_jprb,3.6395e-01_jprb/)
1691 kbo( :, 1,37,12) = (/&
1692 &2.3001e-01_jprb,2.6442e-01_jprb,2.1459e-01_jprb,1.4727e-01_jprb,1.5536e-01_jprb/)
1693 kbo( :, 2,37,12) = (/&
1694 &3.1096e-01_jprb,3.6197e-01_jprb,2.9461e-01_jprb,2.0129e-01_jprb,1.9004e-01_jprb/)
1695 kbo( :, 3,37,12) = (/&
1696 &4.1431e-01_jprb,4.8589e-01_jprb,3.9700e-01_jprb,2.7000e-01_jprb,2.2800e-01_jprb/)
1697 kbo( :, 4,37,12) = (/&
1698 &5.4226e-01_jprb,6.4266e-01_jprb,5.2665e-01_jprb,3.5524e-01_jprb,2.6910e-01_jprb/)
1699 kbo( :, 5,37,12) = (/&
1700 &6.9841e-01_jprb,8.3797e-01_jprb,6.8663e-01_jprb,4.5963e-01_jprb,3.1774e-01_jprb/)
1701 kbo( :, 1,38,12) = (/&
1702 &2.0134e-01_jprb,2.3227e-01_jprb,1.8814e-01_jprb,1.2935e-01_jprb,1.3137e-01_jprb/)
1703 kbo( :, 2,38,12) = (/&
1704 &2.7468e-01_jprb,3.2208e-01_jprb,2.6174e-01_jprb,1.7891e-01_jprb,1.6217e-01_jprb/)
1705 kbo( :, 3,38,12) = (/&
1706 &3.6956e-01_jprb,4.3776e-01_jprb,3.5733e-01_jprb,2.4289e-01_jprb,1.9623e-01_jprb/)
1707 kbo( :, 4,38,12) = (/&
1708 &4.8896e-01_jprb,5.8640e-01_jprb,4.8002e-01_jprb,3.2349e-01_jprb,2.3300e-01_jprb/)
1709 kbo( :, 5,38,12) = (/&
1710 &6.3666e-01_jprb,7.7346e-01_jprb,6.3380e-01_jprb,4.2286e-01_jprb,2.7663e-01_jprb/)
1711 kbo( :, 1,39,12) = (/&
1712 &1.7697e-01_jprb,2.0467e-01_jprb,1.6540e-01_jprb,1.1386e-01_jprb,1.1007e-01_jprb/)
1713 kbo( :, 2,39,12) = (/&
1714 &2.4368e-01_jprb,2.8735e-01_jprb,2.3319e-01_jprb,1.5947e-01_jprb,1.3719e-01_jprb/)
1715 kbo( :, 3,39,12) = (/&
1716 &3.3092e-01_jprb,3.9580e-01_jprb,3.2268e-01_jprb,2.1918e-01_jprb,1.6720e-01_jprb/)
1717 kbo( :, 4,39,12) = (/&
1718 &4.4249e-01_jprb,5.3699e-01_jprb,4.3914e-01_jprb,2.9552e-01_jprb,1.9987e-01_jprb/)
1719 kbo( :, 5,39,12) = (/&
1720 &5.8226e-01_jprb,7.1600e-01_jprb,5.8709e-01_jprb,3.9058e-01_jprb,2.3879e-01_jprb/)
1721 kbo( :, 1,40,12) = (/&
1722 &1.5084e-01_jprb,1.7449e-01_jprb,1.4045e-01_jprb,9.6794e-02_jprb,9.3392e-02_jprb/)
1723 kbo( :, 2,40,12) = (/&
1724 &2.1010e-01_jprb,2.4822e-01_jprb,2.0097e-01_jprb,1.3766e-01_jprb,1.1767e-01_jprb/)
1725 kbo( :, 3,40,12) = (/&
1726 &2.8835e-01_jprb,3.4716e-01_jprb,2.8248e-01_jprb,1.9197e-01_jprb,1.4495e-01_jprb/)
1727 kbo( :, 4,40,12) = (/&
1728 &3.8988e-01_jprb,4.7789e-01_jprb,3.9037e-01_jprb,2.6261e-01_jprb,1.7468e-01_jprb/)
1729 kbo( :, 5,40,12) = (/&
1730 &5.1945e-01_jprb,6.4586e-01_jprb,5.2903e-01_jprb,3.5162e-01_jprb,2.0975e-01_jprb/)
1731 kbo( :, 1,41,12) = (/&
1732 &1.2817e-01_jprb,1.4829e-01_jprb,1.1887e-01_jprb,8.1840e-02_jprb,7.9057e-02_jprb/)
1733 kbo( :, 2,41,12) = (/&
1734 &1.8060e-01_jprb,2.1362e-01_jprb,1.7247e-01_jprb,1.1830e-01_jprb,1.0081e-01_jprb/)
1735 kbo( :, 3,41,12) = (/&
1736 &2.5080e-01_jprb,3.0334e-01_jprb,2.4634e-01_jprb,1.6753e-01_jprb,1.2548e-01_jprb/)
1737 kbo( :, 4,41,12) = (/&
1738 &3.4280e-01_jprb,4.2376e-01_jprb,3.4586e-01_jprb,2.3251e-01_jprb,1.5256e-01_jprb/)
1739 kbo( :, 5,41,12) = (/&
1740 &4.6230e-01_jprb,5.8070e-01_jprb,4.7518e-01_jprb,3.1572e-01_jprb,1.8431e-01_jprb/)
1741 kbo( :, 1,42,12) = (/&
1742 &1.0893e-01_jprb,1.2613e-01_jprb,1.0083e-01_jprb,6.9157e-02_jprb,6.6394e-02_jprb/)
1743 kbo( :, 2,42,12) = (/&
1744 &1.5547e-01_jprb,1.8415e-01_jprb,1.4803e-01_jprb,1.0161e-01_jprb,8.5777e-02_jprb/)
1745 kbo( :, 3,42,12) = (/&
1746 &2.1846e-01_jprb,2.6502e-01_jprb,2.1486e-01_jprb,1.4627e-01_jprb,1.0794e-01_jprb/)
1747 kbo( :, 4,42,12) = (/&
1748 &3.0198e-01_jprb,3.7587e-01_jprb,3.0638e-01_jprb,2.0583e-01_jprb,1.3247e-01_jprb/)
1749 kbo( :, 5,42,12) = (/&
1750 &4.1199e-01_jprb,5.2225e-01_jprb,4.2709e-01_jprb,2.8351e-01_jprb,1.6111e-01_jprb/)
1751 kbo( :, 1,43,12) = (/&
1752 &9.0638e-02_jprb,1.0503e-01_jprb,8.3795e-02_jprb,5.7071e-02_jprb,5.5354e-02_jprb/)
1753 kbo( :, 2,43,12) = (/&
1754 &1.3131e-01_jprb,1.5548e-01_jprb,1.2458e-01_jprb,8.5364e-02_jprb,7.2576e-02_jprb/)
1755 kbo( :, 3,43,12) = (/&
1756 &1.8681e-01_jprb,2.2707e-01_jprb,1.8347e-01_jprb,1.2501e-01_jprb,9.2538e-02_jprb/)
1757 kbo( :, 4,43,12) = (/&
1758 &2.6160e-01_jprb,3.2672e-01_jprb,2.6595e-01_jprb,1.7876e-01_jprb,1.1500e-01_jprb/)
1759 kbo( :, 5,43,12) = (/&
1760 &3.6120e-01_jprb,4.6097e-01_jprb,3.7669e-01_jprb,2.4999e-01_jprb,1.4075e-01_jprb/)
1761 kbo( :, 1,44,12) = (/&
1762 &7.4518e-02_jprb,8.6409e-02_jprb,6.8952e-02_jprb,4.6577e-02_jprb,4.5787e-02_jprb/)
1763 kbo( :, 2,44,12) = (/&
1764 &1.0975e-01_jprb,1.2994e-01_jprb,1.0385e-01_jprb,7.0835e-02_jprb,6.0976e-02_jprb/)
1765 kbo( :, 3,44,12) = (/&
1766 &1.5828e-01_jprb,1.9250e-01_jprb,1.5506e-01_jprb,1.0558e-01_jprb,7.8936e-02_jprb/)
1767 kbo( :, 4,44,12) = (/&
1768 &2.2471e-01_jprb,2.8098e-01_jprb,2.2821e-01_jprb,1.5365e-01_jprb,9.9460e-02_jprb/)
1769 kbo( :, 5,44,12) = (/&
1770 &3.1406e-01_jprb,4.0269e-01_jprb,3.2871e-01_jprb,2.1813e-01_jprb,1.2276e-01_jprb/)
1771 kbo( :, 1,45,12) = (/&
1772 &6.0927e-02_jprb,7.0888e-02_jprb,5.6604e-02_jprb,3.8007e-02_jprb,3.7451e-02_jprb/)
1773 kbo( :, 2,45,12) = (/&
1774 &9.1562e-02_jprb,1.0848e-01_jprb,8.6563e-02_jprb,5.8638e-02_jprb,5.0739e-02_jprb/)
1775 kbo( :, 3,45,12) = (/&
1776 &1.3401e-01_jprb,1.6305e-01_jprb,1.3093e-01_jprb,8.8909e-02_jprb,6.6645e-02_jprb/)
1777 kbo( :, 4,45,12) = (/&
1778 &1.9278e-01_jprb,2.4132e-01_jprb,1.9538e-01_jprb,1.3171e-01_jprb,8.5195e-02_jprb/)
1779 kbo( :, 5,45,12) = (/&
1780 &2.7301e-01_jprb,3.5087e-01_jprb,2.8599e-01_jprb,1.8994e-01_jprb,1.0627e-01_jprb/)
1781 kbo( :, 1,46,12) = (/&
1782 &4.9049e-02_jprb,5.7390e-02_jprb,4.5841e-02_jprb,3.0652e-02_jprb,3.0244e-02_jprb/)
1783 kbo( :, 2,46,12) = (/&
1784 &7.5395e-02_jprb,8.9544e-02_jprb,7.1479e-02_jprb,4.8016e-02_jprb,4.1812e-02_jprb/)
1785 kbo( :, 3,46,12) = (/&
1786 &1.1243e-01_jprb,1.3673e-01_jprb,1.0940e-01_jprb,7.3992e-02_jprb,5.5802e-02_jprb/)
1787 kbo( :, 4,46,12) = (/&
1788 &1.6385e-01_jprb,2.0515e-01_jprb,1.6554e-01_jprb,1.1163e-01_jprb,7.2384e-02_jprb/)
1789 kbo( :, 5,46,12) = (/&
1790 &2.3535e-01_jprb,3.0228e-01_jprb,2.4596e-01_jprb,1.6359e-01_jprb,9.1350e-02_jprb/)
1791 kbo( :, 1,47,12) = (/&
1792 &3.8455e-02_jprb,4.5311e-02_jprb,3.6191e-02_jprb,2.4099e-02_jprb,2.4180e-02_jprb/)
1793 kbo( :, 2,47,12) = (/&
1794 &6.0543e-02_jprb,7.2219e-02_jprb,5.7752e-02_jprb,3.8501e-02_jprb,3.4153e-02_jprb/)
1795 kbo( :, 3,47,12) = (/&
1796 &9.2469e-02_jprb,1.1229e-01_jprb,8.9649e-02_jprb,6.0326e-02_jprb,4.6448e-02_jprb/)
1797 kbo( :, 4,47,12) = (/&
1798 &1.3689e-01_jprb,1.7102e-01_jprb,1.3750e-01_jprb,9.2547e-02_jprb,6.1214e-02_jprb/)
1799 kbo( :, 5,47,12) = (/&
1800 &1.9927e-01_jprb,2.5535e-01_jprb,2.0704e-01_jprb,1.3818e-01_jprb,7.8425e-02_jprb/)
1801 kbo( :, 1,48,12) = (/&
1802 &2.9907e-02_jprb,3.5538e-02_jprb,2.8349e-02_jprb,1.8781e-02_jprb,1.9054e-02_jprb/)
1803 kbo( :, 2,48,12) = (/&
1804 &4.8228e-02_jprb,5.7904e-02_jprb,4.6345e-02_jprb,3.0764e-02_jprb,2.7466e-02_jprb/)
1805 kbo( :, 3,48,12) = (/&
1806 &7.5470e-02_jprb,9.1806e-02_jprb,7.3317e-02_jprb,4.8995e-02_jprb,3.8151e-02_jprb/)
1807 kbo( :, 4,48,12) = (/&
1808 &1.1406e-01_jprb,1.4204e-01_jprb,1.1383e-01_jprb,7.6343e-02_jprb,5.1172e-02_jprb/)
1809 kbo( :, 5,48,12) = (/&
1810 &1.6822e-01_jprb,2.1497e-01_jprb,1.7372e-01_jprb,1.1607e-01_jprb,6.6629e-02_jprb/)
1811 kbo( :, 1,49,12) = (/&
1812 &2.3084e-02_jprb,2.7602e-02_jprb,2.2043e-02_jprb,1.4515e-02_jprb,1.4700e-02_jprb/)
1813 kbo( :, 2,49,12) = (/&
1814 &3.8134e-02_jprb,4.6138e-02_jprb,3.6932e-02_jprb,2.4422e-02_jprb,2.1696e-02_jprb/)
1815 kbo( :, 3,49,12) = (/&
1816 &6.1053e-02_jprb,7.4691e-02_jprb,5.9743e-02_jprb,3.9618e-02_jprb,3.0784e-02_jprb/)
1817 kbo( :, 4,49,12) = (/&
1818 &9.4624e-02_jprb,1.1747e-01_jprb,9.3906e-02_jprb,6.2717e-02_jprb,4.2057e-02_jprb/)
1819 kbo( :, 5,49,12) = (/&
1820 &1.4162e-01_jprb,1.8031e-01_jprb,1.4520e-01_jprb,9.6951e-02_jprb,5.5665e-02_jprb/)
1821 kbo( :, 1,50,12) = (/&
1822 &1.7880e-02_jprb,2.1522e-02_jprb,1.7193e-02_jprb,1.1281e-02_jprb,1.1563e-02_jprb/)
1823 kbo( :, 2,50,12) = (/&
1824 &3.0304e-02_jprb,3.6988e-02_jprb,2.9594e-02_jprb,1.9489e-02_jprb,1.7511e-02_jprb/)
1825 kbo( :, 3,50,12) = (/&
1826 &4.9620e-02_jprb,6.1130e-02_jprb,4.8990e-02_jprb,3.2313e-02_jprb,2.5345e-02_jprb/)
1827 kbo( :, 4,50,12) = (/&
1828 &7.8794e-02_jprb,9.7813e-02_jprb,7.8198e-02_jprb,5.1943e-02_jprb,3.5298e-02_jprb/)
1829 kbo( :, 5,50,12) = (/&
1830 &1.2010e-01_jprb,1.5227e-01_jprb,1.2229e-01_jprb,8.1438e-02_jprb,4.7462e-02_jprb/)
1831 kbo( :, 1,51,12) = (/&
1832 &1.3778e-02_jprb,1.6753e-02_jprb,1.3366e-02_jprb,8.7587e-03_jprb,9.1691e-03_jprb/)
1833 kbo( :, 2,51,12) = (/&
1834 &2.4068e-02_jprb,2.9598e-02_jprb,2.3720e-02_jprb,1.5531e-02_jprb,1.4241e-02_jprb/)
1835 kbo( :, 3,51,12) = (/&
1836 &4.0319e-02_jprb,5.0023e-02_jprb,4.0146e-02_jprb,2.6379e-02_jprb,2.1041e-02_jprb/)
1837 kbo( :, 4,51,12) = (/&
1838 &6.5444e-02_jprb,8.1559e-02_jprb,6.5274e-02_jprb,4.3107e-02_jprb,2.9808e-02_jprb/)
1839 kbo( :, 5,51,12) = (/&
1840 &1.0193e-01_jprb,1.2878e-01_jprb,1.0316e-01_jprb,6.8485e-02_jprb,4.0764e-02_jprb/)
1841 kbo( :, 1,52,12) = (/&
1842 &1.0503e-02_jprb,1.2908e-02_jprb,1.0296e-02_jprb,6.7391e-03_jprb,7.1632e-03_jprb/)
1843 kbo( :, 2,52,12) = (/&
1844 &1.8963e-02_jprb,2.3514e-02_jprb,1.8863e-02_jprb,1.2292e-02_jprb,1.1416e-02_jprb/)
1845 kbo( :, 3,52,12) = (/&
1846 &3.2574e-02_jprb,4.0763e-02_jprb,3.2692e-02_jprb,2.1413e-02_jprb,1.7232e-02_jprb/)
1847 kbo( :, 4,52,12) = (/&
1848 &5.4015e-02_jprb,6.7725e-02_jprb,5.4297e-02_jprb,3.5648e-02_jprb,2.4880e-02_jprb/)
1849 kbo( :, 5,52,12) = (/&
1850 &8.6142e-02_jprb,1.0850e-01_jprb,8.6783e-02_jprb,5.7412e-02_jprb,3.4604e-02_jprb/)
1851 kbo( :, 1,53,12) = (/&
1852 &7.9034e-03_jprb,9.8239e-03_jprb,7.8369e-03_jprb,5.1248e-03_jprb,5.4843e-03_jprb/)
1853 kbo( :, 2,53,12) = (/&
1854 &1.4792e-02_jprb,1.8526e-02_jprb,1.4847e-02_jprb,9.6585e-03_jprb,8.9798e-03_jprb/)
1855 kbo( :, 3,53,12) = (/&
1856 &2.6145e-02_jprb,3.2976e-02_jprb,2.6454e-02_jprb,1.7260e-02_jprb,1.3880e-02_jprb/)
1857 kbo( :, 4,53,12) = (/&
1858 &4.4324e-02_jprb,5.5900e-02_jprb,4.4894e-02_jprb,2.9345e-02_jprb,2.0450e-02_jprb/)
1859 kbo( :, 5,53,12) = (/&
1860 &7.2259e-02_jprb,9.1031e-02_jprb,7.2836e-02_jprb,4.7964e-02_jprb,2.8899e-02_jprb/)
1861 kbo( :, 1,54,12) = (/&
1862 &6.0030e-03_jprb,7.5343e-03_jprb,6.0206e-03_jprb,3.9269e-03_jprb,4.4374e-03_jprb/)
1863 kbo( :, 2,54,12) = (/&
1864 &1.1626e-02_jprb,1.4746e-02_jprb,1.1801e-02_jprb,7.6733e-03_jprb,7.4644e-03_jprb/)
1865 kbo( :, 3,54,12) = (/&
1866 &2.1204e-02_jprb,2.6932e-02_jprb,2.1639e-02_jprb,1.4058e-02_jprb,1.1820e-02_jprb/)
1867 kbo( :, 4,54,12) = (/&
1868 &3.6734e-02_jprb,4.6630e-02_jprb,3.7473e-02_jprb,2.4399e-02_jprb,1.7746e-02_jprb/)
1869 kbo( :, 5,54,12) = (/&
1870 &6.1048e-02_jprb,7.7176e-02_jprb,6.1839e-02_jprb,4.0517e-02_jprb,2.5474e-02_jprb/)
1871 kbo( :, 1,55,12) = (/&
1872 &4.5630e-03_jprb,5.7681e-03_jprb,4.6205e-03_jprb,3.0002e-03_jprb,3.7045e-03_jprb/)
1873 kbo( :, 2,55,12) = (/&
1874 &9.1273e-03_jprb,1.1728e-02_jprb,9.3956e-03_jprb,6.0945e-03_jprb,6.4077e-03_jprb/)
1875 kbo( :, 3,55,12) = (/&
1876 &1.7191e-02_jprb,2.2039e-02_jprb,1.7711e-02_jprb,1.1469e-02_jprb,1.0390e-02_jprb/)
1877 kbo( :, 4,55,12) = (/&
1878 &3.0517e-02_jprb,3.9009e-02_jprb,3.1321e-02_jprb,2.0350e-02_jprb,1.5909e-02_jprb/)
1879 kbo( :, 5,55,12) = (/&
1880 &5.1680e-02_jprb,6.5618e-02_jprb,5.2649e-02_jprb,3.4345e-02_jprb,2.3231e-02_jprb/)
1881 kbo( :, 1,56,12) = (/&
1882 &3.4429e-03_jprb,4.3693e-03_jprb,3.5102e-03_jprb,2.2664e-03_jprb,3.0972e-03_jprb/)
1883 kbo( :, 2,56,12) = (/&
1884 &7.1067e-03_jprb,9.2412e-03_jprb,7.4106e-03_jprb,4.8010e-03_jprb,5.4938e-03_jprb/)
1885 kbo( :, 3,56,12) = (/&
1886 &1.3838e-02_jprb,1.7926e-02_jprb,1.4393e-02_jprb,9.3102e-03_jprb,9.1167e-03_jprb/)
1887 kbo( :, 4,56,12) = (/&
1888 &2.5226e-02_jprb,3.2470e-02_jprb,2.6067e-02_jprb,1.6890e-02_jprb,1.4253e-02_jprb/)
1889 kbo( :, 5,56,12) = (/&
1890 &4.3555e-02_jprb,5.5559e-02_jprb,4.4639e-02_jprb,2.9008e-02_jprb,2.1194e-02_jprb/)
1891 kbo( :, 1,57,12) = (/&
1892 &2.5835e-03_jprb,3.2792e-03_jprb,2.6340e-03_jprb,1.6928e-03_jprb,2.5979e-03_jprb/)
1893 kbo( :, 2,57,12) = (/&
1894 &5.4818e-03_jprb,7.2018e-03_jprb,5.7860e-03_jprb,3.7399e-03_jprb,4.6938e-03_jprb/)
1895 kbo( :, 3,57,12) = (/&
1896 &1.1045e-02_jprb,1.4477e-02_jprb,1.1615e-02_jprb,7.5071e-03_jprb,7.9880e-03_jprb/)
1897 kbo( :, 4,57,12) = (/&
1898 &2.0734e-02_jprb,2.6855e-02_jprb,2.1584e-02_jprb,1.3939e-02_jprb,1.2771e-02_jprb/)
1899 kbo( :, 5,57,12) = (/&
1900 &3.6531e-02_jprb,4.6834e-02_jprb,3.7641e-02_jprb,2.4391e-02_jprb,1.9328e-02_jprb/)
1901 kbo( :, 1,58,12) = (/&
1902 &1.9554e-03_jprb,2.4805e-03_jprb,1.9815e-03_jprb,1.2675e-03_jprb,2.2311e-03_jprb/)
1903 kbo( :, 2,58,12) = (/&
1904 &4.2406e-03_jprb,5.6194e-03_jprb,4.5251e-03_jprb,2.9142e-03_jprb,4.0751e-03_jprb/)
1905 kbo( :, 3,58,12) = (/&
1906 &8.8253e-03_jprb,1.1715e-02_jprb,9.4049e-03_jprb,6.0687e-03_jprb,7.1082e-03_jprb/)
1907 kbo( :, 4,58,12) = (/&
1908 &1.7081e-02_jprb,2.2294e-02_jprb,1.7921e-02_jprb,1.1542e-02_jprb,1.1601e-02_jprb/)
1909 kbo( :, 5,58,12) = (/&
1910 &3.0768e-02_jprb,3.9661e-02_jprb,3.1853e-02_jprb,2.0599e-02_jprb,1.7860e-02_jprb/)
1911 kbo( :, 1,59,12) = (/&
1912 &1.7311e-03_jprb,2.1950e-03_jprb,1.7464e-03_jprb,1.1095e-03_jprb,2.2810e-03_jprb/)
1913 kbo( :, 2,59,12) = (/&
1914 &3.7867e-03_jprb,5.0375e-03_jprb,4.0622e-03_jprb,2.6050e-03_jprb,4.2229e-03_jprb/)
1915 kbo( :, 3,59,12) = (/&
1916 &7.9927e-03_jprb,1.0691e-02_jprb,8.5872e-03_jprb,5.5330e-03_jprb,7.4637e-03_jprb/)
1917 kbo( :, 4,59,12) = (/&
1918 &1.5706e-02_jprb,2.0603e-02_jprb,1.6559e-02_jprb,1.0653e-02_jprb,1.2338e-02_jprb/)
1919 kbo( :, 5,59,12) = (/&
1920 &2.8614e-02_jprb,3.6995e-02_jprb,2.9703e-02_jprb,1.9191e-02_jprb,1.9178e-02_jprb/)
1921 
1922 
1923 ! -----------------------------------------------------------------
1924 RETURN
1925 END SUBROUTINE rrtm_kgb3_b3
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
subroutine rrtm_kgb3_b3
Definition: rrtm_kgb3_B3.F90:3
real(kind=jprb), dimension(no3) absn2obo
Definition: yoerrto3.F90:20
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