LMDZ
rrtm_kgb3_B2.F90
Go to the documentation of this file.
1 !OCL SCALAR
2 SUBROUTINE rrtm_kgb3_b2
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, 5) = (/&
42 &4.7279e-04_jprb,8.7098e-04_jprb,9.0543e-04_jprb,9.3823e-04_jprb,7.8919e-03_jprb/)
43 kbo( :, 2,13, 5) = (/&
44 &6.4177e-04_jprb,1.1728e-03_jprb,1.1865e-03_jprb,1.1108e-03_jprb,8.6809e-03_jprb/)
45 kbo( :, 3,13, 5) = (/&
46 &8.7771e-04_jprb,1.5520e-03_jprb,1.5457e-03_jprb,1.3624e-03_jprb,9.6358e-03_jprb/)
47 kbo( :, 4,13, 5) = (/&
48 &1.1913e-03_jprb,2.0247e-03_jprb,1.9864e-03_jprb,1.6883e-03_jprb,1.0697e-02_jprb/)
49 kbo( :, 5,13, 5) = (/&
50 &1.5849e-03_jprb,2.6087e-03_jprb,2.5214e-03_jprb,2.0902e-03_jprb,1.1832e-02_jprb/)
51 kbo( :, 1,14, 5) = (/&
52 &3.9797e-04_jprb,7.4264e-04_jprb,7.7131e-04_jprb,7.8917e-04_jprb,6.3875e-03_jprb/)
53 kbo( :, 2,14, 5) = (/&
54 &5.4883e-04_jprb,1.0041e-03_jprb,1.0164e-03_jprb,9.4462e-04_jprb,7.1228e-03_jprb/)
55 kbo( :, 3,14, 5) = (/&
56 &7.5764e-04_jprb,1.3360e-03_jprb,1.3281e-03_jprb,1.1660e-03_jprb,7.9451e-03_jprb/)
57 kbo( :, 4,14, 5) = (/&
58 &1.0318e-03_jprb,1.7525e-03_jprb,1.7145e-03_jprb,1.4506e-03_jprb,8.8337e-03_jprb/)
59 kbo( :, 5,14, 5) = (/&
60 &1.3764e-03_jprb,2.2658e-03_jprb,2.1860e-03_jprb,1.8014e-03_jprb,9.7391e-03_jprb/)
61 kbo( :, 1,15, 5) = (/&
62 &3.3164e-04_jprb,6.3085e-04_jprb,6.5753e-04_jprb,6.6377e-04_jprb,4.8736e-03_jprb/)
63 kbo( :, 2,15, 5) = (/&
64 &4.6431e-04_jprb,8.5791e-04_jprb,8.7041e-04_jprb,8.0246e-04_jprb,5.4864e-03_jprb/)
65 kbo( :, 3,15, 5) = (/&
66 &6.4635e-04_jprb,1.1477e-03_jprb,1.1413e-03_jprb,9.9664e-04_jprb,6.1519e-03_jprb/)
67 kbo( :, 4,15, 5) = (/&
68 &8.8542e-04_jprb,1.5118e-03_jprb,1.4797e-03_jprb,1.2450e-03_jprb,6.8384e-03_jprb/)
69 kbo( :, 5,15, 5) = (/&
70 &1.1860e-03_jprb,1.9607e-03_jprb,1.8917e-03_jprb,1.5514e-03_jprb,7.5330e-03_jprb/)
71 kbo( :, 1,16, 5) = (/&
72 &2.7547e-04_jprb,5.3540e-04_jprb,5.5986e-04_jprb,5.5850e-04_jprb,3.5571e-03_jprb/)
73 kbo( :, 2,16, 5) = (/&
74 &3.9076e-04_jprb,7.3210e-04_jprb,7.4449e-04_jprb,6.8182e-04_jprb,4.0376e-03_jprb/)
75 kbo( :, 3,16, 5) = (/&
76 &5.4914e-04_jprb,9.8388e-04_jprb,9.7975e-04_jprb,8.5148e-04_jprb,4.5400e-03_jprb/)
77 kbo( :, 4,16, 5) = (/&
78 &7.5647e-04_jprb,1.3013e-03_jprb,1.2750e-03_jprb,1.0673e-03_jprb,5.0491e-03_jprb/)
79 kbo( :, 5,16, 5) = (/&
80 &1.0168e-03_jprb,1.6894e-03_jprb,1.6327e-03_jprb,1.3347e-03_jprb,5.5864e-03_jprb/)
81 kbo( :, 1,17, 5) = (/&
82 &2.3152e-04_jprb,4.5640e-04_jprb,4.7753e-04_jprb,4.7152e-04_jprb,2.6479e-03_jprb/)
83 kbo( :, 2,17, 5) = (/&
84 &3.3215e-04_jprb,6.2600e-04_jprb,6.3690e-04_jprb,5.8069e-04_jprb,3.0163e-03_jprb/)
85 kbo( :, 3,17, 5) = (/&
86 &4.6960e-04_jprb,8.4466e-04_jprb,8.4113e-04_jprb,7.2795e-04_jprb,3.3924e-03_jprb/)
87 kbo( :, 4,17, 5) = (/&
88 &6.4890e-04_jprb,1.1190e-03_jprb,1.0981e-03_jprb,9.1560e-04_jprb,3.7876e-03_jprb/)
89 kbo( :, 5,17, 5) = (/&
90 &8.7357e-04_jprb,1.4542e-03_jprb,1.4067e-03_jprb,1.1490e-03_jprb,4.2015e-03_jprb/)
91 kbo( :, 1,18, 5) = (/&
92 &1.9932e-04_jprb,3.9153e-04_jprb,4.0894e-04_jprb,3.9983e-04_jprb,2.0392e-03_jprb/)
93 kbo( :, 2,18, 5) = (/&
94 &2.8740e-04_jprb,5.3802e-04_jprb,5.4670e-04_jprb,4.9548e-04_jprb,2.3218e-03_jprb/)
95 kbo( :, 3,18, 5) = (/&
96 &4.0688e-04_jprb,7.2769e-04_jprb,7.2473e-04_jprb,6.2367e-04_jprb,2.6171e-03_jprb/)
97 kbo( :, 4,18, 5) = (/&
98 &5.6212e-04_jprb,9.6442e-04_jprb,9.4622e-04_jprb,7.8767e-04_jprb,2.9286e-03_jprb/)
99 kbo( :, 5,18, 5) = (/&
100 &7.5657e-04_jprb,1.2523e-03_jprb,1.2126e-03_jprb,9.8987e-04_jprb,3.2584e-03_jprb/)
101 kbo( :, 1,19, 5) = (/&
102 &1.7300e-04_jprb,3.3615e-04_jprb,3.5010e-04_jprb,3.3920e-04_jprb,1.6249e-03_jprb/)
103 kbo( :, 2,19, 5) = (/&
104 &2.4990e-04_jprb,4.6314e-04_jprb,4.6930e-04_jprb,4.2253e-04_jprb,1.8509e-03_jprb/)
105 kbo( :, 3,19, 5) = (/&
106 &3.5374e-04_jprb,6.2681e-04_jprb,6.2354e-04_jprb,5.3462e-04_jprb,2.0903e-03_jprb/)
107 kbo( :, 4,19, 5) = (/&
108 &4.8808e-04_jprb,8.3000e-04_jprb,8.1368e-04_jprb,6.7693e-04_jprb,2.3442e-03_jprb/)
109 kbo( :, 5,19, 5) = (/&
110 &6.5622e-04_jprb,1.0763e-03_jprb,1.0415e-03_jprb,8.5100e-04_jprb,2.6149e-03_jprb/)
111 kbo( :, 1,20, 5) = (/&
112 &1.5202e-04_jprb,2.9089e-04_jprb,3.0118e-04_jprb,2.8847e-04_jprb,1.3195e-03_jprb/)
113 kbo( :, 2,20, 5) = (/&
114 &2.1947e-04_jprb,4.0137e-04_jprb,4.0488e-04_jprb,3.6160e-04_jprb,1.5051e-03_jprb/)
115 kbo( :, 3,20, 5) = (/&
116 &3.1005e-04_jprb,5.4229e-04_jprb,5.3773e-04_jprb,4.5934e-04_jprb,1.7011e-03_jprb/)
117 kbo( :, 4,20, 5) = (/&
118 &4.2687e-04_jprb,7.1641e-04_jprb,7.0062e-04_jprb,5.8213e-04_jprb,1.9126e-03_jprb/)
119 kbo( :, 5,20, 5) = (/&
120 &5.7243e-04_jprb,9.2825e-04_jprb,8.9565e-04_jprb,7.3135e-04_jprb,2.1352e-03_jprb/)
121 kbo( :, 1,21, 5) = (/&
122 &1.3342e-04_jprb,2.5207e-04_jprb,2.5927e-04_jprb,2.4529e-04_jprb,1.0741e-03_jprb/)
123 kbo( :, 2,21, 5) = (/&
124 &1.9233e-04_jprb,3.4753e-04_jprb,3.4906e-04_jprb,3.0934e-04_jprb,1.2262e-03_jprb/)
125 kbo( :, 3,21, 5) = (/&
126 &2.7108e-04_jprb,4.6836e-04_jprb,4.6295e-04_jprb,3.9387e-04_jprb,1.3885e-03_jprb/)
127 kbo( :, 4,21, 5) = (/&
128 &3.7228e-04_jprb,6.1777e-04_jprb,6.0200e-04_jprb,4.9887e-04_jprb,1.5626e-03_jprb/)
129 kbo( :, 5,21, 5) = (/&
130 &4.9911e-04_jprb,7.9951e-04_jprb,7.6864e-04_jprb,6.2637e-04_jprb,1.7443e-03_jprb/)
131 kbo( :, 1,22, 5) = (/&
132 &1.1876e-04_jprb,2.2232e-04_jprb,2.2723e-04_jprb,2.1144e-04_jprb,8.6475e-04_jprb/)
133 kbo( :, 2,22, 5) = (/&
134 &1.7098e-04_jprb,3.0547e-04_jprb,3.0556e-04_jprb,2.6827e-04_jprb,9.8817e-04_jprb/)
135 kbo( :, 3,22, 5) = (/&
136 &2.4024e-04_jprb,4.1043e-04_jprb,4.0412e-04_jprb,3.4171e-04_jprb,1.1213e-03_jprb/)
137 kbo( :, 4,22, 5) = (/&
138 &3.2954e-04_jprb,5.4028e-04_jprb,5.2414e-04_jprb,4.3238e-04_jprb,1.2619e-03_jprb/)
139 kbo( :, 5,22, 5) = (/&
140 &4.4187e-04_jprb,6.9761e-04_jprb,6.6809e-04_jprb,5.4249e-04_jprb,1.4080e-03_jprb/)
141 kbo( :, 1,23, 5) = (/&
142 &1.0533e-04_jprb,1.9573e-04_jprb,1.9910e-04_jprb,1.8269e-04_jprb,6.9257e-04_jprb/)
143 kbo( :, 2,23, 5) = (/&
144 &1.5155e-04_jprb,2.6816e-04_jprb,2.6720e-04_jprb,2.3262e-04_jprb,7.9308e-04_jprb/)
145 kbo( :, 3,23, 5) = (/&
146 &2.1274e-04_jprb,3.5921e-04_jprb,3.5244e-04_jprb,2.9616e-04_jprb,9.0068e-04_jprb/)
147 kbo( :, 4,23, 5) = (/&
148 &2.9190e-04_jprb,4.7191e-04_jprb,4.5593e-04_jprb,3.7445e-04_jprb,1.0136e-03_jprb/)
149 kbo( :, 5,23, 5) = (/&
150 &3.9138e-04_jprb,6.0878e-04_jprb,5.8059e-04_jprb,4.6968e-04_jprb,1.1306e-03_jprb/)
151 kbo( :, 1,24, 5) = (/&
152 &9.2582e-05_jprb,1.7167e-04_jprb,1.7398e-04_jprb,1.5781e-04_jprb,5.4677e-04_jprb/)
153 kbo( :, 2,24, 5) = (/&
154 &1.3344e-04_jprb,2.3456e-04_jprb,2.3315e-04_jprb,2.0139e-04_jprb,6.2782e-04_jprb/)
155 kbo( :, 3,24, 5) = (/&
156 &1.8769e-04_jprb,3.1365e-04_jprb,3.0670e-04_jprb,2.5637e-04_jprb,7.1420e-04_jprb/)
157 kbo( :, 4,24, 5) = (/&
158 &2.5773e-04_jprb,4.1174e-04_jprb,3.9630e-04_jprb,3.2402e-04_jprb,8.0431e-04_jprb/)
159 kbo( :, 5,24, 5) = (/&
160 &3.4549e-04_jprb,5.3124e-04_jprb,5.0449e-04_jprb,4.0653e-04_jprb,8.9759e-04_jprb/)
161 kbo( :, 1,25, 5) = (/&
162 &8.1720e-05_jprb,1.5080e-04_jprb,1.5235e-04_jprb,1.3662e-04_jprb,4.3240e-04_jprb/)
163 kbo( :, 2,25, 5) = (/&
164 &1.1805e-04_jprb,2.0558e-04_jprb,2.0367e-04_jprb,1.7460e-04_jprb,4.9748e-04_jprb/)
165 kbo( :, 3,25, 5) = (/&
166 &1.6632e-04_jprb,2.7459e-04_jprb,2.6746e-04_jprb,2.2227e-04_jprb,5.6662e-04_jprb/)
167 kbo( :, 4,25, 5) = (/&
168 &2.2820e-04_jprb,3.6032e-04_jprb,3.4539e-04_jprb,2.8107e-04_jprb,6.3853e-04_jprb/)
169 kbo( :, 5,25, 5) = (/&
170 &3.0509e-04_jprb,4.6497e-04_jprb,4.3993e-04_jprb,3.5289e-04_jprb,7.1328e-04_jprb/)
171 kbo( :, 1,26, 5) = (/&
172 &7.3023e-05_jprb,1.3337e-04_jprb,1.3413e-04_jprb,1.1892e-04_jprb,3.4584e-04_jprb/)
173 kbo( :, 2,26, 5) = (/&
174 &1.0560e-04_jprb,1.8141e-04_jprb,1.7894e-04_jprb,1.5213e-04_jprb,3.9839e-04_jprb/)
175 kbo( :, 3,26, 5) = (/&
176 &1.4861e-04_jprb,2.4208e-04_jprb,2.3462e-04_jprb,1.9371e-04_jprb,4.5384e-04_jprb/)
177 kbo( :, 4,26, 5) = (/&
178 &2.0313e-04_jprb,3.1741e-04_jprb,3.0291e-04_jprb,2.4516e-04_jprb,5.1150e-04_jprb/)
179 kbo( :, 5,26, 5) = (/&
180 &2.7025e-04_jprb,4.0891e-04_jprb,3.8585e-04_jprb,3.0810e-04_jprb,5.7158e-04_jprb/)
181 kbo( :, 1,27, 5) = (/&
182 &6.5244e-05_jprb,1.1779e-04_jprb,1.1796e-04_jprb,1.0347e-04_jprb,2.7274e-04_jprb/)
183 kbo( :, 2,27, 5) = (/&
184 &9.4317e-05_jprb,1.6003e-04_jprb,1.5711e-04_jprb,1.3251e-04_jprb,3.1462e-04_jprb/)
185 kbo( :, 3,27, 5) = (/&
186 &1.3235e-04_jprb,2.1338e-04_jprb,2.0578e-04_jprb,1.6888e-04_jprb,3.5874e-04_jprb/)
187 kbo( :, 4,27, 5) = (/&
188 &1.7994e-04_jprb,2.7923e-04_jprb,2.6567e-04_jprb,2.1397e-04_jprb,4.0423e-04_jprb/)
189 kbo( :, 5,27, 5) = (/&
190 &2.3815e-04_jprb,3.5878e-04_jprb,3.3808e-04_jprb,2.6908e-04_jprb,4.5194e-04_jprb/)
191 kbo( :, 1,28, 5) = (/&
192 &5.8135e-05_jprb,1.0393e-04_jprb,1.0358e-04_jprb,8.9974e-05_jprb,2.1186e-04_jprb/)
193 kbo( :, 2,28, 5) = (/&
194 &8.3922e-05_jprb,1.4106e-04_jprb,1.3783e-04_jprb,1.1539e-04_jprb,2.4486e-04_jprb/)
195 kbo( :, 3,28, 5) = (/&
196 &1.1719e-04_jprb,1.8771e-04_jprb,1.8042e-04_jprb,1.4725e-04_jprb,2.7921e-04_jprb/)
197 kbo( :, 4,28, 5) = (/&
198 &1.5846e-04_jprb,2.4498e-04_jprb,2.3269e-04_jprb,1.8682e-04_jprb,3.1493e-04_jprb/)
199 kbo( :, 5,28, 5) = (/&
200 &2.0834e-04_jprb,3.1383e-04_jprb,2.9568e-04_jprb,2.3488e-04_jprb,3.5235e-04_jprb/)
201 kbo( :, 1,29, 5) = (/&
202 &5.2156e-05_jprb,9.2110e-05_jprb,9.1288e-05_jprb,7.8487e-05_jprb,1.6379e-04_jprb/)
203 kbo( :, 2,29, 5) = (/&
204 &7.4907e-05_jprb,1.2474e-04_jprb,1.2134e-04_jprb,1.0081e-04_jprb,1.8924e-04_jprb/)
205 kbo( :, 3,29, 5) = (/&
206 &1.0389e-04_jprb,1.6543e-04_jprb,1.5862e-04_jprb,1.2884e-04_jprb,2.1564e-04_jprb/)
207 kbo( :, 4,29, 5) = (/&
208 &1.3949e-04_jprb,2.1507e-04_jprb,2.0416e-04_jprb,1.6349e-04_jprb,2.4336e-04_jprb/)
209 kbo( :, 5,29, 5) = (/&
210 &1.8193e-04_jprb,2.7457e-04_jprb,2.5880e-04_jprb,2.0529e-04_jprb,2.7230e-04_jprb/)
211 kbo( :, 1,30, 5) = (/&
212 &4.6665e-05_jprb,8.1578e-05_jprb,8.0475e-05_jprb,6.8545e-05_jprb,1.2523e-04_jprb/)
213 kbo( :, 2,30, 5) = (/&
214 &6.6590e-05_jprb,1.1011e-04_jprb,1.0677e-04_jprb,8.8175e-05_jprb,1.4448e-04_jprb/)
215 kbo( :, 3,30, 5) = (/&
216 &9.1666e-05_jprb,1.4544e-04_jprb,1.3932e-04_jprb,1.1280e-04_jprb,1.6467e-04_jprb/)
217 kbo( :, 4,30, 5) = (/&
218 &1.2214e-04_jprb,1.8830e-04_jprb,1.7882e-04_jprb,1.4301e-04_jprb,1.8584e-04_jprb/)
219 kbo( :, 5,30, 5) = (/&
220 &1.5808e-04_jprb,2.3937e-04_jprb,2.2601e-04_jprb,1.7927e-04_jprb,2.0804e-04_jprb/)
221 kbo( :, 1,31, 5) = (/&
222 &4.1774e-05_jprb,7.2293e-05_jprb,7.1044e-05_jprb,6.0014e-05_jprb,9.4404e-05_jprb/)
223 kbo( :, 2,31, 5) = (/&
224 &5.9153e-05_jprb,9.7142e-05_jprb,9.4034e-05_jprb,7.7303e-05_jprb,1.0876e-04_jprb/)
225 kbo( :, 3,31, 5) = (/&
226 &8.0749e-05_jprb,1.2773e-04_jprb,1.2231e-04_jprb,9.8861e-05_jprb,1.2383e-04_jprb/)
227 kbo( :, 4,31, 5) = (/&
228 &1.0665e-04_jprb,1.6459e-04_jprb,1.5646e-04_jprb,1.2511e-04_jprb,1.3969e-04_jprb/)
229 kbo( :, 5,31, 5) = (/&
230 &1.3708e-04_jprb,2.0815e-04_jprb,1.9687e-04_jprb,1.5634e-04_jprb,1.5670e-04_jprb/)
231 kbo( :, 1,32, 5) = (/&
232 &3.7360e-05_jprb,6.4042e-05_jprb,6.2763e-05_jprb,5.2674e-05_jprb,7.1295e-05_jprb/)
233 kbo( :, 2,32, 5) = (/&
234 &5.2458e-05_jprb,8.5627e-05_jprb,8.2786e-05_jprb,6.7846e-05_jprb,8.1990e-05_jprb/)
235 kbo( :, 3,32, 5) = (/&
236 &7.0948e-05_jprb,1.1205e-04_jprb,1.0732e-04_jprb,8.6659e-05_jprb,9.3329e-05_jprb/)
237 kbo( :, 4,32, 5) = (/&
238 &9.2912e-05_jprb,1.4361e-04_jprb,1.3667e-04_jprb,1.0937e-04_jprb,1.0550e-04_jprb/)
239 kbo( :, 5,32, 5) = (/&
240 &1.1872e-04_jprb,1.8058e-04_jprb,1.7108e-04_jprb,1.3607e-04_jprb,1.1861e-04_jprb/)
241 kbo( :, 1,33, 5) = (/&
242 &3.3330e-05_jprb,5.6651e-05_jprb,5.5404e-05_jprb,4.6257e-05_jprb,5.3603e-05_jprb/)
243 kbo( :, 2,33, 5) = (/&
244 &4.6366e-05_jprb,7.5365e-05_jprb,7.2815e-05_jprb,5.9541e-05_jprb,6.1709e-05_jprb/)
245 kbo( :, 3,33, 5) = (/&
246 &6.2117e-05_jprb,9.8064e-05_jprb,9.4002e-05_jprb,7.5880e-05_jprb,7.0404e-05_jprb/)
247 kbo( :, 4,33, 5) = (/&
248 &8.0785e-05_jprb,1.2503e-04_jprb,1.1911e-04_jprb,9.5440e-05_jprb,7.9842e-05_jprb/)
249 kbo( :, 5,33, 5) = (/&
250 &1.0266e-04_jprb,1.5642e-04_jprb,1.4831e-04_jprb,1.1813e-04_jprb,8.9956e-05_jprb/)
251 kbo( :, 1,34, 5) = (/&
252 &2.9453e-05_jprb,4.9674e-05_jprb,4.8494e-05_jprb,4.0330e-05_jprb,4.1449e-05_jprb/)
253 kbo( :, 2,34, 5) = (/&
254 &4.0587e-05_jprb,6.5763e-05_jprb,6.3519e-05_jprb,5.1852e-05_jprb,4.7772e-05_jprb/)
255 kbo( :, 3,34, 5) = (/&
256 &5.3941e-05_jprb,8.5109e-05_jprb,8.1613e-05_jprb,6.5908e-05_jprb,5.4645e-05_jprb/)
257 kbo( :, 4,34, 5) = (/&
258 &6.9742e-05_jprb,1.0800e-04_jprb,1.0292e-04_jprb,8.2540e-05_jprb,6.2110e-05_jprb/)
259 kbo( :, 5,34, 5) = (/&
260 &8.8248e-05_jprb,1.3461e-04_jprb,1.2764e-04_jprb,1.0173e-04_jprb,7.0115e-05_jprb/)
261 kbo( :, 1,35, 5) = (/&
262 &2.5087e-05_jprb,4.2259e-05_jprb,4.1255e-05_jprb,3.4275e-05_jprb,3.1533e-05_jprb/)
263 kbo( :, 2,35, 5) = (/&
264 &3.4377e-05_jprb,5.5779e-05_jprb,5.3928e-05_jprb,4.4037e-05_jprb,3.6467e-05_jprb/)
265 kbo( :, 3,35, 5) = (/&
266 &4.5509e-05_jprb,7.1962e-05_jprb,6.9073e-05_jprb,5.5855e-05_jprb,4.1858e-05_jprb/)
267 kbo( :, 4,35, 5) = (/&
268 &5.8672e-05_jprb,9.1085e-05_jprb,8.6867e-05_jprb,6.9736e-05_jprb,4.7718e-05_jprb/)
269 kbo( :, 5,35, 5) = (/&
270 &7.4086e-05_jprb,1.1331e-04_jprb,1.0750e-04_jprb,8.5753e-05_jprb,5.3964e-05_jprb/)
271 kbo( :, 1,36, 5) = (/&
272 &2.0525e-05_jprb,3.4767e-05_jprb,3.4001e-05_jprb,2.8297e-05_jprb,2.3548e-05_jprb/)
273 kbo( :, 2,36, 5) = (/&
274 &2.8104e-05_jprb,4.5872e-05_jprb,4.4441e-05_jprb,3.6357e-05_jprb,2.7355e-05_jprb/)
275 kbo( :, 3,36, 5) = (/&
276 &3.7199e-05_jprb,5.9142e-05_jprb,5.6864e-05_jprb,4.6074e-05_jprb,3.1516e-05_jprb/)
277 kbo( :, 4,36, 5) = (/&
278 &4.7973e-05_jprb,7.4842e-05_jprb,7.1480e-05_jprb,5.7473e-05_jprb,3.6056e-05_jprb/)
279 kbo( :, 5,36, 5) = (/&
280 &6.0589e-05_jprb,9.3078e-05_jprb,8.8416e-05_jprb,7.0645e-05_jprb,4.0905e-05_jprb/)
281 kbo( :, 1,37, 5) = (/&
282 &1.6118e-05_jprb,2.7523e-05_jprb,2.6979e-05_jprb,2.2543e-05_jprb,1.8010e-05_jprb/)
283 kbo( :, 2,37, 5) = (/&
284 &2.2165e-05_jprb,3.6407e-05_jprb,3.5348e-05_jprb,2.9008e-05_jprb,2.0983e-05_jprb/)
285 kbo( :, 3,37, 5) = (/&
286 &2.9444e-05_jprb,4.7055e-05_jprb,4.5326e-05_jprb,3.6808e-05_jprb,2.4249e-05_jprb/)
287 kbo( :, 4,37, 5) = (/&
288 &3.8081e-05_jprb,5.9681e-05_jprb,5.7081e-05_jprb,4.5982e-05_jprb,2.7813e-05_jprb/)
289 kbo( :, 5,37, 5) = (/&
290 &4.8212e-05_jprb,7.4374e-05_jprb,7.0740e-05_jprb,5.6602e-05_jprb,3.1635e-05_jprb/)
291 kbo( :, 1,38, 5) = (/&
292 &1.2610e-05_jprb,2.1718e-05_jprb,2.1343e-05_jprb,1.7908e-05_jprb,1.3720e-05_jprb/)
293 kbo( :, 2,38, 5) = (/&
294 &1.7424e-05_jprb,2.8812e-05_jprb,2.8034e-05_jprb,2.3079e-05_jprb,1.6034e-05_jprb/)
295 kbo( :, 3,38, 5) = (/&
296 &2.3240e-05_jprb,3.7339e-05_jprb,3.6033e-05_jprb,2.9331e-05_jprb,1.8589e-05_jprb/)
297 kbo( :, 4,38, 5) = (/&
298 &3.0149e-05_jprb,4.7476e-05_jprb,4.5479e-05_jprb,3.6700e-05_jprb,2.1382e-05_jprb/)
299 kbo( :, 5,38, 5) = (/&
300 &3.8276e-05_jprb,5.9294e-05_jprb,5.6476e-05_jprb,4.5256e-05_jprb,2.4387e-05_jprb/)
301 kbo( :, 1,39, 5) = (/&
302 &9.8494e-06_jprb,1.7119e-05_jprb,1.6865e-05_jprb,1.4215e-05_jprb,1.0374e-05_jprb/)
303 kbo( :, 2,39, 5) = (/&
304 &1.3680e-05_jprb,2.2781e-05_jprb,2.2215e-05_jprb,1.8350e-05_jprb,1.2167e-05_jprb/)
305 kbo( :, 3,39, 5) = (/&
306 &1.8324e-05_jprb,2.9603e-05_jprb,2.8623e-05_jprb,2.3356e-05_jprb,1.4153e-05_jprb/)
307 kbo( :, 4,39, 5) = (/&
308 &2.3849e-05_jprb,3.7739e-05_jprb,3.6208e-05_jprb,2.9278e-05_jprb,1.6336e-05_jprb/)
309 kbo( :, 5,39, 5) = (/&
310 &3.0362e-05_jprb,4.7240e-05_jprb,4.5057e-05_jprb,3.6164e-05_jprb,1.8690e-05_jprb/)
311 kbo( :, 1,40, 5) = (/&
312 &7.4339e-06_jprb,1.3096e-05_jprb,1.2949e-05_jprb,1.0994e-05_jprb,7.9222e-06_jprb/)
313 kbo( :, 2,40, 5) = (/&
314 &1.0423e-05_jprb,1.7529e-05_jprb,1.7143e-05_jprb,1.4230e-05_jprb,9.3215e-06_jprb/)
315 kbo( :, 3,40, 5) = (/&
316 &1.4064e-05_jprb,2.2897e-05_jprb,2.2194e-05_jprb,1.8169e-05_jprb,1.0878e-05_jprb/)
317 kbo( :, 4,40, 5) = (/&
318 &1.8421e-05_jprb,2.9319e-05_jprb,2.8191e-05_jprb,2.2850e-05_jprb,1.2595e-05_jprb/)
319 kbo( :, 5,40, 5) = (/&
320 &2.3560e-05_jprb,3.6849e-05_jprb,3.5209e-05_jprb,2.8311e-05_jprb,1.4456e-05_jprb/)
321 kbo( :, 1,41, 5) = (/&
322 &5.5704e-06_jprb,9.9619e-06_jprb,9.8891e-06_jprb,8.4654e-06_jprb,6.0394e-06_jprb/)
323 kbo( :, 2,41, 5) = (/&
324 &7.8899e-06_jprb,1.3424e-05_jprb,1.3166e-05_jprb,1.0990e-05_jprb,7.1317e-06_jprb/)
325 kbo( :, 3,41, 5) = (/&
326 &1.0739e-05_jprb,1.7632e-05_jprb,1.7133e-05_jprb,1.4077e-05_jprb,8.3487e-06_jprb/)
327 kbo( :, 4,41, 5) = (/&
328 &1.4162e-05_jprb,2.2683e-05_jprb,2.1860e-05_jprb,1.7767e-05_jprb,9.6986e-06_jprb/)
329 kbo( :, 5,41, 5) = (/&
330 &1.8206e-05_jprb,2.8635e-05_jprb,2.7414e-05_jprb,2.2091e-05_jprb,1.1170e-05_jprb/)
331 kbo( :, 1,42, 5) = (/&
332 &4.1581e-06_jprb,7.5591e-06_jprb,7.5361e-06_jprb,6.5108e-06_jprb,4.5852e-06_jprb/)
333 kbo( :, 2,42, 5) = (/&
334 &5.9538e-06_jprb,1.0259e-05_jprb,1.0094e-05_jprb,8.4784e-06_jprb,5.4324e-06_jprb/)
335 kbo( :, 3,42, 5) = (/&
336 &8.1801e-06_jprb,1.3552e-05_jprb,1.3202e-05_jprb,1.0892e-05_jprb,6.3816e-06_jprb/)
337 kbo( :, 4,42, 5) = (/&
338 &1.0865e-05_jprb,1.7520e-05_jprb,1.6925e-05_jprb,1.3796e-05_jprb,7.4382e-06_jprb/)
339 kbo( :, 5,42, 5) = (/&
340 &1.4044e-05_jprb,2.2222e-05_jprb,2.1312e-05_jprb,1.7215e-05_jprb,8.5974e-06_jprb/)
341 kbo( :, 1,43, 5) = (/&
342 &3.0295e-06_jprb,5.6227e-06_jprb,5.6370e-06_jprb,4.9291e-06_jprb,3.4644e-06_jprb/)
343 kbo( :, 2,43, 5) = (/&
344 &4.3992e-06_jprb,7.7006e-06_jprb,7.6071e-06_jprb,6.4406e-06_jprb,4.1177e-06_jprb/)
345 kbo( :, 3,43, 5) = (/&
346 &6.1168e-06_jprb,1.0248e-05_jprb,1.0014e-05_jprb,8.3065e-06_jprb,4.8541e-06_jprb/)
347 kbo( :, 4,43, 5) = (/&
348 &8.2022e-06_jprb,1.3332e-05_jprb,1.2916e-05_jprb,1.0567e-05_jprb,5.6783e-06_jprb/)
349 kbo( :, 5,43, 5) = (/&
350 &1.0679e-05_jprb,1.7006e-05_jprb,1.6348e-05_jprb,1.3242e-05_jprb,6.5871e-06_jprb/)
351 kbo( :, 1,44, 5) = (/&
352 &2.1752e-06_jprb,4.1354e-06_jprb,4.1745e-06_jprb,3.7028e-06_jprb,2.6072e-06_jprb/)
353 kbo( :, 2,44, 5) = (/&
354 &3.2105e-06_jprb,5.7219e-06_jprb,5.6778e-06_jprb,4.8546e-06_jprb,3.1066e-06_jprb/)
355 kbo( :, 3,44, 5) = (/&
356 &4.5242e-06_jprb,7.6797e-06_jprb,7.5307e-06_jprb,6.2874e-06_jprb,3.6742e-06_jprb/)
357 kbo( :, 4,44, 5) = (/&
358 &6.1342e-06_jprb,1.0065e-05_jprb,9.7795e-06_jprb,8.0353e-06_jprb,4.3146e-06_jprb/)
359 kbo( :, 5,44, 5) = (/&
360 &8.0572e-06_jprb,1.2919e-05_jprb,1.2450e-05_jprb,1.0118e-05_jprb,5.0246e-06_jprb/)
361 kbo( :, 1,45, 5) = (/&
362 &1.5520e-06_jprb,3.0304e-06_jprb,3.0821e-06_jprb,2.7797e-06_jprb,1.9539e-06_jprb/)
363 kbo( :, 2,45, 5) = (/&
364 &2.3304e-06_jprb,4.2364e-06_jprb,4.2250e-06_jprb,3.6531e-06_jprb,2.3326e-06_jprb/)
365 kbo( :, 3,45, 5) = (/&
366 &3.3303e-06_jprb,5.7394e-06_jprb,5.6502e-06_jprb,4.7523e-06_jprb,2.7664e-06_jprb/)
367 kbo( :, 4,45, 5) = (/&
368 &4.5711e-06_jprb,7.5789e-06_jprb,7.3862e-06_jprb,6.0991e-06_jprb,3.2606e-06_jprb/)
369 kbo( :, 5,45, 5) = (/&
370 &6.0612e-06_jprb,9.7914e-06_jprb,9.4635e-06_jprb,7.7174e-06_jprb,3.8129e-06_jprb/)
371 kbo( :, 1,46, 5) = (/&
372 &1.0896e-06_jprb,2.1957e-06_jprb,2.2531e-06_jprb,2.0749e-06_jprb,1.4595e-06_jprb/)
373 kbo( :, 2,46, 5) = (/&
374 &1.6682e-06_jprb,3.1035e-06_jprb,3.1144e-06_jprb,2.7296e-06_jprb,1.7441e-06_jprb/)
375 kbo( :, 3,46, 5) = (/&
376 &2.4227e-06_jprb,4.2500e-06_jprb,4.2020e-06_jprb,3.5671e-06_jprb,2.0729e-06_jprb/)
377 kbo( :, 4,46, 5) = (/&
378 &3.3718e-06_jprb,5.6598e-06_jprb,5.5353e-06_jprb,4.5977e-06_jprb,2.4518e-06_jprb/)
379 kbo( :, 5,46, 5) = (/&
380 &4.5215e-06_jprb,7.3662e-06_jprb,7.1417e-06_jprb,5.8470e-06_jprb,2.8782e-06_jprb/)
381 kbo( :, 1,47, 5) = (/&
382 &7.4469e-07_jprb,1.5605e-06_jprb,1.6200e-06_jprb,1.5335e-06_jprb,1.0893e-06_jprb/)
383 kbo( :, 2,47, 5) = (/&
384 &1.1672e-06_jprb,2.2327e-06_jprb,2.2585e-06_jprb,2.0143e-06_jprb,1.3019e-06_jprb/)
385 kbo( :, 3,47, 5) = (/&
386 &1.7284e-06_jprb,3.0966e-06_jprb,3.0782e-06_jprb,2.6442e-06_jprb,1.5506e-06_jprb/)
387 kbo( :, 4,47, 5) = (/&
388 &2.4447e-06_jprb,4.1671e-06_jprb,4.0916e-06_jprb,3.4253e-06_jprb,1.8389e-06_jprb/)
389 kbo( :, 5,47, 5) = (/&
390 &3.3234e-06_jprb,5.4710e-06_jprb,5.3227e-06_jprb,4.3793e-06_jprb,2.1666e-06_jprb/)
391 kbo( :, 1,48, 5) = (/&
392 &5.0356e-07_jprb,1.1031e-06_jprb,1.1612e-06_jprb,1.1366e-06_jprb,8.1111e-07_jprb/)
393 kbo( :, 2,48, 5) = (/&
394 &8.0967e-07_jprb,1.5982e-06_jprb,1.6316e-06_jprb,1.4855e-06_jprb,9.6803e-07_jprb/)
395 kbo( :, 3,48, 5) = (/&
396 &1.2240e-06_jprb,2.2449e-06_jprb,2.2458e-06_jprb,1.9554e-06_jprb,1.1545e-06_jprb/)
397 kbo( :, 4,48, 5) = (/&
398 &1.7609e-06_jprb,3.0561e-06_jprb,3.0144e-06_jprb,2.5471e-06_jprb,1.3716e-06_jprb/)
399 kbo( :, 5,48, 5) = (/&
400 &2.4302e-06_jprb,4.0500e-06_jprb,3.9537e-06_jprb,3.2729e-06_jprb,1.6214e-06_jprb/)
401 kbo( :, 1,49, 5) = (/&
402 &3.3669e-07_jprb,7.7562e-07_jprb,8.3013e-07_jprb,8.4661e-07_jprb,6.0239e-07_jprb/)
403 kbo( :, 2,49, 5) = (/&
404 &5.5618e-07_jprb,1.1378e-06_jprb,1.1737e-06_jprb,1.0960e-06_jprb,7.1701e-07_jprb/)
405 kbo( :, 3,49, 5) = (/&
406 &8.5966e-07_jprb,1.6189e-06_jprb,1.6315e-06_jprb,1.4432e-06_jprb,8.5489e-07_jprb/)
407 kbo( :, 4,49, 5) = (/&
408 &1.2600e-06_jprb,2.2310e-06_jprb,2.2122e-06_jprb,1.8904e-06_jprb,1.0169e-06_jprb/)
409 kbo( :, 5,49, 5) = (/&
410 &1.7668e-06_jprb,2.9864e-06_jprb,2.9265e-06_jprb,2.4403e-06_jprb,1.2053e-06_jprb/)
411 kbo( :, 1,50, 5) = (/&
412 &2.2597e-07_jprb,5.4865e-07_jprb,5.9834e-07_jprb,6.3972e-07_jprb,4.5578e-07_jprb/)
413 kbo( :, 2,50, 5) = (/&
414 &3.8336e-07_jprb,8.1421e-07_jprb,8.4965e-07_jprb,8.1592e-07_jprb,5.4000e-07_jprb/)
415 kbo( :, 3,50, 5) = (/&
416 &6.0620e-07_jprb,1.1725e-06_jprb,1.1909e-06_jprb,1.0720e-06_jprb,6.4348e-07_jprb/)
417 kbo( :, 4,50, 5) = (/&
418 &9.0494e-07_jprb,1.6354e-06_jprb,1.6304e-06_jprb,1.4100e-06_jprb,7.6597e-07_jprb/)
419 kbo( :, 5,50, 5) = (/&
420 &1.2886e-06_jprb,2.2119e-06_jprb,2.1763e-06_jprb,1.8292e-06_jprb,9.0912e-07_jprb/)
421 kbo( :, 1,51, 5) = (/&
422 &1.5102e-07_jprb,3.8839e-07_jprb,4.3315e-07_jprb,4.8969e-07_jprb,3.4866e-07_jprb/)
423 kbo( :, 2,51, 5) = (/&
424 &2.6341e-07_jprb,5.8277e-07_jprb,6.1614e-07_jprb,6.1112e-07_jprb,4.1018e-07_jprb/)
425 kbo( :, 3,51, 5) = (/&
426 &4.2666e-07_jprb,8.4914e-07_jprb,8.6978e-07_jprb,7.9868e-07_jprb,4.8807e-07_jprb/)
427 kbo( :, 4,51, 5) = (/&
428 &6.4908e-07_jprb,1.1984e-06_jprb,1.2019e-06_jprb,1.0530e-06_jprb,5.8123e-07_jprb/)
429 kbo( :, 5,51, 5) = (/&
430 &9.3904e-07_jprb,1.6385e-06_jprb,1.6190e-06_jprb,1.3734e-06_jprb,6.9028e-07_jprb/)
431 kbo( :, 1,52, 5) = (/&
432 &9.9875e-08_jprb,2.7392e-07_jprb,3.1411e-07_jprb,3.7992e-07_jprb,2.6732e-07_jprb/)
433 kbo( :, 2,52, 5) = (/&
434 &1.7936e-07_jprb,4.1537e-07_jprb,4.4601e-07_jprb,4.6002e-07_jprb,3.1160e-07_jprb/)
435 kbo( :, 3,52, 5) = (/&
436 &2.9800e-07_jprb,6.1230e-07_jprb,6.3323e-07_jprb,5.9558e-07_jprb,3.6937e-07_jprb/)
437 kbo( :, 4,52, 5) = (/&
438 &4.6262e-07_jprb,8.7457e-07_jprb,8.8316e-07_jprb,7.8544e-07_jprb,4.3987e-07_jprb/)
439 kbo( :, 5,52, 5) = (/&
440 &6.8072e-07_jprb,1.2094e-06_jprb,1.2006e-06_jprb,1.0296e-06_jprb,5.2264e-07_jprb/)
441 kbo( :, 1,53, 5) = (/&
442 &6.5343e-08_jprb,1.9251e-07_jprb,2.2851e-07_jprb,2.9947e-07_jprb,2.0556e-07_jprb/)
443 kbo( :, 2,53, 5) = (/&
444 &1.2091e-07_jprb,2.9469e-07_jprb,3.2248e-07_jprb,3.4877e-07_jprb,2.3686e-07_jprb/)
445 kbo( :, 3,53, 5) = (/&
446 &2.0627e-07_jprb,4.3946e-07_jprb,4.5963e-07_jprb,4.4471e-07_jprb,2.7889e-07_jprb/)
447 kbo( :, 4,53, 5) = (/&
448 &3.2743e-07_jprb,6.3522e-07_jprb,6.4653e-07_jprb,5.8508e-07_jprb,3.3168e-07_jprb/)
449 kbo( :, 5,53, 5) = (/&
450 &4.9060e-07_jprb,8.8881e-07_jprb,8.8708e-07_jprb,7.7003e-07_jprb,3.9409e-07_jprb/)
451 kbo( :, 1,54, 5) = (/&
452 &4.3306e-08_jprb,1.3699e-07_jprb,1.6897e-07_jprb,2.4035e-07_jprb,1.6171e-07_jprb/)
453 kbo( :, 2,54, 5) = (/&
454 &8.2182e-08_jprb,2.1109e-07_jprb,2.3589e-07_jprb,2.6887e-07_jprb,1.8465e-07_jprb/)
455 kbo( :, 3,54, 5) = (/&
456 &1.4392e-07_jprb,3.1803e-07_jprb,3.3664e-07_jprb,3.3573e-07_jprb,2.1605e-07_jprb/)
457 kbo( :, 4,54, 5) = (/&
458 &2.3356e-07_jprb,4.6489e-07_jprb,4.7688e-07_jprb,4.3961e-07_jprb,2.5649e-07_jprb/)
459 kbo( :, 5,54, 5) = (/&
460 &3.5601e-07_jprb,6.5756e-07_jprb,6.5990e-07_jprb,5.7981e-07_jprb,3.0495e-07_jprb/)
461 kbo( :, 1,55, 5) = (/&
462 &2.8854e-08_jprb,9.8072e-08_jprb,1.2651e-07_jprb,1.9577e-07_jprb,1.2893e-07_jprb/)
463 kbo( :, 2,55, 5) = (/&
464 &5.5873e-08_jprb,1.5168e-07_jprb,1.7364e-07_jprb,2.1001e-07_jprb,1.4600e-07_jprb/)
465 kbo( :, 3,55, 5) = (/&
466 &1.0041e-07_jprb,2.3068e-07_jprb,2.4750e-07_jprb,2.5542e-07_jprb,1.6992e-07_jprb/)
467 kbo( :, 4,55, 5) = (/&
468 &1.6665e-07_jprb,3.4087e-07_jprb,3.5250e-07_jprb,3.3178e-07_jprb,2.0129e-07_jprb/)
469 kbo( :, 5,55, 5) = (/&
470 &2.5859e-07_jprb,4.8718e-07_jprb,4.9183e-07_jprb,4.3783e-07_jprb,2.3951e-07_jprb/)
471 kbo( :, 1,56, 5) = (/&
472 &1.9183e-08_jprb,7.0296e-08_jprb,9.5958e-08_jprb,1.6166e-07_jprb,1.0324e-07_jprb/)
473 kbo( :, 2,56, 5) = (/&
474 &3.7690e-08_jprb,1.0873e-07_jprb,1.2816e-07_jprb,1.6606e-07_jprb,1.1573e-07_jprb/)
475 kbo( :, 3,56, 5) = (/&
476 &6.9564e-08_jprb,1.6681e-07_jprb,1.8184e-07_jprb,1.9538e-07_jprb,1.3395e-07_jprb/)
477 kbo( :, 4,56, 5) = (/&
478 &1.1817e-07_jprb,2.4912e-07_jprb,2.5998e-07_jprb,2.5068e-07_jprb,1.5820e-07_jprb/)
479 kbo( :, 5,56, 5) = (/&
480 &1.8685e-07_jprb,3.5979e-07_jprb,3.6566e-07_jprb,3.3044e-07_jprb,1.8828e-07_jprb/)
481 kbo( :, 1,57, 5) = (/&
482 &1.2749e-08_jprb,5.0514e-08_jprb,7.4147e-08_jprb,1.3511e-07_jprb,8.3045e-08_jprb/)
483 kbo( :, 2,57, 5) = (/&
484 &2.5237e-08_jprb,7.7785e-08_jprb,9.5012e-08_jprb,1.3300e-07_jprb,9.1992e-08_jprb/)
485 kbo( :, 3,57, 5) = (/&
486 &4.7790e-08_jprb,1.2024e-07_jprb,1.3358e-07_jprb,1.5060e-07_jprb,1.0586e-07_jprb/)
487 kbo( :, 4,57, 5) = (/&
488 &8.3233e-08_jprb,1.8139e-07_jprb,1.9136e-07_jprb,1.8973e-07_jprb,1.2456e-07_jprb/)
489 kbo( :, 5,57, 5) = (/&
490 &1.3430e-07_jprb,2.6480e-07_jprb,2.7113e-07_jprb,2.4926e-07_jprb,1.4817e-07_jprb/)
491 kbo( :, 1,58, 5) = (/&
492 &8.6071e-09_jprb,3.6748e-08_jprb,5.8348e-08_jprb,1.1389e-07_jprb,6.7280e-08_jprb/)
493 kbo( :, 2,58, 5) = (/&
494 &1.7003e-08_jprb,5.6012e-08_jprb,7.1270e-08_jprb,1.0797e-07_jprb,7.3801e-08_jprb/)
495 kbo( :, 3,58, 5) = (/&
496 &3.2884e-08_jprb,8.7017e-08_jprb,9.8797e-08_jprb,1.1752e-07_jprb,8.4329e-08_jprb/)
497 kbo( :, 4,58, 5) = (/&
498 &5.8722e-08_jprb,1.3250e-07_jprb,1.4147e-07_jprb,1.4468e-07_jprb,9.8923e-08_jprb/)
499 kbo( :, 5,58, 5) = (/&
500 &9.6718e-08_jprb,1.9549e-07_jprb,2.0167e-07_jprb,1.8889e-07_jprb,1.1761e-07_jprb/)
501 kbo( :, 1,59, 5) = (/&
502 &6.5762e-09_jprb,2.8839e-08_jprb,4.7240e-08_jprb,9.4281e-08_jprb,5.6347e-08_jprb/)
503 kbo( :, 2,59, 5) = (/&
504 &1.2969e-08_jprb,4.3747e-08_jprb,5.6620e-08_jprb,8.8361e-08_jprb,6.2071e-08_jprb/)
505 kbo( :, 3,59, 5) = (/&
506 &2.5275e-08_jprb,6.8112e-08_jprb,7.8014e-08_jprb,9.4814e-08_jprb,7.1293e-08_jprb/)
507 kbo( :, 4,59, 5) = (/&
508 &4.5565e-08_jprb,1.0415e-07_jprb,1.1172e-07_jprb,1.1566e-07_jprb,8.4152e-08_jprb/)
509 kbo( :, 5,59, 5) = (/&
510 &7.5655e-08_jprb,1.5435e-07_jprb,1.5965e-07_jprb,1.5065e-07_jprb,1.0042e-07_jprb/)
511 kbo( :, 1,13, 6) = (/&
512 &1.4917e-03_jprb,1.8975e-03_jprb,1.8217e-03_jprb,1.6462e-03_jprb,1.5445e-02_jprb/)
513 kbo( :, 2,13, 6) = (/&
514 &2.0332e-03_jprb,2.5878e-03_jprb,2.4581e-03_jprb,2.0975e-03_jprb,1.7016e-02_jprb/)
515 kbo( :, 3,13, 6) = (/&
516 &2.7157e-03_jprb,3.4479e-03_jprb,3.2442e-03_jprb,2.6787e-03_jprb,1.8566e-02_jprb/)
517 kbo( :, 4,13, 6) = (/&
518 &3.5630e-03_jprb,4.4992e-03_jprb,4.2037e-03_jprb,3.3897e-03_jprb,2.0183e-02_jprb/)
519 kbo( :, 5,13, 6) = (/&
520 &4.5925e-03_jprb,5.7651e-03_jprb,5.3543e-03_jprb,4.2359e-03_jprb,2.1919e-02_jprb/)
521 kbo( :, 1,14, 6) = (/&
522 &1.2829e-03_jprb,1.6450e-03_jprb,1.5791e-03_jprb,1.4049e-03_jprb,1.2669e-02_jprb/)
523 kbo( :, 2,14, 6) = (/&
524 &1.7594e-03_jprb,2.2519e-03_jprb,2.1337e-03_jprb,1.8028e-03_jprb,1.3983e-02_jprb/)
525 kbo( :, 3,14, 6) = (/&
526 &2.3660e-03_jprb,3.0125e-03_jprb,2.8248e-03_jprb,2.3088e-03_jprb,1.5340e-02_jprb/)
527 kbo( :, 4,14, 6) = (/&
528 &3.1206e-03_jprb,3.9492e-03_jprb,3.6685e-03_jprb,2.9292e-03_jprb,1.6758e-02_jprb/)
529 kbo( :, 5,14, 6) = (/&
530 &4.0424e-03_jprb,5.0714e-03_jprb,4.6797e-03_jprb,3.6711e-03_jprb,1.8318e-02_jprb/)
531 kbo( :, 1,15, 6) = (/&
532 &1.1010e-03_jprb,1.4255e-03_jprb,1.3650e-03_jprb,1.2017e-03_jprb,9.7184e-03_jprb/)
533 kbo( :, 2,15, 6) = (/&
534 &1.5219e-03_jprb,1.9593e-03_jprb,1.8495e-03_jprb,1.5487e-03_jprb,1.0782e-02_jprb/)
535 kbo( :, 3,15, 6) = (/&
536 &2.0586e-03_jprb,2.6324e-03_jprb,2.4574e-03_jprb,1.9892e-03_jprb,1.1885e-02_jprb/)
537 kbo( :, 4,15, 6) = (/&
538 &2.7279e-03_jprb,3.4587e-03_jprb,3.1990e-03_jprb,2.5317e-03_jprb,1.3076e-02_jprb/)
539 kbo( :, 5,15, 6) = (/&
540 &3.5476e-03_jprb,4.4511e-03_jprb,4.0873e-03_jprb,3.1825e-03_jprb,1.4381e-02_jprb/)
541 kbo( :, 1,16, 6) = (/&
542 &9.4439e-04_jprb,1.2342e-03_jprb,1.1791e-03_jprb,1.0290e-03_jprb,7.0974e-03_jprb/)
543 kbo( :, 2,16, 6) = (/&
544 &1.3152e-03_jprb,1.7038e-03_jprb,1.6038e-03_jprb,1.3320e-03_jprb,7.9219e-03_jprb/)
545 kbo( :, 3,16, 6) = (/&
546 &1.7873e-03_jprb,2.2957e-03_jprb,2.1360e-03_jprb,1.7165e-03_jprb,8.8130e-03_jprb/)
547 kbo( :, 4,16, 6) = (/&
548 &2.3776e-03_jprb,3.0227e-03_jprb,2.7856e-03_jprb,2.1917e-03_jprb,9.7773e-03_jprb/)
549 kbo( :, 5,16, 6) = (/&
550 &3.1042e-03_jprb,3.9007e-03_jprb,3.5645e-03_jprb,2.7609e-03_jprb,1.0823e-02_jprb/)
551 kbo( :, 1,17, 6) = (/&
552 &8.1418e-04_jprb,1.0727e-03_jprb,1.0215e-03_jprb,8.8282e-04_jprb,5.2836e-03_jprb/)
553 kbo( :, 2,17, 6) = (/&
554 &1.1389e-03_jprb,1.4851e-03_jprb,1.3936e-03_jprb,1.1467e-03_jprb,5.9459e-03_jprb/)
555 kbo( :, 3,17, 6) = (/&
556 &1.5530e-03_jprb,2.0047e-03_jprb,1.8586e-03_jprb,1.4830e-03_jprb,6.6722e-03_jprb/)
557 kbo( :, 4,17, 6) = (/&
558 &2.0750e-03_jprb,2.6425e-03_jprb,2.4247e-03_jprb,1.8986e-03_jprb,7.4589e-03_jprb/)
559 kbo( :, 5,17, 6) = (/&
560 &2.7144e-03_jprb,3.4191e-03_jprb,3.1093e-03_jprb,2.3947e-03_jprb,8.3055e-03_jprb/)
561 kbo( :, 1,18, 6) = (/&
562 &7.0743e-04_jprb,9.3753e-04_jprb,8.9000e-04_jprb,7.5959e-04_jprb,4.0718e-03_jprb/)
563 kbo( :, 2,18, 6) = (/&
564 &9.9182e-04_jprb,1.3005e-03_jprb,1.2154e-03_jprb,9.9062e-04_jprb,4.6245e-03_jprb/)
565 kbo( :, 3,18, 6) = (/&
566 &1.3564e-03_jprb,1.7551e-03_jprb,1.6207e-03_jprb,1.2856e-03_jprb,5.2287e-03_jprb/)
567 kbo( :, 4,18, 6) = (/&
568 &1.8159e-03_jprb,2.3174e-03_jprb,2.1151e-03_jprb,1.6469e-03_jprb,5.8797e-03_jprb/)
569 kbo( :, 5,18, 6) = (/&
570 &2.3773e-03_jprb,3.0052e-03_jprb,2.7189e-03_jprb,2.0800e-03_jprb,6.5746e-03_jprb/)
571 kbo( :, 1,19, 6) = (/&
572 &6.1525e-04_jprb,8.1970e-04_jprb,7.7553e-04_jprb,6.5423e-04_jprb,3.2676e-03_jprb/)
573 kbo( :, 2,19, 6) = (/&
574 &8.6391e-04_jprb,1.1368e-03_jprb,1.0592e-03_jprb,8.5683e-04_jprb,3.7402e-03_jprb/)
575 kbo( :, 3,19, 6) = (/&
576 &1.1842e-03_jprb,1.5349e-03_jprb,1.4113e-03_jprb,1.1133e-03_jprb,4.2531e-03_jprb/)
577 kbo( :, 4,19, 6) = (/&
578 &1.5850e-03_jprb,2.0314e-03_jprb,1.8453e-03_jprb,1.4271e-03_jprb,4.8022e-03_jprb/)
579 kbo( :, 5,19, 6) = (/&
580 &2.0738e-03_jprb,2.6347e-03_jprb,2.3756e-03_jprb,1.8073e-03_jprb,5.3894e-03_jprb/)
581 kbo( :, 1,20, 6) = (/&
582 &5.3813e-04_jprb,7.1852e-04_jprb,6.7742e-04_jprb,5.6610e-04_jprb,2.6837e-03_jprb/)
583 kbo( :, 2,20, 6) = (/&
584 &7.5609e-04_jprb,9.9539e-04_jprb,9.2396e-04_jprb,7.4319e-04_jprb,3.0864e-03_jprb/)
585 kbo( :, 3,20, 6) = (/&
586 &1.0360e-03_jprb,1.3460e-03_jprb,1.2317e-03_jprb,9.6600e-04_jprb,3.5220e-03_jprb/)
587 kbo( :, 4,20, 6) = (/&
588 &1.3841e-03_jprb,1.7811e-03_jprb,1.6124e-03_jprb,1.2411e-03_jprb,3.9882e-03_jprb/)
589 kbo( :, 5,20, 6) = (/&
590 &1.8083e-03_jprb,2.3047e-03_jprb,2.0753e-03_jprb,1.5749e-03_jprb,4.4863e-03_jprb/)
591 kbo( :, 1,21, 6) = (/&
592 &4.7047e-04_jprb,6.2774e-04_jprb,5.8945e-04_jprb,4.8888e-04_jprb,2.2094e-03_jprb/)
593 kbo( :, 2,21, 6) = (/&
594 &6.6102e-04_jprb,8.6924e-04_jprb,8.0377e-04_jprb,6.4244e-04_jprb,2.5494e-03_jprb/)
595 kbo( :, 3,21, 6) = (/&
596 &9.0363e-04_jprb,1.1757e-03_jprb,1.0725e-03_jprb,8.3681e-04_jprb,2.9166e-03_jprb/)
597 kbo( :, 4,21, 6) = (/&
598 &1.2048e-03_jprb,1.5526e-03_jprb,1.4031e-03_jprb,1.0775e-03_jprb,3.3103e-03_jprb/)
599 kbo( :, 5,21, 6) = (/&
600 &1.5718e-03_jprb,2.0028e-03_jprb,1.8024e-03_jprb,1.3677e-03_jprb,3.7308e-03_jprb/)
601 kbo( :, 1,22, 6) = (/&
602 &4.1907e-04_jprb,5.5771e-04_jprb,5.2119e-04_jprb,4.2792e-04_jprb,1.8003e-03_jprb/)
603 kbo( :, 2,22, 6) = (/&
604 &5.8671e-04_jprb,7.7133e-04_jprb,7.0998e-04_jprb,5.6325e-04_jprb,2.0828e-03_jprb/)
605 kbo( :, 3,22, 6) = (/&
606 &7.9916e-04_jprb,1.0396e-03_jprb,9.4560e-04_jprb,7.3497e-04_jprb,2.3875e-03_jprb/)
607 kbo( :, 4,22, 6) = (/&
608 &1.0624e-03_jprb,1.3663e-03_jprb,1.2338e-03_jprb,9.4591e-04_jprb,2.7147e-03_jprb/)
609 kbo( :, 5,22, 6) = (/&
610 &1.3828e-03_jprb,1.7569e-03_jprb,1.5791e-03_jprb,1.1986e-03_jprb,3.0625e-03_jprb/)
611 kbo( :, 1,23, 6) = (/&
612 &3.7268e-04_jprb,4.9540e-04_jprb,4.6049e-04_jprb,3.7441e-04_jprb,1.4599e-03_jprb/)
613 kbo( :, 2,23, 6) = (/&
614 &5.1963e-04_jprb,6.8295e-04_jprb,6.2616e-04_jprb,4.9378e-04_jprb,1.6928e-03_jprb/)
615 kbo( :, 3,23, 6) = (/&
616 &7.0552e-04_jprb,9.1627e-04_jprb,8.3118e-04_jprb,6.4434e-04_jprb,1.9439e-03_jprb/)
617 kbo( :, 4,23, 6) = (/&
618 &9.3566e-04_jprb,1.1987e-03_jprb,1.0808e-03_jprb,8.2747e-04_jprb,2.2129e-03_jprb/)
619 kbo( :, 5,23, 6) = (/&
620 &1.2165e-03_jprb,1.5386e-03_jprb,1.3793e-03_jprb,1.0460e-03_jprb,2.4958e-03_jprb/)
621 kbo( :, 1,24, 6) = (/&
622 &3.2966e-04_jprb,4.3876e-04_jprb,4.0641e-04_jprb,3.2767e-04_jprb,1.1682e-03_jprb/)
623 kbo( :, 2,24, 6) = (/&
624 &4.5833e-04_jprb,6.0226e-04_jprb,5.5059e-04_jprb,4.3248e-04_jprb,1.3581e-03_jprb/)
625 kbo( :, 3,24, 6) = (/&
626 &6.2099e-04_jprb,8.0461e-04_jprb,7.2851e-04_jprb,5.6351e-04_jprb,1.5621e-03_jprb/)
627 kbo( :, 4,24, 6) = (/&
628 &8.2193e-04_jprb,1.0497e-03_jprb,9.4428e-04_jprb,7.2199e-04_jprb,1.7793e-03_jprb/)
629 kbo( :, 5,24, 6) = (/&
630 &1.0685e-03_jprb,1.3449e-03_jprb,1.2028e-03_jprb,9.1046e-04_jprb,2.0052e-03_jprb/)
631 kbo( :, 1,25, 6) = (/&
632 &2.9215e-04_jprb,3.8885e-04_jprb,3.5906e-04_jprb,2.8752e-04_jprb,9.3498e-04_jprb/)
633 kbo( :, 2,25, 6) = (/&
634 &4.0498e-04_jprb,5.3121e-04_jprb,4.8436e-04_jprb,3.7925e-04_jprb,1.0888e-03_jprb/)
635 kbo( :, 3,25, 6) = (/&
636 &5.4724e-04_jprb,7.0707e-04_jprb,6.3870e-04_jprb,4.9281e-04_jprb,1.2539e-03_jprb/)
637 kbo( :, 4,25, 6) = (/&
638 &7.2403e-04_jprb,9.2061e-04_jprb,8.2594e-04_jprb,6.2991e-04_jprb,1.4275e-03_jprb/)
639 kbo( :, 5,25, 6) = (/&
640 &9.4207e-04_jprb,1.1779e-03_jprb,1.0503e-03_jprb,7.9277e-04_jprb,1.6058e-03_jprb/)
641 kbo( :, 1,26, 6) = (/&
642 &2.6060e-04_jprb,3.4625e-04_jprb,3.1865e-04_jprb,2.5360e-04_jprb,7.5595e-04_jprb/)
643 kbo( :, 2,26, 6) = (/&
644 &3.5990e-04_jprb,4.7096e-04_jprb,4.2792e-04_jprb,3.3380e-04_jprb,8.8083e-04_jprb/)
645 kbo( :, 3,26, 6) = (/&
646 &4.8540e-04_jprb,6.2457e-04_jprb,5.6257e-04_jprb,4.3260e-04_jprb,1.0137e-03_jprb/)
647 kbo( :, 4,26, 6) = (/&
648 &6.4236e-04_jprb,8.1177e-04_jprb,7.2596e-04_jprb,5.5153e-04_jprb,1.1519e-03_jprb/)
649 kbo( :, 5,26, 6) = (/&
650 &8.3673e-04_jprb,1.0378e-03_jprb,9.2177e-04_jprb,6.9311e-04_jprb,1.2938e-03_jprb/)
651 kbo( :, 1,27, 6) = (/&
652 &2.3167e-04_jprb,3.0750e-04_jprb,2.8206e-04_jprb,2.2335e-04_jprb,6.0157e-04_jprb/)
653 kbo( :, 2,27, 6) = (/&
654 &3.1908e-04_jprb,4.1650e-04_jprb,3.7750e-04_jprb,2.9327e-04_jprb,7.0083e-04_jprb/)
655 kbo( :, 3,27, 6) = (/&
656 &4.3021e-04_jprb,5.5097e-04_jprb,4.9488e-04_jprb,3.7918e-04_jprb,8.0532e-04_jprb/)
657 kbo( :, 4,27, 6) = (/&
658 &5.6999e-04_jprb,7.1551e-04_jprb,6.3770e-04_jprb,4.8255e-04_jprb,9.1424e-04_jprb/)
659 kbo( :, 5,27, 6) = (/&
660 &7.4251e-04_jprb,9.1481e-04_jprb,8.0913e-04_jprb,6.0585e-04_jprb,1.0264e-03_jprb/)
661 kbo( :, 1,28, 6) = (/&
662 &2.0524e-04_jprb,2.7221e-04_jprb,2.4906e-04_jprb,1.9634e-04_jprb,4.7063e-04_jprb/)
663 kbo( :, 2,28, 6) = (/&
664 &2.8255e-04_jprb,3.6755e-04_jprb,3.3244e-04_jprb,2.5733e-04_jprb,5.4784e-04_jprb/)
665 kbo( :, 3,28, 6) = (/&
666 &3.8119e-04_jprb,4.8546e-04_jprb,4.3507e-04_jprb,3.3192e-04_jprb,6.2929e-04_jprb/)
667 kbo( :, 4,28, 6) = (/&
668 &5.0531e-04_jprb,6.3052e-04_jprb,5.6015e-04_jprb,4.2208e-04_jprb,7.1426e-04_jprb/)
669 kbo( :, 5,28, 6) = (/&
670 &6.5768e-04_jprb,8.0589e-04_jprb,7.1092e-04_jprb,5.3007e-04_jprb,8.0182e-04_jprb/)
671 kbo( :, 1,29, 6) = (/&
672 &1.8268e-04_jprb,2.4155e-04_jprb,2.2044e-04_jprb,1.7290e-04_jprb,3.6473e-04_jprb/)
673 kbo( :, 2,29, 6) = (/&
674 &2.5147e-04_jprb,3.2531e-04_jprb,2.9347e-04_jprb,2.2618e-04_jprb,4.2431e-04_jprb/)
675 kbo( :, 3,29, 6) = (/&
676 &3.3930e-04_jprb,4.2940e-04_jprb,3.8351e-04_jprb,2.9136e-04_jprb,4.8729e-04_jprb/)
677 kbo( :, 4,29, 6) = (/&
678 &4.4909e-04_jprb,5.5754e-04_jprb,4.9362e-04_jprb,3.7031e-04_jprb,5.5277e-04_jprb/)
679 kbo( :, 5,29, 6) = (/&
680 &5.8288e-04_jprb,7.1165e-04_jprb,6.2625e-04_jprb,4.6539e-04_jprb,6.2094e-04_jprb/)
681 kbo( :, 1,30, 6) = (/&
682 &1.6275e-04_jprb,2.1427e-04_jprb,1.9492e-04_jprb,1.5221e-04_jprb,2.7882e-04_jprb/)
683 kbo( :, 2,30, 6) = (/&
684 &2.2397e-04_jprb,2.8807e-04_jprb,2.5905e-04_jprb,1.9884e-04_jprb,3.2464e-04_jprb/)
685 kbo( :, 3,30, 6) = (/&
686 &3.0173e-04_jprb,3.8020e-04_jprb,3.3838e-04_jprb,2.5591e-04_jprb,3.7279e-04_jprb/)
687 kbo( :, 4,30, 6) = (/&
688 &3.9835e-04_jprb,4.9290e-04_jprb,4.3523e-04_jprb,3.2539e-04_jprb,4.2318e-04_jprb/)
689 kbo( :, 5,30, 6) = (/&
690 &5.1512e-04_jprb,6.2814e-04_jprb,5.5236e-04_jprb,4.0928e-04_jprb,4.7644e-04_jprb/)
691 kbo( :, 1,31, 6) = (/&
692 &1.4541e-04_jprb,1.9050e-04_jprb,1.7269e-04_jprb,1.3415e-04_jprb,2.0988e-04_jprb/)
693 kbo( :, 2,31, 6) = (/&
694 &1.9968e-04_jprb,2.5579e-04_jprb,2.2917e-04_jprb,1.7504e-04_jprb,2.4454e-04_jprb/)
695 kbo( :, 3,31, 6) = (/&
696 &2.6831e-04_jprb,3.3713e-04_jprb,2.9924e-04_jprb,2.2534e-04_jprb,2.8116e-04_jprb/)
697 kbo( :, 4,31, 6) = (/&
698 &3.5296e-04_jprb,4.3603e-04_jprb,3.8460e-04_jprb,2.8657e-04_jprb,3.1971e-04_jprb/)
699 kbo( :, 5,31, 6) = (/&
700 &4.5385e-04_jprb,5.5422e-04_jprb,4.8747e-04_jprb,3.6051e-04_jprb,3.6033e-04_jprb/)
701 kbo( :, 1,32, 6) = (/&
702 &1.3012e-04_jprb,1.6979e-04_jprb,1.5332e-04_jprb,1.1846e-04_jprb,1.5858e-04_jprb/)
703 kbo( :, 2,32, 6) = (/&
704 &1.7811e-04_jprb,2.2758e-04_jprb,2.0328e-04_jprb,1.5447e-04_jprb,1.8500e-04_jprb/)
705 kbo( :, 3,32, 6) = (/&
706 &2.3846e-04_jprb,2.9920e-04_jprb,2.6508e-04_jprb,1.9890e-04_jprb,2.1289e-04_jprb/)
707 kbo( :, 4,32, 6) = (/&
708 &3.1195e-04_jprb,3.8579e-04_jprb,3.4029e-04_jprb,2.5305e-04_jprb,2.4226e-04_jprb/)
709 kbo( :, 5,32, 6) = (/&
710 &3.9831e-04_jprb,4.8846e-04_jprb,4.3040e-04_jprb,3.1815e-04_jprb,2.7351e-04_jprb/)
711 kbo( :, 1,33, 6) = (/&
712 &1.1634e-04_jprb,1.5147e-04_jprb,1.3636e-04_jprb,1.0475e-04_jprb,1.1978e-04_jprb/)
713 kbo( :, 2,33, 6) = (/&
714 &1.5863e-04_jprb,2.0248e-04_jprb,1.8050e-04_jprb,1.3665e-04_jprb,1.3973e-04_jprb/)
715 kbo( :, 3,33, 6) = (/&
716 &2.1137e-04_jprb,2.6530e-04_jprb,2.3496e-04_jprb,1.7592e-04_jprb,1.6087e-04_jprb/)
717 kbo( :, 4,33, 6) = (/&
718 &2.7467e-04_jprb,3.4079e-04_jprb,3.0109e-04_jprb,2.2372e-04_jprb,1.8344e-04_jprb/)
719 kbo( :, 5,33, 6) = (/&
720 &3.4782e-04_jprb,4.2919e-04_jprb,3.7950e-04_jprb,2.8080e-04_jprb,2.0757e-04_jprb/)
721 kbo( :, 1,34, 6) = (/&
722 &1.0312e-04_jprb,1.3408e-04_jprb,1.2041e-04_jprb,9.2110e-05_jprb,9.2903e-05_jprb/)
723 kbo( :, 2,34, 6) = (/&
724 &1.4008e-04_jprb,1.7871e-04_jprb,1.5914e-04_jprb,1.2016e-04_jprb,1.0831e-04_jprb/)
725 kbo( :, 3,34, 6) = (/&
726 &1.8556e-04_jprb,2.3329e-04_jprb,2.0678e-04_jprb,1.5464e-04_jprb,1.2476e-04_jprb/)
727 kbo( :, 4,34, 6) = (/&
728 &2.3939e-04_jprb,2.9833e-04_jprb,2.6429e-04_jprb,1.9649e-04_jprb,1.4248e-04_jprb/)
729 kbo( :, 5,34, 6) = (/&
730 &3.0117e-04_jprb,3.7373e-04_jprb,3.3162e-04_jprb,2.4605e-04_jprb,1.6152e-04_jprb/)
731 kbo( :, 1,35, 6) = (/&
732 &8.8443e-05_jprb,1.1512e-04_jprb,1.0336e-04_jprb,7.8950e-05_jprb,7.0684e-05_jprb/)
733 kbo( :, 2,35, 6) = (/&
734 &1.1985e-04_jprb,1.5327e-04_jprb,1.3658e-04_jprb,1.0311e-04_jprb,8.2504e-05_jprb/)
735 kbo( :, 3,35, 6) = (/&
736 &1.5813e-04_jprb,1.9962e-04_jprb,1.7734e-04_jprb,1.3276e-04_jprb,9.5244e-05_jprb/)
737 kbo( :, 4,35, 6) = (/&
738 &2.0303e-04_jprb,2.5445e-04_jprb,2.2617e-04_jprb,1.6859e-04_jprb,1.0907e-04_jprb/)
739 kbo( :, 5,35, 6) = (/&
740 &2.5457e-04_jprb,3.1764e-04_jprb,2.8275e-04_jprb,2.1067e-04_jprb,1.2401e-04_jprb/)
741 kbo( :, 1,36, 6) = (/&
742 &7.3105e-05_jprb,9.5553e-05_jprb,8.5894e-05_jprb,6.5665e-05_jprb,5.2586e-05_jprb/)
743 kbo( :, 2,36, 6) = (/&
744 &9.9088e-05_jprb,1.2731e-04_jprb,1.1366e-04_jprb,8.5950e-05_jprb,6.1603e-05_jprb/)
745 kbo( :, 3,36, 6) = (/&
746 &1.3052e-04_jprb,1.6575e-04_jprb,1.4766e-04_jprb,1.1085e-04_jprb,7.1395e-05_jprb/)
747 kbo( :, 4,36, 6) = (/&
748 &1.6737e-04_jprb,2.1100e-04_jprb,1.8817e-04_jprb,1.4082e-04_jprb,8.2060e-05_jprb/)
749 kbo( :, 5,36, 6) = (/&
750 &2.0971e-04_jprb,2.6328e-04_jprb,2.3482e-04_jprb,1.7583e-04_jprb,9.3616e-05_jprb/)
751 kbo( :, 1,37, 6) = (/&
752 &5.7964e-05_jprb,7.6160e-05_jprb,6.8576e-05_jprb,5.2541e-05_jprb,4.0073e-05_jprb/)
753 kbo( :, 2,37, 6) = (/&
754 &7.8834e-05_jprb,1.0183e-04_jprb,9.1063e-05_jprb,6.9045e-05_jprb,4.7111e-05_jprb/)
755 kbo( :, 3,37, 6) = (/&
756 &1.0412e-04_jprb,1.3294e-04_jprb,1.1864e-04_jprb,8.9322e-05_jprb,5.4770e-05_jprb/)
757 kbo( :, 4,37, 6) = (/&
758 &1.3382e-04_jprb,1.6952e-04_jprb,1.5143e-04_jprb,1.1374e-04_jprb,6.3134e-05_jprb/)
759 kbo( :, 5,37, 6) = (/&
760 &1.6808e-04_jprb,2.1196e-04_jprb,1.8928e-04_jprb,1.4220e-04_jprb,7.2225e-05_jprb/)
761 kbo( :, 1,38, 6) = (/&
762 &4.5775e-05_jprb,6.0479e-05_jprb,5.4555e-05_jprb,4.1902e-05_jprb,3.0397e-05_jprb/)
763 kbo( :, 2,38, 6) = (/&
764 &6.2496e-05_jprb,8.1164e-05_jprb,7.2708e-05_jprb,5.5274e-05_jprb,3.5878e-05_jprb/)
765 kbo( :, 3,38, 6) = (/&
766 &8.2782e-05_jprb,1.0626e-04_jprb,9.5002e-05_jprb,7.1740e-05_jprb,4.1841e-05_jprb/)
767 kbo( :, 4,38, 6) = (/&
768 &1.0670e-04_jprb,1.3583e-04_jprb,1.2149e-04_jprb,9.1558e-05_jprb,4.8377e-05_jprb/)
769 kbo( :, 5,38, 6) = (/&
770 &1.3438e-04_jprb,1.7021e-04_jprb,1.5213e-04_jprb,1.1463e-04_jprb,5.5512e-05_jprb/)
771 kbo( :, 1,39, 6) = (/&
772 &3.6095e-05_jprb,4.7960e-05_jprb,4.3340e-05_jprb,3.3379e-05_jprb,2.2882e-05_jprb/)
773 kbo( :, 2,39, 6) = (/&
774 &4.9468e-05_jprb,6.4614e-05_jprb,5.7979e-05_jprb,4.4199e-05_jprb,2.7110e-05_jprb/)
775 kbo( :, 3,39, 6) = (/&
776 &6.5728e-05_jprb,8.4830e-05_jprb,7.5966e-05_jprb,5.7541e-05_jprb,3.1729e-05_jprb/)
777 kbo( :, 4,39, 6) = (/&
778 &8.4989e-05_jprb,1.0871e-04_jprb,9.7338e-05_jprb,7.3595e-05_jprb,3.6816e-05_jprb/)
779 kbo( :, 5,39, 6) = (/&
780 &1.0733e-04_jprb,1.3655e-04_jprb,1.2216e-04_jprb,9.2289e-05_jprb,4.2380e-05_jprb/)
781 kbo( :, 1,40, 6) = (/&
782 &2.7548e-05_jprb,3.6866e-05_jprb,3.3398e-05_jprb,2.5816e-05_jprb,1.7406e-05_jprb/)
783 kbo( :, 2,40, 6) = (/&
784 &3.8017e-05_jprb,4.9978e-05_jprb,4.4939e-05_jprb,3.4363e-05_jprb,2.0717e-05_jprb/)
785 kbo( :, 3,40, 6) = (/&
786 &5.0843e-05_jprb,6.5998e-05_jprb,5.9173e-05_jprb,4.4960e-05_jprb,2.4340e-05_jprb/)
787 kbo( :, 4,40, 6) = (/&
788 &6.6103e-05_jprb,8.4982e-05_jprb,7.6165e-05_jprb,5.7734e-05_jprb,2.8334e-05_jprb/)
789 kbo( :, 5,40, 6) = (/&
790 &8.3889e-05_jprb,1.0718e-04_jprb,9.5971e-05_jprb,7.2651e-05_jprb,3.2716e-05_jprb/)
791 kbo( :, 1,41, 6) = (/&
792 &2.0891e-05_jprb,2.8160e-05_jprb,2.5581e-05_jprb,1.9853e-05_jprb,1.3219e-05_jprb/)
793 kbo( :, 2,41, 6) = (/&
794 &2.9056e-05_jprb,3.8448e-05_jprb,3.4643e-05_jprb,2.6578e-05_jprb,1.5803e-05_jprb/)
795 kbo( :, 3,41, 6) = (/&
796 &3.9119e-05_jprb,5.1086e-05_jprb,4.5870e-05_jprb,3.4949e-05_jprb,1.8643e-05_jprb/)
797 kbo( :, 4,41, 6) = (/&
798 &5.1167e-05_jprb,6.6144e-05_jprb,5.9321e-05_jprb,4.5078e-05_jprb,2.1781e-05_jprb/)
799 kbo( :, 5,41, 6) = (/&
800 &6.5313e-05_jprb,8.3807e-05_jprb,7.5100e-05_jprb,5.6965e-05_jprb,2.5228e-05_jprb/)
801 kbo( :, 1,42, 6) = (/&
802 &1.5797e-05_jprb,2.1452e-05_jprb,1.9541e-05_jprb,1.5234e-05_jprb,9.9864e-06_jprb/)
803 kbo( :, 2,42, 6) = (/&
804 &2.2148e-05_jprb,2.9506e-05_jprb,2.6644e-05_jprb,2.0507e-05_jprb,1.1995e-05_jprb/)
805 kbo( :, 3,42, 6) = (/&
806 &3.0028e-05_jprb,3.9456e-05_jprb,3.5478e-05_jprb,2.7113e-05_jprb,1.4215e-05_jprb/)
807 kbo( :, 4,42, 6) = (/&
808 &3.9526e-05_jprb,5.1380e-05_jprb,4.6122e-05_jprb,3.5139e-05_jprb,1.6670e-05_jprb/)
809 kbo( :, 5,42, 6) = (/&
810 &5.0747e-05_jprb,6.5409e-05_jprb,5.8661e-05_jprb,4.4588e-05_jprb,1.9369e-05_jprb/)
811 kbo( :, 1,43, 6) = (/&
812 &1.1685e-05_jprb,1.6001e-05_jprb,1.4628e-05_jprb,1.1471e-05_jprb,7.4936e-06_jprb/)
813 kbo( :, 2,43, 6) = (/&
814 &1.6548e-05_jprb,2.2213e-05_jprb,2.0113e-05_jprb,1.5537e-05_jprb,9.0536e-06_jprb/)
815 kbo( :, 3,43, 6) = (/&
816 &2.2638e-05_jprb,2.9954e-05_jprb,2.6979e-05_jprb,2.0685e-05_jprb,1.0779e-05_jprb/)
817 kbo( :, 4,43, 6) = (/&
818 &3.0048e-05_jprb,3.9293e-05_jprb,3.5311e-05_jprb,2.6968e-05_jprb,1.2697e-05_jprb/)
819 kbo( :, 5,43, 6) = (/&
820 &3.8860e-05_jprb,5.0338e-05_jprb,4.5183e-05_jprb,3.4410e-05_jprb,1.4806e-05_jprb/)
821 kbo( :, 1,44, 6) = (/&
822 &8.5348e-06_jprb,1.1792e-05_jprb,1.0825e-05_jprb,8.5515e-06_jprb,5.5871e-06_jprb/)
823 kbo( :, 2,44, 6) = (/&
824 &1.2224e-05_jprb,1.6542e-05_jprb,1.5023e-05_jprb,1.1659e-05_jprb,6.7947e-06_jprb/)
825 kbo( :, 3,44, 6) = (/&
826 &1.6899e-05_jprb,2.2521e-05_jprb,2.0321e-05_jprb,1.5633e-05_jprb,8.1320e-06_jprb/)
827 kbo( :, 4,44, 6) = (/&
828 &2.2637e-05_jprb,2.9783e-05_jprb,2.6801e-05_jprb,2.0525e-05_jprb,9.6227e-06_jprb/)
829 kbo( :, 5,44, 6) = (/&
830 &2.9511e-05_jprb,3.8437e-05_jprb,3.4531e-05_jprb,2.6356e-05_jprb,1.1265e-05_jprb/)
831 kbo( :, 1,45, 6) = (/&
832 &6.2053e-06_jprb,8.6498e-06_jprb,7.9828e-06_jprb,6.3587e-06_jprb,4.1355e-06_jprb/)
833 kbo( :, 2,45, 6) = (/&
834 &8.9924e-06_jprb,1.2274e-05_jprb,1.1184e-05_jprb,8.7228e-06_jprb,5.0646e-06_jprb/)
835 kbo( :, 3,45, 6) = (/&
836 &1.2577e-05_jprb,1.6878e-05_jprb,1.5263e-05_jprb,1.1781e-05_jprb,6.0980e-06_jprb/)
837 kbo( :, 4,45, 6) = (/&
838 &1.7004e-05_jprb,2.2510e-05_jprb,2.0287e-05_jprb,1.5579e-05_jprb,7.2495e-06_jprb/)
839 kbo( :, 5,45, 6) = (/&
840 &2.2345e-05_jprb,2.9273e-05_jprb,2.6327e-05_jprb,2.0139e-05_jprb,8.5241e-06_jprb/)
841 kbo( :, 1,46, 6) = (/&
842 &4.4535e-06_jprb,6.2663e-06_jprb,5.8215e-06_jprb,4.6847e-06_jprb,3.0403e-06_jprb/)
843 kbo( :, 2,46, 6) = (/&
844 &6.5386e-06_jprb,9.0087e-06_jprb,8.2383e-06_jprb,6.4650e-06_jprb,3.7495e-06_jprb/)
845 kbo( :, 3,46, 6) = (/&
846 &9.2626e-06_jprb,1.2523e-05_jprb,1.1353e-05_jprb,8.7958e-06_jprb,4.5455e-06_jprb/)
847 kbo( :, 4,46, 6) = (/&
848 &1.2652e-05_jprb,1.6866e-05_jprb,1.5224e-05_jprb,1.1726e-05_jprb,5.4324e-06_jprb/)
849 kbo( :, 5,46, 6) = (/&
850 &1.6782e-05_jprb,2.2115e-05_jprb,1.9910e-05_jprb,1.5271e-05_jprb,6.4154e-06_jprb/)
851 kbo( :, 1,47, 6) = (/&
852 &3.1255e-06_jprb,4.4445e-06_jprb,4.1625e-06_jprb,3.3973e-06_jprb,2.2248e-06_jprb/)
853 kbo( :, 2,47, 6) = (/&
854 &4.6607e-06_jprb,6.4871e-06_jprb,5.9609e-06_jprb,4.7149e-06_jprb,2.7633e-06_jprb/)
855 kbo( :, 3,47, 6) = (/&
856 &6.6996e-06_jprb,9.1349e-06_jprb,8.3072e-06_jprb,6.4651e-06_jprb,3.3751e-06_jprb/)
857 kbo( :, 4,47, 6) = (/&
858 &9.2705e-06_jprb,1.2449e-05_jprb,1.1256e-05_jprb,8.6999e-06_jprb,4.0582e-06_jprb/)
859 kbo( :, 5,47, 6) = (/&
860 &1.2429e-05_jprb,1.6480e-05_jprb,1.4854e-05_jprb,1.1428e-05_jprb,4.8166e-06_jprb/)
861 kbo( :, 1,48, 6) = (/&
862 &2.1776e-06_jprb,3.1287e-06_jprb,2.9593e-06_jprb,2.4588e-06_jprb,1.6162e-06_jprb/)
863 kbo( :, 2,48, 6) = (/&
864 &3.3004e-06_jprb,4.6424e-06_jprb,4.2915e-06_jprb,3.4279e-06_jprb,2.0216e-06_jprb/)
865 kbo( :, 3,48, 6) = (/&
866 &4.8178e-06_jprb,6.6317e-06_jprb,6.0512e-06_jprb,4.7347e-06_jprb,2.4869e-06_jprb/)
867 kbo( :, 4,48, 6) = (/&
868 &6.7632e-06_jprb,9.1507e-06_jprb,8.2914e-06_jprb,6.4284e-06_jprb,3.0099e-06_jprb/)
869 kbo( :, 5,48, 6) = (/&
870 &9.1697e-06_jprb,1.2234e-05_jprb,1.1042e-05_jprb,8.5224e-06_jprb,3.5919e-06_jprb/)
871 kbo( :, 1,49, 6) = (/&
872 &1.5053e-06_jprb,2.1858e-06_jprb,2.0909e-06_jprb,1.7774e-06_jprb,1.1638e-06_jprb/)
873 kbo( :, 2,49, 6) = (/&
874 &2.3208e-06_jprb,3.3001e-06_jprb,3.0741e-06_jprb,2.4849e-06_jprb,1.4655e-06_jprb/)
875 kbo( :, 3,49, 6) = (/&
876 &3.4426e-06_jprb,4.7874e-06_jprb,4.3858e-06_jprb,3.4542e-06_jprb,1.8145e-06_jprb/)
877 kbo( :, 4,49, 6) = (/&
878 &4.9073e-06_jprb,6.6937e-06_jprb,6.0798e-06_jprb,4.7299e-06_jprb,2.2116e-06_jprb/)
879 kbo( :, 5,49, 6) = (/&
880 &6.7349e-06_jprb,9.0453e-06_jprb,8.1769e-06_jprb,6.3309e-06_jprb,2.6545e-06_jprb/)
881 kbo( :, 1,50, 6) = (/&
882 &1.0462e-06_jprb,1.5340e-06_jprb,1.4848e-06_jprb,1.2964e-06_jprb,8.5273e-07_jprb/)
883 kbo( :, 2,50, 6) = (/&
884 &1.6402e-06_jprb,2.3557e-06_jprb,2.2124e-06_jprb,1.8137e-06_jprb,1.0799e-06_jprb/)
885 kbo( :, 3,50, 6) = (/&
886 &2.4709e-06_jprb,3.4712e-06_jprb,3.1941e-06_jprb,2.5342e-06_jprb,1.3448e-06_jprb/)
887 kbo( :, 4,50, 6) = (/&
888 &3.5758e-06_jprb,4.9168e-06_jprb,4.4776e-06_jprb,3.4964e-06_jprb,1.6496e-06_jprb/)
889 kbo( :, 5,50, 6) = (/&
890 &4.9702e-06_jprb,6.7202e-06_jprb,6.0835e-06_jprb,4.7222e-06_jprb,1.9912e-06_jprb/)
891 kbo( :, 1,51, 6) = (/&
892 &7.2663e-07_jprb,1.0750e-06_jprb,1.0542e-06_jprb,9.5059e-07_jprb,6.2987e-07_jprb/)
893 kbo( :, 2,51, 6) = (/&
894 &1.1582e-06_jprb,1.6789e-06_jprb,1.5910e-06_jprb,1.3276e-06_jprb,8.0106e-07_jprb/)
895 kbo( :, 3,51, 6) = (/&
896 &1.7719e-06_jprb,2.5144e-06_jprb,2.3267e-06_jprb,1.8622e-06_jprb,1.0033e-06_jprb/)
897 kbo( :, 4,51, 6) = (/&
898 &2.6046e-06_jprb,3.6115e-06_jprb,3.2983e-06_jprb,2.5872e-06_jprb,1.2381e-06_jprb/)
899 kbo( :, 5,51, 6) = (/&
900 &3.6697e-06_jprb,4.9945e-06_jprb,4.5288e-06_jprb,3.5236e-06_jprb,1.5031e-06_jprb/)
901 kbo( :, 1,52, 6) = (/&
902 &5.0128e-07_jprb,7.4829e-07_jprb,7.4503e-07_jprb,6.9902e-07_jprb,4.6417e-07_jprb/)
903 kbo( :, 2,52, 6) = (/&
904 &8.1290e-07_jprb,1.1889e-06_jprb,1.1383e-06_jprb,9.7075e-07_jprb,5.9124e-07_jprb/)
905 kbo( :, 3,52, 6) = (/&
906 &1.2637e-06_jprb,1.8111e-06_jprb,1.6874e-06_jprb,1.3654e-06_jprb,7.4485e-07_jprb/)
907 kbo( :, 4,52, 6) = (/&
908 &1.8870e-06_jprb,2.6414e-06_jprb,2.4208e-06_jprb,1.9088e-06_jprb,9.2398e-07_jprb/)
909 kbo( :, 5,52, 6) = (/&
910 &2.6982e-06_jprb,3.6981e-06_jprb,3.3605e-06_jprb,2.6209e-06_jprb,1.1284e-06_jprb/)
911 kbo( :, 1,53, 6) = (/&
912 &3.4316e-07_jprb,5.1730e-07_jprb,5.2428e-07_jprb,5.1650e-07_jprb,3.4163e-07_jprb/)
913 kbo( :, 2,53, 6) = (/&
914 &5.6636e-07_jprb,8.3600e-07_jprb,8.0988e-07_jprb,7.0959e-07_jprb,4.3402e-07_jprb/)
915 kbo( :, 3,53, 6) = (/&
916 &8.9539e-07_jprb,1.2957e-06_jprb,1.2170e-06_jprb,9.9881e-07_jprb,5.4917e-07_jprb/)
917 kbo( :, 4,53, 6) = (/&
918 &1.3585e-06_jprb,1.9213e-06_jprb,1.7681e-06_jprb,1.4039e-06_jprb,6.8487e-07_jprb/)
919 kbo( :, 5,53, 6) = (/&
920 &1.9728e-06_jprb,2.7267e-06_jprb,2.4840e-06_jprb,1.9431e-06_jprb,8.4127e-07_jprb/)
921 kbo( :, 1,54, 6) = (/&
922 &2.3729e-07_jprb,3.6141e-07_jprb,3.7346e-07_jprb,3.8814e-07_jprb,2.5965e-07_jprb/)
923 kbo( :, 2,54, 6) = (/&
924 &3.9847e-07_jprb,5.9281e-07_jprb,5.8145e-07_jprb,5.2497e-07_jprb,3.2865e-07_jprb/)
925 kbo( :, 3,54, 6) = (/&
926 &6.4012e-07_jprb,9.3418e-07_jprb,8.8451e-07_jprb,7.3760e-07_jprb,4.1726e-07_jprb/)
927 kbo( :, 4,54, 6) = (/&
928 &9.8548e-07_jprb,1.4072e-06_jprb,1.3009e-06_jprb,1.0414e-06_jprb,5.2304e-07_jprb/)
929 kbo( :, 5,54, 6) = (/&
930 &1.4524e-06_jprb,2.0243e-06_jprb,1.8490e-06_jprb,1.4514e-06_jprb,6.4582e-07_jprb/)
931 kbo( :, 1,55, 6) = (/&
932 &1.6422e-07_jprb,2.5313e-07_jprb,2.6741e-07_jprb,2.9555e-07_jprb,2.0083e-07_jprb/)
933 kbo( :, 2,55, 6) = (/&
934 &2.8085e-07_jprb,4.2089e-07_jprb,4.1847e-07_jprb,3.9112e-07_jprb,2.5331e-07_jprb/)
935 kbo( :, 3,55, 6) = (/&
936 &4.5840e-07_jprb,6.7405e-07_jprb,6.4380e-07_jprb,5.4696e-07_jprb,3.2245e-07_jprb/)
937 kbo( :, 4,55, 6) = (/&
938 &7.1591e-07_jprb,1.0314e-06_jprb,9.5879e-07_jprb,7.7462e-07_jprb,4.0636e-07_jprb/)
939 kbo( :, 5,55, 6) = (/&
940 &1.0707e-06_jprb,1.5050e-06_jprb,1.3785e-06_jprb,1.0868e-06_jprb,5.0407e-07_jprb/)
941 kbo( :, 1,56, 6) = (/&
942 &1.1297e-07_jprb,1.7654e-07_jprb,1.9160e-07_jprb,2.2785e-07_jprb,1.5600e-07_jprb/)
943 kbo( :, 2,56, 6) = (/&
944 &1.9687e-07_jprb,2.9736e-07_jprb,3.0024e-07_jprb,2.9250e-07_jprb,1.9557e-07_jprb/)
945 kbo( :, 3,56, 6) = (/&
946 &3.2655e-07_jprb,4.8379e-07_jprb,4.6673e-07_jprb,4.0545e-07_jprb,2.4926e-07_jprb/)
947 kbo( :, 4,56, 6) = (/&
948 &5.1776e-07_jprb,7.5239e-07_jprb,7.0397e-07_jprb,5.7515e-07_jprb,3.1570e-07_jprb/)
949 kbo( :, 5,56, 6) = (/&
950 &7.8583e-07_jprb,1.1146e-06_jprb,1.0242e-06_jprb,8.1180e-07_jprb,3.9355e-07_jprb/)
951 kbo( :, 1,57, 6) = (/&
952 &7.7200e-08_jprb,1.2264e-07_jprb,1.3766e-07_jprb,1.7856e-07_jprb,1.2187e-07_jprb/)
953 kbo( :, 2,57, 6) = (/&
954 &1.3715e-07_jprb,2.0905e-07_jprb,2.1488e-07_jprb,2.1998e-07_jprb,1.5127e-07_jprb/)
955 kbo( :, 3,57, 6) = (/&
956 &2.3136e-07_jprb,3.4526e-07_jprb,3.3687e-07_jprb,3.0067e-07_jprb,1.9276e-07_jprb/)
957 kbo( :, 4,57, 6) = (/&
958 &3.7265e-07_jprb,5.4598e-07_jprb,5.1453e-07_jprb,4.2632e-07_jprb,2.4529e-07_jprb/)
959 kbo( :, 5,57, 6) = (/&
960 &5.7396e-07_jprb,8.2172e-07_jprb,7.5794e-07_jprb,6.0477e-07_jprb,3.0747e-07_jprb/)
961 kbo( :, 1,58, 6) = (/&
962 &5.2955e-08_jprb,8.5764e-08_jprb,1.0017e-07_jprb,1.4310e-07_jprb,9.6433e-08_jprb/)
963 kbo( :, 2,58, 6) = (/&
964 &9.5831e-08_jprb,1.4757e-07_jprb,1.5479e-07_jprb,1.6745e-07_jprb,1.1819e-07_jprb/)
965 kbo( :, 3,58, 6) = (/&
966 &1.6444e-07_jprb,2.4707e-07_jprb,2.4397e-07_jprb,2.2463e-07_jprb,1.5059e-07_jprb/)
967 kbo( :, 4,58, 6) = (/&
968 &2.6896e-07_jprb,3.9698e-07_jprb,3.7706e-07_jprb,3.1744e-07_jprb,1.9236e-07_jprb/)
969 kbo( :, 5,58, 6) = (/&
970 &4.2027e-07_jprb,6.0686e-07_jprb,5.6217e-07_jprb,4.5216e-07_jprb,2.4243e-07_jprb/)
971 kbo( :, 1,59, 6) = (/&
972 &4.0613e-08_jprb,6.6330e-08_jprb,7.8756e-08_jprb,1.1682e-07_jprb,8.0763e-08_jprb/)
973 kbo( :, 2,59, 6) = (/&
974 &7.4110e-08_jprb,1.1464e-07_jprb,1.2119e-07_jprb,1.3394e-07_jprb,1.0024e-07_jprb/)
975 kbo( :, 3,59, 6) = (/&
976 &1.2825e-07_jprb,1.9327e-07_jprb,1.9161e-07_jprb,1.7847e-07_jprb,1.2887e-07_jprb/)
977 kbo( :, 4,59, 6) = (/&
978 &2.1125e-07_jprb,3.1279e-07_jprb,2.9779e-07_jprb,2.5217e-07_jprb,1.6539e-07_jprb/)
979 kbo( :, 5,59, 6) = (/&
980 &3.3221e-07_jprb,4.8128e-07_jprb,4.4648e-07_jprb,3.6014e-07_jprb,2.0916e-07_jprb/)
981 kbo( :, 1,13, 7) = (/&
982 &4.0082e-03_jprb,4.7471e-03_jprb,4.2106e-03_jprb,3.3097e-03_jprb,2.9797e-02_jprb/)
983 kbo( :, 2,13, 7) = (/&
984 &5.4956e-03_jprb,6.4503e-03_jprb,5.6741e-03_jprb,4.3606e-03_jprb,3.3076e-02_jprb/)
985 kbo( :, 3,13, 7) = (/&
986 &7.3201e-03_jprb,8.5434e-03_jprb,7.4724e-03_jprb,5.6899e-03_jprb,3.6718e-02_jprb/)
987 kbo( :, 4,13, 7) = (/&
988 &9.4768e-03_jprb,1.1006e-02_jprb,9.6490e-03_jprb,7.3607e-03_jprb,4.0562e-02_jprb/)
989 kbo( :, 5,13, 7) = (/&
990 &1.2016e-02_jprb,1.3883e-02_jprb,1.2248e-02_jprb,9.4126e-03_jprb,4.4607e-02_jprb/)
991 kbo( :, 1,14, 7) = (/&
992 &3.5182e-03_jprb,4.1440e-03_jprb,3.6712e-03_jprb,2.8865e-03_jprb,2.5106e-02_jprb/)
993 kbo( :, 2,14, 7) = (/&
994 &4.8368e-03_jprb,5.6585e-03_jprb,4.9763e-03_jprb,3.8241e-03_jprb,2.8178e-02_jprb/)
995 kbo( :, 3,14, 7) = (/&
996 &6.4391e-03_jprb,7.4926e-03_jprb,6.5797e-03_jprb,5.0127e-03_jprb,3.1499e-02_jprb/)
997 kbo( :, 4,14, 7) = (/&
998 &8.3556e-03_jprb,9.6590e-03_jprb,8.4959e-03_jprb,6.4956e-03_jprb,3.4983e-02_jprb/)
999 kbo( :, 5,14, 7) = (/&
1000 &1.0636e-02_jprb,1.2197e-02_jprb,1.0778e-02_jprb,8.2927e-03_jprb,3.8677e-02_jprb/)
1001 kbo( :, 1,15, 7) = (/&
1002 &3.0808e-03_jprb,3.6180e-03_jprb,3.2024e-03_jprb,2.5077e-03_jprb,2.0133e-02_jprb/)
1003 kbo( :, 2,15, 7) = (/&
1004 &4.2342e-03_jprb,4.9408e-03_jprb,4.3573e-03_jprb,3.3447e-03_jprb,2.2811e-02_jprb/)
1005 kbo( :, 3,15, 7) = (/&
1006 &5.6484e-03_jprb,6.5425e-03_jprb,5.7598e-03_jprb,4.4050e-03_jprb,2.5648e-02_jprb/)
1007 kbo( :, 4,15, 7) = (/&
1008 &7.3569e-03_jprb,8.4459e-03_jprb,7.4478e-03_jprb,5.6997e-03_jprb,2.8633e-02_jprb/)
1009 kbo( :, 5,15, 7) = (/&
1010 &9.4079e-03_jprb,1.0695e-02_jprb,9.4525e-03_jprb,7.2671e-03_jprb,3.1750e-02_jprb/)
1011 kbo( :, 1,16, 7) = (/&
1012 &2.6937e-03_jprb,3.1581e-03_jprb,2.7980e-03_jprb,2.1775e-03_jprb,1.5394e-02_jprb/)
1013 kbo( :, 2,16, 7) = (/&
1014 &3.7085e-03_jprb,4.3109e-03_jprb,3.8048e-03_jprb,2.9219e-03_jprb,1.7507e-02_jprb/)
1015 kbo( :, 3,16, 7) = (/&
1016 &4.9609e-03_jprb,5.7164e-03_jprb,5.0355e-03_jprb,3.8483e-03_jprb,1.9730e-02_jprb/)
1017 kbo( :, 4,16, 7) = (/&
1018 &6.4895e-03_jprb,7.4002e-03_jprb,6.5219e-03_jprb,4.9806e-03_jprb,2.2084e-02_jprb/)
1019 kbo( :, 5,16, 7) = (/&
1020 &8.3163e-03_jprb,9.4051e-03_jprb,8.2914e-03_jprb,6.3525e-03_jprb,2.4551e-02_jprb/)
1021 kbo( :, 1,17, 7) = (/&
1022 &2.3642e-03_jprb,2.7668e-03_jprb,2.4489e-03_jprb,1.8988e-03_jprb,1.1868e-02_jprb/)
1023 kbo( :, 2,17, 7) = (/&
1024 &3.2598e-03_jprb,3.7811e-03_jprb,3.3290e-03_jprb,2.5510e-03_jprb,1.3559e-02_jprb/)
1025 kbo( :, 3,17, 7) = (/&
1026 &4.3747e-03_jprb,5.0202e-03_jprb,4.4155e-03_jprb,3.3613e-03_jprb,1.5340e-02_jprb/)
1027 kbo( :, 4,17, 7) = (/&
1028 &5.7340e-03_jprb,6.5189e-03_jprb,5.7286e-03_jprb,4.3538e-03_jprb,1.7220e-02_jprb/)
1029 kbo( :, 5,17, 7) = (/&
1030 &7.3600e-03_jprb,8.2990e-03_jprb,7.2992e-03_jprb,5.5548e-03_jprb,1.9205e-02_jprb/)
1031 kbo( :, 1,18, 7) = (/&
1032 &2.0898e-03_jprb,2.4405e-03_jprb,2.1542e-03_jprb,1.6626e-03_jprb,9.4417e-03_jprb/)
1033 kbo( :, 2,18, 7) = (/&
1034 &2.8863e-03_jprb,3.3353e-03_jprb,2.9318e-03_jprb,2.2352e-03_jprb,1.0813e-02_jprb/)
1035 kbo( :, 3,18, 7) = (/&
1036 &3.8771e-03_jprb,4.4358e-03_jprb,3.8935e-03_jprb,2.9472e-03_jprb,1.2260e-02_jprb/)
1037 kbo( :, 4,18, 7) = (/&
1038 &5.0839e-03_jprb,5.7663e-03_jprb,5.0610e-03_jprb,3.8229e-03_jprb,1.3797e-02_jprb/)
1039 kbo( :, 5,18, 7) = (/&
1040 &6.5362e-03_jprb,7.3472e-03_jprb,6.4549e-03_jprb,4.8781e-03_jprb,1.5427e-02_jprb/)
1041 kbo( :, 1,19, 7) = (/&
1042 &1.8517e-03_jprb,2.1548e-03_jprb,1.8965e-03_jprb,1.4580e-03_jprb,7.7773e-03_jprb/)
1043 kbo( :, 2,19, 7) = (/&
1044 &2.5576e-03_jprb,2.9471e-03_jprb,2.5846e-03_jprb,1.9612e-03_jprb,8.9176e-03_jprb/)
1045 kbo( :, 3,19, 7) = (/&
1046 &3.4345e-03_jprb,3.9244e-03_jprb,3.4362e-03_jprb,2.5906e-03_jprb,1.0132e-02_jprb/)
1047 kbo( :, 4,19, 7) = (/&
1048 &4.5064e-03_jprb,5.0994e-03_jprb,4.4700e-03_jprb,3.3642e-03_jprb,1.1431e-02_jprb/)
1049 kbo( :, 5,19, 7) = (/&
1050 &5.8097e-03_jprb,6.5083e-03_jprb,5.7046e-03_jprb,4.2905e-03_jprb,1.2808e-02_jprb/)
1051 kbo( :, 1,20, 7) = (/&
1052 &1.6458e-03_jprb,1.9103e-03_jprb,1.6781e-03_jprb,1.2831e-03_jprb,6.5141e-03_jprb/)
1053 kbo( :, 2,20, 7) = (/&
1054 &2.2698e-03_jprb,2.6130e-03_jprb,2.2877e-03_jprb,1.7278e-03_jprb,7.4849e-03_jprb/)
1055 kbo( :, 3,20, 7) = (/&
1056 &3.0464e-03_jprb,3.4772e-03_jprb,3.0427e-03_jprb,2.2845e-03_jprb,8.5198e-03_jprb/)
1057 kbo( :, 4,20, 7) = (/&
1058 &4.0053e-03_jprb,4.5205e-03_jprb,3.9563e-03_jprb,2.9671e-03_jprb,9.6230e-03_jprb/)
1059 kbo( :, 5,20, 7) = (/&
1060 &5.1704e-03_jprb,5.7875e-03_jprb,5.0542e-03_jprb,3.7806e-03_jprb,1.0800e-02_jprb/)
1061 kbo( :, 1,21, 7) = (/&
1062 &1.4548e-03_jprb,1.6903e-03_jprb,1.4830e-03_jprb,1.1276e-03_jprb,5.4461e-03_jprb/)
1063 kbo( :, 2,21, 7) = (/&
1064 &2.0031e-03_jprb,2.3102e-03_jprb,2.0214e-03_jprb,1.5202e-03_jprb,6.2763e-03_jprb/)
1065 kbo( :, 3,21, 7) = (/&
1066 &2.6919e-03_jprb,3.0723e-03_jprb,2.6854e-03_jprb,2.0114e-03_jprb,7.1636e-03_jprb/)
1067 kbo( :, 4,21, 7) = (/&
1068 &3.5436e-03_jprb,4.0040e-03_jprb,3.4935e-03_jprb,2.6088e-03_jprb,8.1098e-03_jprb/)
1069 kbo( :, 5,21, 7) = (/&
1070 &4.5742e-03_jprb,5.1416e-03_jprb,4.4723e-03_jprb,3.3261e-03_jprb,9.1112e-03_jprb/)
1071 kbo( :, 1,22, 7) = (/&
1072 &1.3025e-03_jprb,1.5176e-03_jprb,1.3319e-03_jprb,1.0078e-03_jprb,4.4970e-03_jprb/)
1073 kbo( :, 2,22, 7) = (/&
1074 &1.7911e-03_jprb,2.0676e-03_jprb,1.8104e-03_jprb,1.3583e-03_jprb,5.1953e-03_jprb/)
1075 kbo( :, 3,22, 7) = (/&
1076 &2.4070e-03_jprb,2.7511e-03_jprb,2.4021e-03_jprb,1.7933e-03_jprb,5.9455e-03_jprb/)
1077 kbo( :, 4,22, 7) = (/&
1078 &3.1635e-03_jprb,3.5916e-03_jprb,3.1285e-03_jprb,2.3228e-03_jprb,6.7435e-03_jprb/)
1079 kbo( :, 5,22, 7) = (/&
1080 &4.0745e-03_jprb,4.6107e-03_jprb,4.0048e-03_jprb,2.9650e-03_jprb,7.5904e-03_jprb/)
1081 kbo( :, 1,23, 7) = (/&
1082 &1.1628e-03_jprb,1.3564e-03_jprb,1.1911e-03_jprb,9.0035e-04_jprb,3.6865e-03_jprb/)
1083 kbo( :, 2,23, 7) = (/&
1084 &1.5981e-03_jprb,1.8458e-03_jprb,1.6157e-03_jprb,1.2111e-03_jprb,4.2718e-03_jprb/)
1085 kbo( :, 3,23, 7) = (/&
1086 &2.1434e-03_jprb,2.4578e-03_jprb,2.1451e-03_jprb,1.5961e-03_jprb,4.9004e-03_jprb/)
1087 kbo( :, 4,23, 7) = (/&
1088 &2.8070e-03_jprb,3.2089e-03_jprb,2.7931e-03_jprb,2.0693e-03_jprb,5.5690e-03_jprb/)
1089 kbo( :, 5,23, 7) = (/&
1090 &3.6060e-03_jprb,4.1114e-03_jprb,3.5718e-03_jprb,2.6408e-03_jprb,6.2767e-03_jprb/)
1091 kbo( :, 1,24, 7) = (/&
1092 &1.0349e-03_jprb,1.2079e-03_jprb,1.0608e-03_jprb,8.0145e-04_jprb,2.9772e-03_jprb/)
1093 kbo( :, 2,24, 7) = (/&
1094 &1.4200e-03_jprb,1.6442e-03_jprb,1.4384e-03_jprb,1.0762e-03_jprb,3.4619e-03_jprb/)
1095 kbo( :, 3,24, 7) = (/&
1096 &1.8974e-03_jprb,2.1881e-03_jprb,1.9089e-03_jprb,1.4192e-03_jprb,3.9815e-03_jprb/)
1097 kbo( :, 4,24, 7) = (/&
1098 &2.4779e-03_jprb,2.8499e-03_jprb,2.4818e-03_jprb,1.8400e-03_jprb,4.5322e-03_jprb/)
1099 kbo( :, 5,24, 7) = (/&
1100 &3.1754e-03_jprb,3.6385e-03_jprb,3.1666e-03_jprb,2.3457e-03_jprb,5.1151e-03_jprb/)
1101 kbo( :, 1,25, 7) = (/&
1102 &9.2232e-04_jprb,1.0772e-03_jprb,9.4524e-04_jprb,7.1253e-04_jprb,2.4032e-03_jprb/)
1103 kbo( :, 2,25, 7) = (/&
1104 &1.2605e-03_jprb,1.4648e-03_jprb,1.2810e-03_jprb,9.5673e-04_jprb,2.8023e-03_jprb/)
1105 kbo( :, 3,25, 7) = (/&
1106 &1.6782e-03_jprb,1.9434e-03_jprb,1.6961e-03_jprb,1.2611e-03_jprb,3.2283e-03_jprb/)
1107 kbo( :, 4,25, 7) = (/&
1108 &2.1858e-03_jprb,2.5220e-03_jprb,2.1978e-03_jprb,1.6329e-03_jprb,3.6803e-03_jprb/)
1109 kbo( :, 5,25, 7) = (/&
1110 &2.7953e-03_jprb,3.2125e-03_jprb,2.7973e-03_jprb,2.0776e-03_jprb,4.1586e-03_jprb/)
1111 kbo( :, 1,26, 7) = (/&
1112 &8.2577e-04_jprb,9.6602e-04_jprb,8.4698e-04_jprb,6.3651e-04_jprb,1.9589e-03_jprb/)
1113 kbo( :, 2,26, 7) = (/&
1114 &1.1231e-03_jprb,1.3082e-03_jprb,1.1442e-03_jprb,8.5380e-04_jprb,2.2874e-03_jprb/)
1115 kbo( :, 3,26, 7) = (/&
1116 &1.4894e-03_jprb,1.7283e-03_jprb,1.5086e-03_jprb,1.1231e-03_jprb,2.6381e-03_jprb/)
1117 kbo( :, 4,26, 7) = (/&
1118 &1.9347e-03_jprb,2.2358e-03_jprb,1.9486e-03_jprb,1.4502e-03_jprb,3.0100e-03_jprb/)
1119 kbo( :, 5,26, 7) = (/&
1120 &2.4718e-03_jprb,2.8431e-03_jprb,2.4753e-03_jprb,1.8399e-03_jprb,3.4018e-03_jprb/)
1121 kbo( :, 1,27, 7) = (/&
1122 &7.3643e-04_jprb,8.6319e-04_jprb,7.5644e-04_jprb,5.6757e-04_jprb,1.5698e-03_jprb/)
1123 kbo( :, 2,27, 7) = (/&
1124 &9.9721e-04_jprb,1.1634e-03_jprb,1.0175e-03_jprb,7.5949e-04_jprb,1.8348e-03_jprb/)
1125 kbo( :, 3,27, 7) = (/&
1126 &1.3189e-03_jprb,1.5314e-03_jprb,1.3364e-03_jprb,9.9619e-04_jprb,2.1183e-03_jprb/)
1127 kbo( :, 4,27, 7) = (/&
1128 &1.7109e-03_jprb,1.9771e-03_jprb,1.7222e-03_jprb,1.2827e-03_jprb,2.4187e-03_jprb/)
1129 kbo( :, 5,27, 7) = (/&
1130 &2.1861e-03_jprb,2.5131e-03_jprb,2.1851e-03_jprb,1.6243e-03_jprb,2.7339e-03_jprb/)
1131 kbo( :, 1,28, 7) = (/&
1132 &6.5434e-04_jprb,7.6837e-04_jprb,6.7291e-04_jprb,5.0480e-04_jprb,1.2349e-03_jprb/)
1133 kbo( :, 2,28, 7) = (/&
1134 &8.8335e-04_jprb,1.0312e-03_jprb,9.0136e-04_jprb,6.7348e-04_jprb,1.4454e-03_jprb/)
1135 kbo( :, 3,28, 7) = (/&
1136 &1.1654e-03_jprb,1.3544e-03_jprb,1.1806e-03_jprb,8.8065e-04_jprb,1.6701e-03_jprb/)
1137 kbo( :, 4,28, 7) = (/&
1138 &1.5130e-03_jprb,1.7468e-03_jprb,1.5197e-03_jprb,1.1317e-03_jprb,1.9084e-03_jprb/)
1139 kbo( :, 5,28, 7) = (/&
1140 &1.9346e-03_jprb,2.2214e-03_jprb,1.9275e-03_jprb,1.4311e-03_jprb,2.1590e-03_jprb/)
1141 kbo( :, 1,29, 7) = (/&
1142 &5.8250e-04_jprb,6.8415e-04_jprb,5.9900e-04_jprb,4.4923e-04_jprb,9.6138e-04_jprb/)
1143 kbo( :, 2,29, 7) = (/&
1144 &7.8379e-04_jprb,9.1559e-04_jprb,7.9935e-04_jprb,5.9724e-04_jprb,1.1264e-03_jprb/)
1145 kbo( :, 3,29, 7) = (/&
1146 &1.0337e-03_jprb,1.2006e-03_jprb,1.0452e-03_jprb,7.7918e-04_jprb,1.3027e-03_jprb/)
1147 kbo( :, 4,29, 7) = (/&
1148 &1.3430e-03_jprb,1.5485e-03_jprb,1.3445e-03_jprb,9.9943e-04_jprb,1.4903e-03_jprb/)
1149 kbo( :, 5,29, 7) = (/&
1150 &1.7207e-03_jprb,1.9712e-03_jprb,1.7058e-03_jprb,1.2628e-03_jprb,1.6874e-03_jprb/)
1151 kbo( :, 1,30, 7) = (/&
1152 &5.1788e-04_jprb,6.0851e-04_jprb,5.3244e-04_jprb,3.9922e-04_jprb,7.3807e-04_jprb/)
1153 kbo( :, 2,30, 7) = (/&
1154 &6.9560e-04_jprb,8.1280e-04_jprb,7.0896e-04_jprb,5.2926e-04_jprb,8.6555e-04_jprb/)
1155 kbo( :, 3,30, 7) = (/&
1156 &9.1854e-04_jprb,1.0653e-03_jprb,9.2608e-04_jprb,6.8944e-04_jprb,1.0029e-03_jprb/)
1157 kbo( :, 4,30, 7) = (/&
1158 &1.1948e-03_jprb,1.3752e-03_jprb,1.1917e-03_jprb,8.8341e-04_jprb,1.1491e-03_jprb/)
1159 kbo( :, 5,30, 7) = (/&
1160 &1.5335e-03_jprb,1.7547e-03_jprb,1.5125e-03_jprb,1.1162e-03_jprb,1.3024e-03_jprb/)
1161 kbo( :, 1,31, 7) = (/&
1162 &4.6092e-04_jprb,5.4211e-04_jprb,4.7408e-04_jprb,3.5509e-04_jprb,5.5682e-04_jprb/)
1163 kbo( :, 2,31, 7) = (/&
1164 &6.1918e-04_jprb,7.2321e-04_jprb,6.3005e-04_jprb,4.6997e-04_jprb,6.5454e-04_jprb/)
1165 kbo( :, 3,31, 7) = (/&
1166 &8.1881e-04_jprb,9.4822e-04_jprb,8.2290e-04_jprb,6.1141e-04_jprb,7.5997e-04_jprb/)
1167 kbo( :, 4,31, 7) = (/&
1168 &1.0668e-03_jprb,1.2267e-03_jprb,1.0593e-03_jprb,7.8292e-04_jprb,8.7195e-04_jprb/)
1169 kbo( :, 5,31, 7) = (/&
1170 &1.3704e-03_jprb,1.5681e-03_jprb,1.3465e-03_jprb,9.8920e-04_jprb,9.8973e-04_jprb/)
1171 kbo( :, 1,32, 7) = (/&
1172 &4.1152e-04_jprb,4.8409e-04_jprb,4.2308e-04_jprb,3.1645e-04_jprb,4.2168e-04_jprb/)
1173 kbo( :, 2,32, 7) = (/&
1174 &5.5334e-04_jprb,6.4575e-04_jprb,5.6167e-04_jprb,4.1833e-04_jprb,4.9677e-04_jprb/)
1175 kbo( :, 3,32, 7) = (/&
1176 &7.3299e-04_jprb,8.4766e-04_jprb,7.3383e-04_jprb,5.4370e-04_jprb,5.7774e-04_jprb/)
1177 kbo( :, 4,32, 7) = (/&
1178 &9.5588e-04_jprb,1.0987e-03_jprb,9.4586e-04_jprb,6.9613e-04_jprb,6.6384e-04_jprb/)
1179 kbo( :, 5,32, 7) = (/&
1180 &1.2288e-03_jprb,1.4065e-03_jprb,1.2040e-03_jprb,8.8013e-04_jprb,7.5486e-04_jprb/)
1181 kbo( :, 1,33, 7) = (/&
1182 &3.6854e-04_jprb,4.3316e-04_jprb,3.7817e-04_jprb,2.8260e-04_jprb,3.1899e-04_jprb/)
1183 kbo( :, 2,33, 7) = (/&
1184 &4.9646e-04_jprb,5.7816e-04_jprb,5.0221e-04_jprb,3.7315e-04_jprb,3.7656e-04_jprb/)
1185 kbo( :, 3,33, 7) = (/&
1186 &6.5808e-04_jprb,7.6063e-04_jprb,6.5667e-04_jprb,4.8480e-04_jprb,4.3876e-04_jprb/)
1187 kbo( :, 4,33, 7) = (/&
1188 &8.5867e-04_jprb,9.8782e-04_jprb,8.4748e-04_jprb,6.2133e-04_jprb,5.0517e-04_jprb/)
1189 kbo( :, 5,33, 7) = (/&
1190 &1.1037e-03_jprb,1.2658e-03_jprb,1.0801e-03_jprb,7.8611e-04_jprb,5.7532e-04_jprb/)
1191 kbo( :, 1,34, 7) = (/&
1192 &3.2867e-04_jprb,3.8572e-04_jprb,3.3622e-04_jprb,2.5071e-04_jprb,2.4855e-04_jprb/)
1193 kbo( :, 2,34, 7) = (/&
1194 &4.4343e-04_jprb,5.1569e-04_jprb,4.4686e-04_jprb,3.3101e-04_jprb,2.9381e-04_jprb/)
1195 kbo( :, 3,34, 7) = (/&
1196 &5.8810e-04_jprb,6.7990e-04_jprb,5.8528e-04_jprb,4.3031e-04_jprb,3.4255e-04_jprb/)
1197 kbo( :, 4,34, 7) = (/&
1198 &7.6737e-04_jprb,8.8428e-04_jprb,7.5640e-04_jprb,5.5217e-04_jprb,3.9478e-04_jprb/)
1199 kbo( :, 5,34, 7) = (/&
1200 &9.8517e-04_jprb,1.1342e-03_jprb,9.6554e-04_jprb,6.9951e-04_jprb,4.5002e-04_jprb/)
1201 kbo( :, 1,35, 7) = (/&
1202 &2.8513e-04_jprb,3.3438e-04_jprb,2.9108e-04_jprb,2.1672e-04_jprb,1.8974e-04_jprb/)
1203 kbo( :, 2,35, 7) = (/&
1204 &3.8542e-04_jprb,4.4857e-04_jprb,3.8802e-04_jprb,2.8661e-04_jprb,2.2492e-04_jprb/)
1205 kbo( :, 3,35, 7) = (/&
1206 &5.1208e-04_jprb,5.9329e-04_jprb,5.0967e-04_jprb,3.7356e-04_jprb,2.6284e-04_jprb/)
1207 kbo( :, 4,35, 7) = (/&
1208 &6.6882e-04_jprb,7.7366e-04_jprb,6.6059e-04_jprb,4.8046e-04_jprb,3.0352e-04_jprb/)
1209 kbo( :, 5,35, 7) = (/&
1210 &8.5775e-04_jprb,9.9358e-04_jprb,8.4548e-04_jprb,6.1010e-04_jprb,3.4691e-04_jprb/)
1211 kbo( :, 1,36, 7) = (/&
1212 &2.3908e-04_jprb,2.8086e-04_jprb,2.4432e-04_jprb,1.8172e-04_jprb,1.4131e-04_jprb/)
1213 kbo( :, 2,36, 7) = (/&
1214 &3.2447e-04_jprb,3.7866e-04_jprb,3.2729e-04_jprb,2.4123e-04_jprb,1.6828e-04_jprb/)
1215 kbo( :, 3,36, 7) = (/&
1216 &4.3244e-04_jprb,5.0306e-04_jprb,4.3179e-04_jprb,3.1573e-04_jprb,1.9752e-04_jprb/)
1217 kbo( :, 4,36, 7) = (/&
1218 &5.6587e-04_jprb,6.5843e-04_jprb,5.6206e-04_jprb,4.0778e-04_jprb,2.2899e-04_jprb/)
1219 kbo( :, 5,36, 7) = (/&
1220 &7.2600e-04_jprb,8.4746e-04_jprb,7.2177e-04_jprb,5.1967e-04_jprb,2.6262e-04_jprb/)
1221 kbo( :, 1,37, 7) = (/&
1222 &1.9223e-04_jprb,2.2635e-04_jprb,1.9687e-04_jprb,1.4630e-04_jprb,1.0794e-04_jprb/)
1223 kbo( :, 2,37, 7) = (/&
1224 &2.6242e-04_jprb,3.0724e-04_jprb,2.6553e-04_jprb,1.9547e-04_jprb,1.2910e-04_jprb/)
1225 kbo( :, 3,37, 7) = (/&
1226 &3.5150e-04_jprb,4.1071e-04_jprb,3.5262e-04_jprb,2.5740e-04_jprb,1.5213e-04_jprb/)
1227 kbo( :, 4,37, 7) = (/&
1228 &4.6185e-04_jprb,5.4051e-04_jprb,4.6167e-04_jprb,3.3450e-04_jprb,1.7700e-04_jprb/)
1229 kbo( :, 5,37, 7) = (/&
1230 &5.9416e-04_jprb,6.9865e-04_jprb,5.9573e-04_jprb,4.2859e-04_jprb,2.0366e-04_jprb/)
1231 kbo( :, 1,38, 7) = (/&
1232 &1.5396e-04_jprb,1.8186e-04_jprb,1.5820e-04_jprb,1.1745e-04_jprb,8.2026e-05_jprb/)
1233 kbo( :, 2,38, 7) = (/&
1234 &2.1139e-04_jprb,2.4853e-04_jprb,2.1486e-04_jprb,1.5802e-04_jprb,9.8555e-05_jprb/)
1235 kbo( :, 3,38, 7) = (/&
1236 &2.8454e-04_jprb,3.3433e-04_jprb,2.8721e-04_jprb,2.0943e-04_jprb,1.1661e-04_jprb/)
1237 kbo( :, 4,38, 7) = (/&
1238 &3.7538e-04_jprb,4.4233e-04_jprb,3.7835e-04_jprb,2.7384e-04_jprb,1.3622e-04_jprb/)
1239 kbo( :, 5,38, 7) = (/&
1240 &4.8432e-04_jprb,5.7425e-04_jprb,4.9054e-04_jprb,3.5276e-04_jprb,1.5730e-04_jprb/)
1241 kbo( :, 1,39, 7) = (/&
1242 &1.2310e-04_jprb,1.4596e-04_jprb,1.2703e-04_jprb,9.4291e-05_jprb,6.1783e-05_jprb/)
1243 kbo( :, 2,39, 7) = (/&
1244 &1.6994e-04_jprb,2.0085e-04_jprb,1.7375e-04_jprb,1.2772e-04_jprb,7.4607e-05_jprb/)
1245 kbo( :, 3,39, 7) = (/&
1246 &2.2988e-04_jprb,2.7190e-04_jprb,2.3385e-04_jprb,1.7039e-04_jprb,8.8689e-05_jprb/)
1247 kbo( :, 4,39, 7) = (/&
1248 &3.0447e-04_jprb,3.6157e-04_jprb,3.0996e-04_jprb,2.2416e-04_jprb,1.0404e-04_jprb/)
1249 kbo( :, 5,39, 7) = (/&
1250 &3.9383e-04_jprb,4.7143e-04_jprb,4.0364e-04_jprb,2.9022e-04_jprb,1.2062e-04_jprb/)
1251 kbo( :, 1,40, 7) = (/&
1252 &9.5155e-05_jprb,1.1332e-04_jprb,9.8734e-05_jprb,7.3344e-05_jprb,4.6985e-05_jprb/)
1253 kbo( :, 2,40, 7) = (/&
1254 &1.3236e-04_jprb,1.5726e-04_jprb,1.3621e-04_jprb,1.0020e-04_jprb,5.7054e-05_jprb/)
1255 kbo( :, 3,40, 7) = (/&
1256 &1.8031e-04_jprb,2.1454e-04_jprb,1.8484e-04_jprb,1.3474e-04_jprb,6.8162e-05_jprb/)
1257 kbo( :, 4,40, 7) = (/&
1258 &2.4017e-04_jprb,2.8725e-04_jprb,2.4684e-04_jprb,1.7861e-04_jprb,8.0321e-05_jprb/)
1259 kbo( :, 5,40, 7) = (/&
1260 &3.1223e-04_jprb,3.7700e-04_jprb,3.2358e-04_jprb,2.3279e-04_jprb,9.3499e-05_jprb/)
1261 kbo( :, 1,41, 7) = (/&
1262 &7.3040e-05_jprb,8.7365e-05_jprb,7.6219e-05_jprb,5.6696e-05_jprb,3.5628e-05_jprb/)
1263 kbo( :, 2,41, 7) = (/&
1264 &1.0242e-04_jprb,1.2231e-04_jprb,1.0608e-04_jprb,7.8149e-05_jprb,4.3528e-05_jprb/)
1265 kbo( :, 3,41, 7) = (/&
1266 &1.4051e-04_jprb,1.6819e-04_jprb,1.4521e-04_jprb,1.0598e-04_jprb,5.2277e-05_jprb/)
1267 kbo( :, 4,41, 7) = (/&
1268 &1.8838e-04_jprb,2.2688e-04_jprb,1.9542e-04_jprb,1.4156e-04_jprb,6.1894e-05_jprb/)
1269 kbo( :, 5,41, 7) = (/&
1270 &2.4622e-04_jprb,2.9976e-04_jprb,2.5798e-04_jprb,1.8586e-04_jprb,7.2357e-05_jprb/)
1271 kbo( :, 1,42, 7) = (/&
1272 &5.5864e-05_jprb,6.7119e-05_jprb,5.8652e-05_jprb,4.3719e-05_jprb,2.6853e-05_jprb/)
1273 kbo( :, 2,42, 7) = (/&
1274 &7.9009e-05_jprb,9.4831e-05_jprb,8.2368e-05_jprb,6.0798e-05_jprb,3.3017e-05_jprb/)
1275 kbo( :, 3,42, 7) = (/&
1276 &1.0919e-04_jprb,1.3143e-04_jprb,1.1371e-04_jprb,8.3133e-05_jprb,3.9881e-05_jprb/)
1277 kbo( :, 4,42, 7) = (/&
1278 &1.4736e-04_jprb,1.7866e-04_jprb,1.5424e-04_jprb,1.1195e-04_jprb,4.7449e-05_jprb/)
1279 kbo( :, 5,42, 7) = (/&
1280 &1.9372e-04_jprb,2.3766e-04_jprb,2.0511e-04_jprb,1.4803e-04_jprb,5.5730e-05_jprb/)
1281 kbo( :, 1,43, 7) = (/&
1282 &4.1761e-05_jprb,5.0398e-05_jprb,4.4130e-05_jprb,3.2985e-05_jprb,2.0073e-05_jprb/)
1283 kbo( :, 2,43, 7) = (/&
1284 &5.9645e-05_jprb,7.1916e-05_jprb,6.2599e-05_jprb,4.6330e-05_jprb,2.4864e-05_jprb/)
1285 kbo( :, 3,43, 7) = (/&
1286 &8.3194e-05_jprb,1.0064e-04_jprb,8.7232e-05_jprb,6.3942e-05_jprb,3.0235e-05_jprb/)
1287 kbo( :, 4,43, 7) = (/&
1288 &1.1320e-04_jprb,1.3803e-04_jprb,1.1940e-04_jprb,8.6870e-05_jprb,3.6178e-05_jprb/)
1289 kbo( :, 5,43, 7) = (/&
1290 &1.4992e-04_jprb,1.8511e-04_jprb,1.6011e-04_jprb,1.1587e-04_jprb,4.2707e-05_jprb/)
1291 kbo( :, 1,44, 7) = (/&
1292 &3.0801e-05_jprb,3.7349e-05_jprb,3.2753e-05_jprb,2.4577e-05_jprb,1.4891e-05_jprb/)
1293 kbo( :, 2,44, 7) = (/&
1294 &4.4487e-05_jprb,5.3871e-05_jprb,4.6990e-05_jprb,3.4888e-05_jprb,1.8592e-05_jprb/)
1295 kbo( :, 3,44, 7) = (/&
1296 &6.2658e-05_jprb,7.6156e-05_jprb,6.6129e-05_jprb,4.8623e-05_jprb,2.2773e-05_jprb/)
1297 kbo( :, 4,44, 7) = (/&
1298 &8.6061e-05_jprb,1.0547e-04_jprb,9.1388e-05_jprb,6.6679e-05_jprb,2.7431e-05_jprb/)
1299 kbo( :, 5,44, 7) = (/&
1300 &1.1501e-04_jprb,1.4274e-04_jprb,1.2369e-04_jprb,8.9747e-05_jprb,3.2565e-05_jprb/)
1301 kbo( :, 1,45, 7) = (/&
1302 &2.2608e-05_jprb,2.7541e-05_jprb,2.4185e-05_jprb,1.8232e-05_jprb,1.0958e-05_jprb/)
1303 kbo( :, 2,45, 7) = (/&
1304 &3.3025e-05_jprb,4.0159e-05_jprb,3.5109e-05_jprb,2.6156e-05_jprb,1.3799e-05_jprb/)
1305 kbo( :, 3,45, 7) = (/&
1306 &4.7011e-05_jprb,5.7379e-05_jprb,4.9919e-05_jprb,3.6820e-05_jprb,1.7031e-05_jprb/)
1307 kbo( :, 4,45, 7) = (/&
1308 &6.5198e-05_jprb,8.0265e-05_jprb,6.9669e-05_jprb,5.0975e-05_jprb,2.0660e-05_jprb/)
1309 kbo( :, 5,45, 7) = (/&
1310 &8.7915e-05_jprb,1.0965e-04_jprb,9.5159e-05_jprb,6.9236e-05_jprb,2.4675e-05_jprb/)
1311 kbo( :, 1,46, 7) = (/&
1312 &1.6373e-05_jprb,2.0043e-05_jprb,1.7624e-05_jprb,1.3360e-05_jprb,7.9926e-06_jprb/)
1313 kbo( :, 2,46, 7) = (/&
1314 &2.4216e-05_jprb,2.9567e-05_jprb,2.5903e-05_jprb,1.9373e-05_jprb,1.0160e-05_jprb/)
1315 kbo( :, 3,46, 7) = (/&
1316 &3.4868e-05_jprb,4.2722e-05_jprb,3.7241e-05_jprb,2.7564e-05_jprb,1.2643e-05_jprb/)
1317 kbo( :, 4,46, 7) = (/&
1318 &4.8882e-05_jprb,6.0410e-05_jprb,5.2522e-05_jprb,3.8539e-05_jprb,1.5455e-05_jprb/)
1319 kbo( :, 5,46, 7) = (/&
1320 &6.6579e-05_jprb,8.3392e-05_jprb,7.2472e-05_jprb,5.2864e-05_jprb,1.8586e-05_jprb/)
1321 kbo( :, 1,47, 7) = (/&
1322 &1.1599e-05_jprb,1.4268e-05_jprb,1.2567e-05_jprb,9.5846e-06_jprb,5.7865e-06_jprb/)
1323 kbo( :, 2,47, 7) = (/&
1324 &1.7394e-05_jprb,2.1321e-05_jprb,1.8719e-05_jprb,1.4063e-05_jprb,7.4320e-06_jprb/)
1325 kbo( :, 3,47, 7) = (/&
1326 &2.5375e-05_jprb,3.1189e-05_jprb,2.7244e-05_jprb,2.0242e-05_jprb,9.3345e-06_jprb/)
1327 kbo( :, 4,47, 7) = (/&
1328 &3.6020e-05_jprb,4.4624e-05_jprb,3.8868e-05_jprb,2.8612e-05_jprb,1.1506e-05_jprb/)
1329 kbo( :, 5,47, 7) = (/&
1330 &4.9650e-05_jprb,6.2358e-05_jprb,5.4247e-05_jprb,3.9674e-05_jprb,1.3945e-05_jprb/)
1331 kbo( :, 1,48, 7) = (/&
1332 &8.1592e-06_jprb,1.0088e-05_jprb,8.9029e-06_jprb,6.8352e-06_jprb,4.1486e-06_jprb/)
1333 kbo( :, 2,48, 7) = (/&
1334 &1.2414e-05_jprb,1.5281e-05_jprb,1.3442e-05_jprb,1.0147e-05_jprb,5.3865e-06_jprb/)
1335 kbo( :, 3,48, 7) = (/&
1336 &1.8355e-05_jprb,2.2636e-05_jprb,1.9815e-05_jprb,1.4784e-05_jprb,6.8320e-06_jprb/)
1337 kbo( :, 4,48, 7) = (/&
1338 &2.6399e-05_jprb,3.2787e-05_jprb,2.8606e-05_jprb,2.1130e-05_jprb,8.4972e-06_jprb/)
1339 kbo( :, 5,48, 7) = (/&
1340 &3.6834e-05_jprb,4.6374e-05_jprb,4.0398e-05_jprb,2.9623e-05_jprb,1.0383e-05_jprb/)
1341 kbo( :, 1,49, 7) = (/&
1342 &5.6950e-06_jprb,7.0854e-06_jprb,6.2658e-06_jprb,4.8460e-06_jprb,2.9411e-06_jprb/)
1343 kbo( :, 2,49, 7) = (/&
1344 &8.8040e-06_jprb,1.0880e-05_jprb,9.5884e-06_jprb,7.2776e-06_jprb,3.8607e-06_jprb/)
1345 kbo( :, 3,49, 7) = (/&
1346 &1.3194e-05_jprb,1.6321e-05_jprb,1.4323e-05_jprb,1.0731e-05_jprb,4.9471e-06_jprb/)
1347 kbo( :, 4,49, 7) = (/&
1348 &1.9231e-05_jprb,2.3945e-05_jprb,2.0927e-05_jprb,1.5515e-05_jprb,6.2112e-06_jprb/)
1349 kbo( :, 5,49, 7) = (/&
1350 &2.7183e-05_jprb,3.4291e-05_jprb,2.9917e-05_jprb,2.1999e-05_jprb,7.6566e-06_jprb/)
1351 kbo( :, 1,50, 7) = (/&
1352 &3.9958e-06_jprb,5.0015e-06_jprb,4.4366e-06_jprb,3.4585e-06_jprb,2.1227e-06_jprb/)
1353 kbo( :, 2,50, 7) = (/&
1354 &6.2784e-06_jprb,7.7901e-06_jprb,6.8759e-06_jprb,5.2490e-06_jprb,2.8123e-06_jprb/)
1355 kbo( :, 3,50, 7) = (/&
1356 &9.5367e-06_jprb,1.1828e-05_jprb,1.0406e-05_jprb,7.8273e-06_jprb,3.6384e-06_jprb/)
1357 kbo( :, 4,50, 7) = (/&
1358 &1.4076e-05_jprb,1.7574e-05_jprb,1.5384e-05_jprb,1.1445e-05_jprb,4.6069e-06_jprb/)
1359 kbo( :, 5,50, 7) = (/&
1360 &2.0158e-05_jprb,2.5470e-05_jprb,2.2251e-05_jprb,1.6406e-05_jprb,5.7245e-06_jprb/)
1361 kbo( :, 1,51, 7) = (/&
1362 &2.7988e-06_jprb,3.5266e-06_jprb,3.1403e-06_jprb,2.4729e-06_jprb,1.5428e-06_jprb/)
1363 kbo( :, 2,51, 7) = (/&
1364 &4.4758e-06_jprb,5.5781e-06_jprb,4.9313e-06_jprb,3.7868e-06_jprb,2.0615e-06_jprb/)
1365 kbo( :, 3,51, 7) = (/&
1366 &6.8951e-06_jprb,8.5722e-06_jprb,7.5560e-06_jprb,5.7084e-06_jprb,2.6915e-06_jprb/)
1367 kbo( :, 4,51, 7) = (/&
1368 &1.0304e-05_jprb,1.2894e-05_jprb,1.1308e-05_jprb,8.4393e-06_jprb,3.4363e-06_jprb/)
1369 kbo( :, 5,51, 7) = (/&
1370 &1.4945e-05_jprb,1.8920e-05_jprb,1.6546e-05_jprb,1.2232e-05_jprb,4.3031e-06_jprb/)
1371 kbo( :, 1,52, 7) = (/&
1372 &1.9435e-06_jprb,2.4685e-06_jprb,2.2098e-06_jprb,1.7634e-06_jprb,1.1143e-06_jprb/)
1373 kbo( :, 2,52, 7) = (/&
1374 &3.1695e-06_jprb,3.9713e-06_jprb,3.5183e-06_jprb,2.7199e-06_jprb,1.5011e-06_jprb/)
1375 kbo( :, 3,52, 7) = (/&
1376 &4.9592e-06_jprb,6.1828e-06_jprb,5.4581e-06_jprb,4.1434e-06_jprb,1.9775e-06_jprb/)
1377 kbo( :, 4,52, 7) = (/&
1378 &7.5082e-06_jprb,9.4119e-06_jprb,8.2722e-06_jprb,6.1949e-06_jprb,2.5467e-06_jprb/)
1379 kbo( :, 5,52, 7) = (/&
1380 &1.1026e-05_jprb,1.3984e-05_jprb,1.2246e-05_jprb,9.0780e-06_jprb,3.2145e-06_jprb/)
1381 kbo( :, 1,53, 7) = (/&
1382 &1.3359e-06_jprb,1.7128e-06_jprb,1.5439e-06_jprb,1.2551e-06_jprb,7.9874e-07_jprb/)
1383 kbo( :, 2,53, 7) = (/&
1384 &2.2274e-06_jprb,2.8086e-06_jprb,2.4951e-06_jprb,1.9446e-06_jprb,1.0843e-06_jprb/)
1385 kbo( :, 3,53, 7) = (/&
1386 &3.5445e-06_jprb,4.4342e-06_jprb,3.9206e-06_jprb,2.9916e-06_jprb,1.4407e-06_jprb/)
1387 kbo( :, 4,53, 7) = (/&
1388 &5.4423e-06_jprb,6.8307e-06_jprb,6.0173e-06_jprb,4.5231e-06_jprb,1.8721e-06_jprb/)
1389 kbo( :, 5,53, 7) = (/&
1390 &8.0931e-06_jprb,1.0281e-05_jprb,9.0168e-06_jprb,6.7031e-06_jprb,2.3821e-06_jprb/)
1391 kbo( :, 1,54, 7) = (/&
1392 &9.2652e-07_jprb,1.1988e-06_jprb,1.0892e-06_jprb,9.0472e-07_jprb,5.9185e-07_jprb/)
1393 kbo( :, 2,54, 7) = (/&
1394 &1.5791e-06_jprb,2.0042e-06_jprb,1.7864e-06_jprb,1.4053e-06_jprb,8.0903e-07_jprb/)
1395 kbo( :, 3,54, 7) = (/&
1396 &2.5564e-06_jprb,3.2106e-06_jprb,2.8433e-06_jprb,2.1812e-06_jprb,1.0829e-06_jprb/)
1397 kbo( :, 4,54, 7) = (/&
1398 &3.9810e-06_jprb,5.0042e-06_jprb,4.4158e-06_jprb,3.3311e-06_jprb,1.4179e-06_jprb/)
1399 kbo( :, 5,54, 7) = (/&
1400 &5.9940e-06_jprb,7.6213e-06_jprb,6.6941e-06_jprb,4.9908e-06_jprb,1.8162e-06_jprb/)
1401 kbo( :, 1,55, 7) = (/&
1402 &6.4271e-07_jprb,8.3986e-07_jprb,7.6969e-07_jprb,6.5622e-07_jprb,4.4680e-07_jprb/)
1403 kbo( :, 2,55, 7) = (/&
1404 &1.1202e-06_jprb,1.4315e-06_jprb,1.2812e-06_jprb,1.0198e-06_jprb,6.1469e-07_jprb/)
1405 kbo( :, 3,55, 7) = (/&
1406 &1.8463e-06_jprb,2.3303e-06_jprb,2.0672e-06_jprb,1.5950e-06_jprb,8.2848e-07_jprb/)
1407 kbo( :, 4,55, 7) = (/&
1408 &2.9187e-06_jprb,3.6752e-06_jprb,3.2484e-06_jprb,2.4593e-06_jprb,1.0923e-06_jprb/)
1409 kbo( :, 5,55, 7) = (/&
1410 &4.4490e-06_jprb,5.6623e-06_jprb,4.9799e-06_jprb,3.7232e-06_jprb,1.4079e-06_jprb/)
1411 kbo( :, 1,56, 7) = (/&
1412 &4.4222e-07_jprb,5.8443e-07_jprb,5.4132e-07_jprb,4.7675e-07_jprb,3.3738e-07_jprb/)
1413 kbo( :, 2,56, 7) = (/&
1414 &7.8907e-07_jprb,1.0157e-06_jprb,9.1377e-07_jprb,7.3810e-07_jprb,4.6671e-07_jprb/)
1415 kbo( :, 3,56, 7) = (/&
1416 &1.3248e-06_jprb,1.6819e-06_jprb,1.4956e-06_jprb,1.1622e-06_jprb,6.3354e-07_jprb/)
1417 kbo( :, 4,56, 7) = (/&
1418 &2.1296e-06_jprb,2.6885e-06_jprb,2.3793e-06_jprb,1.8091e-06_jprb,8.4125e-07_jprb/)
1419 kbo( :, 5,56, 7) = (/&
1420 &3.2905e-06_jprb,4.1906e-06_jprb,3.6905e-06_jprb,2.7667e-06_jprb,1.0917e-06_jprb/)
1421 kbo( :, 1,57, 7) = (/&
1422 &3.0166e-07_jprb,4.0366e-07_jprb,3.7890e-07_jprb,3.4759e-07_jprb,2.5495e-07_jprb/)
1423 kbo( :, 2,57, 7) = (/&
1424 &5.5161e-07_jprb,7.1542e-07_jprb,6.4792e-07_jprb,5.3334e-07_jprb,3.5433e-07_jprb/)
1425 kbo( :, 3,57, 7) = (/&
1426 &9.4470e-07_jprb,1.2069e-06_jprb,1.0761e-06_jprb,8.4394e-07_jprb,4.8446e-07_jprb/)
1427 kbo( :, 4,57, 7) = (/&
1428 &1.5448e-06_jprb,1.9571e-06_jprb,1.7349e-06_jprb,1.3257e-06_jprb,6.4791e-07_jprb/)
1429 kbo( :, 5,57, 7) = (/&
1430 &2.4231e-06_jprb,3.0885e-06_jprb,2.7246e-06_jprb,2.0476e-06_jprb,8.4650e-07_jprb/)
1431 kbo( :, 1,58, 7) = (/&
1432 &2.0615e-07_jprb,2.7966e-07_jprb,2.6659e-07_jprb,2.5672e-07_jprb,1.9490e-07_jprb/)
1433 kbo( :, 2,58, 7) = (/&
1434 &3.8634e-07_jprb,5.0506e-07_jprb,4.6082e-07_jprb,3.8792e-07_jprb,2.7193e-07_jprb/)
1435 kbo( :, 3,58, 7) = (/&
1436 &6.7545e-07_jprb,8.6794e-07_jprb,7.7672e-07_jprb,6.1534e-07_jprb,3.7439e-07_jprb/)
1437 kbo( :, 4,58, 7) = (/&
1438 &1.1229e-06_jprb,1.4289e-06_jprb,1.2690e-06_jprb,9.7539e-07_jprb,5.0417e-07_jprb/)
1439 kbo( :, 5,58, 7) = (/&
1440 &1.7888e-06_jprb,2.2841e-06_jprb,2.0182e-06_jprb,1.5209e-06_jprb,6.6299e-07_jprb/)
1441 kbo( :, 1,59, 7) = (/&
1442 &1.5864e-07_jprb,2.1618e-07_jprb,2.0732e-07_jprb,2.0350e-07_jprb,1.6565e-07_jprb/)
1443 kbo( :, 2,59, 7) = (/&
1444 &3.0072e-07_jprb,3.9451e-07_jprb,3.6086e-07_jprb,3.0632e-07_jprb,2.3297e-07_jprb/)
1445 kbo( :, 3,59, 7) = (/&
1446 &5.3103e-07_jprb,6.8463e-07_jprb,6.1355e-07_jprb,4.8792e-07_jprb,3.2258e-07_jprb/)
1447 kbo( :, 4,59, 7) = (/&
1448 &8.9096e-07_jprb,1.1377e-06_jprb,1.0113e-06_jprb,7.7874e-07_jprb,4.3608e-07_jprb/)
1449 kbo( :, 5,59, 7) = (/&
1450 &1.4311e-06_jprb,1.8344e-06_jprb,1.6214e-06_jprb,1.2223e-06_jprb,5.7456e-07_jprb/)
1451 kbo( :, 1,13, 8) = (/&
1452 &1.1431e-02_jprb,1.2741e-02_jprb,1.1436e-02_jprb,9.1621e-03_jprb,8.0519e-02_jprb/)
1453 kbo( :, 2,13, 8) = (/&
1454 &1.5206e-02_jprb,1.7160e-02_jprb,1.5555e-02_jprb,1.2454e-02_jprb,8.6864e-02_jprb/)
1455 kbo( :, 3,13, 8) = (/&
1456 &1.9976e-02_jprb,2.2722e-02_jprb,2.0654e-02_jprb,1.6502e-02_jprb,9.4446e-02_jprb/)
1457 kbo( :, 4,13, 8) = (/&
1458 &2.5954e-02_jprb,2.9643e-02_jprb,2.6781e-02_jprb,2.1406e-02_jprb,1.0333e-01_jprb/)
1459 kbo( :, 5,13, 8) = (/&
1460 &3.3352e-02_jprb,3.7953e-02_jprb,3.4189e-02_jprb,2.7277e-02_jprb,1.1304e-01_jprb/)
1461 kbo( :, 1,14, 8) = (/&
1462 &1.0179e-02_jprb,1.1389e-02_jprb,1.0176e-02_jprb,8.0522e-03_jprb,6.5504e-02_jprb/)
1463 kbo( :, 2,14, 8) = (/&
1464 &1.3641e-02_jprb,1.5355e-02_jprb,1.3817e-02_jprb,1.0906e-02_jprb,7.2230e-02_jprb/)
1465 kbo( :, 3,14, 8) = (/&
1466 &1.8023e-02_jprb,2.0418e-02_jprb,1.8352e-02_jprb,1.4437e-02_jprb,8.0150e-02_jprb/)
1467 kbo( :, 4,14, 8) = (/&
1468 &2.3532e-02_jprb,2.6705e-02_jprb,2.3876e-02_jprb,1.8758e-02_jprb,8.9038e-02_jprb/)
1469 kbo( :, 5,14, 8) = (/&
1470 &3.0239e-02_jprb,3.4282e-02_jprb,3.0614e-02_jprb,2.4017e-02_jprb,9.8577e-02_jprb/)
1471 kbo( :, 1,15, 8) = (/&
1472 &9.0090e-03_jprb,1.0120e-02_jprb,9.0167e-03_jprb,7.0764e-03_jprb,5.2591e-02_jprb/)
1473 kbo( :, 2,15, 8) = (/&
1474 &1.2186e-02_jprb,1.3734e-02_jprb,1.2258e-02_jprb,9.5696e-03_jprb,5.9402e-02_jprb/)
1475 kbo( :, 3,15, 8) = (/&
1476 &1.6225e-02_jprb,1.8333e-02_jprb,1.6340e-02_jprb,1.2688e-02_jprb,6.7127e-02_jprb/)
1477 kbo( :, 4,15, 8) = (/&
1478 &2.1185e-02_jprb,2.4042e-02_jprb,2.1332e-02_jprb,1.6578e-02_jprb,7.5512e-02_jprb/)
1479 kbo( :, 5,15, 8) = (/&
1480 &2.7141e-02_jprb,3.0928e-02_jprb,2.7480e-02_jprb,2.1333e-02_jprb,8.4521e-02_jprb/)
1481 kbo( :, 1,16, 8) = (/&
1482 &7.9666e-03_jprb,8.9862e-03_jprb,7.9671e-03_jprb,6.2242e-03_jprb,4.1294e-02_jprb/)
1483 kbo( :, 2,16, 8) = (/&
1484 &1.0885e-02_jprb,1.2270e-02_jprb,1.0885e-02_jprb,8.4303e-03_jprb,4.7519e-02_jprb/)
1485 kbo( :, 3,16, 8) = (/&
1486 &1.4511e-02_jprb,1.6442e-02_jprb,1.4544e-02_jprb,1.1234e-02_jprb,5.4415e-02_jprb/)
1487 kbo( :, 4,16, 8) = (/&
1488 &1.8926e-02_jprb,2.1554e-02_jprb,1.9076e-02_jprb,1.4750e-02_jprb,6.1801e-02_jprb/)
1489 kbo( :, 5,16, 8) = (/&
1490 &2.4236e-02_jprb,2.7687e-02_jprb,2.4633e-02_jprb,1.9024e-02_jprb,6.9624e-02_jprb/)
1491 kbo( :, 1,17, 8) = (/&
1492 &7.1080e-03_jprb,8.0147e-03_jprb,7.0758e-03_jprb,5.4873e-03_jprb,3.3297e-02_jprb/)
1493 kbo( :, 2,17, 8) = (/&
1494 &9.7388e-03_jprb,1.0991e-02_jprb,9.6940e-03_jprb,7.4587e-03_jprb,3.8754e-02_jprb/)
1495 kbo( :, 3,17, 8) = (/&
1496 &1.2971e-02_jprb,1.4712e-02_jprb,1.2980e-02_jprb,9.9806e-03_jprb,4.4673e-02_jprb/)
1497 kbo( :, 4,17, 8) = (/&
1498 &1.6920e-02_jprb,1.9221e-02_jprb,1.7037e-02_jprb,1.3131e-02_jprb,5.0878e-02_jprb/)
1499 kbo( :, 5,17, 8) = (/&
1500 &2.1675e-02_jprb,2.4688e-02_jprb,2.1958e-02_jprb,1.6944e-02_jprb,5.7392e-02_jprb/)
1501 kbo( :, 1,18, 8) = (/&
1502 &6.4048e-03_jprb,7.2149e-03_jprb,6.3423e-03_jprb,4.8705e-03_jprb,2.7610e-02_jprb/)
1503 kbo( :, 2,18, 8) = (/&
1504 &8.7579e-03_jprb,9.8929e-03_jprb,8.6960e-03_jprb,6.6399e-03_jprb,3.2241e-02_jprb/)
1505 kbo( :, 3,18, 8) = (/&
1506 &1.1674e-02_jprb,1.3178e-02_jprb,1.1614e-02_jprb,8.8937e-03_jprb,3.7151e-02_jprb/)
1507 kbo( :, 4,18, 8) = (/&
1508 &1.5226e-02_jprb,1.7183e-02_jprb,1.5190e-02_jprb,1.1678e-02_jprb,4.2321e-02_jprb/)
1509 kbo( :, 5,18, 8) = (/&
1510 &1.9521e-02_jprb,2.2065e-02_jprb,1.9536e-02_jprb,1.5022e-02_jprb,4.7759e-02_jprb/)
1511 kbo( :, 1,19, 8) = (/&
1512 &5.7780e-03_jprb,6.5097e-03_jprb,5.7073e-03_jprb,4.3362e-03_jprb,2.3517e-02_jprb/)
1513 kbo( :, 2,19, 8) = (/&
1514 &7.8980e-03_jprb,8.8943e-03_jprb,7.8019e-03_jprb,5.9182e-03_jprb,2.7464e-02_jprb/)
1515 kbo( :, 3,19, 8) = (/&
1516 &1.0547e-02_jprb,1.1813e-02_jprb,1.0378e-02_jprb,7.9082e-03_jprb,3.1653e-02_jprb/)
1517 kbo( :, 4,19, 8) = (/&
1518 &1.3780e-02_jprb,1.5395e-02_jprb,1.3544e-02_jprb,1.0334e-02_jprb,3.6068e-02_jprb/)
1519 kbo( :, 5,19, 8) = (/&
1520 &1.7661e-02_jprb,1.9769e-02_jprb,1.7387e-02_jprb,1.3263e-02_jprb,4.0672e-02_jprb/)
1521 kbo( :, 1,20, 8) = (/&
1522 &5.2358e-03_jprb,5.8943e-03_jprb,5.1609e-03_jprb,3.8930e-03_jprb,2.0265e-02_jprb/)
1523 kbo( :, 2,20, 8) = (/&
1524 &7.1650e-03_jprb,8.0337e-03_jprb,7.0303e-03_jprb,5.3009e-03_jprb,2.3642e-02_jprb/)
1525 kbo( :, 3,20, 8) = (/&
1526 &9.5768e-03_jprb,1.0673e-02_jprb,9.3270e-03_jprb,7.0467e-03_jprb,2.7210e-02_jprb/)
1527 kbo( :, 4,20, 8) = (/&
1528 &1.2520e-02_jprb,1.3910e-02_jprb,1.2148e-02_jprb,9.1772e-03_jprb,3.0955e-02_jprb/)
1529 kbo( :, 5,20, 8) = (/&
1530 &1.6054e-02_jprb,1.7830e-02_jprb,1.5571e-02_jprb,1.1760e-02_jprb,3.4856e-02_jprb/)
1531 kbo( :, 1,21, 8) = (/&
1532 &4.7306e-03_jprb,5.3228e-03_jprb,4.6480e-03_jprb,3.4934e-03_jprb,1.7415e-02_jprb/)
1533 kbo( :, 2,21, 8) = (/&
1534 &6.4837e-03_jprb,7.2505e-03_jprb,6.3214e-03_jprb,4.7410e-03_jprb,2.0248e-02_jprb/)
1535 kbo( :, 3,21, 8) = (/&
1536 &8.6672e-03_jprb,9.6479e-03_jprb,8.3920e-03_jprb,6.2776e-03_jprb,2.3246e-02_jprb/)
1537 kbo( :, 4,21, 8) = (/&
1538 &1.1340e-02_jprb,1.2581e-02_jprb,1.0918e-02_jprb,8.1620e-03_jprb,2.6397e-02_jprb/)
1539 kbo( :, 5,21, 8) = (/&
1540 &1.4560e-02_jprb,1.6102e-02_jprb,1.3967e-02_jprb,1.0440e-02_jprb,2.9697e-02_jprb/)
1541 kbo( :, 1,22, 8) = (/&
1542 &4.3418e-03_jprb,4.8765e-03_jprb,4.2505e-03_jprb,3.1831e-03_jprb,1.4725e-02_jprb/)
1543 kbo( :, 2,22, 8) = (/&
1544 &5.9449e-03_jprb,6.6380e-03_jprb,5.7744e-03_jprb,4.3038e-03_jprb,1.7073e-02_jprb/)
1545 kbo( :, 3,22, 8) = (/&
1546 &7.9389e-03_jprb,8.8321e-03_jprb,7.6615e-03_jprb,5.6883e-03_jprb,1.9560e-02_jprb/)
1547 kbo( :, 4,22, 8) = (/&
1548 &1.0382e-02_jprb,1.1507e-02_jprb,9.9583e-03_jprb,7.3808e-03_jprb,2.2180e-02_jprb/)
1549 kbo( :, 5,22, 8) = (/&
1550 &1.3348e-02_jprb,1.4718e-02_jprb,1.2724e-02_jprb,9.4158e-03_jprb,2.4942e-02_jprb/)
1551 kbo( :, 1,23, 8) = (/&
1552 &3.9755e-03_jprb,4.4601e-03_jprb,3.8791e-03_jprb,2.8940e-03_jprb,1.2317e-02_jprb/)
1553 kbo( :, 2,23, 8) = (/&
1554 &5.4326e-03_jprb,6.0675e-03_jprb,5.2649e-03_jprb,3.9079e-03_jprb,1.4261e-02_jprb/)
1555 kbo( :, 3,23, 8) = (/&
1556 &7.2471e-03_jprb,8.0652e-03_jprb,6.9775e-03_jprb,5.1609e-03_jprb,1.6319e-02_jprb/)
1557 kbo( :, 4,23, 8) = (/&
1558 &9.4853e-03_jprb,1.0499e-02_jprb,9.0669e-03_jprb,6.6817e-03_jprb,1.8494e-02_jprb/)
1559 kbo( :, 5,23, 8) = (/&
1560 &1.2224e-02_jprb,1.3433e-02_jprb,1.1575e-02_jprb,8.5016e-03_jprb,2.0803e-02_jprb/)
1561 kbo( :, 1,24, 8) = (/&
1562 &3.6237e-03_jprb,4.0664e-03_jprb,3.5327e-03_jprb,2.6249e-03_jprb,1.0111e-02_jprb/)
1563 kbo( :, 2,24, 8) = (/&
1564 &4.9405e-03_jprb,5.5284e-03_jprb,4.7867e-03_jprb,3.5422e-03_jprb,1.1712e-02_jprb/)
1565 kbo( :, 3,24, 8) = (/&
1566 &6.5941e-03_jprb,7.3367e-03_jprb,6.3412e-03_jprb,4.6740e-03_jprb,1.3407e-02_jprb/)
1567 kbo( :, 4,24, 8) = (/&
1568 &8.6500e-03_jprb,9.5582e-03_jprb,8.2387e-03_jprb,6.0413e-03_jprb,1.5203e-02_jprb/)
1569 kbo( :, 5,24, 8) = (/&
1570 &1.1160e-02_jprb,1.2258e-02_jprb,1.0518e-02_jprb,7.6745e-03_jprb,1.7120e-02_jprb/)
1571 kbo( :, 1,25, 8) = (/&
1572 &3.2923e-03_jprb,3.7097e-03_jprb,3.2174e-03_jprb,2.3852e-03_jprb,8.2743e-03_jprb/)
1573 kbo( :, 2,25, 8) = (/&
1574 &4.4868e-03_jprb,5.0333e-03_jprb,4.3547e-03_jprb,3.2140e-03_jprb,9.5864e-03_jprb/)
1575 kbo( :, 3,25, 8) = (/&
1576 &6.0022e-03_jprb,6.6817e-03_jprb,5.7652e-03_jprb,4.2348e-03_jprb,1.0982e-02_jprb/)
1577 kbo( :, 4,25, 8) = (/&
1578 &7.8855e-03_jprb,8.7187e-03_jprb,7.4913e-03_jprb,5.4655e-03_jprb,1.2469e-02_jprb/)
1579 kbo( :, 5,25, 8) = (/&
1580 &1.0169e-02_jprb,1.1196e-02_jprb,9.5768e-03_jprb,6.9385e-03_jprb,1.4057e-02_jprb/)
1581 kbo( :, 1,26, 8) = (/&
1582 &2.9966e-03_jprb,3.3936e-03_jprb,2.9435e-03_jprb,2.1773e-03_jprb,6.8226e-03_jprb/)
1583 kbo( :, 2,26, 8) = (/&
1584 &4.0887e-03_jprb,4.6003e-03_jprb,3.9768e-03_jprb,2.9281e-03_jprb,7.9056e-03_jprb/)
1585 kbo( :, 3,26, 8) = (/&
1586 &5.4745e-03_jprb,6.1149e-03_jprb,5.2640e-03_jprb,3.8491e-03_jprb,9.0607e-03_jprb/)
1587 kbo( :, 4,26, 8) = (/&
1588 &7.1886e-03_jprb,7.9856e-03_jprb,6.8456e-03_jprb,4.9643e-03_jprb,1.0300e-02_jprb/)
1589 kbo( :, 5,26, 8) = (/&
1590 &9.2596e-03_jprb,1.0248e-02_jprb,8.7489e-03_jprb,6.3014e-03_jprb,1.1624e-02_jprb/)
1591 kbo( :, 1,27, 8) = (/&
1592 &2.7156e-03_jprb,3.0876e-03_jprb,2.6805e-03_jprb,1.9822e-03_jprb,5.5158e-03_jprb/)
1593 kbo( :, 2,27, 8) = (/&
1594 &3.7104e-03_jprb,4.1900e-03_jprb,3.6215e-03_jprb,2.6593e-03_jprb,6.4001e-03_jprb/)
1595 kbo( :, 3,27, 8) = (/&
1596 &4.9667e-03_jprb,5.5771e-03_jprb,4.8004e-03_jprb,3.4928e-03_jprb,7.3466e-03_jprb/)
1597 kbo( :, 4,27, 8) = (/&
1598 &6.5120e-03_jprb,7.2813e-03_jprb,6.2396e-03_jprb,4.5038e-03_jprb,8.3626e-03_jprb/)
1599 kbo( :, 5,27, 8) = (/&
1600 &8.3748e-03_jprb,9.3312e-03_jprb,7.9649e-03_jprb,5.7101e-03_jprb,9.4540e-03_jprb/)
1601 kbo( :, 1,28, 8) = (/&
1602 &2.4540e-03_jprb,2.8015e-03_jprb,2.4332e-03_jprb,1.7986e-03_jprb,4.3717e-03_jprb/)
1603 kbo( :, 2,28, 8) = (/&
1604 &3.3533e-03_jprb,3.8065e-03_jprb,3.2907e-03_jprb,2.4104e-03_jprb,5.0844e-03_jprb/)
1605 kbo( :, 3,28, 8) = (/&
1606 &4.4816e-03_jprb,5.0648e-03_jprb,4.3611e-03_jprb,3.1641e-03_jprb,5.8491e-03_jprb/)
1607 kbo( :, 4,28, 8) = (/&
1608 &5.8656e-03_jprb,6.6059e-03_jprb,5.6649e-03_jprb,4.0783e-03_jprb,6.6719e-03_jprb/)
1609 kbo( :, 5,28, 8) = (/&
1610 &7.5375e-03_jprb,8.4524e-03_jprb,7.2181e-03_jprb,5.1634e-03_jprb,7.5534e-03_jprb/)
1611 kbo( :, 1,29, 8) = (/&
1612 &2.2199e-03_jprb,2.5468e-03_jprb,2.2116e-03_jprb,1.6320e-03_jprb,3.4313e-03_jprb/)
1613 kbo( :, 2,29, 8) = (/&
1614 &3.0284e-03_jprb,3.4576e-03_jprb,2.9908e-03_jprb,2.1868e-03_jprb,4.0007e-03_jprb/)
1615 kbo( :, 3,29, 8) = (/&
1616 &4.0394e-03_jprb,4.5959e-03_jprb,3.9584e-03_jprb,2.8693e-03_jprb,4.6141e-03_jprb/)
1617 kbo( :, 4,29, 8) = (/&
1618 &5.2804e-03_jprb,5.9851e-03_jprb,5.1333e-03_jprb,3.6901e-03_jprb,5.2723e-03_jprb/)
1619 kbo( :, 5,29, 8) = (/&
1620 &6.7815e-03_jprb,7.6482e-03_jprb,6.5273e-03_jprb,4.6670e-03_jprb,5.9784e-03_jprb/)
1621 kbo( :, 1,30, 8) = (/&
1622 &2.0046e-03_jprb,2.3130e-03_jprb,2.0090e-03_jprb,1.4794e-03_jprb,2.6543e-03_jprb/)
1623 kbo( :, 2,30, 8) = (/&
1624 &2.7295e-03_jprb,3.1369e-03_jprb,2.7138e-03_jprb,1.9812e-03_jprb,3.1043e-03_jprb/)
1625 kbo( :, 3,30, 8) = (/&
1626 &3.6356e-03_jprb,4.1607e-03_jprb,3.5841e-03_jprb,2.5951e-03_jprb,3.5892e-03_jprb/)
1627 kbo( :, 4,30, 8) = (/&
1628 &4.7491e-03_jprb,5.4103e-03_jprb,4.6363e-03_jprb,3.3323e-03_jprb,4.1088e-03_jprb/)
1629 kbo( :, 5,30, 8) = (/&
1630 &6.1030e-03_jprb,6.9063e-03_jprb,5.8950e-03_jprb,4.2074e-03_jprb,4.6673e-03_jprb/)
1631 kbo( :, 1,31, 8) = (/&
1632 &1.8116e-03_jprb,2.1021e-03_jprb,1.8264e-03_jprb,1.3426e-03_jprb,2.0192e-03_jprb/)
1633 kbo( :, 2,31, 8) = (/&
1634 &2.4626e-03_jprb,2.8445e-03_jprb,2.4615e-03_jprb,1.7947e-03_jprb,2.3682e-03_jprb/)
1635 kbo( :, 3,31, 8) = (/&
1636 &3.2770e-03_jprb,3.7680e-03_jprb,3.2435e-03_jprb,2.3454e-03_jprb,2.7454e-03_jprb/)
1637 kbo( :, 4,31, 8) = (/&
1638 &4.2825e-03_jprb,4.8933e-03_jprb,4.1907e-03_jprb,3.0057e-03_jprb,3.1516e-03_jprb/)
1639 kbo( :, 5,31, 8) = (/&
1640 &5.5107e-03_jprb,6.2496e-03_jprb,5.3257e-03_jprb,3.7889e-03_jprb,3.5873e-03_jprb/)
1641 kbo( :, 1,32, 8) = (/&
1642 &1.6409e-03_jprb,1.9128e-03_jprb,1.6615e-03_jprb,1.2200e-03_jprb,1.5399e-03_jprb/)
1643 kbo( :, 2,32, 8) = (/&
1644 &2.2276e-03_jprb,2.5834e-03_jprb,2.2335e-03_jprb,1.6257e-03_jprb,1.8108e-03_jprb/)
1645 kbo( :, 3,32, 8) = (/&
1646 &2.9642e-03_jprb,3.4164e-03_jprb,2.9366e-03_jprb,2.1192e-03_jprb,2.1049e-03_jprb/)
1647 kbo( :, 4,32, 8) = (/&
1648 &3.8783e-03_jprb,4.4382e-03_jprb,3.7929e-03_jprb,2.7120e-03_jprb,2.4216e-03_jprb/)
1649 kbo( :, 5,32, 8) = (/&
1650 &5.0008e-03_jprb,5.6727e-03_jprb,4.8212e-03_jprb,3.4168e-03_jprb,2.7630e-03_jprb/)
1651 kbo( :, 1,33, 8) = (/&
1652 &1.4896e-03_jprb,1.7425e-03_jprb,1.5121e-03_jprb,1.1085e-03_jprb,1.1708e-03_jprb/)
1653 kbo( :, 2,33, 8) = (/&
1654 &2.0219e-03_jprb,2.3499e-03_jprb,2.0274e-03_jprb,1.4717e-03_jprb,1.3798e-03_jprb/)
1655 kbo( :, 3,33, 8) = (/&
1656 &2.6933e-03_jprb,3.1059e-03_jprb,2.6641e-03_jprb,1.9145e-03_jprb,1.6078e-03_jprb/)
1657 kbo( :, 4,33, 8) = (/&
1658 &3.5312e-03_jprb,4.0360e-03_jprb,3.4383e-03_jprb,2.4485e-03_jprb,1.8549e-03_jprb/)
1659 kbo( :, 5,33, 8) = (/&
1660 &4.5576e-03_jprb,5.1702e-03_jprb,4.3769e-03_jprb,3.0873e-03_jprb,2.1221e-03_jprb/)
1661 kbo( :, 1,34, 8) = (/&
1662 &1.3461e-03_jprb,1.5773e-03_jprb,1.3654e-03_jprb,9.9848e-04_jprb,9.1828e-04_jprb/)
1663 kbo( :, 2,34, 8) = (/&
1664 &1.8293e-03_jprb,2.1264e-03_jprb,1.8294e-03_jprb,1.3224e-03_jprb,1.0850e-03_jprb/)
1665 kbo( :, 3,34, 8) = (/&
1666 &2.4421e-03_jprb,2.8129e-03_jprb,2.4038e-03_jprb,1.7186e-03_jprb,1.2670e-03_jprb/)
1667 kbo( :, 4,34, 8) = (/&
1668 &3.2077e-03_jprb,3.6631e-03_jprb,3.1076e-03_jprb,2.1997e-03_jprb,1.4654e-03_jprb/)
1669 kbo( :, 5,34, 8) = (/&
1670 &4.1521e-03_jprb,4.7027e-03_jprb,3.9614e-03_jprb,2.7773e-03_jprb,1.6801e-03_jprb/)
1671 kbo( :, 1,35, 8) = (/&
1672 &1.1832e-03_jprb,1.3882e-03_jprb,1.1991e-03_jprb,8.7402e-04_jprb,7.0393e-04_jprb/)
1673 kbo( :, 2,35, 8) = (/&
1674 &1.6136e-03_jprb,1.8765e-03_jprb,1.6089e-03_jprb,1.1585e-03_jprb,8.3445e-04_jprb/)
1675 kbo( :, 3,35, 8) = (/&
1676 &2.1631e-03_jprb,2.4899e-03_jprb,2.1186e-03_jprb,1.5089e-03_jprb,9.7770e-04_jprb/)
1677 kbo( :, 4,35, 8) = (/&
1678 &2.8535e-03_jprb,3.2542e-03_jprb,2.7485e-03_jprb,1.9364e-03_jprb,1.1343e-03_jprb/)
1679 kbo( :, 5,35, 8) = (/&
1680 &3.7092e-03_jprb,4.1965e-03_jprb,3.5164e-03_jprb,2.4522e-03_jprb,1.3039e-03_jprb/)
1681 kbo( :, 1,36, 8) = (/&
1682 &1.0066e-03_jprb,1.1833e-03_jprb,1.0195e-03_jprb,7.4064e-04_jprb,5.2366e-04_jprb/)
1683 kbo( :, 2,36, 8) = (/&
1684 &1.3815e-03_jprb,1.6071e-03_jprb,1.3739e-03_jprb,9.8573e-04_jprb,6.2344e-04_jprb/)
1685 kbo( :, 3,36, 8) = (/&
1686 &1.8626e-03_jprb,2.1449e-03_jprb,1.8191e-03_jprb,1.2898e-03_jprb,7.3360e-04_jprb/)
1687 kbo( :, 4,36, 8) = (/&
1688 &2.4741e-03_jprb,2.8182e-03_jprb,2.3729e-03_jprb,1.6635e-03_jprb,8.5436e-04_jprb/)
1689 kbo( :, 5,36, 8) = (/&
1690 &3.2336e-03_jprb,3.6568e-03_jprb,3.0504e-03_jprb,2.1181e-03_jprb,9.8625e-04_jprb/)
1691 kbo( :, 1,37, 8) = (/&
1692 &8.2084e-04_jprb,9.6709e-04_jprb,8.3229e-04_jprb,6.0374e-04_jprb,4.0420e-04_jprb/)
1693 kbo( :, 2,37, 8) = (/&
1694 &1.1372e-03_jprb,1.3254e-03_jprb,1.1300e-03_jprb,8.0872e-04_jprb,4.8417e-04_jprb/)
1695 kbo( :, 3,37, 8) = (/&
1696 &1.5468e-03_jprb,1.7826e-03_jprb,1.5083e-03_jprb,1.0643e-03_jprb,5.7283e-04_jprb/)
1697 kbo( :, 4,37, 8) = (/&
1698 &2.0724e-03_jprb,2.3603e-03_jprb,1.9807e-03_jprb,1.3829e-03_jprb,6.7031e-04_jprb/)
1699 kbo( :, 5,37, 8) = (/&
1700 &2.7301e-03_jprb,3.0852e-03_jprb,2.5656e-03_jprb,1.7725e-03_jprb,7.7693e-04_jprb/)
1701 kbo( :, 1,38, 8) = (/&
1702 &6.6765e-04_jprb,7.8856e-04_jprb,6.7796e-04_jprb,4.9087e-04_jprb,3.1034e-04_jprb/)
1703 kbo( :, 2,38, 8) = (/&
1704 &9.3399e-04_jprb,1.0908e-03_jprb,9.2831e-04_jprb,6.6210e-04_jprb,3.7420e-04_jprb/)
1705 kbo( :, 3,38, 8) = (/&
1706 &1.2829e-03_jprb,1.4801e-03_jprb,1.2480e-03_jprb,8.7788e-04_jprb,4.4529e-04_jprb/)
1707 kbo( :, 4,38, 8) = (/&
1708 &1.7334e-03_jprb,1.9765e-03_jprb,1.6521e-03_jprb,1.1484e-03_jprb,5.2389e-04_jprb/)
1709 kbo( :, 5,38, 8) = (/&
1710 &2.3042e-03_jprb,2.6028e-03_jprb,2.1565e-03_jprb,1.4823e-03_jprb,6.1008e-04_jprb/)
1711 kbo( :, 1,39, 8) = (/&
1712 &5.4315e-04_jprb,6.4310e-04_jprb,5.5211e-04_jprb,3.9890e-04_jprb,2.3583e-04_jprb/)
1713 kbo( :, 2,39, 8) = (/&
1714 &7.6743e-04_jprb,8.9797e-04_jprb,7.6314e-04_jprb,5.4269e-04_jprb,2.8632e-04_jprb/)
1715 kbo( :, 3,39, 8) = (/&
1716 &1.0649e-03_jprb,1.2299e-03_jprb,1.0342e-03_jprb,7.2462e-04_jprb,3.4293e-04_jprb/)
1717 kbo( :, 4,39, 8) = (/&
1718 &1.4519e-03_jprb,1.6575e-03_jprb,1.3791e-03_jprb,9.5496e-04_jprb,4.0575e-04_jprb/)
1719 kbo( :, 5,39, 8) = (/&
1720 &1.9462e-03_jprb,2.1987e-03_jprb,1.8149e-03_jprb,1.2411e-03_jprb,4.7487e-04_jprb/)
1721 kbo( :, 1,40, 8) = (/&
1722 &4.2660e-04_jprb,5.0722e-04_jprb,4.3537e-04_jprb,3.1438e-04_jprb,1.8128e-04_jprb/)
1723 kbo( :, 2,40, 8) = (/&
1724 &6.1039e-04_jprb,7.1647e-04_jprb,6.0817e-04_jprb,4.3189e-04_jprb,2.2187e-04_jprb/)
1725 kbo( :, 3,40, 8) = (/&
1726 &8.5703e-04_jprb,9.9240e-04_jprb,8.3374e-04_jprb,5.8276e-04_jprb,2.6760e-04_jprb/)
1727 kbo( :, 4,40, 8) = (/&
1728 &1.1823e-03_jprb,1.3510e-03_jprb,1.1225e-03_jprb,7.7459e-04_jprb,3.1857e-04_jprb/)
1729 kbo( :, 5,40, 8) = (/&
1730 &1.6018e-03_jprb,1.8123e-03_jprb,1.4916e-03_jprb,1.0158e-03_jprb,3.7479e-04_jprb/)
1731 kbo( :, 1,41, 8) = (/&
1732 &3.3271e-04_jprb,3.9736e-04_jprb,3.4108e-04_jprb,2.4624e-04_jprb,1.3885e-04_jprb/)
1733 kbo( :, 2,41, 8) = (/&
1734 &4.8225e-04_jprb,5.6846e-04_jprb,4.8237e-04_jprb,3.4216e-04_jprb,1.7137e-04_jprb/)
1735 kbo( :, 3,41, 8) = (/&
1736 &6.8576e-04_jprb,7.9688e-04_jprb,6.6837e-04_jprb,4.6622e-04_jprb,2.0821e-04_jprb/)
1737 kbo( :, 4,41, 8) = (/&
1738 &9.5732e-04_jprb,1.0976e-03_jprb,9.0996e-04_jprb,6.2571e-04_jprb,2.4955e-04_jprb/)
1739 kbo( :, 5,41, 8) = (/&
1740 &1.3120e-03_jprb,1.4870e-03_jprb,1.2214e-03_jprb,8.2829e-04_jprb,2.9516e-04_jprb/)
1741 kbo( :, 1,42, 8) = (/&
1742 &2.5867e-04_jprb,3.1042e-04_jprb,2.6645e-04_jprb,1.9244e-04_jprb,1.0554e-04_jprb/)
1743 kbo( :, 2,42, 8) = (/&
1744 &3.8005e-04_jprb,4.4981e-04_jprb,3.8160e-04_jprb,2.7033e-04_jprb,1.3138e-04_jprb/)
1745 kbo( :, 3,42, 8) = (/&
1746 &5.4750e-04_jprb,6.3852e-04_jprb,5.3511e-04_jprb,3.7262e-04_jprb,1.6089e-04_jprb/)
1747 kbo( :, 4,42, 8) = (/&
1748 &7.7370e-04_jprb,8.8989e-04_jprb,7.3675e-04_jprb,5.0530e-04_jprb,1.9414e-04_jprb/)
1749 kbo( :, 5,42, 8) = (/&
1750 &1.0732e-03_jprb,1.2192e-03_jprb,9.9944e-04_jprb,6.7542e-04_jprb,2.3100e-04_jprb/)
1751 kbo( :, 1,43, 8) = (/&
1752 &1.9608e-04_jprb,2.3654e-04_jprb,2.0330e-04_jprb,1.4692e-04_jprb,7.9640e-05_jprb/)
1753 kbo( :, 2,43, 8) = (/&
1754 &2.9244e-04_jprb,3.4786e-04_jprb,2.9536e-04_jprb,2.0929e-04_jprb,1.0013e-04_jprb/)
1755 kbo( :, 3,43, 8) = (/&
1756 &4.2746e-04_jprb,5.0109e-04_jprb,4.1968e-04_jprb,2.9227e-04_jprb,1.2370e-04_jprb/)
1757 kbo( :, 4,43, 8) = (/&
1758 &6.1258e-04_jprb,7.0737e-04_jprb,5.8531e-04_jprb,4.0077e-04_jprb,1.5047e-04_jprb/)
1759 kbo( :, 5,43, 8) = (/&
1760 &8.6089e-04_jprb,9.8132e-04_jprb,8.0325e-04_jprb,5.4165e-04_jprb,1.8030e-04_jprb/)
1761 kbo( :, 1,44, 8) = (/&
1762 &1.4641e-04_jprb,1.7759e-04_jprb,1.5289e-04_jprb,1.1076e-04_jprb,5.9627e-05_jprb/)
1763 kbo( :, 2,44, 8) = (/&
1764 &2.2184e-04_jprb,2.6534e-04_jprb,2.2560e-04_jprb,1.6005e-04_jprb,7.5777e-05_jprb/)
1765 kbo( :, 3,44, 8) = (/&
1766 &3.2924e-04_jprb,3.8780e-04_jprb,3.2524e-04_jprb,2.2657e-04_jprb,9.4517e-05_jprb/)
1767 kbo( :, 4,44, 8) = (/&
1768 &4.7893e-04_jprb,5.5571e-04_jprb,4.5993e-04_jprb,3.1465e-04_jprb,1.1599e-04_jprb/)
1769 kbo( :, 5,44, 8) = (/&
1770 &6.8243e-04_jprb,7.8130e-04_jprb,6.3916e-04_jprb,4.3040e-04_jprb,1.4006e-04_jprb/)
1771 kbo( :, 1,45, 8) = (/&
1772 &1.0865e-04_jprb,1.3251e-04_jprb,1.1435e-04_jprb,8.2960e-05_jprb,4.4212e-05_jprb/)
1773 kbo( :, 2,45, 8) = (/&
1774 &1.6729e-04_jprb,2.0128e-04_jprb,1.7134e-04_jprb,1.2183e-04_jprb,5.6830e-05_jprb/)
1775 kbo( :, 3,45, 8) = (/&
1776 &2.5229e-04_jprb,2.9908e-04_jprb,2.5083e-04_jprb,1.7486e-04_jprb,7.1604e-05_jprb/)
1777 kbo( :, 4,45, 8) = (/&
1778 &3.7262e-04_jprb,4.3452e-04_jprb,3.5986e-04_jprb,2.4619e-04_jprb,8.8632e-05_jprb/)
1779 kbo( :, 5,45, 8) = (/&
1780 &5.3882e-04_jprb,6.2004e-04_jprb,5.0717e-04_jprb,3.4090e-04_jprb,1.0793e-04_jprb/)
1781 kbo( :, 1,46, 8) = (/&
1782 &7.9358e-05_jprb,9.7327e-05_jprb,8.4209e-05_jprb,6.1250e-05_jprb,3.2459e-05_jprb/)
1783 kbo( :, 2,46, 8) = (/&
1784 &1.2429e-04_jprb,1.5045e-04_jprb,1.2830e-04_jprb,9.1466e-05_jprb,4.2241e-05_jprb/)
1785 kbo( :, 3,46, 8) = (/&
1786 &1.9053e-04_jprb,2.2736e-04_jprb,1.9100e-04_jprb,1.3325e-04_jprb,5.3783e-05_jprb/)
1787 kbo( :, 4,46, 8) = (/&
1788 &2.8614e-04_jprb,3.3570e-04_jprb,2.7828e-04_jprb,1.9050e-04_jprb,6.7218e-05_jprb/)
1789 kbo( :, 5,46, 8) = (/&
1790 &4.2039e-04_jprb,4.8635e-04_jprb,3.9774e-04_jprb,2.6724e-04_jprb,8.2582e-05_jprb/)
1791 kbo( :, 1,47, 8) = (/&
1792 &5.6453e-05_jprb,6.9628e-05_jprb,6.0410e-05_jprb,4.4150e-05_jprb,2.3634e-05_jprb/)
1793 kbo( :, 2,47, 8) = (/&
1794 &9.0039e-05_jprb,1.0971e-04_jprb,9.3809e-05_jprb,6.7082e-05_jprb,3.1174e-05_jprb/)
1795 kbo( :, 3,47, 8) = (/&
1796 &1.4053e-04_jprb,1.6882e-04_jprb,1.4207e-04_jprb,9.9462e-05_jprb,4.0177e-05_jprb/)
1797 kbo( :, 4,47, 8) = (/&
1798 &2.1477e-04_jprb,2.5374e-04_jprb,2.1068e-04_jprb,1.4451e-04_jprb,5.0742e-05_jprb/)
1799 kbo( :, 5,47, 8) = (/&
1800 &3.2088e-04_jprb,3.7357e-04_jprb,3.0615e-04_jprb,2.0585e-04_jprb,6.2901e-05_jprb/)
1801 kbo( :, 1,48, 8) = (/&
1802 &3.9798e-05_jprb,4.9340e-05_jprb,4.2936e-05_jprb,3.1533e-05_jprb,1.7003e-05_jprb/)
1803 kbo( :, 2,48, 8) = (/&
1804 &6.4659e-05_jprb,7.9275e-05_jprb,6.7974e-05_jprb,4.8844e-05_jprb,2.2754e-05_jprb/)
1805 kbo( :, 3,48, 8) = (/&
1806 &1.0277e-04_jprb,1.2433e-04_jprb,1.0493e-04_jprb,7.3715e-05_jprb,2.9706e-05_jprb/)
1807 kbo( :, 4,48, 8) = (/&
1808 &1.5992e-04_jprb,1.9034e-04_jprb,1.5838e-04_jprb,1.0886e-04_jprb,3.7936e-05_jprb/)
1809 kbo( :, 5,48, 8) = (/&
1810 &2.4325e-04_jprb,2.8513e-04_jprb,2.3408e-04_jprb,1.5755e-04_jprb,4.7492e-05_jprb/)
1811 kbo( :, 1,49, 8) = (/&
1812 &2.7802e-05_jprb,3.4616e-05_jprb,3.0218e-05_jprb,2.2308e-05_jprb,1.2061e-05_jprb/)
1813 kbo( :, 2,49, 8) = (/&
1814 &4.6014e-05_jprb,5.6761e-05_jprb,4.8820e-05_jprb,3.5239e-05_jprb,1.6386e-05_jprb/)
1815 kbo( :, 3,49, 8) = (/&
1816 &7.4491e-05_jprb,9.0741e-05_jprb,7.6795e-05_jprb,5.4143e-05_jprb,2.1687e-05_jprb/)
1817 kbo( :, 4,49, 8) = (/&
1818 &1.1802e-04_jprb,1.4153e-04_jprb,1.1806e-04_jprb,8.1356e-05_jprb,2.8022e-05_jprb/)
1819 kbo( :, 5,49, 8) = (/&
1820 &1.8279e-04_jprb,2.1583e-04_jprb,1.7754e-04_jprb,1.1970e-04_jprb,3.5456e-05_jprb/)
1821 kbo( :, 1,50, 8) = (/&
1822 &1.9540e-05_jprb,2.4400e-05_jprb,2.1361e-05_jprb,1.5837e-05_jprb,8.6997e-06_jprb/)
1823 kbo( :, 2,50, 8) = (/&
1824 &3.2918e-05_jprb,4.0822e-05_jprb,3.5205e-05_jprb,2.5512e-05_jprb,1.1990e-05_jprb/)
1825 kbo( :, 3,50, 8) = (/&
1826 &5.4255e-05_jprb,6.6526e-05_jprb,5.6438e-05_jprb,3.9950e-05_jprb,1.6073e-05_jprb/)
1827 kbo( :, 4,50, 8) = (/&
1828 &8.7526e-05_jprb,1.0571e-04_jprb,8.8383e-05_jprb,6.1066e-05_jprb,2.1006e-05_jprb/)
1829 kbo( :, 5,50, 8) = (/&
1830 &1.3799e-04_jprb,1.6415e-04_jprb,1.3524e-04_jprb,9.1334e-05_jprb,2.6847e-05_jprb/)
1831 kbo( :, 1,51, 8) = (/&
1832 &1.3715e-05_jprb,1.7170e-05_jprb,1.5061e-05_jprb,1.1220e-05_jprb,6.3066e-06_jprb/)
1833 kbo( :, 2,51, 8) = (/&
1834 &2.3525e-05_jprb,2.9290e-05_jprb,2.5329e-05_jprb,1.8432e-05_jprb,8.8176e-06_jprb/)
1835 kbo( :, 3,51, 8) = (/&
1836 &3.9460e-05_jprb,4.8672e-05_jprb,4.1377e-05_jprb,2.9397e-05_jprb,1.1971e-05_jprb/)
1837 kbo( :, 4,51, 8) = (/&
1838 &6.4794e-05_jprb,7.8837e-05_jprb,6.6040e-05_jprb,4.5759e-05_jprb,1.5830e-05_jprb/)
1839 kbo( :, 5,51, 8) = (/&
1840 &1.0402e-04_jprb,1.2470e-04_jprb,1.0290e-04_jprb,6.9640e-05_jprb,2.0433e-05_jprb/)
1841 kbo( :, 1,52, 8) = (/&
1842 &9.5578e-06_jprb,1.1986e-05_jprb,1.0529e-05_jprb,7.8831e-06_jprb,4.5278e-06_jprb/)
1843 kbo( :, 2,52, 8) = (/&
1844 &1.6679e-05_jprb,2.0856e-05_jprb,1.8076e-05_jprb,1.3211e-05_jprb,6.4244e-06_jprb/)
1845 kbo( :, 3,52, 8) = (/&
1846 &2.8477e-05_jprb,3.5320e-05_jprb,3.0103e-05_jprb,2.1468e-05_jprb,8.8391e-06_jprb/)
1847 kbo( :, 4,52, 8) = (/&
1848 &4.7594e-05_jprb,5.8357e-05_jprb,4.8987e-05_jprb,3.4026e-05_jprb,1.1833e-05_jprb/)
1849 kbo( :, 5,52, 8) = (/&
1850 &7.7798e-05_jprb,9.3982e-05_jprb,7.7692e-05_jprb,5.2723e-05_jprb,1.5437e-05_jprb/)
1851 kbo( :, 1,53, 8) = (/&
1852 &6.6072e-06_jprb,8.2930e-06_jprb,7.2961e-06_jprb,5.4893e-06_jprb,3.2145e-06_jprb/)
1853 kbo( :, 2,53, 8) = (/&
1854 &1.1726e-05_jprb,1.4716e-05_jprb,1.2781e-05_jprb,9.3822e-06_jprb,4.6284e-06_jprb/)
1855 kbo( :, 3,53, 8) = (/&
1856 &2.0380e-05_jprb,2.5407e-05_jprb,2.1715e-05_jprb,1.5543e-05_jprb,6.4582e-06_jprb/)
1857 kbo( :, 4,53, 8) = (/&
1858 &3.4658e-05_jprb,4.2781e-05_jprb,3.5988e-05_jprb,2.5111e-05_jprb,8.7586e-06_jprb/)
1859 kbo( :, 5,53, 8) = (/&
1860 &5.7694e-05_jprb,7.0240e-05_jprb,5.8204e-05_jprb,3.9606e-05_jprb,1.1558e-05_jprb/)
1861 kbo( :, 1,54, 8) = (/&
1862 &4.6231e-06_jprb,5.8094e-06_jprb,5.1159e-06_jprb,3.8681e-06_jprb,2.3617e-06_jprb/)
1863 kbo( :, 2,54, 8) = (/&
1864 &8.3487e-06_jprb,1.0507e-05_jprb,9.1409e-06_jprb,6.7324e-06_jprb,3.4457e-06_jprb/)
1865 kbo( :, 3,54, 8) = (/&
1866 &1.4749e-05_jprb,1.8473e-05_jprb,1.5818e-05_jprb,1.1366e-05_jprb,4.8678e-06_jprb/)
1867 kbo( :, 4,54, 8) = (/&
1868 &2.5524e-05_jprb,3.1693e-05_jprb,2.6712e-05_jprb,1.8698e-05_jprb,6.6754e-06_jprb/)
1869 kbo( :, 5,54, 8) = (/&
1870 &4.3244e-05_jprb,5.3058e-05_jprb,4.4050e-05_jprb,3.0042e-05_jprb,8.8957e-06_jprb/)
1871 kbo( :, 1,55, 8) = (/&
1872 &3.2435e-06_jprb,4.0809e-06_jprb,3.5968e-06_jprb,2.7333e-06_jprb,1.7666e-06_jprb/)
1873 kbo( :, 2,55, 8) = (/&
1874 &5.9644e-06_jprb,7.5172e-06_jprb,6.5506e-06_jprb,4.8409e-06_jprb,2.6116e-06_jprb/)
1875 kbo( :, 3,55, 8) = (/&
1876 &1.0704e-05_jprb,1.3462e-05_jprb,1.1547e-05_jprb,8.3238e-06_jprb,3.7328e-06_jprb/)
1877 kbo( :, 4,55, 8) = (/&
1878 &1.8846e-05_jprb,2.3522e-05_jprb,1.9854e-05_jprb,1.3943e-05_jprb,5.1720e-06_jprb/)
1879 kbo( :, 5,55, 8) = (/&
1880 &3.2477e-05_jprb,4.0113e-05_jprb,3.3370e-05_jprb,2.2811e-05_jprb,6.9569e-06_jprb/)
1881 kbo( :, 1,56, 8) = (/&
1882 &2.2574e-06_jprb,2.8460e-06_jprb,2.5125e-06_jprb,1.9227e-06_jprb,1.3179e-06_jprb/)
1883 kbo( :, 2,56, 8) = (/&
1884 &4.2369e-06_jprb,5.3474e-06_jprb,4.6648e-06_jprb,3.4587e-06_jprb,1.9756e-06_jprb/)
1885 kbo( :, 3,56, 8) = (/&
1886 &7.7258e-06_jprb,9.7496e-06_jprb,8.3766e-06_jprb,6.0549e-06_jprb,2.8571e-06_jprb/)
1887 kbo( :, 4,56, 8) = (/&
1888 &1.3829e-05_jprb,1.7347e-05_jprb,1.4668e-05_jprb,1.0332e-05_jprb,4.0014e-06_jprb/)
1889 kbo( :, 5,56, 8) = (/&
1890 &2.4242e-05_jprb,3.0140e-05_jprb,2.5119e-05_jprb,1.7219e-05_jprb,5.4349e-06_jprb/)
1891 kbo( :, 1,57, 8) = (/&
1892 &1.5562e-06_jprb,1.9665e-06_jprb,1.7413e-06_jprb,1.3458e-06_jprb,9.8093e-07_jprb/)
1893 kbo( :, 2,57, 8) = (/&
1894 &2.9891e-06_jprb,3.7795e-06_jprb,3.2995e-06_jprb,2.4572e-06_jprb,1.4913e-06_jprb/)
1895 kbo( :, 3,57, 8) = (/&
1896 &5.5415e-06_jprb,7.0117e-06_jprb,6.0356e-06_jprb,4.3741e-06_jprb,2.1827e-06_jprb/)
1897 kbo( :, 4,57, 8) = (/&
1898 &1.0083e-05_jprb,1.2702e-05_jprb,1.0763e-05_jprb,7.6047e-06_jprb,3.0916e-06_jprb/)
1899 kbo( :, 5,57, 8) = (/&
1900 &1.7987e-05_jprb,2.2497e-05_jprb,1.8783e-05_jprb,1.2912e-05_jprb,4.2413e-06_jprb/)
1901 kbo( :, 1,58, 8) = (/&
1902 &1.0750e-06_jprb,1.3607e-06_jprb,1.2097e-06_jprb,9.4788e-07_jprb,7.3838e-07_jprb/)
1903 kbo( :, 2,58, 8) = (/&
1904 &2.1150e-06_jprb,2.6811e-06_jprb,2.3427e-06_jprb,1.7529e-06_jprb,1.1369e-06_jprb/)
1905 kbo( :, 3,58, 8) = (/&
1906 &3.9927e-06_jprb,5.0636e-06_jprb,4.3652e-06_jprb,3.1731e-06_jprb,1.6853e-06_jprb/)
1907 kbo( :, 4,58, 8) = (/&
1908 &7.3820e-06_jprb,9.3320e-06_jprb,7.9215e-06_jprb,5.6104e-06_jprb,2.4126e-06_jprb/)
1909 kbo( :, 5,58, 8) = (/&
1910 &1.3390e-05_jprb,1.6843e-05_jprb,1.4081e-05_jprb,9.7051e-06_jprb,3.3415e-06_jprb/)
1911 kbo( :, 1,59, 8) = (/&
1912 &8.4145e-07_jprb,1.0679e-06_jprb,9.4979e-07_jprb,7.4709e-07_jprb,6.3499e-07_jprb/)
1913 kbo( :, 2,59, 8) = (/&
1914 &1.6828e-06_jprb,2.1406e-06_jprb,1.8681e-06_jprb,1.3967e-06_jprb,9.8499e-07_jprb/)
1915 kbo( :, 3,59, 8) = (/&
1916 &3.2239e-06_jprb,4.0954e-06_jprb,3.5264e-06_jprb,2.5580e-06_jprb,1.4693e-06_jprb/)
1917 kbo( :, 4,59, 8) = (/&
1918 &6.0392e-06_jprb,7.6569e-06_jprb,6.4911e-06_jprb,4.5821e-06_jprb,2.1121e-06_jprb/)
1919 kbo( :, 5,59, 8) = (/&
1920 &1.1097e-05_jprb,1.4009e-05_jprb,1.1691e-05_jprb,8.0420e-06_jprb,2.9314e-06_jprb/)
1921 
1922 
1923 ! -----------------------------------------------------------------
1924 RETURN
1925 END SUBROUTINE rrtm_kgb3_b2
subroutine rrtm_kgb3_b2
Definition: rrtm_kgb3_B2.F90:3
real(kind=jprb), dimension(no3) forrefo
Definition: yoerrto3.F90:18
real(kind=jprb), dimension(16) absn2ob
Definition: yoerrta3.F90:20
real(kind=jprb), dimension(no3, 5) fracrefbo
Definition: yoerrto3.F90:16
real(kind=jprb), dimension(59) h2oref
Definition: yoerrta3.F90:22
real(kind=jprb), dimension(59) co2ref
Definition: yoerrta3.F90:24
real(kind=jprb), dimension(59) n2oref
Definition: yoerrta3.F90:23
real(kind=jprb), dimension(10, 5, 13, no3) kao
Definition: yoerrto3.F90:22
real(kind=jprb), dimension(16) absn2oa
Definition: yoerrta3.F90:19
real(kind=jprb), dimension(no3) absn2obo
Definition: yoerrto3.F90:20
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