LMDZ
rrtm_kgb3_B4.F90
Go to the documentation of this file.
1 !OCL SCALAR
2 SUBROUTINE rrtm_kgb3_b4
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 ,&
14  &fracrefbo ,forrefo ,absn2oao ,absn2obo
15 USE yoerrta3 , ONLY : absn2oa ,absn2ob ,etaref ,h2oref ,&
16  &n2oref ,co2ref ,strrat
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,13) = (/&
42 &1.2852e+00_jprb,1.0643e+00_jprb,9.2423e-01_jprb,7.7210e-01_jprb,4.8560e+00_jprb/)
43 kbo( :, 2,13,13) = (/&
44 &1.8300e+00_jprb,1.5153e+00_jprb,1.3056e+00_jprb,1.0896e+00_jprb,5.1762e+00_jprb/)
45 kbo( :, 3,13,13) = (/&
46 &2.4898e+00_jprb,2.0619e+00_jprb,1.7781e+00_jprb,1.4720e+00_jprb,5.5995e+00_jprb/)
47 kbo( :, 4,13,13) = (/&
48 &3.2580e+00_jprb,2.7136e+00_jprb,2.3379e+00_jprb,1.9103e+00_jprb,6.0006e+00_jprb/)
49 kbo( :, 5,13,13) = (/&
50 &4.1344e+00_jprb,3.4741e+00_jprb,2.9826e+00_jprb,2.3986e+00_jprb,6.3254e+00_jprb/)
51 kbo( :, 1,14,13) = (/&
52 &1.4353e+00_jprb,1.1813e+00_jprb,1.0097e+00_jprb,8.1766e-01_jprb,4.4364e+00_jprb/)
53 kbo( :, 2,14,13) = (/&
54 &2.0320e+00_jprb,1.6766e+00_jprb,1.4217e+00_jprb,1.1476e+00_jprb,4.7777e+00_jprb/)
55 kbo( :, 3,14,13) = (/&
56 &2.7397e+00_jprb,2.2766e+00_jprb,1.9164e+00_jprb,1.5404e+00_jprb,5.1956e+00_jprb/)
57 kbo( :, 4,14,13) = (/&
58 &3.5525e+00_jprb,2.9774e+00_jprb,2.5038e+00_jprb,1.9898e+00_jprb,5.5579e+00_jprb/)
59 kbo( :, 5,14,13) = (/&
60 &4.4583e+00_jprb,3.7784e+00_jprb,3.1767e+00_jprb,2.5098e+00_jprb,5.8954e+00_jprb/)
61 kbo( :, 1,15,13) = (/&
62 &1.5785e+00_jprb,1.3067e+00_jprb,1.1097e+00_jprb,8.6674e-01_jprb,3.8492e+00_jprb/)
63 kbo( :, 2,15,13) = (/&
64 &2.2125e+00_jprb,1.8434e+00_jprb,1.5563e+00_jprb,1.2050e+00_jprb,4.1968e+00_jprb/)
65 kbo( :, 3,15,13) = (/&
66 &2.9595e+00_jprb,2.4844e+00_jprb,2.0889e+00_jprb,1.6068e+00_jprb,4.5453e+00_jprb/)
67 kbo( :, 4,15,13) = (/&
68 &3.8045e+00_jprb,3.2259e+00_jprb,2.7088e+00_jprb,2.0757e+00_jprb,4.8945e+00_jprb/)
69 kbo( :, 5,15,13) = (/&
70 &4.7324e+00_jprb,4.0530e+00_jprb,3.4024e+00_jprb,2.6201e+00_jprb,5.1308e+00_jprb/)
71 kbo( :, 1,16,13) = (/&
72 &1.6990e+00_jprb,1.4270e+00_jprb,1.2197e+00_jprb,9.1540e-01_jprb,3.2967e+00_jprb/)
73 kbo( :, 2,16,13) = (/&
74 &2.3632e+00_jprb,1.9965e+00_jprb,1.6991e+00_jprb,1.2635e+00_jprb,3.5992e+00_jprb/)
75 kbo( :, 3,16,13) = (/&
76 &3.1332e+00_jprb,2.6737e+00_jprb,2.2662e+00_jprb,1.6797e+00_jprb,3.8825e+00_jprb/)
77 kbo( :, 4,16,13) = (/&
78 &3.9954e+00_jprb,3.4413e+00_jprb,2.9150e+00_jprb,2.1732e+00_jprb,4.0955e+00_jprb/)
79 kbo( :, 5,16,13) = (/&
80 &4.9441e+00_jprb,4.2813e+00_jprb,3.6296e+00_jprb,2.7347e+00_jprb,4.3356e+00_jprb/)
81 kbo( :, 1,17,13) = (/&
82 &1.7867e+00_jprb,1.5291e+00_jprb,1.3172e+00_jprb,9.6442e-01_jprb,2.8946e+00_jprb/)
83 kbo( :, 2,17,13) = (/&
84 &2.4630e+00_jprb,2.1240e+00_jprb,1.8197e+00_jprb,1.3271e+00_jprb,3.1209e+00_jprb/)
85 kbo( :, 3,17,13) = (/&
86 &3.2412e+00_jprb,2.8205e+00_jprb,2.4120e+00_jprb,1.7621e+00_jprb,3.3231e+00_jprb/)
87 kbo( :, 4,17,13) = (/&
88 &4.1129e+00_jprb,3.6026e+00_jprb,3.0785e+00_jprb,2.2752e+00_jprb,3.5467e+00_jprb/)
89 kbo( :, 5,17,13) = (/&
90 &5.0518e+00_jprb,4.4575e+00_jprb,3.8174e+00_jprb,2.8444e+00_jprb,3.7869e+00_jprb/)
91 kbo( :, 1,18,13) = (/&
92 &1.8395e+00_jprb,1.6132e+00_jprb,1.3961e+00_jprb,1.0121e+00_jprb,2.6255e+00_jprb/)
93 kbo( :, 2,18,13) = (/&
94 &2.5106e+00_jprb,2.2211e+00_jprb,1.9179e+00_jprb,1.3918e+00_jprb,2.8074e+00_jprb/)
95 kbo( :, 3,18,13) = (/&
96 &3.2840e+00_jprb,2.9230e+00_jprb,2.5216e+00_jprb,1.8455e+00_jprb,2.9886e+00_jprb/)
97 kbo( :, 4,18,13) = (/&
98 &4.1398e+00_jprb,3.7076e+00_jprb,3.1995e+00_jprb,2.3655e+00_jprb,3.2033e+00_jprb/)
99 kbo( :, 5,18,13) = (/&
100 &5.0652e+00_jprb,4.5681e+00_jprb,3.9586e+00_jprb,2.9470e+00_jprb,3.4431e+00_jprb/)
101 kbo( :, 1,19,13) = (/&
102 &1.8429e+00_jprb,1.6700e+00_jprb,1.4536e+00_jprb,1.0564e+00_jprb,2.4577e+00_jprb/)
103 kbo( :, 2,19,13) = (/&
104 &2.5022e+00_jprb,2.2784e+00_jprb,1.9833e+00_jprb,1.4492e+00_jprb,2.6093e+00_jprb/)
105 kbo( :, 3,19,13) = (/&
106 &3.2520e+00_jprb,2.9805e+00_jprb,2.5894e+00_jprb,1.9140e+00_jprb,2.7860e+00_jprb/)
107 kbo( :, 4,19,13) = (/&
108 &4.0807e+00_jprb,3.7648e+00_jprb,3.2792e+00_jprb,2.4354e+00_jprb,2.9804e+00_jprb/)
109 kbo( :, 5,19,13) = (/&
110 &4.9680e+00_jprb,4.6224e+00_jprb,4.0395e+00_jprb,3.0224e+00_jprb,3.2175e+00_jprb/)
111 kbo( :, 1,20,13) = (/&
112 &1.8228e+00_jprb,1.7025e+00_jprb,1.4928e+00_jprb,1.0898e+00_jprb,2.3654e+00_jprb/)
113 kbo( :, 2,20,13) = (/&
114 &2.4538e+00_jprb,2.3051e+00_jprb,2.0204e+00_jprb,1.4897e+00_jprb,2.5217e+00_jprb/)
115 kbo( :, 3,20,13) = (/&
116 &3.1699e+00_jprb,2.9971e+00_jprb,2.6320e+00_jprb,1.9524e+00_jprb,2.6999e+00_jprb/)
117 kbo( :, 4,20,13) = (/&
118 &3.9554e+00_jprb,3.7710e+00_jprb,3.3175e+00_jprb,2.4725e+00_jprb,2.8911e+00_jprb/)
119 kbo( :, 5,20,13) = (/&
120 &4.8063e+00_jprb,4.6094e+00_jprb,4.0741e+00_jprb,3.0590e+00_jprb,3.1232e+00_jprb/)
121 kbo( :, 1,21,13) = (/&
122 &1.7623e+00_jprb,1.7061e+00_jprb,1.5006e+00_jprb,1.1051e+00_jprb,2.2987e+00_jprb/)
123 kbo( :, 2,21,13) = (/&
124 &2.3568e+00_jprb,2.2938e+00_jprb,2.0241e+00_jprb,1.5005e+00_jprb,2.4810e+00_jprb/)
125 kbo( :, 3,21,13) = (/&
126 &3.0264e+00_jprb,2.9663e+00_jprb,2.6252e+00_jprb,1.9540e+00_jprb,2.6709e+00_jprb/)
127 kbo( :, 4,21,13) = (/&
128 &3.7661e+00_jprb,3.7114e+00_jprb,3.3017e+00_jprb,2.4660e+00_jprb,2.8739e+00_jprb/)
129 kbo( :, 5,21,13) = (/&
130 &4.5709e+00_jprb,4.5292e+00_jprb,4.0353e+00_jprb,3.0458e+00_jprb,3.1122e+00_jprb/)
131 kbo( :, 1,22,13) = (/&
132 &1.7051e+00_jprb,1.7105e+00_jprb,1.5137e+00_jprb,1.1220e+00_jprb,2.2215e+00_jprb/)
133 kbo( :, 2,22,13) = (/&
134 &2.2594e+00_jprb,2.2812e+00_jprb,2.0265e+00_jprb,1.5078e+00_jprb,2.4273e+00_jprb/)
135 kbo( :, 3,22,13) = (/&
136 &2.8843e+00_jprb,2.9298e+00_jprb,2.6159e+00_jprb,1.9497e+00_jprb,2.6344e+00_jprb/)
137 kbo( :, 4,22,13) = (/&
138 &3.5784e+00_jprb,3.6530e+00_jprb,3.2699e+00_jprb,2.4532e+00_jprb,2.8571e+00_jprb/)
139 kbo( :, 5,22,13) = (/&
140 &4.3282e+00_jprb,4.4413e+00_jprb,3.9817e+00_jprb,3.0263e+00_jprb,3.1138e+00_jprb/)
141 kbo( :, 1,23,13) = (/&
142 &1.6227e+00_jprb,1.6865e+00_jprb,1.4987e+00_jprb,1.1164e+00_jprb,2.1516e+00_jprb/)
143 kbo( :, 2,23,13) = (/&
144 &2.1334e+00_jprb,2.2311e+00_jprb,1.9947e+00_jprb,1.4865e+00_jprb,2.3714e+00_jprb/)
145 kbo( :, 3,23,13) = (/&
146 &2.7130e+00_jprb,2.8505e+00_jprb,2.5601e+00_jprb,1.9131e+00_jprb,2.5957e+00_jprb/)
147 kbo( :, 4,23,13) = (/&
148 &3.3545e+00_jprb,3.5417e+00_jprb,3.1845e+00_jprb,2.4070e+00_jprb,2.8423e+00_jprb/)
149 kbo( :, 5,23,13) = (/&
150 &4.0511e+00_jprb,4.2980e+00_jprb,3.8824e+00_jprb,2.9663e+00_jprb,3.1097e+00_jprb/)
151 kbo( :, 1,24,13) = (/&
152 &1.5221e+00_jprb,1.6399e+00_jprb,1.4631e+00_jprb,1.0922e+00_jprb,2.0557e+00_jprb/)
153 kbo( :, 2,24,13) = (/&
154 &1.9909e+00_jprb,2.1551e+00_jprb,1.9333e+00_jprb,1.4438e+00_jprb,2.2893e+00_jprb/)
155 kbo( :, 3,24,13) = (/&
156 &2.5227e+00_jprb,2.7424e+00_jprb,2.4670e+00_jprb,1.8560e+00_jprb,2.5308e+00_jprb/)
157 kbo( :, 4,24,13) = (/&
158 &3.1132e+00_jprb,3.3998e+00_jprb,3.0690e+00_jprb,2.3315e+00_jprb,2.7959e+00_jprb/)
159 kbo( :, 5,24,13) = (/&
160 &3.7625e+00_jprb,4.1275e+00_jprb,3.7502e+00_jprb,2.8726e+00_jprb,3.0711e+00_jprb/)
161 kbo( :, 1,25,13) = (/&
162 &1.4164e+00_jprb,1.5764e+00_jprb,1.4120e+00_jprb,1.0539e+00_jprb,1.9710e+00_jprb/)
163 kbo( :, 2,25,13) = (/&
164 &1.8451e+00_jprb,2.0623e+00_jprb,1.8523e+00_jprb,1.3889e+00_jprb,2.2117e+00_jprb/)
165 kbo( :, 3,25,13) = (/&
166 &2.3323e+00_jprb,2.6170e+00_jprb,2.3560e+00_jprb,1.7813e+00_jprb,2.4702e+00_jprb/)
167 kbo( :, 4,25,13) = (/&
168 &2.8785e+00_jprb,3.2423e+00_jprb,2.9353e+00_jprb,2.2379e+00_jprb,2.7415e+00_jprb/)
169 kbo( :, 5,25,13) = (/&
170 &3.4748e+00_jprb,3.9386e+00_jprb,3.5958e+00_jprb,2.7566e+00_jprb,3.0246e+00_jprb/)
171 kbo( :, 1,26,13) = (/&
172 &1.3174e+00_jprb,1.5065e+00_jprb,1.3505e+00_jprb,1.0108e+00_jprb,1.9092e+00_jprb/)
173 kbo( :, 2,26,13) = (/&
174 &1.7100e+00_jprb,1.9656e+00_jprb,1.7614e+00_jprb,1.3273e+00_jprb,2.1568e+00_jprb/)
175 kbo( :, 3,26,13) = (/&
176 &2.1599e+00_jprb,2.4918e+00_jprb,2.2424e+00_jprb,1.7022e+00_jprb,2.4251e+00_jprb/)
177 kbo( :, 4,26,13) = (/&
178 &2.6619e+00_jprb,3.0863e+00_jprb,2.8007e+00_jprb,2.1368e+00_jprb,2.6974e+00_jprb/)
179 kbo( :, 5,26,13) = (/&
180 &3.2164e+00_jprb,3.7562e+00_jprb,3.4382e+00_jprb,2.6323e+00_jprb,2.9897e+00_jprb/)
181 kbo( :, 1,27,13) = (/&
182 &1.2227e+00_jprb,1.4318e+00_jprb,1.2776e+00_jprb,9.6234e-01_jprb,1.8084e+00_jprb/)
183 kbo( :, 2,27,13) = (/&
184 &1.5845e+00_jprb,1.8650e+00_jprb,1.6669e+00_jprb,1.2616e+00_jprb,2.0606e+00_jprb/)
185 kbo( :, 3,27,13) = (/&
186 &1.9986e+00_jprb,2.3637e+00_jprb,2.1255e+00_jprb,1.6180e+00_jprb,2.3235e+00_jprb/)
187 kbo( :, 4,27,13) = (/&
188 &2.4670e+00_jprb,2.9335e+00_jprb,2.6606e+00_jprb,2.0306e+00_jprb,2.5979e+00_jprb/)
189 kbo( :, 5,27,13) = (/&
190 &2.9836e+00_jprb,3.5812e+00_jprb,3.2799e+00_jprb,2.5047e+00_jprb,2.8940e+00_jprb/)
191 kbo( :, 1,28,13) = (/&
192 &1.1382e+00_jprb,1.3569e+00_jprb,1.2047e+00_jprb,9.1050e-01_jprb,1.6756e+00_jprb/)
193 kbo( :, 2,28,13) = (/&
194 &1.4731e+00_jprb,1.7658e+00_jprb,1.5747e+00_jprb,1.1959e+00_jprb,1.9259e+00_jprb/)
195 kbo( :, 3,28,13) = (/&
196 &1.8595e+00_jprb,2.2417e+00_jprb,2.0136e+00_jprb,1.5323e+00_jprb,2.1797e+00_jprb/)
197 kbo( :, 4,28,13) = (/&
198 &2.2933e+00_jprb,2.7930e+00_jprb,2.5304e+00_jprb,1.9266e+00_jprb,2.4581e+00_jprb/)
199 kbo( :, 5,28,13) = (/&
200 &2.7792e+00_jprb,3.4303e+00_jprb,3.1288e+00_jprb,2.3846e+00_jprb,2.7569e+00_jprb/)
201 kbo( :, 1,29,13) = (/&
202 &1.0690e+00_jprb,1.2881e+00_jprb,1.1394e+00_jprb,8.6196e-01_jprb,1.5316e+00_jprb/)
203 kbo( :, 2,29,13) = (/&
204 &1.3833e+00_jprb,1.6767e+00_jprb,1.4909e+00_jprb,1.1330e+00_jprb,1.7636e+00_jprb/)
205 kbo( :, 3,29,13) = (/&
206 &1.7418e+00_jprb,2.1373e+00_jprb,1.9152e+00_jprb,1.4529e+00_jprb,2.0079e+00_jprb/)
207 kbo( :, 4,29,13) = (/&
208 &2.1520e+00_jprb,2.6796e+00_jprb,2.4158e+00_jprb,1.8327e+00_jprb,2.2752e+00_jprb/)
209 kbo( :, 5,29,13) = (/&
210 &2.6198e+00_jprb,3.3045e+00_jprb,3.0000e+00_jprb,2.2771e+00_jprb,2.5616e+00_jprb/)
211 kbo( :, 1,30,13) = (/&
212 &1.0127e+00_jprb,1.2266e+00_jprb,1.0797e+00_jprb,8.1863e-01_jprb,1.3724e+00_jprb/)
213 kbo( :, 2,30,13) = (/&
214 &1.3069e+00_jprb,1.6015e+00_jprb,1.4185e+00_jprb,1.0745e+00_jprb,1.5829e+00_jprb/)
215 kbo( :, 3,30,13) = (/&
216 &1.6487e+00_jprb,2.0522e+00_jprb,1.8302e+00_jprb,1.3820e+00_jprb,1.8153e+00_jprb/)
217 kbo( :, 4,30,13) = (/&
218 &2.0473e+00_jprb,2.5843e+00_jprb,2.3209e+00_jprb,1.7515e+00_jprb,2.0659e+00_jprb/)
219 kbo( :, 5,30,13) = (/&
220 &2.5092e+00_jprb,3.2023e+00_jprb,2.8969e+00_jprb,2.1888e+00_jprb,2.3374e+00_jprb/)
221 kbo( :, 1,31,13) = (/&
222 &9.6510e-01_jprb,1.1794e+00_jprb,1.0308e+00_jprb,7.7856e-01_jprb,1.1918e+00_jprb/)
223 kbo( :, 2,31,13) = (/&
224 &1.2477e+00_jprb,1.5457e+00_jprb,1.3619e+00_jprb,1.0252e+00_jprb,1.3817e+00_jprb/)
225 kbo( :, 3,31,13) = (/&
226 &1.5837e+00_jprb,1.9885e+00_jprb,1.7652e+00_jprb,1.3248e+00_jprb,1.5914e+00_jprb/)
227 kbo( :, 4,31,13) = (/&
228 &1.9797e+00_jprb,2.5159e+00_jprb,2.2496e+00_jprb,1.6880e+00_jprb,1.8169e+00_jprb/)
229 kbo( :, 5,31,13) = (/&
230 &2.4397e+00_jprb,3.1333e+00_jprb,2.8243e+00_jprb,2.1253e+00_jprb,2.0691e+00_jprb/)
231 kbo( :, 1,32,13) = (/&
232 &9.2809e-01_jprb,1.1462e+00_jprb,9.9628e-01_jprb,7.4536e-01_jprb,1.0320e+00_jprb/)
233 kbo( :, 2,32,13) = (/&
234 &1.2071e+00_jprb,1.5069e+00_jprb,1.3205e+00_jprb,9.8597e-01_jprb,1.2033e+00_jprb/)
235 kbo( :, 3,32,13) = (/&
236 &1.5432e+00_jprb,1.9476e+00_jprb,1.7191e+00_jprb,1.2835e+00_jprb,1.3897e+00_jprb/)
237 kbo( :, 4,32,13) = (/&
238 &1.9406e+00_jprb,2.4766e+00_jprb,2.2038e+00_jprb,1.6458e+00_jprb,1.5971e+00_jprb/)
239 kbo( :, 5,32,13) = (/&
240 &2.3994e+00_jprb,3.0984e+00_jprb,2.7844e+00_jprb,2.0892e+00_jprb,1.8364e+00_jprb/)
241 kbo( :, 1,33,13) = (/&
242 &9.0452e-01_jprb,1.1258e+00_jprb,9.7321e-01_jprb,7.2002e-01_jprb,8.8562e-01_jprb/)
243 kbo( :, 2,33,13) = (/&
244 &1.1846e+00_jprb,1.4864e+00_jprb,1.2941e+00_jprb,9.5876e-01_jprb,1.0371e+00_jprb/)
245 kbo( :, 3,33,13) = (/&
246 &1.5214e+00_jprb,1.9311e+00_jprb,1.6937e+00_jprb,1.2572e+00_jprb,1.2046e+00_jprb/)
247 kbo( :, 4,33,13) = (/&
248 &1.9196e+00_jprb,2.4657e+00_jprb,2.1858e+00_jprb,1.6239e+00_jprb,1.3977e+00_jprb/)
249 kbo( :, 5,33,13) = (/&
250 &2.3836e+00_jprb,3.1007e+00_jprb,2.7768e+00_jprb,2.0781e+00_jprb,1.6273e+00_jprb/)
251 kbo( :, 1,34,13) = (/&
252 &8.8467e-01_jprb,1.1068e+00_jprb,9.5054e-01_jprb,6.9629e-01_jprb,7.8494e-01_jprb/)
253 kbo( :, 2,34,13) = (/&
254 &1.1642e+00_jprb,1.4706e+00_jprb,1.2717e+00_jprb,9.3470e-01_jprb,9.2138e-01_jprb/)
255 kbo( :, 3,34,13) = (/&
256 &1.5015e+00_jprb,1.9181e+00_jprb,1.6758e+00_jprb,1.2345e+00_jprb,1.0773e+00_jprb/)
257 kbo( :, 4,34,13) = (/&
258 &1.9018e+00_jprb,2.4632e+00_jprb,2.1759e+00_jprb,1.6080e+00_jprb,1.2614e+00_jprb/)
259 kbo( :, 5,34,13) = (/&
260 &2.3740e+00_jprb,3.1145e+00_jprb,2.7821e+00_jprb,2.0712e+00_jprb,1.4792e+00_jprb/)
261 kbo( :, 1,35,13) = (/&
262 &8.4955e-01_jprb,1.0688e+00_jprb,9.1231e-01_jprb,6.6202e-01_jprb,6.7824e-01_jprb/)
263 kbo( :, 2,35,13) = (/&
264 &1.1250e+00_jprb,1.4313e+00_jprb,1.2303e+00_jprb,8.9698e-01_jprb,8.0193e-01_jprb/)
265 kbo( :, 3,35,13) = (/&
266 &1.4599e+00_jprb,1.8791e+00_jprb,1.6347e+00_jprb,1.1945e+00_jprb,9.4771e-01_jprb/)
267 kbo( :, 4,35,13) = (/&
268 &1.8617e+00_jprb,2.4289e+00_jprb,2.1382e+00_jprb,1.5703e+00_jprb,1.1239e+00_jprb/)
269 kbo( :, 5,35,13) = (/&
270 &2.3371e+00_jprb,3.0886e+00_jprb,2.7503e+00_jprb,2.0370e+00_jprb,1.3258e+00_jprb/)
271 kbo( :, 1,36,13) = (/&
272 &7.9554e-01_jprb,1.0086e+00_jprb,8.5573e-01_jprb,6.1485e-01_jprb,5.7027e-01_jprb/)
273 kbo( :, 2,36,13) = (/&
274 &1.0642e+00_jprb,1.3634e+00_jprb,1.1652e+00_jprb,8.4197e-01_jprb,6.8378e-01_jprb/)
275 kbo( :, 3,36,13) = (/&
276 &1.3924e+00_jprb,1.8049e+00_jprb,1.5634e+00_jprb,1.1326e+00_jprb,8.2218e-01_jprb/)
277 kbo( :, 4,36,13) = (/&
278 &1.7900e+00_jprb,2.3512e+00_jprb,2.0607e+00_jprb,1.5026e+00_jprb,9.8859e-01_jprb/)
279 kbo( :, 5,36,13) = (/&
280 &2.2630e+00_jprb,3.0065e+00_jprb,2.6687e+00_jprb,1.9640e+00_jprb,1.1762e+00_jprb/)
281 kbo( :, 1,37,13) = (/&
282 &7.1417e-01_jprb,9.1309e-01_jprb,7.7089e-01_jprb,5.4803e-01_jprb,4.9622e-01_jprb/)
283 kbo( :, 2,37,13) = (/&
284 &9.6913e-01_jprb,1.2512e+00_jprb,1.0630e+00_jprb,7.6043e-01_jprb,5.9797e-01_jprb/)
285 kbo( :, 3,37,13) = (/&
286 &1.2840e+00_jprb,1.6746e+00_jprb,1.4416e+00_jprb,1.0353e+00_jprb,7.2233e-01_jprb/)
287 kbo( :, 4,37,13) = (/&
288 &1.6678e+00_jprb,2.2008e+00_jprb,1.9187e+00_jprb,1.3875e+00_jprb,8.7304e-01_jprb/)
289 kbo( :, 5,37,13) = (/&
290 &2.1271e+00_jprb,2.8380e+00_jprb,2.5062e+00_jprb,1.8314e+00_jprb,1.0444e+00_jprb/)
291 kbo( :, 1,38,13) = (/&
292 &6.4094e-01_jprb,8.2768e-01_jprb,6.9645e-01_jprb,4.8972e-01_jprb,4.2782e-01_jprb/)
293 kbo( :, 2,38,13) = (/&
294 &8.8268e-01_jprb,1.1499e+00_jprb,9.7252e-01_jprb,6.8901e-01_jprb,5.1817e-01_jprb/)
295 kbo( :, 3,38,13) = (/&
296 &1.1854e+00_jprb,1.5567e+00_jprb,1.3326e+00_jprb,9.4875e-01_jprb,6.2911e-01_jprb/)
297 kbo( :, 4,38,13) = (/&
298 &1.5548e+00_jprb,2.0633e+00_jprb,1.7903e+00_jprb,1.2846e+00_jprb,7.6404e-01_jprb/)
299 kbo( :, 5,38,13) = (/&
300 &2.0005e+00_jprb,2.6819e+00_jprb,2.3577e+00_jprb,1.7108e+00_jprb,9.1910e-01_jprb/)
301 kbo( :, 1,39,13) = (/&
302 &5.7700e-01_jprb,7.5348e-01_jprb,6.3234e-01_jprb,4.4039e-01_jprb,3.6316e-01_jprb/)
303 kbo( :, 2,39,13) = (/&
304 &8.0617e-01_jprb,1.0607e+00_jprb,8.9464e-01_jprb,6.2787e-01_jprb,4.4256e-01_jprb/)
305 kbo( :, 3,39,13) = (/&
306 &1.0971e+00_jprb,1.4528e+00_jprb,1.2371e+00_jprb,8.7381e-01_jprb,5.4063e-01_jprb/)
307 kbo( :, 4,39,13) = (/&
308 &1.4539e+00_jprb,1.9409e+00_jprb,1.6768e+00_jprb,1.1946e+00_jprb,6.6034e-01_jprb/)
309 kbo( :, 5,39,13) = (/&
310 &1.8880e+00_jprb,2.5419e+00_jprb,2.2244e+00_jprb,1.6039e+00_jprb,7.9890e-01_jprb/)
311 kbo( :, 1,40,13) = (/&
312 &5.0186e-01_jprb,6.6294e-01_jprb,5.5500e-01_jprb,3.8289e-01_jprb,3.1769e-01_jprb/)
313 kbo( :, 2,40,13) = (/&
314 &7.1323e-01_jprb,9.4798e-01_jprb,7.9752e-01_jprb,5.5384e-01_jprb,3.8877e-01_jprb/)
315 kbo( :, 3,40,13) = (/&
316 &9.8586e-01_jprb,1.3164e+00_jprb,1.1157e+00_jprb,7.8136e-01_jprb,4.7618e-01_jprb/)
317 kbo( :, 4,40,13) = (/&
318 &1.3258e+00_jprb,1.7781e+00_jprb,1.5269e+00_jprb,1.0795e+00_jprb,5.8462e-01_jprb/)
319 kbo( :, 5,40,13) = (/&
320 &1.7397e+00_jprb,2.3496e+00_jprb,2.0447e+00_jprb,1.4640e+00_jprb,7.1183e-01_jprb/)
321 kbo( :, 1,41,13) = (/&
322 &4.3380e-01_jprb,5.8097e-01_jprb,4.8476e-01_jprb,3.3186e-01_jprb,2.7762e-01_jprb/)
323 kbo( :, 2,41,13) = (/&
324 &6.2819e-01_jprb,8.4375e-01_jprb,7.0798e-01_jprb,4.8718e-01_jprb,3.4151e-01_jprb/)
325 kbo( :, 3,41,13) = (/&
326 &8.8231e-01_jprb,1.1885e+00_jprb,1.0030e+00_jprb,6.9676e-01_jprb,4.1944e-01_jprb/)
327 kbo( :, 4,41,13) = (/&
328 &1.2044e+00_jprb,1.6239e+00_jprb,1.3862e+00_jprb,9.7292e-01_jprb,5.1737e-01_jprb/)
329 kbo( :, 5,41,13) = (/&
330 &1.5976e+00_jprb,2.1644e+00_jprb,1.8733e+00_jprb,1.3324e+00_jprb,6.3382e-01_jprb/)
331 kbo( :, 1,42,13) = (/&
332 &3.7449e-01_jprb,5.0898e-01_jprb,4.2337e-01_jprb,2.8788e-01_jprb,2.4070e-01_jprb/)
333 kbo( :, 2,42,13) = (/&
334 &5.5270e-01_jprb,7.5038e-01_jprb,6.2836e-01_jprb,4.2892e-01_jprb,2.9753e-01_jprb/)
335 kbo( :, 3,42,13) = (/&
336 &7.8906e-01_jprb,1.0722e+00_jprb,9.0203e-01_jprb,6.2172e-01_jprb,3.6699e-01_jprb/)
337 kbo( :, 4,42,13) = (/&
338 &1.0928e+00_jprb,1.4824e+00_jprb,1.2591e+00_jprb,8.7750e-01_jprb,4.5486e-01_jprb/)
339 kbo( :, 5,42,13) = (/&
340 &1.4670e+00_jprb,1.9931e+00_jprb,1.7165e+00_jprb,1.2130e+00_jprb,5.6051e-01_jprb/)
341 kbo( :, 1,43,13) = (/&
342 &3.1535e-01_jprb,4.3481e-01_jprb,3.6057e-01_jprb,2.4367e-01_jprb,2.0825e-01_jprb/)
343 kbo( :, 2,43,13) = (/&
344 &4.7503e-01_jprb,6.5262e-01_jprb,5.4494e-01_jprb,3.6943e-01_jprb,2.5841e-01_jprb/)
345 kbo( :, 3,43,13) = (/&
346 &6.9119e-01_jprb,9.4733e-01_jprb,7.9475e-01_jprb,5.4324e-01_jprb,3.1952e-01_jprb/)
347 kbo( :, 4,43,13) = (/&
348 &9.7283e-01_jprb,1.3279e+00_jprb,1.1223e+00_jprb,7.7674e-01_jprb,3.9652e-01_jprb/)
349 kbo( :, 5,43,13) = (/&
350 &1.3243e+00_jprb,1.8050e+00_jprb,1.5450e+00_jprb,1.0849e+00_jprb,4.9087e-01_jprb/)
351 kbo( :, 1,44,13) = (/&
352 &2.6174e-01_jprb,3.6590e-01_jprb,3.0263e-01_jprb,2.0344e-01_jprb,1.7938e-01_jprb/)
353 kbo( :, 2,44,13) = (/&
354 &4.0277e-01_jprb,5.6056e-01_jprb,4.6662e-01_jprb,3.1442e-01_jprb,2.2338e-01_jprb/)
355 kbo( :, 3,44,13) = (/&
356 &5.9777e-01_jprb,8.2704e-01_jprb,6.9190e-01_jprb,4.6961e-01_jprb,2.7697e-01_jprb/)
357 kbo( :, 4,44,13) = (/&
358 &8.5584e-01_jprb,1.1770e+00_jprb,9.9059e-01_jprb,6.8041e-01_jprb,3.4323e-01_jprb/)
359 kbo( :, 5,44,13) = (/&
360 &1.1839e+00_jprb,1.6189e+00_jprb,1.3779e+00_jprb,9.6037e-01_jprb,4.2597e-01_jprb/)
361 kbo( :, 1,45,13) = (/&
362 &2.1651e-01_jprb,3.0623e-01_jprb,2.5303e-01_jprb,1.6909e-01_jprb,1.5286e-01_jprb/)
363 kbo( :, 2,45,13) = (/&
364 &3.3998e-01_jprb,4.7944e-01_jprb,3.9799e-01_jprb,2.6665e-01_jprb,1.9138e-01_jprb/)
365 kbo( :, 3,45,13) = (/&
366 &5.1505e-01_jprb,7.1915e-01_jprb,6.0047e-01_jprb,4.0501e-01_jprb,2.3804e-01_jprb/)
367 kbo( :, 4,45,13) = (/&
368 &7.5069e-01_jprb,1.0392e+00_jprb,8.7233e-01_jprb,5.9477e-01_jprb,2.9472e-01_jprb/)
369 kbo( :, 5,45,13) = (/&
370 &1.0546e+00_jprb,1.4482e+00_jprb,1.2265e+00_jprb,8.4853e-01_jprb,3.6589e-01_jprb/)
371 kbo( :, 1,46,13) = (/&
372 &1.7663e-01_jprb,2.5198e-01_jprb,2.0821e-01_jprb,1.3852e-01_jprb,1.2920e-01_jprb/)
373 kbo( :, 2,46,13) = (/&
374 &2.8312e-01_jprb,4.0392e-01_jprb,3.3454e-01_jprb,2.2297e-01_jprb,1.6315e-01_jprb/)
375 kbo( :, 3,46,13) = (/&
376 &4.3787e-01_jprb,6.1746e-01_jprb,5.1421e-01_jprb,3.4506e-01_jprb,2.0329e-01_jprb/)
377 kbo( :, 4,46,13) = (/&
378 &6.5040e-01_jprb,9.0658e-01_jprb,7.5889e-01_jprb,5.1408e-01_jprb,2.5188e-01_jprb/)
379 kbo( :, 5,46,13) = (/&
380 &9.2878e-01_jprb,1.2821e+00_jprb,1.0808e+00_jprb,7.4274e-01_jprb,3.1240e-01_jprb/)
381 kbo( :, 1,47,13) = (/&
382 &1.4044e-01_jprb,2.0128e-01_jprb,1.6621e-01_jprb,1.1051e-01_jprb,1.0897e-01_jprb/)
383 kbo( :, 2,47,13) = (/&
384 &2.3004e-01_jprb,3.3154e-01_jprb,2.7419e-01_jprb,1.8180e-01_jprb,1.3962e-01_jprb/)
385 kbo( :, 3,47,13) = (/&
386 &3.6325e-01_jprb,5.1821e-01_jprb,4.3034e-01_jprb,2.8728e-01_jprb,1.7431e-01_jprb/)
387 kbo( :, 4,47,13) = (/&
388 &5.5117e-01_jprb,7.7483e-01_jprb,6.4673e-01_jprb,4.3554e-01_jprb,2.1654e-01_jprb/)
389 kbo( :, 5,47,13) = (/&
390 &8.0200e-01_jprb,1.1139e+00_jprb,9.3561e-01_jprb,6.3799e-01_jprb,2.6782e-01_jprb/)
391 kbo( :, 1,48,13) = (/&
392 &1.1101e-01_jprb,1.5927e-01_jprb,1.3139e-01_jprb,8.7527e-02_jprb,9.0201e-02_jprb/)
393 kbo( :, 2,48,13) = (/&
394 &1.8567e-01_jprb,2.6968e-01_jprb,2.2270e-01_jprb,1.4710e-01_jprb,1.1764e-01_jprb/)
395 kbo( :, 3,48,13) = (/&
396 &2.9933e-01_jprb,4.3159e-01_jprb,3.5753e-01_jprb,2.3730e-01_jprb,1.4811e-01_jprb/)
397 kbo( :, 4,48,13) = (/&
398 &4.6369e-01_jprb,6.5797e-01_jprb,5.4789e-01_jprb,3.6706e-01_jprb,1.8402e-01_jprb/)
399 kbo( :, 5,48,13) = (/&
400 &6.8807e-01_jprb,9.6214e-01_jprb,8.0577e-01_jprb,5.4570e-01_jprb,2.2761e-01_jprb/)
401 kbo( :, 1,49,13) = (/&
402 &8.6952e-02_jprb,1.2481e-01_jprb,1.0270e-01_jprb,6.8735e-02_jprb,7.2916e-02_jprb/)
403 kbo( :, 2,49,13) = (/&
404 &1.4886e-01_jprb,2.1718e-01_jprb,1.7934e-01_jprb,1.1829e-01_jprb,9.6830e-02_jprb/)
405 kbo( :, 3,49,13) = (/&
406 &2.4507e-01_jprb,3.5657e-01_jprb,2.9496e-01_jprb,1.9481e-01_jprb,1.2384e-01_jprb/)
407 kbo( :, 4,49,13) = (/&
408 &3.8722e-01_jprb,5.5518e-01_jprb,4.6109e-01_jprb,3.0744e-01_jprb,1.5413e-01_jprb/)
409 kbo( :, 5,49,13) = (/&
410 &5.8631e-01_jprb,8.2602e-01_jprb,6.8968e-01_jprb,4.6440e-01_jprb,1.9058e-01_jprb/)
411 kbo( :, 1,50,13) = (/&
412 &6.8423e-02_jprb,9.8362e-02_jprb,8.0813e-02_jprb,5.4318e-02_jprb,6.0640e-02_jprb/)
413 kbo( :, 2,50,13) = (/&
414 &1.2024e-01_jprb,1.7560e-01_jprb,1.4487e-01_jprb,9.5713e-02_jprb,8.2094e-02_jprb/)
415 kbo( :, 3,50,13) = (/&
416 &2.0188e-01_jprb,2.9561e-01_jprb,2.4418e-01_jprb,1.6072e-01_jprb,1.0662e-01_jprb/)
417 kbo( :, 4,50,13) = (/&
418 &3.2485e-01_jprb,4.7020e-01_jprb,3.8945e-01_jprb,2.5843e-01_jprb,1.3377e-01_jprb/)
419 kbo( :, 5,50,13) = (/&
420 &5.0116e-01_jprb,7.1185e-01_jprb,5.9284e-01_jprb,3.9734e-01_jprb,1.6547e-01_jprb/)
421 kbo( :, 1,51,13) = (/&
422 &5.3728e-02_jprb,7.7475e-02_jprb,6.3575e-02_jprb,4.2812e-02_jprb,5.0933e-02_jprb/)
423 kbo( :, 2,51,13) = (/&
424 &9.7035e-02_jprb,1.4176e-01_jprb,1.1670e-01_jprb,7.7313e-02_jprb,7.0361e-02_jprb/)
425 kbo( :, 3,51,13) = (/&
426 &1.6618e-01_jprb,2.4447e-01_jprb,2.0180e-01_jprb,1.3255e-01_jprb,9.2830e-02_jprb/)
427 kbo( :, 4,51,13) = (/&
428 &2.7241e-01_jprb,3.9733e-01_jprb,3.2861e-01_jprb,2.1702e-01_jprb,1.1799e-01_jprb/)
429 kbo( :, 5,51,13) = (/&
430 &4.2784e-01_jprb,6.1277e-01_jprb,5.0908e-01_jprb,3.3984e-01_jprb,1.4641e-01_jprb/)
431 kbo( :, 1,52,13) = (/&
432 &4.1802e-02_jprb,6.0502e-02_jprb,4.9697e-02_jprb,3.3504e-02_jprb,4.2023e-02_jprb/)
433 kbo( :, 2,52,13) = (/&
434 &7.7722e-02_jprb,1.1354e-01_jprb,9.3251e-02_jprb,6.2061e-02_jprb,5.9351e-02_jprb/)
435 kbo( :, 3,52,13) = (/&
436 &1.3608e-01_jprb,2.0057e-01_jprb,1.6557e-01_jprb,1.0873e-01_jprb,7.9645e-02_jprb/)
437 kbo( :, 4,52,13) = (/&
438 &2.2730e-01_jprb,3.3353e-01_jprb,2.7571e-01_jprb,1.8131e-01_jprb,1.0280e-01_jprb/)
439 kbo( :, 5,52,13) = (/&
440 &3.6299e-01_jprb,5.2462e-01_jprb,4.3487e-01_jprb,2.8905e-01_jprb,1.2859e-01_jprb/)
441 kbo( :, 1,53,13) = (/&
442 &3.2183e-02_jprb,4.6680e-02_jprb,3.8481e-02_jprb,2.6042e-02_jprb,3.3756e-02_jprb/)
443 kbo( :, 2,53,13) = (/&
444 &6.1728e-02_jprb,9.0133e-02_jprb,7.3973e-02_jprb,4.9381e-02_jprb,4.8993e-02_jprb/)
445 kbo( :, 3,53,13) = (/&
446 &1.1077e-01_jprb,1.6319e-01_jprb,1.3454e-01_jprb,8.8555e-02_jprb,6.7056e-02_jprb/)
447 kbo( :, 4,53,13) = (/&
448 &1.8844e-01_jprb,2.7785e-01_jprb,2.2936e-01_jprb,1.5042e-01_jprb,8.7934e-02_jprb/)
449 kbo( :, 5,53,13) = (/&
450 &3.0619e-01_jprb,4.4605e-01_jprb,3.6897e-01_jprb,2.4410e-01_jprb,1.1120e-01_jprb/)
451 kbo( :, 1,54,13) = (/&
452 &2.5047e-02_jprb,3.6400e-02_jprb,3.0153e-02_jprb,2.0502e-02_jprb,2.9038e-02_jprb/)
453 kbo( :, 2,54,13) = (/&
454 &4.9509e-02_jprb,7.2463e-02_jprb,5.9428e-02_jprb,3.9713e-02_jprb,4.3296e-02_jprb/)
455 kbo( :, 3,54,13) = (/&
456 &9.1047e-02_jprb,1.3408e-01_jprb,1.1032e-01_jprb,7.2811e-02_jprb,6.0352e-02_jprb/)
457 kbo( :, 4,54,13) = (/&
458 &1.5773e-01_jprb,2.3322e-01_jprb,1.9256e-01_jprb,1.2610e-01_jprb,8.0247e-02_jprb/)
459 kbo( :, 5,54,13) = (/&
460 &2.6064e-01_jprb,3.8195e-01_jprb,3.1567e-01_jprb,2.0798e-01_jprb,1.0268e-01_jprb/)
461 kbo( :, 1,55,13) = (/&
462 &1.9531e-02_jprb,2.8409e-02_jprb,2.3654e-02_jprb,1.6169e-02_jprb,2.6016e-02_jprb/)
463 kbo( :, 2,55,13) = (/&
464 &3.9731e-02_jprb,5.8300e-02_jprb,4.7864e-02_jprb,3.2046e-02_jprb,3.9891e-02_jprb/)
465 kbo( :, 3,55,13) = (/&
466 &7.5011e-02_jprb,1.1035e-01_jprb,9.0609e-02_jprb,6.0025e-02_jprb,5.6691e-02_jprb/)
467 kbo( :, 4,55,13) = (/&
468 &1.3239e-01_jprb,1.9599e-01_jprb,1.6178e-01_jprb,1.0597e-01_jprb,7.6430e-02_jprb/)
469 kbo( :, 5,55,13) = (/&
470 &2.2232e-01_jprb,3.2737e-01_jprb,2.7053e-01_jprb,1.7756e-01_jprb,9.9052e-02_jprb/)
471 kbo( :, 1,56,13) = (/&
472 &1.5085e-02_jprb,2.1991e-02_jprb,1.8385e-02_jprb,1.2629e-02_jprb,2.3210e-02_jprb/)
473 kbo( :, 2,56,13) = (/&
474 &3.1640e-02_jprb,4.6519e-02_jprb,3.8293e-02_jprb,2.5741e-02_jprb,3.6554e-02_jprb/)
475 kbo( :, 3,56,13) = (/&
476 &6.1401e-02_jprb,9.0252e-02_jprb,7.4044e-02_jprb,4.9175e-02_jprb,5.3168e-02_jprb/)
477 kbo( :, 4,56,13) = (/&
478 &1.1069e-01_jprb,1.6371e-01_jprb,1.3502e-01_jprb,8.8647e-02_jprb,7.2863e-02_jprb/)
479 kbo( :, 5,56,13) = (/&
480 &1.8882e-01_jprb,2.7905e-01_jprb,2.3042e-01_jprb,1.5088e-01_jprb,9.5532e-02_jprb/)
481 kbo( :, 1,57,13) = (/&
482 &1.1497e-02_jprb,1.6861e-02_jprb,1.4167e-02_jprb,9.7433e-03_jprb,2.0535e-02_jprb/)
483 kbo( :, 2,57,13) = (/&
484 &2.4982e-02_jprb,3.6767e-02_jprb,3.0405e-02_jprb,2.0539e-02_jprb,3.3381e-02_jprb/)
485 kbo( :, 3,57,13) = (/&
486 &4.9863e-02_jprb,7.3408e-02_jprb,6.0172e-02_jprb,4.0018e-02_jprb,4.9853e-02_jprb/)
487 kbo( :, 4,57,13) = (/&
488 &9.1973e-02_jprb,1.3592e-01_jprb,1.1188e-01_jprb,7.3644e-02_jprb,6.9368e-02_jprb/)
489 kbo( :, 5,57,13) = (/&
490 &1.5956e-01_jprb,2.3633e-01_jprb,1.9520e-01_jprb,1.2765e-01_jprb,9.2143e-02_jprb/)
491 kbo( :, 1,58,13) = (/&
492 &8.7557e-03_jprb,1.2987e-02_jprb,1.0957e-02_jprb,7.5300e-03_jprb,1.8437e-02_jprb/)
493 kbo( :, 2,58,13) = (/&
494 &1.9822e-02_jprb,2.9153e-02_jprb,2.4235e-02_jprb,1.6460e-02_jprb,3.1052e-02_jprb/)
495 kbo( :, 3,58,13) = (/&
496 &4.0615e-02_jprb,5.9904e-02_jprb,4.9134e-02_jprb,3.2752e-02_jprb,4.7553e-02_jprb/)
497 kbo( :, 4,58,13) = (/&
498 &7.6749e-02_jprb,1.1326e-01_jprb,9.3033e-02_jprb,6.1446e-02_jprb,6.7327e-02_jprb/)
499 kbo( :, 5,58,13) = (/&
500 &1.3538e-01_jprb,2.0081e-01_jprb,1.6583e-01_jprb,1.0846e-01_jprb,9.0540e-02_jprb/)
501 kbo( :, 1,59,13) = (/&
502 &7.7834e-03_jprb,1.1635e-02_jprb,9.8237e-03_jprb,6.7346e-03_jprb,2.0567e-02_jprb/)
503 kbo( :, 2,59,13) = (/&
504 &1.7968e-02_jprb,2.6456e-02_jprb,2.2028e-02_jprb,1.4988e-02_jprb,3.5300e-02_jprb/)
505 kbo( :, 3,59,13) = (/&
506 &3.7275e-02_jprb,5.5026e-02_jprb,4.5163e-02_jprb,3.0132e-02_jprb,5.4587e-02_jprb/)
507 kbo( :, 4,59,13) = (/&
508 &7.1187e-02_jprb,1.0502e-01_jprb,8.6201e-02_jprb,5.6998e-02_jprb,7.7965e-02_jprb/)
509 kbo( :, 5,59,13) = (/&
510 &1.2652e-01_jprb,1.8769e-01_jprb,1.5496e-01_jprb,1.0142e-01_jprb,1.0516e-01_jprb/)
511 kbo( :, 1,13,14) = (/&
512 &2.2524e+00_jprb,1.8642e+00_jprb,1.4613e+00_jprb,1.4569e+00_jprb,8.7601e+00_jprb/)
513 kbo( :, 2,13,14) = (/&
514 &3.1331e+00_jprb,2.6017e+00_jprb,2.0765e+00_jprb,2.1108e+00_jprb,8.6837e+00_jprb/)
515 kbo( :, 3,13,14) = (/&
516 &4.2161e+00_jprb,3.4975e+00_jprb,2.8332e+00_jprb,2.9400e+00_jprb,8.5967e+00_jprb/)
517 kbo( :, 4,13,14) = (/&
518 &5.4742e+00_jprb,4.5326e+00_jprb,3.7176e+00_jprb,3.9461e+00_jprb,8.5509e+00_jprb/)
519 kbo( :, 5,13,14) = (/&
520 &6.8794e+00_jprb,5.6742e+00_jprb,4.7180e+00_jprb,5.1201e+00_jprb,8.7332e+00_jprb/)
521 kbo( :, 1,14,14) = (/&
522 &2.4300e+00_jprb,2.0099e+00_jprb,1.6039e+00_jprb,1.5951e+00_jprb,7.9998e+00_jprb/)
523 kbo( :, 2,14,14) = (/&
524 &3.3671e+00_jprb,2.7809e+00_jprb,2.2722e+00_jprb,2.2861e+00_jprb,7.9399e+00_jprb/)
525 kbo( :, 3,14,14) = (/&
526 &4.5098e+00_jprb,3.7249e+00_jprb,3.1058e+00_jprb,3.1479e+00_jprb,7.9396e+00_jprb/)
527 kbo( :, 4,14,14) = (/&
528 &5.8479e+00_jprb,4.8327e+00_jprb,4.0848e+00_jprb,4.1748e+00_jprb,8.0204e+00_jprb/)
529 kbo( :, 5,14,14) = (/&
530 &7.3485e+00_jprb,6.0867e+00_jprb,5.1845e+00_jprb,5.3505e+00_jprb,8.4765e+00_jprb/)
531 kbo( :, 1,15,14) = (/&
532 &2.6568e+00_jprb,2.1796e+00_jprb,1.7854e+00_jprb,1.7352e+00_jprb,6.7060e+00_jprb/)
533 kbo( :, 2,15,14) = (/&
534 &3.6822e+00_jprb,3.0192e+00_jprb,2.5118e+00_jprb,2.4660e+00_jprb,6.7632e+00_jprb/)
535 kbo( :, 3,15,14) = (/&
536 &4.9145e+00_jprb,4.0419e+00_jprb,3.4197e+00_jprb,3.3625e+00_jprb,6.9344e+00_jprb/)
537 kbo( :, 4,15,14) = (/&
538 &6.3536e+00_jprb,5.2540e+00_jprb,4.4910e+00_jprb,4.4107e+00_jprb,7.2734e+00_jprb/)
539 kbo( :, 5,15,14) = (/&
540 &7.9751e+00_jprb,6.6376e+00_jprb,5.7127e+00_jprb,5.6036e+00_jprb,8.1653e+00_jprb/)
541 kbo( :, 1,16,14) = (/&
542 &2.9427e+00_jprb,2.4019e+00_jprb,1.9918e+00_jprb,1.8807e+00_jprb,5.4890e+00_jprb/)
543 kbo( :, 2,16,14) = (/&
544 &4.0755e+00_jprb,3.3334e+00_jprb,2.7941e+00_jprb,2.6497e+00_jprb,5.7267e+00_jprb/)
545 kbo( :, 3,16,14) = (/&
546 &5.4183e+00_jprb,4.4587e+00_jprb,3.7848e+00_jprb,3.5786e+00_jprb,6.0751e+00_jprb/)
547 kbo( :, 4,16,14) = (/&
548 &6.9849e+00_jprb,5.7895e+00_jprb,4.9533e+00_jprb,4.6688e+00_jprb,6.8712e+00_jprb/)
549 kbo( :, 5,16,14) = (/&
550 &8.7453e+00_jprb,7.3192e+00_jprb,6.3031e+00_jprb,5.9185e+00_jprb,8.0451e+00_jprb/)
551 kbo( :, 1,17,14) = (/&
552 &3.2750e+00_jprb,2.6726e+00_jprb,2.2378e+00_jprb,2.0301e+00_jprb,4.7640e+00_jprb/)
553 kbo( :, 2,17,14) = (/&
554 &4.5330e+00_jprb,3.7089e+00_jprb,3.1283e+00_jprb,2.8374e+00_jprb,5.1281e+00_jprb/)
555 kbo( :, 3,17,14) = (/&
556 &6.0126e+00_jprb,4.9507e+00_jprb,4.2109e+00_jprb,3.8046e+00_jprb,5.7513e+00_jprb/)
557 kbo( :, 4,17,14) = (/&
558 &7.7135e+00_jprb,6.4169e+00_jprb,5.4921e+00_jprb,4.9337e+00_jprb,6.7135e+00_jprb/)
559 kbo( :, 5,17,14) = (/&
560 &9.6338e+00_jprb,8.1047e+00_jprb,6.9599e+00_jprb,6.2366e+00_jprb,8.0058e+00_jprb/)
561 kbo( :, 1,18,14) = (/&
562 &3.6472e+00_jprb,2.9807e+00_jprb,2.5189e+00_jprb,2.1796e+00_jprb,4.4334e+00_jprb/)
563 kbo( :, 2,18,14) = (/&
564 &5.0323e+00_jprb,4.1367e+00_jprb,3.4979e+00_jprb,3.0247e+00_jprb,4.9096e+00_jprb/)
565 kbo( :, 3,18,14) = (/&
566 &6.6454e+00_jprb,5.5144e+00_jprb,4.6858e+00_jprb,4.0381e+00_jprb,5.6608e+00_jprb/)
567 kbo( :, 4,18,14) = (/&
568 &8.4890e+00_jprb,7.1264e+00_jprb,6.0803e+00_jprb,5.2199e+00_jprb,6.6925e+00_jprb/)
569 kbo( :, 5,18,14) = (/&
570 &1.0542e+01_jprb,8.9586e+00_jprb,7.6601e+00_jprb,6.5575e+00_jprb,7.9988e+00_jprb/)
571 kbo( :, 1,19,14) = (/&
572 &4.0274e+00_jprb,3.3233e+00_jprb,2.8227e+00_jprb,2.3261e+00_jprb,4.2975e+00_jprb/)
573 kbo( :, 2,19,14) = (/&
574 &5.5204e+00_jprb,4.5992e+00_jprb,3.8961e+00_jprb,3.2089e+00_jprb,4.8408e+00_jprb/)
575 kbo( :, 3,19,14) = (/&
576 &7.2641e+00_jprb,6.1090e+00_jprb,5.1847e+00_jprb,4.2710e+00_jprb,5.6348e+00_jprb/)
577 kbo( :, 4,19,14) = (/&
578 &9.2241e+00_jprb,7.8543e+00_jprb,6.6837e+00_jprb,5.5155e+00_jprb,6.6912e+00_jprb/)
579 kbo( :, 5,19,14) = (/&
580 &1.1403e+01_jprb,9.8034e+00_jprb,8.3820e+00_jprb,6.9048e+00_jprb,7.9670e+00_jprb/)
581 kbo( :, 1,20,14) = (/&
582 &4.4042e+00_jprb,3.6923e+00_jprb,3.1564e+00_jprb,2.5009e+00_jprb,4.3386e+00_jprb/)
583 kbo( :, 2,20,14) = (/&
584 &6.0056e+00_jprb,5.0815e+00_jprb,4.3305e+00_jprb,3.4328e+00_jprb,4.8920e+00_jprb/)
585 kbo( :, 3,20,14) = (/&
586 &7.8551e+00_jprb,6.7164e+00_jprb,5.7136e+00_jprb,4.5512e+00_jprb,5.6658e+00_jprb/)
587 kbo( :, 4,20,14) = (/&
588 &9.9239e+00_jprb,8.5703e+00_jprb,7.3215e+00_jprb,5.8504e+00_jprb,6.6818e+00_jprb/)
589 kbo( :, 5,20,14) = (/&
590 &1.2197e+01_jprb,1.0639e+01_jprb,9.1299e+00_jprb,7.3134e+00_jprb,7.9255e+00_jprb/)
591 kbo( :, 1,21,14) = (/&
592 &4.7479e+00_jprb,4.0508e+00_jprb,3.4983e+00_jprb,2.6955e+00_jprb,4.4010e+00_jprb/)
593 kbo( :, 2,21,14) = (/&
594 &6.4355e+00_jprb,5.5399e+00_jprb,4.7678e+00_jprb,3.6820e+00_jprb,4.9446e+00_jprb/)
595 kbo( :, 3,21,14) = (/&
596 &8.3663e+00_jprb,7.2751e+00_jprb,6.2518e+00_jprb,4.8572e+00_jprb,5.6757e+00_jprb/)
597 kbo( :, 4,21,14) = (/&
598 &1.0512e+01_jprb,9.2314e+00_jprb,7.9526e+00_jprb,6.2141e+00_jprb,6.6288e+00_jprb/)
599 kbo( :, 5,21,14) = (/&
600 &1.2856e+01_jprb,1.1396e+01_jprb,9.8659e+00_jprb,7.7561e+00_jprb,7.8277e+00_jprb/)
601 kbo( :, 1,22,14) = (/&
602 &5.1420e+00_jprb,4.4823e+00_jprb,3.9096e+00_jprb,2.9527e+00_jprb,4.4013e+00_jprb/)
603 kbo( :, 2,22,14) = (/&
604 &6.9006e+00_jprb,6.0705e+00_jprb,5.2806e+00_jprb,4.0025e+00_jprb,4.9528e+00_jprb/)
605 kbo( :, 3,22,14) = (/&
606 &8.8983e+00_jprb,7.9013e+00_jprb,6.8678e+00_jprb,5.2402e+00_jprb,5.6748e+00_jprb/)
607 kbo( :, 4,22,14) = (/&
608 &1.1116e+01_jprb,9.9470e+00_jprb,8.6698e+00_jprb,6.6674e+00_jprb,6.5994e+00_jprb/)
609 kbo( :, 5,22,14) = (/&
610 &1.3502e+01_jprb,1.2202e+01_jprb,1.0686e+01_jprb,8.2853e+00_jprb,7.7517e+00_jprb/)
611 kbo( :, 1,23,14) = (/&
612 &5.4713e+00_jprb,4.8911e+00_jprb,4.3072e+00_jprb,3.2139e+00_jprb,4.3813e+00_jprb/)
613 kbo( :, 2,23,14) = (/&
614 &7.2751e+00_jprb,6.5638e+00_jprb,5.7664e+00_jprb,4.3250e+00_jprb,4.9555e+00_jprb/)
615 kbo( :, 3,23,14) = (/&
616 &9.3230e+00_jprb,8.4735e+00_jprb,7.4455e+00_jprb,5.6212e+00_jprb,5.6783e+00_jprb/)
617 kbo( :, 4,23,14) = (/&
618 &1.1564e+01_jprb,1.0599e+01_jprb,9.3428e+00_jprb,7.1049e+00_jprb,6.5825e+00_jprb/)
619 kbo( :, 5,23,14) = (/&
620 &1.3974e+01_jprb,1.2910e+01_jprb,1.1439e+01_jprb,8.7857e+00_jprb,7.6865e+00_jprb/)
621 kbo( :, 1,24,14) = (/&
622 &5.7350e+00_jprb,5.2712e+00_jprb,4.6801e+00_jprb,3.4774e+00_jprb,4.3078e+00_jprb/)
623 kbo( :, 2,24,14) = (/&
624 &7.5695e+00_jprb,7.0067e+00_jprb,6.2189e+00_jprb,4.6444e+00_jprb,4.9097e+00_jprb/)
625 kbo( :, 3,24,14) = (/&
626 &9.6279e+00_jprb,8.9845e+00_jprb,7.9822e+00_jprb,5.9954e+00_jprb,5.6514e+00_jprb/)
627 kbo( :, 4,24,14) = (/&
628 &1.1878e+01_jprb,1.1160e+01_jprb,9.9533e+00_jprb,7.5366e+00_jprb,6.5532e+00_jprb/)
629 kbo( :, 5,24,14) = (/&
630 &1.4285e+01_jprb,1.3514e+01_jprb,1.2126e+01_jprb,9.2665e+00_jprb,7.6715e+00_jprb/)
631 kbo( :, 1,25,14) = (/&
632 &5.9267e+00_jprb,5.6187e+00_jprb,5.0280e+00_jprb,3.7387e+00_jprb,4.2972e+00_jprb/)
633 kbo( :, 2,25,14) = (/&
634 &7.7642e+00_jprb,7.4077e+00_jprb,6.6347e+00_jprb,4.9555e+00_jprb,4.9309e+00_jprb/)
635 kbo( :, 3,25,14) = (/&
636 &9.8187e+00_jprb,9.4277e+00_jprb,8.4720e+00_jprb,6.3648e+00_jprb,5.6934e+00_jprb/)
637 kbo( :, 4,25,14) = (/&
638 &1.2059e+01_jprb,1.1644e+01_jprb,1.0515e+01_jprb,7.9525e+00_jprb,6.6186e+00_jprb/)
639 kbo( :, 5,25,14) = (/&
640 &1.4463e+01_jprb,1.4040e+01_jprb,1.2752e+01_jprb,9.7432e+00_jprb,7.7714e+00_jprb/)
641 kbo( :, 1,26,14) = (/&
642 &6.0673e+00_jprb,5.9449e+00_jprb,5.3655e+00_jprb,4.0058e+00_jprb,4.3684e+00_jprb/)
643 kbo( :, 2,26,14) = (/&
644 &7.8884e+00_jprb,7.7776e+00_jprb,7.0359e+00_jprb,5.2751e+00_jprb,5.0446e+00_jprb/)
645 kbo( :, 3,26,14) = (/&
646 &9.9238e+00_jprb,9.8293e+00_jprb,8.9381e+00_jprb,6.7352e+00_jprb,5.8349e+00_jprb/)
647 kbo( :, 4,26,14) = (/&
648 &1.2150e+01_jprb,1.2086e+01_jprb,1.1047e+01_jprb,8.3792e+00_jprb,6.8011e+00_jprb/)
649 kbo( :, 5,26,14) = (/&
650 &1.4535e+01_jprb,1.4527e+01_jprb,1.3353e+01_jprb,1.0236e+01_jprb,7.9789e+00_jprb/)
651 kbo( :, 1,27,14) = (/&
652 &6.1343e+00_jprb,6.2302e+00_jprb,5.6763e+00_jprb,4.2525e+00_jprb,4.3799e+00_jprb/)
653 kbo( :, 2,27,14) = (/&
654 &7.9331e+00_jprb,8.0869e+00_jprb,7.4032e+00_jprb,5.5689e+00_jprb,5.1012e+00_jprb/)
655 kbo( :, 3,27,14) = (/&
656 &9.9492e+00_jprb,1.0172e+01_jprb,9.3622e+00_jprb,7.0779e+00_jprb,5.9411e+00_jprb/)
657 kbo( :, 4,27,14) = (/&
658 &1.2151e+01_jprb,1.2467e+01_jprb,1.1529e+01_jprb,8.7861e+00_jprb,6.9495e+00_jprb/)
659 kbo( :, 5,27,14) = (/&
660 &1.4529e+01_jprb,1.4944e+01_jprb,1.3914e+01_jprb,1.0727e+01_jprb,8.1417e+00_jprb/)
661 kbo( :, 1,28,14) = (/&
662 &6.1453e+00_jprb,6.4763e+00_jprb,5.9637e+00_jprb,4.4841e+00_jprb,4.3357e+00_jprb/)
663 kbo( :, 2,28,14) = (/&
664 &7.9217e+00_jprb,8.3599e+00_jprb,7.7430e+00_jprb,5.8381e+00_jprb,5.0957e+00_jprb/)
665 kbo( :, 3,28,14) = (/&
666 &9.9089e+00_jprb,1.0474e+01_jprb,9.7521e+00_jprb,7.4031e+00_jprb,5.9939e+00_jprb/)
667 kbo( :, 4,28,14) = (/&
668 &1.2103e+01_jprb,1.2802e+01_jprb,1.1983e+01_jprb,9.1765e+00_jprb,7.0380e+00_jprb/)
669 kbo( :, 5,28,14) = (/&
670 &1.4484e+01_jprb,1.5315e+01_jprb,1.4450e+01_jprb,1.1205e+01_jprb,8.2560e+00_jprb/)
671 kbo( :, 1,29,14) = (/&
672 &6.1344e+00_jprb,6.7103e+00_jprb,6.2468e+00_jprb,4.7094e+00_jprb,4.2060e+00_jprb/)
673 kbo( :, 2,29,14) = (/&
674 &7.8873e+00_jprb,8.6217e+00_jprb,8.0781e+00_jprb,6.1108e+00_jprb,4.9771e+00_jprb/)
675 kbo( :, 3,29,14) = (/&
676 &9.8658e+00_jprb,1.0771e+01_jprb,1.0146e+01_jprb,7.7338e+00_jprb,5.8851e+00_jprb/)
677 kbo( :, 4,29,14) = (/&
678 &1.2059e+01_jprb,1.3133e+01_jprb,1.2445e+01_jprb,9.5787e+00_jprb,6.9308e+00_jprb/)
679 kbo( :, 5,29,14) = (/&
680 &1.4440e+01_jprb,1.5700e+01_jprb,1.5002e+01_jprb,1.1702e+01_jprb,8.1658e+00_jprb/)
681 kbo( :, 1,30,14) = (/&
682 &6.1074e+00_jprb,6.9340e+00_jprb,6.5266e+00_jprb,4.9327e+00_jprb,4.0096e+00_jprb/)
683 kbo( :, 2,30,14) = (/&
684 &7.8501e+00_jprb,8.8831e+00_jprb,8.4088e+00_jprb,6.3894e+00_jprb,4.7868e+00_jprb/)
685 kbo( :, 3,30,14) = (/&
686 &9.8321e+00_jprb,1.1068e+01_jprb,1.0541e+01_jprb,8.0663e+00_jprb,5.6845e+00_jprb/)
687 kbo( :, 4,30,14) = (/&
688 &1.2029e+01_jprb,1.3476e+01_jprb,1.2917e+01_jprb,9.9903e+00_jprb,6.7312e+00_jprb/)
689 kbo( :, 5,30,14) = (/&
690 &1.4419e+01_jprb,1.6109e+01_jprb,1.5573e+01_jprb,1.2209e+01_jprb,7.9754e+00_jprb/)
691 kbo( :, 1,31,14) = (/&
692 &6.0986e+00_jprb,7.1722e+00_jprb,6.8200e+00_jprb,5.1755e+00_jprb,3.7163e+00_jprb/)
693 kbo( :, 2,31,14) = (/&
694 &7.8450e+00_jprb,9.1619e+00_jprb,8.7620e+00_jprb,6.6858e+00_jprb,4.4619e+00_jprb/)
695 kbo( :, 3,31,14) = (/&
696 &9.8340e+00_jprb,1.1393e+01_jprb,1.0969e+01_jprb,8.4279e+00_jprb,5.3316e+00_jprb/)
697 kbo( :, 4,31,14) = (/&
698 &1.2043e+01_jprb,1.3864e+01_jprb,1.3429e+01_jprb,1.0440e+01_jprb,6.3686e+00_jprb/)
699 kbo( :, 5,31,14) = (/&
700 &1.4461e+01_jprb,1.6571e+01_jprb,1.6185e+01_jprb,1.2751e+01_jprb,7.6315e+00_jprb/)
701 kbo( :, 1,32,14) = (/&
702 &6.1266e+00_jprb,7.4384e+00_jprb,7.1350e+00_jprb,5.4384e+00_jprb,3.4364e+00_jprb/)
703 kbo( :, 2,32,14) = (/&
704 &7.8843e+00_jprb,9.4733e+00_jprb,9.1481e+00_jprb,7.0065e+00_jprb,4.1508e+00_jprb/)
705 kbo( :, 3,32,14) = (/&
706 &9.8908e+00_jprb,1.1765e+01_jprb,1.1436e+01_jprb,8.8189e+00_jprb,5.0057e+00_jprb/)
707 kbo( :, 4,32,14) = (/&
708 &1.2132e+01_jprb,1.4306e+01_jprb,1.3989e+01_jprb,1.0926e+01_jprb,6.0480e+00_jprb/)
709 kbo( :, 5,32,14) = (/&
710 &1.4591e+01_jprb,1.7095e+01_jprb,1.6845e+01_jprb,1.3332e+01_jprb,7.3373e+00_jprb/)
711 kbo( :, 1,33,14) = (/&
712 &6.1928e+00_jprb,7.7310e+00_jprb,7.4804e+00_jprb,5.7251e+00_jprb,3.1571e+00_jprb/)
713 kbo( :, 2,33,14) = (/&
714 &7.9747e+00_jprb,9.8269e+00_jprb,9.5731e+00_jprb,7.3563e+00_jprb,3.8547e+00_jprb/)
715 kbo( :, 3,33,14) = (/&
716 &1.0016e+01_jprb,1.2187e+01_jprb,1.1940e+01_jprb,9.2481e+00_jprb,4.7049e+00_jprb/)
717 kbo( :, 4,33,14) = (/&
718 &1.2296e+01_jprb,1.4804e+01_jprb,1.4590e+01_jprb,1.1453e+01_jprb,5.7736e+00_jprb/)
719 kbo( :, 5,33,14) = (/&
720 &1.4813e+01_jprb,1.7670e+01_jprb,1.7552e+01_jprb,1.3951e+01_jprb,7.0995e+00_jprb/)
721 kbo( :, 1,34,14) = (/&
722 &6.2424e+00_jprb,7.9897e+00_jprb,7.7910e+00_jprb,5.9836e+00_jprb,2.9611e+00_jprb/)
723 kbo( :, 2,34,14) = (/&
724 &8.0550e+00_jprb,1.0143e+01_jprb,9.9528e+00_jprb,7.6724e+00_jprb,3.6568e+00_jprb/)
725 kbo( :, 3,34,14) = (/&
726 &1.0129e+01_jprb,1.2569e+01_jprb,1.2399e+01_jprb,9.6375e+00_jprb,4.5137e+00_jprb/)
727 kbo( :, 4,34,14) = (/&
728 &1.2455e+01_jprb,1.5251e+01_jprb,1.5135e+01_jprb,1.1928e+01_jprb,5.6067e+00_jprb/)
729 kbo( :, 5,34,14) = (/&
730 &1.5024e+01_jprb,1.8190e+01_jprb,1.8193e+01_jprb,1.4509e+01_jprb,6.9726e+00_jprb/)
731 kbo( :, 1,35,14) = (/&
732 &6.1783e+00_jprb,8.0868e+00_jprb,7.9354e+00_jprb,6.1097e+00_jprb,2.7386e+00_jprb/)
733 kbo( :, 2,35,14) = (/&
734 &8.0021e+00_jprb,1.0274e+01_jprb,1.0143e+01_jprb,7.8342e+00_jprb,3.4231e+00_jprb/)
735 kbo( :, 3,35,14) = (/&
736 &1.0093e+01_jprb,1.2741e+01_jprb,1.2638e+01_jprb,9.8464e+00_jprb,4.2817e+00_jprb/)
737 kbo( :, 4,35,14) = (/&
738 &1.2448e+01_jprb,1.5466e+01_jprb,1.5430e+01_jprb,1.2190e+01_jprb,5.3838e+00_jprb/)
739 kbo( :, 5,35,14) = (/&
740 &1.5050e+01_jprb,1.8453e+01_jprb,1.8553e+01_jprb,1.4830e+01_jprb,6.7795e+00_jprb/)
741 kbo( :, 1,36,14) = (/&
742 &5.9739e+00_jprb,7.9879e+00_jprb,7.8762e+00_jprb,6.0736e+00_jprb,2.4966e+00_jprb/)
743 kbo( :, 2,36,14) = (/&
744 &7.7837e+00_jprb,1.0180e+01_jprb,1.0097e+01_jprb,7.8072e+00_jprb,3.1606e+00_jprb/)
745 kbo( :, 3,36,14) = (/&
746 &9.8723e+00_jprb,1.2658e+01_jprb,1.2607e+01_jprb,9.8330e+00_jprb,4.0029e+00_jprb/)
747 kbo( :, 4,36,14) = (/&
748 &1.2229e+01_jprb,1.5396e+01_jprb,1.5418e+01_jprb,1.2194e+01_jprb,5.0917e+00_jprb/)
749 kbo( :, 5,36,14) = (/&
750 &1.4834e+01_jprb,1.8403e+01_jprb,1.8570e+01_jprb,1.4857e+01_jprb,6.4863e+00_jprb/)
751 kbo( :, 1,37,14) = (/&
752 &5.5612e+00_jprb,7.6037e+00_jprb,7.5217e+00_jprb,5.8049e+00_jprb,2.2433e+00_jprb/)
753 kbo( :, 2,37,14) = (/&
754 &7.3179e+00_jprb,9.7571e+00_jprb,9.7063e+00_jprb,7.5074e+00_jprb,2.8646e+00_jprb/)
755 kbo( :, 3,37,14) = (/&
756 &9.3602e+00_jprb,1.2203e+01_jprb,1.2188e+01_jprb,9.5001e+00_jprb,3.6608e+00_jprb/)
757 kbo( :, 4,37,14) = (/&
758 &1.1681e+01_jprb,1.4916e+01_jprb,1.4967e+01_jprb,1.1825e+01_jprb,4.7005e+00_jprb/)
759 kbo( :, 5,37,14) = (/&
760 &1.4259e+01_jprb,1.7897e+01_jprb,1.8089e+01_jprb,1.4461e+01_jprb,6.0475e+00_jprb/)
761 kbo( :, 1,38,14) = (/&
762 &5.1796e+00_jprb,7.2275e+00_jprb,7.1681e+00_jprb,5.5362e+00_jprb,1.9985e+00_jprb/)
763 kbo( :, 2,38,14) = (/&
764 &6.8825e+00_jprb,9.3401e+00_jprb,9.3116e+00_jprb,7.2050e+00_jprb,2.5786e+00_jprb/)
765 kbo( :, 3,38,14) = (/&
766 &8.8770e+00_jprb,1.1748e+01_jprb,1.1759e+01_jprb,9.1583e+00_jprb,3.3304e+00_jprb/)
767 kbo( :, 4,38,14) = (/&
768 &1.1161e+01_jprb,1.4430e+01_jprb,1.4508e+01_jprb,1.1443e+01_jprb,4.3225e+00_jprb/)
769 kbo( :, 5,38,14) = (/&
770 &1.3706e+01_jprb,1.7382e+01_jprb,1.7591e+01_jprb,1.4049e+01_jprb,5.6183e+00_jprb/)
771 kbo( :, 1,39,14) = (/&
772 &4.8363e+00_jprb,6.8762e+00_jprb,6.8344e+00_jprb,5.2801e+00_jprb,1.7623e+00_jprb/)
773 kbo( :, 2,39,14) = (/&
774 &6.4874e+00_jprb,8.9479e+00_jprb,8.9339e+00_jprb,6.9176e+00_jprb,2.3035e+00_jprb/)
775 kbo( :, 3,39,14) = (/&
776 &8.4367e+00_jprb,1.1315e+01_jprb,1.1346e+01_jprb,8.8331e+00_jprb,3.0157e+00_jprb/)
777 kbo( :, 4,39,14) = (/&
778 &1.0680e+01_jprb,1.3965e+01_jprb,1.4062e+01_jprb,1.1077e+01_jprb,3.9619e+00_jprb/)
779 kbo( :, 5,39,14) = (/&
780 &1.3190e+01_jprb,1.6887e+01_jprb,1.7105e+01_jprb,1.3646e+01_jprb,5.2103e+00_jprb/)
781 kbo( :, 1,40,14) = (/&
782 &4.3793e+00_jprb,6.3557e+00_jprb,6.3258e+00_jprb,4.8864e+00_jprb,1.5658e+00_jprb/)
783 kbo( :, 2,40,14) = (/&
784 &5.9498e+00_jprb,8.3535e+00_jprb,8.3464e+00_jprb,6.4658e+00_jprb,2.0604e+00_jprb/)
785 kbo( :, 3,40,14) = (/&
786 &7.8232e+00_jprb,1.0648e+01_jprb,1.0689e+01_jprb,8.3111e+00_jprb,2.7192e+00_jprb/)
787 kbo( :, 4,40,14) = (/&
788 &9.9941e+00_jprb,1.3236e+01_jprb,1.3338e+01_jprb,1.0477e+01_jprb,3.5936e+00_jprb/)
789 kbo( :, 5,40,14) = (/&
790 &1.2441e+01_jprb,1.6098e+01_jprb,1.6304e+01_jprb,1.2976e+01_jprb,4.7608e+00_jprb/)
791 kbo( :, 1,41,14) = (/&
792 &3.9456e+00_jprb,5.8420e+00_jprb,5.8231e+00_jprb,4.4960e+00_jprb,1.3889e+00_jprb/)
793 kbo( :, 2,41,14) = (/&
794 &5.4322e+00_jprb,7.7601e+00_jprb,7.7597e+00_jprb,6.0124e+00_jprb,1.8377e+00_jprb/)
795 kbo( :, 3,41,14) = (/&
796 &7.2229e+00_jprb,9.9804e+00_jprb,1.0024e+01_jprb,7.7851e+00_jprb,2.4432e+00_jprb/)
797 kbo( :, 4,41,14) = (/&
798 &9.3151e+00_jprb,1.2496e+01_jprb,1.2598e+01_jprb,9.8694e+00_jprb,3.2503e+00_jprb/)
799 kbo( :, 5,41,14) = (/&
800 &1.1696e+01_jprb,1.5294e+01_jprb,1.5489e+01_jprb,1.2290e+01_jprb,4.3315e+00_jprb/)
801 kbo( :, 1,42,14) = (/&
802 &3.5496e+00_jprb,5.3598e+00_jprb,5.3497e+00_jprb,4.1263e+00_jprb,1.2230e+00_jprb/)
803 kbo( :, 2,42,14) = (/&
804 &4.9552e+00_jprb,7.1957e+00_jprb,7.1981e+00_jprb,5.5771e+00_jprb,1.6308e+00_jprb/)
805 kbo( :, 3,42,14) = (/&
806 &6.6624e+00_jprb,9.3374e+00_jprb,9.3819e+00_jprb,7.2830e+00_jprb,2.1850e+00_jprb/)
807 kbo( :, 4,42,14) = (/&
808 &8.6755e+00_jprb,1.1781e+01_jprb,1.1882e+01_jprb,9.2833e+00_jprb,2.9295e+00_jprb/)
809 kbo( :, 5,42,14) = (/&
810 &1.0984e+01_jprb,1.4512e+01_jprb,1.4694e+01_jprb,1.1624e+01_jprb,3.9287e+00_jprb/)
811 kbo( :, 1,43,14) = (/&
812 &3.1237e+00_jprb,4.8164e+00_jprb,4.8129e+00_jprb,3.7055e+00_jprb,1.0597e+00_jprb/)
813 kbo( :, 2,43,14) = (/&
814 &4.4310e+00_jprb,6.5524e+00_jprb,6.5555e+00_jprb,5.0769e+00_jprb,1.4220e+00_jprb/)
815 kbo( :, 3,43,14) = (/&
816 &6.0363e+00_jprb,8.5993e+00_jprb,8.6369e+00_jprb,6.7040e+00_jprb,1.9190e+00_jprb/)
817 kbo( :, 4,43,14) = (/&
818 &7.9515e+00_jprb,1.0949e+01_jprb,1.1041e+01_jprb,8.6082e+00_jprb,2.5937e+00_jprb/)
819 kbo( :, 5,43,14) = (/&
820 &1.0170e+01_jprb,1.3594e+01_jprb,1.3761e+01_jprb,1.0846e+01_jprb,3.5024e+00_jprb/)
821 kbo( :, 1,44,14) = (/&
822 &2.7094e+00_jprb,4.2738e+00_jprb,4.2715e+00_jprb,3.2851e+00_jprb,9.0642e-01_jprb/)
823 kbo( :, 2,44,14) = (/&
824 &3.9148e+00_jprb,5.9019e+00_jprb,5.9083e+00_jprb,4.5708e+00_jprb,1.2238e+00_jprb/)
825 kbo( :, 3,44,14) = (/&
826 &5.4146e+00_jprb,7.8441e+00_jprb,7.8762e+00_jprb,6.1124e+00_jprb,1.6632e+00_jprb/)
827 kbo( :, 4,44,14) = (/&
828 &7.2212e+00_jprb,1.0093e+01_jprb,1.0172e+01_jprb,7.9162e+00_jprb,2.2685e+00_jprb/)
829 kbo( :, 5,44,14) = (/&
830 &9.3383e+00_jprb,1.2640e+01_jprb,1.2790e+01_jprb,1.0039e+01_jprb,3.0877e+00_jprb/)
831 kbo( :, 1,45,14) = (/&
832 &2.3381e+00_jprb,3.7708e+00_jprb,3.7687e+00_jprb,2.8968e+00_jprb,7.6661e-01_jprb/)
833 kbo( :, 2,45,14) = (/&
834 &3.4439e+00_jprb,5.2956e+00_jprb,5.3039e+00_jprb,4.0958e+00_jprb,1.0405e+00_jprb/)
835 kbo( :, 3,45,14) = (/&
836 &4.8375e+00_jprb,7.1296e+00_jprb,7.1547e+00_jprb,5.5510e+00_jprb,1.4289e+00_jprb/)
837 kbo( :, 4,45,14) = (/&
838 &6.5366e+00_jprb,9.2742e+00_jprb,9.3409e+00_jprb,7.2620e+00_jprb,1.9684e+00_jprb/)
839 kbo( :, 5,45,14) = (/&
840 &8.5492e+00_jprb,1.1723e+01_jprb,1.1855e+01_jprb,9.2715e+00_jprb,2.7076e+00_jprb/)
841 kbo( :, 1,46,14) = (/&
842 &1.9868e+00_jprb,3.2812e+00_jprb,3.2800e+00_jprb,2.5190e+00_jprb,6.4180e-01_jprb/)
843 kbo( :, 2,46,14) = (/&
844 &2.9896e+00_jprb,4.6959e+00_jprb,4.7028e+00_jprb,3.6244e+00_jprb,8.7338e-01_jprb/)
845 kbo( :, 3,46,14) = (/&
846 &4.2743e+00_jprb,6.4145e+00_jprb,6.4351e+00_jprb,4.9866e+00_jprb,1.2115e+00_jprb/)
847 kbo( :, 4,46,14) = (/&
848 &5.8592e+00_jprb,8.4475e+00_jprb,8.5037e+00_jprb,6.6059e+00_jprb,1.6869e+00_jprb/)
849 kbo( :, 5,46,14) = (/&
850 &7.7565e+00_jprb,1.0789e+01_jprb,1.0900e+01_jprb,8.5039e+00_jprb,2.3466e+00_jprb/)
851 kbo( :, 1,47,14) = (/&
852 &1.6439e+00_jprb,2.7872e+00_jprb,2.7853e+00_jprb,2.1361e+00_jprb,5.3608e-01_jprb/)
853 kbo( :, 2,47,14) = (/&
854 &2.5332e+00_jprb,4.0761e+00_jprb,4.0808e+00_jprb,3.1417e+00_jprb,7.2689e-01_jprb/)
855 kbo( :, 3,47,14) = (/&
856 &3.7004e+00_jprb,5.6682e+00_jprb,5.6872e+00_jprb,4.4002e+00_jprb,1.0142e+00_jprb/)
857 kbo( :, 4,47,14) = (/&
858 &5.1603e+00_jprb,7.5763e+00_jprb,7.6194e+00_jprb,5.9172e+00_jprb,1.4236e+00_jprb/)
859 kbo( :, 5,47,14) = (/&
860 &6.9294e+00_jprb,9.7951e+00_jprb,9.8846e+00_jprb,7.6954e+00_jprb,2.0006e+00_jprb/)
861 kbo( :, 1,48,14) = (/&
862 &1.3454e+00_jprb,2.3441e+00_jprb,2.3435e+00_jprb,1.7934e+00_jprb,4.4332e-01_jprb/)
863 kbo( :, 2,48,14) = (/&
864 &2.1289e+00_jprb,3.5090e+00_jprb,3.5130e+00_jprb,2.7017e+00_jprb,5.9906e-01_jprb/)
865 kbo( :, 3,48,14) = (/&
866 &3.1810e+00_jprb,4.9808e+00_jprb,4.9955e+00_jprb,3.8562e+00_jprb,8.3681e-01_jprb/)
867 kbo( :, 4,48,14) = (/&
868 &4.5168e+00_jprb,6.7583e+00_jprb,6.7897e+00_jprb,5.2679e+00_jprb,1.1898e+00_jprb/)
869 kbo( :, 5,48,14) = (/&
870 &6.1589e+00_jprb,8.8519e+00_jprb,8.9240e+00_jprb,6.9392e+00_jprb,1.6894e+00_jprb/)
871 kbo( :, 1,49,14) = (/&
872 &1.0880e+00_jprb,1.9520e+00_jprb,1.9492e+00_jprb,1.4892e+00_jprb,3.6205e-01_jprb/)
873 kbo( :, 2,49,14) = (/&
874 &1.7730e+00_jprb,2.9965e+00_jprb,2.9993e+00_jprb,2.3026e+00_jprb,4.8696e-01_jprb/)
875 kbo( :, 3,49,14) = (/&
876 &2.7108e+00_jprb,4.3431e+00_jprb,4.3550e+00_jprb,3.3555e+00_jprb,6.7993e-01_jprb/)
877 kbo( :, 4,49,14) = (/&
878 &3.9297e+00_jprb,5.9939e+00_jprb,6.0205e+00_jprb,4.6638e+00_jprb,9.7892e-01_jprb/)
879 kbo( :, 5,49,14) = (/&
880 &5.4456e+00_jprb,7.9623e+00_jprb,8.0197e+00_jprb,6.2316e+00_jprb,1.4097e+00_jprb/)
881 kbo( :, 1,50,14) = (/&
882 &8.8117e-01_jprb,1.6250e+00_jprb,1.6221e+00_jprb,1.2383e+00_jprb,3.0851e-01_jprb/)
883 kbo( :, 2,50,14) = (/&
884 &1.4792e+00_jprb,2.5614e+00_jprb,2.5640e+00_jprb,1.9649e+00_jprb,4.1033e-01_jprb/)
885 kbo( :, 3,50,14) = (/&
886 &2.3153e+00_jprb,3.7911e+00_jprb,3.7998e+00_jprb,2.9253e+00_jprb,5.6911e-01_jprb/)
887 kbo( :, 4,50,14) = (/&
888 &3.4255e+00_jprb,5.3270e+00_jprb,5.3498e+00_jprb,4.1369e+00_jprb,8.2028e-01_jprb/)
889 kbo( :, 5,50,14) = (/&
890 &4.8249e+00_jprb,7.1748e+00_jprb,7.2189e+00_jprb,5.6068e+00_jprb,1.1946e+00_jprb/)
891 kbo( :, 1,51,14) = (/&
892 &7.1056e-01_jprb,1.3442e+00_jprb,1.3433e+00_jprb,1.0241e+00_jprb,2.6969e-01_jprb/)
893 kbo( :, 2,51,14) = (/&
894 &1.2285e+00_jprb,2.1825e+00_jprb,2.1836e+00_jprb,1.6701e+00_jprb,3.5352e-01_jprb/)
895 kbo( :, 3,51,14) = (/&
896 &1.9719e+00_jprb,3.3009e+00_jprb,3.3075e+00_jprb,2.5431e+00_jprb,4.8463e-01_jprb/)
897 kbo( :, 4,51,14) = (/&
898 &2.9787e+00_jprb,4.7254e+00_jprb,4.7429e+00_jprb,3.6598e+00_jprb,6.9430e-01_jprb/)
899 kbo( :, 5,51,14) = (/&
900 &4.2688e+00_jprb,6.4560e+00_jprb,6.4905e+00_jprb,5.0345e+00_jprb,1.0186e+00_jprb/)
901 kbo( :, 1,52,14) = (/&
902 &5.6673e-01_jprb,1.0993e+00_jprb,1.1002e+00_jprb,8.3639e-01_jprb,2.3587e-01_jprb/)
903 kbo( :, 2,52,14) = (/&
904 &1.0109e+00_jprb,1.8431e+00_jprb,1.8420e+00_jprb,1.4073e+00_jprb,3.0435e-01_jprb/)
905 kbo( :, 3,52,14) = (/&
906 &1.6672e+00_jprb,2.8532e+00_jprb,2.8589e+00_jprb,2.1945e+00_jprb,4.1172e-01_jprb/)
907 kbo( :, 4,52,14) = (/&
908 &2.5718e+00_jprb,4.1653e+00_jprb,4.1785e+00_jprb,3.2201e+00_jprb,5.8484e-01_jprb/)
909 kbo( :, 5,52,14) = (/&
910 &3.7560e+00_jprb,5.7814e+00_jprb,5.8111e+00_jprb,4.5005e+00_jprb,8.6103e-01_jprb/)
911 kbo( :, 1,53,14) = (/&
912 &4.4695e-01_jprb,8.8846e-01_jprb,8.9001e-01_jprb,6.7290e-01_jprb,2.0456e-01_jprb/)
913 kbo( :, 2,53,14) = (/&
914 &8.2293e-01_jprb,1.5387e+00_jprb,1.5377e+00_jprb,1.1737e+00_jprb,2.6214e-01_jprb/)
915 kbo( :, 3,53,14) = (/&
916 &1.3961e+00_jprb,2.4467e+00_jprb,2.4512e+00_jprb,1.8778e+00_jprb,3.4832e-01_jprb/)
917 kbo( :, 4,53,14) = (/&
918 &2.2042e+00_jprb,3.6459e+00_jprb,3.6556e+00_jprb,2.8141e+00_jprb,4.9014e-01_jprb/)
919 kbo( :, 5,53,14) = (/&
920 &3.2850e+00_jprb,5.1511e+00_jprb,5.1749e+00_jprb,4.0006e+00_jprb,7.2139e-01_jprb/)
921 kbo( :, 1,54,14) = (/&
922 &3.5542e-01_jprb,7.2243e-01_jprb,7.2402e-01_jprb,5.4442e-01_jprb,1.8822e-01_jprb/)
923 kbo( :, 2,54,14) = (/&
924 &6.7476e-01_jprb,1.2906e+00_jprb,1.2914e+00_jprb,9.8429e-01_jprb,2.4211e-01_jprb/)
925 kbo( :, 3,54,14) = (/&
926 &1.1767e+00_jprb,2.1105e+00_jprb,2.1120e+00_jprb,1.6159e+00_jprb,3.1436e-01_jprb/)
927 kbo( :, 4,54,14) = (/&
928 &1.9014e+00_jprb,3.2074e+00_jprb,3.2160e+00_jprb,2.4725e+00_jprb,4.3384e-01_jprb/)
929 kbo( :, 5,54,14) = (/&
930 &2.8871e+00_jprb,4.6109e+00_jprb,4.6302e+00_jprb,3.5724e+00_jprb,6.2978e-01_jprb/)
931 kbo( :, 1,55,14) = (/&
932 &2.8206e-01_jprb,5.8561e-01_jprb,5.8631e-01_jprb,4.3881e-01_jprb,1.7956e-01_jprb/)
933 kbo( :, 2,55,14) = (/&
934 &5.5285e-01_jprb,1.0805e+00_jprb,1.0824e+00_jprb,8.2279e-01_jprb,2.3170e-01_jprb/)
935 kbo( :, 3,55,14) = (/&
936 &9.9080e-01_jprb,1.8171e+00_jprb,1.8174e+00_jprb,1.3888e+00_jprb,2.9651e-01_jprb/)
937 kbo( :, 4,55,14) = (/&
938 &1.6397e+00_jprb,2.8207e+00_jprb,2.8269e+00_jprb,2.1700e+00_jprb,3.9927e-01_jprb/)
939 kbo( :, 5,55,14) = (/&
940 &2.5364e+00_jprb,4.1246e+00_jprb,4.1390e+00_jprb,3.1901e+00_jprb,5.6676e-01_jprb/)
941 kbo( :, 1,56,14) = (/&
942 &2.2149e-01_jprb,4.6888e-01_jprb,4.6793e-01_jprb,3.4931e-01_jprb,1.7153e-01_jprb/)
943 kbo( :, 2,56,14) = (/&
944 &4.4941e-01_jprb,8.9702e-01_jprb,8.9917e-01_jprb,6.8030e-01_jprb,2.2216e-01_jprb/)
945 kbo( :, 3,56,14) = (/&
946 &8.2764e-01_jprb,1.5520e+00_jprb,1.5517e+00_jprb,1.1848e+00_jprb,2.8403e-01_jprb/)
947 kbo( :, 4,56,14) = (/&
948 &1.4044e+00_jprb,2.4656e+00_jprb,2.4713e+00_jprb,1.8937e+00_jprb,3.7249e-01_jprb/)
949 kbo( :, 5,56,14) = (/&
950 &2.2168e+00_jprb,3.6708e+00_jprb,3.6827e+00_jprb,2.8356e+00_jprb,5.1654e-01_jprb/)
951 kbo( :, 1,57,14) = (/&
952 &1.7214e-01_jprb,3.7079e-01_jprb,3.6824e-01_jprb,2.7420e-01_jprb,1.6338e-01_jprb/)
953 kbo( :, 2,57,14) = (/&
954 &3.6172e-01_jprb,7.3713e-01_jprb,7.3924e-01_jprb,5.5639e-01_jprb,2.1373e-01_jprb/)
955 kbo( :, 3,57,14) = (/&
956 &6.8570e-01_jprb,1.3134e+00_jprb,1.3148e+00_jprb,1.0025e+00_jprb,2.7456e-01_jprb/)
957 kbo( :, 4,57,14) = (/&
958 &1.1942e+00_jprb,2.1424e+00_jprb,2.1454e+00_jprb,1.6418e+00_jprb,3.5310e-01_jprb/)
959 kbo( :, 5,57,14) = (/&
960 &1.9264e+00_jprb,3.2505e+00_jprb,3.2602e+00_jprb,2.5070e+00_jprb,4.7752e-01_jprb/)
961 kbo( :, 1,58,14) = (/&
962 &1.3445e-01_jprb,2.9284e-01_jprb,2.8903e-01_jprb,2.1482e-01_jprb,1.5774e-01_jprb/)
963 kbo( :, 2,58,14) = (/&
964 &2.9137e-01_jprb,6.0563e-01_jprb,6.0668e-01_jprb,4.5447e-01_jprb,2.0929e-01_jprb/)
965 kbo( :, 3,58,14) = (/&
966 &5.6904e-01_jprb,1.1121e+00_jprb,1.1143e+00_jprb,8.4762e-01_jprb,2.7004e-01_jprb/)
967 kbo( :, 4,58,14) = (/&
968 &1.0164e+00_jprb,1.8625e+00_jprb,1.8634e+00_jprb,1.4242e+00_jprb,3.4514e-01_jprb/)
969 kbo( :, 5,58,14) = (/&
970 &1.6772e+00_jprb,2.8815e+00_jprb,2.8885e+00_jprb,2.2182e+00_jprb,4.5564e-01_jprb/)
971 kbo( :, 1,59,14) = (/&
972 &1.2131e-01_jprb,2.6518e-01_jprb,2.6089e-01_jprb,1.9393e-01_jprb,1.7441e-01_jprb/)
973 kbo( :, 2,59,14) = (/&
974 &2.6626e-01_jprb,5.5782e-01_jprb,5.5852e-01_jprb,4.1787e-01_jprb,2.3461e-01_jprb/)
975 kbo( :, 3,59,14) = (/&
976 &5.2659e-01_jprb,1.0377e+00_jprb,1.0403e+00_jprb,7.9028e-01_jprb,3.0633e-01_jprb/)
977 kbo( :, 4,59,14) = (/&
978 &9.5064e-01_jprb,1.7566e+00_jprb,1.7573e+00_jprb,1.3429e+00_jprb,3.9674e-01_jprb/)
979 kbo( :, 5,59,14) = (/&
980 &1.5830e+00_jprb,2.7404e+00_jprb,2.7474e+00_jprb,2.1087e+00_jprb,5.2021e-01_jprb/)
981 kbo( :, 1,13,15) = (/&
982 &3.2244e+00_jprb,2.5409e+00_jprb,3.1328e+00_jprb,4.6712e+00_jprb,1.1048e+01_jprb/)
983 kbo( :, 2,13,15) = (/&
984 &4.5398e+00_jprb,3.6057e+00_jprb,4.5237e+00_jprb,6.7554e+00_jprb,1.1523e+01_jprb/)
985 kbo( :, 3,13,15) = (/&
986 &6.0837e+00_jprb,4.8732e+00_jprb,6.1887e+00_jprb,9.2622e+00_jprb,1.3154e+01_jprb/)
987 kbo( :, 4,13,15) = (/&
988 &7.8628e+00_jprb,6.3217e+00_jprb,8.1422e+00_jprb,1.2196e+01_jprb,1.6296e+01_jprb/)
989 kbo( :, 5,13,15) = (/&
990 &9.8525e+00_jprb,7.9653e+00_jprb,1.0472e+01_jprb,1.5686e+01_jprb,2.0959e+01_jprb/)
991 kbo( :, 1,14,15) = (/&
992 &3.5755e+00_jprb,2.8779e+00_jprb,3.4519e+00_jprb,5.1028e+00_jprb,1.0373e+01_jprb/)
993 kbo( :, 2,14,15) = (/&
994 &5.0524e+00_jprb,4.1250e+00_jprb,4.9883e+00_jprb,7.3878e+00_jprb,1.1513e+01_jprb/)
995 kbo( :, 3,14,15) = (/&
996 &6.8346e+00_jprb,5.5984e+00_jprb,6.8212e+00_jprb,1.0151e+01_jprb,1.3855e+01_jprb/)
997 kbo( :, 4,14,15) = (/&
998 &8.9000e+00_jprb,7.2723e+00_jprb,8.9537e+00_jprb,1.3379e+01_jprb,1.7871e+01_jprb/)
999 kbo( :, 5,14,15) = (/&
1000 &1.1265e+01_jprb,9.1701e+00_jprb,1.1497e+01_jprb,1.7206e+01_jprb,2.2981e+01_jprb/)
1001 kbo( :, 1,15,15) = (/&
1002 &4.0824e+00_jprb,3.3435e+00_jprb,3.8164e+00_jprb,5.5870e+00_jprb,9.5637e+00_jprb/)
1003 kbo( :, 2,15,15) = (/&
1004 &5.7577e+00_jprb,4.7850e+00_jprb,5.5076e+00_jprb,8.0842e+00_jprb,1.1461e+01_jprb/)
1005 kbo( :, 3,15,15) = (/&
1006 &7.8213e+00_jprb,6.5007e+00_jprb,7.5362e+00_jprb,1.1097e+01_jprb,1.4826e+01_jprb/)
1007 kbo( :, 4,15,15) = (/&
1008 &1.0256e+01_jprb,8.4593e+00_jprb,9.9114e+00_jprb,1.4655e+01_jprb,1.9572e+01_jprb/)
1009 kbo( :, 5,15,15) = (/&
1010 &1.3032e+01_jprb,1.0687e+01_jprb,1.2684e+01_jprb,1.8793e+01_jprb,2.5099e+01_jprb/)
1011 kbo( :, 1,16,15) = (/&
1012 &4.7372e+00_jprb,3.9270e+00_jprb,4.2463e+00_jprb,6.1221e+00_jprb,9.0976e+00_jprb/)
1013 kbo( :, 2,16,15) = (/&
1014 &6.6436e+00_jprb,5.5787e+00_jprb,6.1045e+00_jprb,8.8126e+00_jprb,1.1843e+01_jprb/)
1015 kbo( :, 3,16,15) = (/&
1016 &9.0517e+00_jprb,7.5797e+00_jprb,8.3542e+00_jprb,1.2092e+01_jprb,1.6147e+01_jprb/)
1017 kbo( :, 4,16,15) = (/&
1018 &1.1879e+01_jprb,9.9008e+00_jprb,1.1023e+01_jprb,1.5960e+01_jprb,2.1309e+01_jprb/)
1019 kbo( :, 5,16,15) = (/&
1020 &1.5093e+01_jprb,1.2519e+01_jprb,1.4078e+01_jprb,2.0387e+01_jprb,2.7221e+01_jprb/)
1021 kbo( :, 1,17,15) = (/&
1022 &5.5197e+00_jprb,4.6160e+00_jprb,4.7418e+00_jprb,6.6773e+00_jprb,9.2205e+00_jprb/)
1023 kbo( :, 2,17,15) = (/&
1024 &7.7119e+00_jprb,6.5019e+00_jprb,6.7774e+00_jprb,9.5358e+00_jprb,1.2727e+01_jprb/)
1025 kbo( :, 3,17,15) = (/&
1026 &1.0467e+01_jprb,8.8388e+00_jprb,9.2742e+00_jprb,1.3058e+01_jprb,1.7430e+01_jprb/)
1027 kbo( :, 4,17,15) = (/&
1028 &1.3720e+01_jprb,1.1553e+01_jprb,1.2244e+01_jprb,1.7227e+01_jprb,2.2998e+01_jprb/)
1029 kbo( :, 5,17,15) = (/&
1030 &1.7413e+01_jprb,1.4594e+01_jprb,1.5673e+01_jprb,2.2047e+01_jprb,2.9433e+01_jprb/)
1031 kbo( :, 1,18,15) = (/&
1032 &6.4274e+00_jprb,5.4111e+00_jprb,5.3034e+00_jprb,7.2350e+00_jprb,9.7622e+00_jprb/)
1033 kbo( :, 2,18,15) = (/&
1034 &8.9573e+00_jprb,7.5807e+00_jprb,7.5479e+00_jprb,1.0273e+01_jprb,1.3710e+01_jprb/)
1035 kbo( :, 3,18,15) = (/&
1036 &1.2111e+01_jprb,1.0258e+01_jprb,1.0321e+01_jprb,1.4006e+01_jprb,1.8696e+01_jprb/)
1037 kbo( :, 4,18,15) = (/&
1038 &1.5845e+01_jprb,1.3386e+01_jprb,1.3622e+01_jprb,1.8470e+01_jprb,2.4650e+01_jprb/)
1039 kbo( :, 5,18,15) = (/&
1040 &2.0084e+01_jprb,1.6890e+01_jprb,1.7434e+01_jprb,2.3673e+01_jprb,3.1599e+01_jprb/)
1041 kbo( :, 1,19,15) = (/&
1042 &7.5164e+00_jprb,6.3134e+00_jprb,5.9395e+00_jprb,7.8093e+00_jprb,1.0475e+01_jprb/)
1043 kbo( :, 2,19,15) = (/&
1044 &1.0441e+01_jprb,8.8014e+00_jprb,8.4278e+00_jprb,1.1035e+01_jprb,1.4729e+01_jprb/)
1045 kbo( :, 3,19,15) = (/&
1046 &1.4043e+01_jprb,1.1861e+01_jprb,1.1513e+01_jprb,1.4988e+01_jprb,2.0004e+01_jprb/)
1047 kbo( :, 4,19,15) = (/&
1048 &1.8322e+01_jprb,1.5433e+01_jprb,1.5177e+01_jprb,1.9715e+01_jprb,2.6318e+01_jprb/)
1049 kbo( :, 5,19,15) = (/&
1050 &2.3146e+01_jprb,1.9466e+01_jprb,1.9384e+01_jprb,2.5255e+01_jprb,3.3709e+01_jprb/)
1051 kbo( :, 1,20,15) = (/&
1052 &8.8455e+00_jprb,7.4066e+00_jprb,6.7186e+00_jprb,8.4558e+00_jprb,1.1343e+01_jprb/)
1053 kbo( :, 2,20,15) = (/&
1054 &1.2219e+01_jprb,1.0275e+01_jprb,9.4871e+00_jprb,1.1882e+01_jprb,1.5858e+01_jprb/)
1055 kbo( :, 3,20,15) = (/&
1056 &1.6346e+01_jprb,1.3763e+01_jprb,1.2931e+01_jprb,1.6095e+01_jprb,2.1479e+01_jprb/)
1057 kbo( :, 4,20,15) = (/&
1058 &2.1206e+01_jprb,1.7855e+01_jprb,1.6990e+01_jprb,2.1127e+01_jprb,2.8198e+01_jprb/)
1059 kbo( :, 5,20,15) = (/&
1060 &2.6661e+01_jprb,2.2435e+01_jprb,2.1640e+01_jprb,2.6969e+01_jprb,3.5995e+01_jprb/)
1061 kbo( :, 1,21,15) = (/&
1062 &1.0378e+01_jprb,8.6731e+00_jprb,7.6340e+00_jprb,9.1349e+00_jprb,1.2281e+01_jprb/)
1063 kbo( :, 2,21,15) = (/&
1064 &1.4246e+01_jprb,1.1959e+01_jprb,1.0712e+01_jprb,1.2780e+01_jprb,1.7040e+01_jprb/)
1065 kbo( :, 3,21,15) = (/&
1066 &1.8940e+01_jprb,1.5929e+01_jprb,1.4528e+01_jprb,1.7265e+01_jprb,2.3018e+01_jprb/)
1067 kbo( :, 4,21,15) = (/&
1068 &2.4416e+01_jprb,2.0563e+01_jprb,1.9019e+01_jprb,2.2602e+01_jprb,3.0124e+01_jprb/)
1069 kbo( :, 5,21,15) = (/&
1070 &3.0523e+01_jprb,2.5747e+01_jprb,2.4135e+01_jprb,2.8712e+01_jprb,3.8248e+01_jprb/)
1071 kbo( :, 1,22,15) = (/&
1072 &1.2355e+01_jprb,1.0324e+01_jprb,8.9103e+00_jprb,1.0132e+01_jprb,1.3532e+01_jprb/)
1073 kbo( :, 2,22,15) = (/&
1074 &1.6827e+01_jprb,1.4110e+01_jprb,1.2397e+01_jprb,1.4085e+01_jprb,1.8635e+01_jprb/)
1075 kbo( :, 3,22,15) = (/&
1076 &2.2180e+01_jprb,1.8653e+01_jprb,1.6659e+01_jprb,1.8921e+01_jprb,2.5003e+01_jprb/)
1077 kbo( :, 4,22,15) = (/&
1078 &2.8311e+01_jprb,2.3905e+01_jprb,2.1641e+01_jprb,2.4584e+01_jprb,3.2472e+01_jprb/)
1079 kbo( :, 5,22,15) = (/&
1080 &3.5149e+01_jprb,2.9738e+01_jprb,2.7250e+01_jprb,3.1004e+01_jprb,4.0987e+01_jprb/)
1081 kbo( :, 1,23,15) = (/&
1082 &1.4605e+01_jprb,1.2205e+01_jprb,1.0445e+01_jprb,1.1291e+01_jprb,1.4871e+01_jprb/)
1083 kbo( :, 2,23,15) = (/&
1084 &1.9716e+01_jprb,1.6539e+01_jprb,1.4376e+01_jprb,1.5566e+01_jprb,2.0310e+01_jprb/)
1085 kbo( :, 3,23,15) = (/&
1086 &2.5726e+01_jprb,2.1683e+01_jprb,1.9115e+01_jprb,2.0736e+01_jprb,2.6995e+01_jprb/)
1087 kbo( :, 4,23,15) = (/&
1088 &3.2572e+01_jprb,2.7566e+01_jprb,2.4581e+01_jprb,2.6716e+01_jprb,3.4786e+01_jprb/)
1089 kbo( :, 5,23,15) = (/&
1090 &4.0123e+01_jprb,3.4080e+01_jprb,3.0686e+01_jprb,3.3457e+01_jprb,4.3686e+01_jprb/)
1091 kbo( :, 1,24,15) = (/&
1092 &1.7134e+01_jprb,1.4330e+01_jprb,1.2237e+01_jprb,1.2592e+01_jprb,1.6241e+01_jprb/)
1093 kbo( :, 2,24,15) = (/&
1094 &2.2882e+01_jprb,1.9252e+01_jprb,1.6642e+01_jprb,1.7193e+01_jprb,2.2035e+01_jprb/)
1095 kbo( :, 3,24,15) = (/&
1096 &2.9584e+01_jprb,2.5005e+01_jprb,2.1866e+01_jprb,2.2682e+01_jprb,2.9023e+01_jprb/)
1097 kbo( :, 4,24,15) = (/&
1098 &3.7130e+01_jprb,3.1556e+01_jprb,2.7836e+01_jprb,2.8990e+01_jprb,3.7154e+01_jprb/)
1099 kbo( :, 5,24,15) = (/&
1100 &4.5388e+01_jprb,3.8713e+01_jprb,3.4446e+01_jprb,3.6104e+01_jprb,4.6377e+01_jprb/)
1101 kbo( :, 1,25,15) = (/&
1102 &1.9927e+01_jprb,1.6707e+01_jprb,1.4288e+01_jprb,1.4051e+01_jprb,1.7699e+01_jprb/)
1103 kbo( :, 2,25,15) = (/&
1104 &2.6343e+01_jprb,2.2217e+01_jprb,1.9188e+01_jprb,1.8973e+01_jprb,2.3814e+01_jprb/)
1105 kbo( :, 3,25,15) = (/&
1106 &3.3724e+01_jprb,2.8620e+01_jprb,2.4897e+01_jprb,2.4764e+01_jprb,3.1106e+01_jprb/)
1107 kbo( :, 4,25,15) = (/&
1108 &4.1952e+01_jprb,3.5794e+01_jprb,3.1378e+01_jprb,3.1440e+01_jprb,3.9572e+01_jprb/)
1109 kbo( :, 5,25,15) = (/&
1110 &5.0891e+01_jprb,4.3587e+01_jprb,3.8479e+01_jprb,3.8878e+01_jprb,4.9030e+01_jprb/)
1111 kbo( :, 1,26,15) = (/&
1112 &2.3026e+01_jprb,1.9365e+01_jprb,1.6616e+01_jprb,1.5692e+01_jprb,1.9320e+01_jprb/)
1113 kbo( :, 2,26,15) = (/&
1114 &3.0129e+01_jprb,2.5491e+01_jprb,2.2032e+01_jprb,2.0944e+01_jprb,2.5726e+01_jprb/)
1115 kbo( :, 3,26,15) = (/&
1116 &3.8188e+01_jprb,3.2536e+01_jprb,2.8266e+01_jprb,2.7089e+01_jprb,3.3354e+01_jprb/)
1117 kbo( :, 4,26,15) = (/&
1118 &4.7076e+01_jprb,4.0316e+01_jprb,3.5238e+01_jprb,3.4113e+01_jprb,4.2106e+01_jprb/)
1119 kbo( :, 5,26,15) = (/&
1120 &5.6691e+01_jprb,4.8702e+01_jprb,4.2828e+01_jprb,4.1890e+01_jprb,5.1865e+01_jprb/)
1121 kbo( :, 1,27,15) = (/&
1122 &2.6319e+01_jprb,2.2209e+01_jprb,1.9103e+01_jprb,1.7475e+01_jprb,2.1047e+01_jprb/)
1123 kbo( :, 2,27,15) = (/&
1124 &3.4077e+01_jprb,2.8961e+01_jprb,2.5047e+01_jprb,2.3066e+01_jprb,2.7740e+01_jprb/)
1125 kbo( :, 3,27,15) = (/&
1126 &4.2766e+01_jprb,3.6599e+01_jprb,3.1799e+01_jprb,2.9545e+01_jprb,3.5624e+01_jprb/)
1127 kbo( :, 4,27,15) = (/&
1128 &5.2311e+01_jprb,4.4949e+01_jprb,3.9254e+01_jprb,3.6881e+01_jprb,4.4625e+01_jprb/)
1129 kbo( :, 5,27,15) = (/&
1130 &6.2535e+01_jprb,5.3903e+01_jprb,4.7276e+01_jprb,4.4959e+01_jprb,5.4744e+01_jprb/)
1131 kbo( :, 1,28,15) = (/&
1132 &2.9739e+01_jprb,2.5212e+01_jprb,2.1725e+01_jprb,1.9370e+01_jprb,2.2823e+01_jprb/)
1133 kbo( :, 2,28,15) = (/&
1134 &3.8111e+01_jprb,3.2556e+01_jprb,2.8178e+01_jprb,2.5312e+01_jprb,2.9805e+01_jprb/)
1135 kbo( :, 3,28,15) = (/&
1136 &4.7442e+01_jprb,4.0758e+01_jprb,3.5447e+01_jprb,3.2130e+01_jprb,3.7952e+01_jprb/)
1137 kbo( :, 4,28,15) = (/&
1138 &5.7581e+01_jprb,4.9637e+01_jprb,4.3359e+01_jprb,3.9780e+01_jprb,4.7241e+01_jprb/)
1139 kbo( :, 5,28,15) = (/&
1140 &6.8350e+01_jprb,5.9110e+01_jprb,5.1790e+01_jprb,4.8135e+01_jprb,5.7711e+01_jprb/)
1141 kbo( :, 1,29,15) = (/&
1142 &3.3289e+01_jprb,2.8377e+01_jprb,2.4485e+01_jprb,2.1425e+01_jprb,2.4625e+01_jprb/)
1143 kbo( :, 2,29,15) = (/&
1144 &4.2270e+01_jprb,3.6277e+01_jprb,3.1445e+01_jprb,2.7695e+01_jprb,3.1898e+01_jprb/)
1145 kbo( :, 3,29,15) = (/&
1146 &5.2200e+01_jprb,4.5001e+01_jprb,3.9165e+01_jprb,3.4833e+01_jprb,4.0336e+01_jprb/)
1147 kbo( :, 4,29,15) = (/&
1148 &6.2884e+01_jprb,5.4377e+01_jprb,4.7526e+01_jprb,4.2792e+01_jprb,4.9976e+01_jprb/)
1149 kbo( :, 5,29,15) = (/&
1150 &7.4157e+01_jprb,6.4312e+01_jprb,5.6343e+01_jprb,5.1436e+01_jprb,6.0842e+01_jprb/)
1151 kbo( :, 1,30,15) = (/&
1152 &3.6922e+01_jprb,3.1637e+01_jprb,2.7336e+01_jprb,2.3566e+01_jprb,2.6436e+01_jprb/)
1153 kbo( :, 2,30,15) = (/&
1154 &4.6484e+01_jprb,4.0046e+01_jprb,3.4764e+01_jprb,3.0148e+01_jprb,3.4000e+01_jprb/)
1155 kbo( :, 3,30,15) = (/&
1156 &5.6941e+01_jprb,4.9235e+01_jprb,4.2907e+01_jprb,3.7604e+01_jprb,4.2767e+01_jprb/)
1157 kbo( :, 4,30,15) = (/&
1158 &6.8119e+01_jprb,5.9074e+01_jprb,5.1660e+01_jprb,4.5840e+01_jprb,5.2778e+01_jprb/)
1159 kbo( :, 5,30,15) = (/&
1160 &7.9816e+01_jprb,6.9391e+01_jprb,6.0797e+01_jprb,5.4746e+01_jprb,6.4070e+01_jprb/)
1161 kbo( :, 1,31,15) = (/&
1162 &4.0648e+01_jprb,3.4989e+01_jprb,3.0276e+01_jprb,2.5790e+01_jprb,2.8253e+01_jprb/)
1163 kbo( :, 2,31,15) = (/&
1164 &5.0739e+01_jprb,4.3869e+01_jprb,3.8136e+01_jprb,3.2693e+01_jprb,3.6176e+01_jprb/)
1165 kbo( :, 3,31,15) = (/&
1166 &6.1698e+01_jprb,5.3493e+01_jprb,4.6669e+01_jprb,4.0453e+01_jprb,4.5327e+01_jprb/)
1167 kbo( :, 4,31,15) = (/&
1168 &7.3307e+01_jprb,6.3725e+01_jprb,5.5765e+01_jprb,4.8944e+01_jprb,5.5745e+01_jprb/)
1169 kbo( :, 5,31,15) = (/&
1170 &8.5379e+01_jprb,7.4384e+01_jprb,6.5189e+01_jprb,5.8116e+01_jprb,6.7439e+01_jprb/)
1171 kbo( :, 1,32,15) = (/&
1172 &4.4430e+01_jprb,3.8384e+01_jprb,3.3279e+01_jprb,2.8093e+01_jprb,3.0198e+01_jprb/)
1173 kbo( :, 2,32,15) = (/&
1174 &5.5010e+01_jprb,4.7713e+01_jprb,4.1521e+01_jprb,3.5304e+01_jprb,3.8486e+01_jprb/)
1175 kbo( :, 3,32,15) = (/&
1176 &6.6406e+01_jprb,5.7714e+01_jprb,5.0403e+01_jprb,4.3340e+01_jprb,4.8019e+01_jprb/)
1177 kbo( :, 4,32,15) = (/&
1178 &7.8394e+01_jprb,6.8294e+01_jprb,5.9802e+01_jprb,5.2093e+01_jprb,5.8861e+01_jprb/)
1179 kbo( :, 5,32,15) = (/&
1180 &9.0789e+01_jprb,7.9248e+01_jprb,6.9496e+01_jprb,6.1520e+01_jprb,7.0971e+01_jprb/)
1181 kbo( :, 1,33,15) = (/&
1182 &4.8242e+01_jprb,4.1814e+01_jprb,3.6311e+01_jprb,3.0445e+01_jprb,3.2261e+01_jprb/)
1183 kbo( :, 2,33,15) = (/&
1184 &5.9259e+01_jprb,5.1534e+01_jprb,4.4898e+01_jprb,3.7953e+01_jprb,4.0933e+01_jprb/)
1185 kbo( :, 3,33,15) = (/&
1186 &7.1044e+01_jprb,6.1877e+01_jprb,5.4099e+01_jprb,4.6243e+01_jprb,5.0861e+01_jprb/)
1187 kbo( :, 4,33,15) = (/&
1188 &8.3385e+01_jprb,7.2754e+01_jprb,6.3738e+01_jprb,5.5225e+01_jprb,6.2072e+01_jprb/)
1189 kbo( :, 5,33,15) = (/&
1190 &9.6014e+01_jprb,8.3965e+01_jprb,7.3665e+01_jprb,6.4932e+01_jprb,7.4660e+01_jprb/)
1191 kbo( :, 1,34,15) = (/&
1192 &5.1672e+01_jprb,4.4907e+01_jprb,3.9052e+01_jprb,3.2559e+01_jprb,3.4150e+01_jprb/)
1193 kbo( :, 2,34,15) = (/&
1194 &6.3066e+01_jprb,5.4942e+01_jprb,4.7932e+01_jprb,4.0320e+01_jprb,4.3137e+01_jprb/)
1195 kbo( :, 3,34,15) = (/&
1196 &7.5181e+01_jprb,6.5586e+01_jprb,5.7376e+01_jprb,4.8848e+01_jprb,5.3416e+01_jprb/)
1197 kbo( :, 4,34,15) = (/&
1198 &8.7786e+01_jprb,7.6718e+01_jprb,6.7237e+01_jprb,5.8022e+01_jprb,6.4986e+01_jprb/)
1199 kbo( :, 5,34,15) = (/&
1200 &1.0062e+02_jprb,8.8122e+01_jprb,7.7322e+01_jprb,6.7972e+01_jprb,7.7968e+01_jprb/)
1201 kbo( :, 1,35,15) = (/&
1202 &5.3974e+01_jprb,4.7010e+01_jprb,4.0914e+01_jprb,3.3953e+01_jprb,3.5284e+01_jprb/)
1203 kbo( :, 2,35,15) = (/&
1204 &6.5632e+01_jprb,5.7261e+01_jprb,4.9986e+01_jprb,4.1880e+01_jprb,4.4477e+01_jprb/)
1205 kbo( :, 3,35,15) = (/&
1206 &7.7983e+01_jprb,6.8108e+01_jprb,5.9607e+01_jprb,5.0554e+01_jprb,5.4966e+01_jprb/)
1207 kbo( :, 4,35,15) = (/&
1208 &9.0774e+01_jprb,7.9423e+01_jprb,6.9615e+01_jprb,5.9856e+01_jprb,6.6747e+01_jprb/)
1209 kbo( :, 5,35,15) = (/&
1210 &1.0376e+02_jprb,9.0958e+01_jprb,7.9827e+01_jprb,6.9953e+01_jprb,7.9975e+01_jprb/)
1211 kbo( :, 1,36,15) = (/&
1212 &5.4952e+01_jprb,4.7928e+01_jprb,4.1728e+01_jprb,3.4482e+01_jprb,3.5497e+01_jprb/)
1213 kbo( :, 2,36,15) = (/&
1214 &6.6748e+01_jprb,5.8304e+01_jprb,5.0900e+01_jprb,4.2469e+01_jprb,4.4743e+01_jprb/)
1215 kbo( :, 3,36,15) = (/&
1216 &7.9237e+01_jprb,6.9268e+01_jprb,6.0630e+01_jprb,5.1203e+01_jprb,5.5299e+01_jprb/)
1217 kbo( :, 4,36,15) = (/&
1218 &9.2160e+01_jprb,8.0690e+01_jprb,7.0740e+01_jprb,6.0560e+01_jprb,6.7150e+01_jprb/)
1219 kbo( :, 5,36,15) = (/&
1220 &1.0527e+02_jprb,9.2347e+01_jprb,8.1033e+01_jprb,7.0691e+01_jprb,8.0445e+01_jprb/)
1221 kbo( :, 1,37,15) = (/&
1222 &5.4077e+01_jprb,4.7203e+01_jprb,4.1090e+01_jprb,3.3816e+01_jprb,3.4402e+01_jprb/)
1223 kbo( :, 2,37,15) = (/&
1224 &6.5871e+01_jprb,5.7581e+01_jprb,5.0256e+01_jprb,4.1730e+01_jprb,4.3504e+01_jprb/)
1225 kbo( :, 3,37,15) = (/&
1226 &7.8394e+01_jprb,6.8564e+01_jprb,6.0003e+01_jprb,5.0406e+01_jprb,5.3919e+01_jprb/)
1227 kbo( :, 4,37,15) = (/&
1228 &9.1373e+01_jprb,8.0024e+01_jprb,7.0155e+01_jprb,5.9711e+01_jprb,6.5630e+01_jprb/)
1229 kbo( :, 5,37,15) = (/&
1230 &1.0457e+02_jprb,9.1743e+01_jprb,8.0502e+01_jprb,6.9769e+01_jprb,7.8764e+01_jprb/)
1231 kbo( :, 1,38,15) = (/&
1232 &5.2998e+01_jprb,4.6292e+01_jprb,4.0284e+01_jprb,3.3047e+01_jprb,3.3256e+01_jprb/)
1233 kbo( :, 2,38,15) = (/&
1234 &6.4758e+01_jprb,5.6646e+01_jprb,4.9430e+01_jprb,4.0867e+01_jprb,4.2193e+01_jprb/)
1235 kbo( :, 3,38,15) = (/&
1236 &7.7286e+01_jprb,6.7628e+01_jprb,5.9170e+01_jprb,4.9481e+01_jprb,5.2447e+01_jprb/)
1237 kbo( :, 4,38,15) = (/&
1238 &9.0295e+01_jprb,7.9101e+01_jprb,6.9339e+01_jprb,5.8727e+01_jprb,6.4002e+01_jprb/)
1239 kbo( :, 5,38,15) = (/&
1240 &1.0355e+02_jprb,9.0878e+01_jprb,7.9733e+01_jprb,6.8695e+01_jprb,7.6964e+01_jprb/)
1241 kbo( :, 1,39,15) = (/&
1242 &5.1838e+01_jprb,4.5309e+01_jprb,3.9414e+01_jprb,3.2253e+01_jprb,3.2133e+01_jprb/)
1243 kbo( :, 2,39,15) = (/&
1244 &6.3550e+01_jprb,5.5622e+01_jprb,4.8527e+01_jprb,3.9972e+01_jprb,4.0905e+01_jprb/)
1245 kbo( :, 3,39,15) = (/&
1246 &7.6056e+01_jprb,6.6591e+01_jprb,5.8243e+01_jprb,4.8504e+01_jprb,5.0987e+01_jprb/)
1247 kbo( :, 4,39,15) = (/&
1248 &8.9075e+01_jprb,7.8055e+01_jprb,6.8422e+01_jprb,5.7684e+01_jprb,6.2386e+01_jprb/)
1249 kbo( :, 5,39,15) = (/&
1250 &1.0239e+02_jprb,8.9867e+01_jprb,7.8837e+01_jprb,6.7576e+01_jprb,7.5172e+01_jprb/)
1251 kbo( :, 1,40,15) = (/&
1252 &4.9471e+01_jprb,4.3246e+01_jprb,3.7591e+01_jprb,3.0698e+01_jprb,3.0218e+01_jprb/)
1253 kbo( :, 2,40,15) = (/&
1254 &6.1032e+01_jprb,5.3431e+01_jprb,4.6594e+01_jprb,3.8229e+01_jprb,3.8702e+01_jprb/)
1255 kbo( :, 3,40,15) = (/&
1256 &7.3417e+01_jprb,6.4309e+01_jprb,5.6223e+01_jprb,4.6591e+01_jprb,4.8455e+01_jprb/)
1257 kbo( :, 4,40,15) = (/&
1258 &8.6398e+01_jprb,7.5721e+01_jprb,6.6340e+01_jprb,5.5655e+01_jprb,5.9567e+01_jprb/)
1259 kbo( :, 5,40,15) = (/&
1260 &9.9725e+01_jprb,8.7493e+01_jprb,7.6754e+01_jprb,6.5366e+01_jprb,7.2010e+01_jprb/)
1261 kbo( :, 1,41,15) = (/&
1262 &4.6940e+01_jprb,4.1029e+01_jprb,3.5646e+01_jprb,2.9054e+01_jprb,2.8252e+01_jprb/)
1263 kbo( :, 2,41,15) = (/&
1264 &5.8303e+01_jprb,5.1061e+01_jprb,4.4488e+01_jprb,3.6382e+01_jprb,3.6429e+01_jprb/)
1265 kbo( :, 3,41,15) = (/&
1266 &7.0545e+01_jprb,6.1809e+01_jprb,5.4014e+01_jprb,4.4569e+01_jprb,4.5866e+01_jprb/)
1267 kbo( :, 4,41,15) = (/&
1268 &8.3446e+01_jprb,7.3140e+01_jprb,6.4053e+01_jprb,5.3489e+01_jprb,5.6653e+01_jprb/)
1269 kbo( :, 5,41,15) = (/&
1270 &9.6762e+01_jprb,8.4890e+01_jprb,7.4453e+01_jprb,6.3028e+01_jprb,6.8762e+01_jprb/)
1271 kbo( :, 1,42,15) = (/&
1272 &4.4400e+01_jprb,3.8808e+01_jprb,3.3695e+01_jprb,2.7433e+01_jprb,2.6367e+01_jprb/)
1273 kbo( :, 2,42,15) = (/&
1274 &5.5548e+01_jprb,4.8653e+01_jprb,4.2370e+01_jprb,3.4558e+01_jprb,3.4231e+01_jprb/)
1275 kbo( :, 3,42,15) = (/&
1276 &6.7639e+01_jprb,5.9264e+01_jprb,5.1765e+01_jprb,4.2548e+01_jprb,4.3345e+01_jprb/)
1277 kbo( :, 4,42,15) = (/&
1278 &8.0422e+01_jprb,7.0505e+01_jprb,6.1708e+01_jprb,5.1309e+01_jprb,5.3802e+01_jprb/)
1279 kbo( :, 5,42,15) = (/&
1280 &9.3690e+01_jprb,8.2187e+01_jprb,7.2071e+01_jprb,6.0692e+01_jprb,6.5582e+01_jprb/)
1281 kbo( :, 1,43,15) = (/&
1282 &4.1299e+01_jprb,3.6086e+01_jprb,3.1303e+01_jprb,2.5481e+01_jprb,2.4168e+01_jprb/)
1283 kbo( :, 2,43,15) = (/&
1284 &5.2146e+01_jprb,4.5668e+01_jprb,3.9733e+01_jprb,3.2349e+01_jprb,3.1657e+01_jprb/)
1285 kbo( :, 3,43,15) = (/&
1286 &6.3997e+01_jprb,5.6104e+01_jprb,4.8948e+01_jprb,4.0078e+01_jprb,4.0382e+01_jprb/)
1287 kbo( :, 4,43,15) = (/&
1288 &7.6621e+01_jprb,6.7188e+01_jprb,5.8773e+01_jprb,4.8617e+01_jprb,5.0407e+01_jprb/)
1289 kbo( :, 5,43,15) = (/&
1290 &8.9810e+01_jprb,7.8771e+01_jprb,6.9043e+01_jprb,5.7825e+01_jprb,6.1798e+01_jprb/)
1291 kbo( :, 1,44,15) = (/&
1292 &3.8013e+01_jprb,3.3205e+01_jprb,2.8794e+01_jprb,2.3425e+01_jprb,2.1911e+01_jprb/)
1293 kbo( :, 2,44,15) = (/&
1294 &4.8506e+01_jprb,4.2466e+01_jprb,3.6916e+01_jprb,3.0017e+01_jprb,2.8999e+01_jprb/)
1295 kbo( :, 3,44,15) = (/&
1296 &6.0070e+01_jprb,5.2664e+01_jprb,4.5908e+01_jprb,3.7464e+01_jprb,3.7309e+01_jprb/)
1297 kbo( :, 4,44,15) = (/&
1298 &7.2479e+01_jprb,6.3560e+01_jprb,5.5564e+01_jprb,4.5749e+01_jprb,4.6877e+01_jprb/)
1299 kbo( :, 5,44,15) = (/&
1300 &8.5539e+01_jprb,7.5028e+01_jprb,6.5726e+01_jprb,5.4770e+01_jprb,5.7838e+01_jprb/)
1301 kbo( :, 1,45,15) = (/&
1302 &3.4808e+01_jprb,3.0429e+01_jprb,2.6372e+01_jprb,2.1438e+01_jprb,1.9764e+01_jprb/)
1303 kbo( :, 2,45,15) = (/&
1304 &4.4949e+01_jprb,3.9329e+01_jprb,3.4164e+01_jprb,2.7759e+01_jprb,2.6477e+01_jprb/)
1305 kbo( :, 3,45,15) = (/&
1306 &5.6198e+01_jprb,4.9271e+01_jprb,4.2916e+01_jprb,3.4929e+01_jprb,3.4365e+01_jprb/)
1307 kbo( :, 4,45,15) = (/&
1308 &6.8372e+01_jprb,5.9966e+01_jprb,5.2371e+01_jprb,4.2948e+01_jprb,4.3515e+01_jprb/)
1309 kbo( :, 5,45,15) = (/&
1310 &8.1258e+01_jprb,7.1280e+01_jprb,6.2402e+01_jprb,5.1752e+01_jprb,5.3999e+01_jprb/)
1311 kbo( :, 1,46,15) = (/&
1312 &3.1505e+01_jprb,2.7578e+01_jprb,2.3887e+01_jprb,1.9401e+01_jprb,1.7612e+01_jprb/)
1313 kbo( :, 2,46,15) = (/&
1314 &4.1254e+01_jprb,3.6080e+01_jprb,3.1312e+01_jprb,2.5449e+01_jprb,2.3941e+01_jprb/)
1315 kbo( :, 3,46,15) = (/&
1316 &5.2137e+01_jprb,4.5691e+01_jprb,3.9762e+01_jprb,3.2315e+01_jprb,3.1392e+01_jprb/)
1317 kbo( :, 4,46,15) = (/&
1318 &6.4023e+01_jprb,5.6167e+01_jprb,4.8996e+01_jprb,4.0034e+01_jprb,4.0089e+01_jprb/)
1319 kbo( :, 5,46,15) = (/&
1320 &7.6702e+01_jprb,6.7284e+01_jprb,5.8863e+01_jprb,4.8569e+01_jprb,5.0083e+01_jprb/)
1321 kbo( :, 1,47,15) = (/&
1322 &2.7961e+01_jprb,2.4503e+01_jprb,2.1248e+01_jprb,1.7233e+01_jprb,1.5367e+01_jprb/)
1323 kbo( :, 2,47,15) = (/&
1324 &3.7265e+01_jprb,3.2586e+01_jprb,2.8263e+01_jprb,2.2963e+01_jprb,2.1269e+01_jprb/)
1325 kbo( :, 3,47,15) = (/&
1326 &4.7706e+01_jprb,4.1783e+01_jprb,3.6327e+01_jprb,2.9490e+01_jprb,2.8246e+01_jprb/)
1327 kbo( :, 4,47,15) = (/&
1328 &5.9232e+01_jprb,5.1960e+01_jprb,4.5284e+01_jprb,3.6873e+01_jprb,3.6445e+01_jprb/)
1329 kbo( :, 5,47,15) = (/&
1330 &7.1624e+01_jprb,6.2836e+01_jprb,5.4930e+01_jprb,4.5104e+01_jprb,4.5902e+01_jprb/)
1331 kbo( :, 1,48,15) = (/&
1332 &2.4583e+01_jprb,2.1589e+01_jprb,1.8762e+01_jprb,1.5191e+01_jprb,1.3292e+01_jprb/)
1333 kbo( :, 2,48,15) = (/&
1334 &3.3426e+01_jprb,2.9268e+01_jprb,2.5357e+01_jprb,2.0590e+01_jprb,1.8769e+01_jprb/)
1335 kbo( :, 3,48,15) = (/&
1336 &4.3425e+01_jprb,3.8016e+01_jprb,3.3009e+01_jprb,2.6800e+01_jprb,2.5307e+01_jprb/)
1337 kbo( :, 4,48,15) = (/&
1338 &5.4549e+01_jprb,4.7838e+01_jprb,4.1652e+01_jprb,3.3842e+01_jprb,3.3001e+01_jprb/)
1339 kbo( :, 5,48,15) = (/&
1340 &6.6636e+01_jprb,5.8472e+01_jprb,5.1042e+01_jprb,4.1740e+01_jprb,4.1948e+01_jprb/)
1341 kbo( :, 1,49,15) = (/&
1342 &2.1421e+01_jprb,1.8843e+01_jprb,1.6440e+01_jprb,1.3266e+01_jprb,1.1366e+01_jprb/)
1343 kbo( :, 2,49,15) = (/&
1344 &2.9765e+01_jprb,2.6085e+01_jprb,2.2608e+01_jprb,1.8340e+01_jprb,1.6436e+01_jprb/)
1345 kbo( :, 3,49,15) = (/&
1346 &3.9312e+01_jprb,3.4398e+01_jprb,2.9848e+01_jprb,2.4239e+01_jprb,2.2553e+01_jprb/)
1347 kbo( :, 4,49,15) = (/&
1348 &5.0006e+01_jprb,4.3828e+01_jprb,3.8123e+01_jprb,3.0941e+01_jprb,2.9764e+01_jprb/)
1349 kbo( :, 5,49,15) = (/&
1350 &6.1741e+01_jprb,5.4182e+01_jprb,4.7244e+01_jprb,3.8502e+01_jprb,3.8207e+01_jprb/)
1351 kbo( :, 1,50,15) = (/&
1352 &1.8647e+01_jprb,1.6457e+01_jprb,1.4418e+01_jprb,1.1591e+01_jprb,9.7268e+00_jprb/)
1353 kbo( :, 2,50,15) = (/&
1354 &2.6492e+01_jprb,2.3254e+01_jprb,2.0184e+01_jprb,1.6354e+01_jprb,1.4411e+01_jprb/)
1355 kbo( :, 3,50,15) = (/&
1356 &3.5615e+01_jprb,3.1176e+01_jprb,2.7033e+01_jprb,2.1940e+01_jprb,2.0122e+01_jprb/)
1357 kbo( :, 4,50,15) = (/&
1358 &4.5887e+01_jprb,4.0194e+01_jprb,3.4925e+01_jprb,2.8335e+01_jprb,2.6904e+01_jprb/)
1359 kbo( :, 5,50,15) = (/&
1360 &5.7262e+01_jprb,5.0235e+01_jprb,4.3773e+01_jprb,3.5576e+01_jprb,3.4879e+01_jprb/)
1361 kbo( :, 1,51,15) = (/&
1362 &1.6143e+01_jprb,1.4306e+01_jprb,1.2586e+01_jprb,1.0093e+01_jprb,8.2870e+00_jprb/)
1363 kbo( :, 2,51,15) = (/&
1364 &2.3475e+01_jprb,2.0646e+01_jprb,1.7965e+01_jprb,1.4527e+01_jprb,1.2580e+01_jprb/)
1365 kbo( :, 3,51,15) = (/&
1366 &3.2173e+01_jprb,2.8191e+01_jprb,2.4427e+01_jprb,1.9818e+01_jprb,1.7912e+01_jprb/)
1367 kbo( :, 4,51,15) = (/&
1368 &4.2029e+01_jprb,3.6799e+01_jprb,3.1946e+01_jprb,2.5931e+01_jprb,2.4302e+01_jprb/)
1369 kbo( :, 5,51,15) = (/&
1370 &5.3021e+01_jprb,4.6505e+01_jprb,4.0477e+01_jprb,3.2858e+01_jprb,3.1825e+01_jprb/)
1371 kbo( :, 1,52,15) = (/&
1372 &1.3849e+01_jprb,1.2323e+01_jprb,1.0901e+01_jprb,8.7257e+00_jprb,7.0030e+00_jprb/)
1373 kbo( :, 2,52,15) = (/&
1374 &2.0656e+01_jprb,1.8194e+01_jprb,1.5897e+01_jprb,1.2810e+01_jprb,1.0879e+01_jprb/)
1375 kbo( :, 3,52,15) = (/&
1376 &2.8881e+01_jprb,2.5328e+01_jprb,2.1965e+01_jprb,1.7806e+01_jprb,1.5846e+01_jprb/)
1377 kbo( :, 4,52,15) = (/&
1378 &3.8328e+01_jprb,3.3546e+01_jprb,2.9106e+01_jprb,2.3622e+01_jprb,2.1850e+01_jprb/)
1379 kbo( :, 5,52,15) = (/&
1380 &4.8918e+01_jprb,4.2880e+01_jprb,3.7289e+01_jprb,3.0246e+01_jprb,2.8936e+01_jprb/)
1381 kbo( :, 1,53,15) = (/&
1382 &1.1740e+01_jprb,1.0506e+01_jprb,9.3420e+00_jprb,7.4730e+00_jprb,5.8524e+00_jprb/)
1383 kbo( :, 2,53,15) = (/&
1384 &1.8002e+01_jprb,1.5914e+01_jprb,1.3956e+01_jprb,1.1210e+01_jprb,9.3278e+00_jprb/)
1385 kbo( :, 3,53,15) = (/&
1386 &2.5731e+01_jprb,2.2607e+01_jprb,1.9634e+01_jprb,1.5897e+01_jprb,1.3918e+01_jprb/)
1387 kbo( :, 4,53,15) = (/&
1388 &3.4758e+01_jprb,3.0444e+01_jprb,2.6393e+01_jprb,2.1412e+01_jprb,1.9532e+01_jprb/)
1389 kbo( :, 5,53,15) = (/&
1390 &4.4940e+01_jprb,3.9367e+01_jprb,3.4201e+01_jprb,2.7742e+01_jprb,2.6213e+01_jprb/)
1391 kbo( :, 1,54,15) = (/&
1392 &9.9823e+00_jprb,8.9835e+00_jprb,8.0433e+00_jprb,6.4217e+00_jprb,4.9233e+00_jprb/)
1393 kbo( :, 2,54,15) = (/&
1394 &1.5743e+01_jprb,1.3968e+01_jprb,1.2300e+01_jprb,9.8589e+00_jprb,8.0425e+00_jprb/)
1395 kbo( :, 3,54,15) = (/&
1396 &2.2999e+01_jprb,2.0231e+01_jprb,1.7622e+01_jprb,1.4237e+01_jprb,1.2265e+01_jprb/)
1397 kbo( :, 4,54,15) = (/&
1398 &3.1619e+01_jprb,2.7721e+01_jprb,2.4021e+01_jprb,1.9481e+01_jprb,1.7533e+01_jprb/)
1399 kbo( :, 5,54,15) = (/&
1400 &4.1422e+01_jprb,3.6269e+01_jprb,3.1486e+01_jprb,2.5548e+01_jprb,2.3860e+01_jprb/)
1401 kbo( :, 1,55,15) = (/&
1402 &8.4600e+00_jprb,7.6587e+00_jprb,6.9105e+00_jprb,5.5064e+00_jprb,4.1393e+00_jprb/)
1403 kbo( :, 2,55,15) = (/&
1404 &1.3741e+01_jprb,1.2235e+01_jprb,1.0828e+01_jprb,8.6641e+00_jprb,6.9310e+00_jprb/)
1405 kbo( :, 3,55,15) = (/&
1406 &2.0525e+01_jprb,1.8089e+01_jprb,1.5809e+01_jprb,1.2733e+01_jprb,1.0785e+01_jprb/)
1407 kbo( :, 4,55,15) = (/&
1408 &2.8733e+01_jprb,2.5211e+01_jprb,2.1862e+01_jprb,1.7718e+01_jprb,1.5733e+01_jprb/)
1409 kbo( :, 5,55,15) = (/&
1410 &3.8167e+01_jprb,3.3414e+01_jprb,2.8994e+01_jprb,2.3523e+01_jprb,2.1717e+01_jprb/)
1411 kbo( :, 1,56,15) = (/&
1412 &7.0942e+00_jprb,6.4705e+00_jprb,5.8843e+00_jprb,4.6820e+00_jprb,3.4600e+00_jprb/)
1413 kbo( :, 2,56,15) = (/&
1414 &1.1888e+01_jprb,1.0638e+01_jprb,9.4563e+00_jprb,7.5636e+00_jprb,5.9306e+00_jprb/)
1415 kbo( :, 3,56,15) = (/&
1416 &1.8195e+01_jprb,1.6084e+01_jprb,1.4104e+01_jprb,1.1328e+01_jprb,9.4258e+00_jprb/)
1417 kbo( :, 4,56,15) = (/&
1418 &2.5965e+01_jprb,2.2816e+01_jprb,1.9813e+01_jprb,1.6042e+01_jprb,1.4044e+01_jprb/)
1419 kbo( :, 5,56,15) = (/&
1420 &3.5031e+01_jprb,3.0686e+01_jprb,2.6607e+01_jprb,2.1582e+01_jprb,1.9682e+01_jprb/)
1421 kbo( :, 1,57,15) = (/&
1422 &5.8809e+00_jprb,5.4073e+00_jprb,4.9520e+00_jprb,3.9358e+00_jprb,2.8765e+00_jprb/)
1423 kbo( :, 2,57,15) = (/&
1424 &1.0188e+01_jprb,9.1644e+00_jprb,8.1997e+00_jprb,6.5476e+00_jprb,5.0356e+00_jprb/)
1425 kbo( :, 3,57,15) = (/&
1426 &1.6011e+01_jprb,1.4204e+01_jprb,1.2504e+01_jprb,1.0022e+01_jprb,8.1887e+00_jprb/)
1427 kbo( :, 4,57,15) = (/&
1428 &2.3331e+01_jprb,2.0526e+01_jprb,1.7871e+01_jprb,1.4443e+01_jprb,1.2452e+01_jprb/)
1429 kbo( :, 5,57,15) = (/&
1430 &3.2013e+01_jprb,2.8066e+01_jprb,2.4321e+01_jprb,1.9722e+01_jprb,1.7763e+01_jprb/)
1431 kbo( :, 1,58,15) = (/&
1432 &4.8592e+00_jprb,4.5120e+00_jprb,4.1533e+00_jprb,3.3050e+00_jprb,2.4069e+00_jprb/)
1433 kbo( :, 2,58,15) = (/&
1434 &8.7235e+00_jprb,7.8898e+00_jprb,7.1098e+00_jprb,5.6659e+00_jprb,4.2880e+00_jprb/)
1435 kbo( :, 3,58,15) = (/&
1436 &1.4093e+01_jprb,1.2543e+01_jprb,1.1091e+01_jprb,8.8788e+00_jprb,7.1312e+00_jprb/)
1437 kbo( :, 4,58,15) = (/&
1438 &2.0969e+01_jprb,1.8473e+01_jprb,1.6137e+01_jprb,1.3004e+01_jprb,1.1037e+01_jprb/)
1439 kbo( :, 5,58,15) = (/&
1440 &2.9256e+01_jprb,2.5669e+01_jprb,2.2254e+01_jprb,1.8039e+01_jprb,1.6041e+01_jprb/)
1441 kbo( :, 1,59,15) = (/&
1442 &4.4860e+00_jprb,4.1832e+00_jprb,3.8589e+00_jprb,3.0732e+00_jprb,2.2588e+00_jprb/)
1443 kbo( :, 2,59,15) = (/&
1444 &8.1764e+00_jprb,7.4157e+00_jprb,6.7019e+00_jprb,5.3375e+00_jprb,4.0381e+00_jprb/)
1445 kbo( :, 3,59,15) = (/&
1446 &1.3363e+01_jprb,1.1913e+01_jprb,1.0553e+01_jprb,8.4437e+00_jprb,6.7583e+00_jprb/)
1447 kbo( :, 4,59,15) = (/&
1448 &2.0059e+01_jprb,1.7690e+01_jprb,1.5474e+01_jprb,1.2453e+01_jprb,1.0517e+01_jprb/)
1449 kbo( :, 5,59,15) = (/&
1450 &2.8188e+01_jprb,2.4740e+01_jprb,2.1460e+01_jprb,1.7388e+01_jprb,1.5382e+01_jprb/)
1451 kbo( :, 1,13,16) = (/&
1452 &3.5240e+00_jprb,3.4508e+00_jprb,6.8957e+00_jprb,1.0310e+01_jprb,1.3810e+01_jprb/)
1453 kbo( :, 2,13,16) = (/&
1454 &5.0188e+00_jprb,4.8884e+00_jprb,9.7668e+00_jprb,1.4606e+01_jprb,1.9563e+01_jprb/)
1455 kbo( :, 3,13,16) = (/&
1456 &6.8636e+00_jprb,6.9963e+00_jprb,1.3983e+01_jprb,2.0917e+01_jprb,2.7996e+01_jprb/)
1457 kbo( :, 4,13,16) = (/&
1458 &8.9983e+00_jprb,9.9231e+00_jprb,1.9821e+01_jprb,2.9657e+01_jprb,3.9702e+01_jprb/)
1459 kbo( :, 5,13,16) = (/&
1460 &1.1391e+01_jprb,1.3448e+01_jprb,2.6873e+01_jprb,4.0197e+01_jprb,5.3821e+01_jprb/)
1461 kbo( :, 1,14,16) = (/&
1462 &4.0865e+00_jprb,4.2627e+00_jprb,8.5157e+00_jprb,1.2737e+01_jprb,1.7061e+01_jprb/)
1463 kbo( :, 2,14,16) = (/&
1464 &5.9152e+00_jprb,5.9770e+00_jprb,1.1941e+01_jprb,1.7861e+01_jprb,2.3919e+01_jprb/)
1465 kbo( :, 3,14,16) = (/&
1466 &8.1116e+00_jprb,8.4946e+00_jprb,1.6974e+01_jprb,2.5393e+01_jprb,3.3994e+01_jprb/)
1467 kbo( :, 4,14,16) = (/&
1468 &1.0667e+01_jprb,1.1982e+01_jprb,2.3941e+01_jprb,3.5820e+01_jprb,4.7947e+01_jprb/)
1469 kbo( :, 5,14,16) = (/&
1470 &1.3570e+01_jprb,1.6166e+01_jprb,3.2293e+01_jprb,4.8328e+01_jprb,6.4679e+01_jprb/)
1471 kbo( :, 1,15,16) = (/&
1472 &4.9205e+00_jprb,5.2381e+00_jprb,1.0467e+01_jprb,1.5657e+01_jprb,2.0962e+01_jprb/)
1473 kbo( :, 2,15,16) = (/&
1474 &7.1107e+00_jprb,7.3251e+00_jprb,1.4636e+01_jprb,2.1892e+01_jprb,2.9314e+01_jprb/)
1475 kbo( :, 3,15,16) = (/&
1476 &9.7657e+00_jprb,1.0319e+01_jprb,2.0625e+01_jprb,3.0857e+01_jprb,4.1307e+01_jprb/)
1477 kbo( :, 4,15,16) = (/&
1478 &1.2863e+01_jprb,1.4348e+01_jprb,2.8667e+01_jprb,4.2902e+01_jprb,5.7415e+01_jprb/)
1479 kbo( :, 5,15,16) = (/&
1480 &1.6377e+01_jprb,1.9245e+01_jprb,3.8440e+01_jprb,5.7530e+01_jprb,7.7014e+01_jprb/)
1481 kbo( :, 1,16,16) = (/&
1482 &6.0019e+00_jprb,6.3755e+00_jprb,1.2742e+01_jprb,1.9060e+01_jprb,2.5511e+01_jprb/)
1483 kbo( :, 2,16,16) = (/&
1484 &8.6719e+00_jprb,8.9601e+00_jprb,1.7905e+01_jprb,2.6782e+01_jprb,3.5858e+01_jprb/)
1485 kbo( :, 3,16,16) = (/&
1486 &1.1897e+01_jprb,1.2494e+01_jprb,2.4965e+01_jprb,3.7351e+01_jprb,5.0005e+01_jprb/)
1487 kbo( :, 4,16,16) = (/&
1488 &1.5664e+01_jprb,1.7033e+01_jprb,3.4039e+01_jprb,5.0943e+01_jprb,6.8160e+01_jprb/)
1489 kbo( :, 5,16,16) = (/&
1490 &1.9931e+01_jprb,2.2609e+01_jprb,4.5144e+01_jprb,6.7604e+01_jprb,9.0384e+01_jprb/)
1491 kbo( :, 1,17,16) = (/&
1492 &7.3859e+00_jprb,7.7004e+00_jprb,1.5389e+01_jprb,2.3023e+01_jprb,3.0816e+01_jprb/)
1493 kbo( :, 2,17,16) = (/&
1494 &1.0640e+01_jprb,1.0863e+01_jprb,2.1706e+01_jprb,3.2470e+01_jprb,4.3467e+01_jprb/)
1495 kbo( :, 3,17,16) = (/&
1496 &1.4563e+01_jprb,1.4992e+01_jprb,2.9958e+01_jprb,4.4824e+01_jprb,5.9991e+01_jprb/)
1497 kbo( :, 4,17,16) = (/&
1498 &1.9138e+01_jprb,2.0152e+01_jprb,4.0219e+01_jprb,6.0189e+01_jprb,8.0517e+01_jprb/)
1499 kbo( :, 5,17,16) = (/&
1500 &2.4286e+01_jprb,2.6459e+01_jprb,5.2448e+01_jprb,7.8504e+01_jprb,1.0501e+02_jprb/)
1501 kbo( :, 1,18,16) = (/&
1502 &9.1226e+00_jprb,9.2597e+00_jprb,1.8491e+01_jprb,2.7668e+01_jprb,3.7034e+01_jprb/)
1503 kbo( :, 2,18,16) = (/&
1504 &1.3090e+01_jprb,1.3038e+01_jprb,2.6008e+01_jprb,3.8923e+01_jprb,5.2083e+01_jprb/)
1505 kbo( :, 3,18,16) = (/&
1506 &1.7870e+01_jprb,1.7862e+01_jprb,3.5545e+01_jprb,5.3199e+01_jprb,7.1167e+01_jprb/)
1507 kbo( :, 4,18,16) = (/&
1508 &2.3384e+01_jprb,2.3802e+01_jprb,4.7105e+01_jprb,7.0494e+01_jprb,9.4316e+01_jprb/)
1509 kbo( :, 5,18,16) = (/&
1510 &2.9603e+01_jprb,3.0959e+01_jprb,6.0617e+01_jprb,9.0761e+01_jprb,1.2137e+02_jprb/)
1511 kbo( :, 1,19,16) = (/&
1512 &1.1267e+01_jprb,1.1103e+01_jprb,2.1975e+01_jprb,3.2891e+01_jprb,4.4000e+01_jprb/)
1513 kbo( :, 2,19,16) = (/&
1514 &1.6108e+01_jprb,1.5588e+01_jprb,3.0737e+01_jprb,4.5998e+01_jprb,6.1538e+01_jprb/)
1515 kbo( :, 3,19,16) = (/&
1516 &2.1880e+01_jprb,2.1226e+01_jprb,4.1603e+01_jprb,6.2286e+01_jprb,8.3284e+01_jprb/)
1517 kbo( :, 4,19,16) = (/&
1518 &2.8546e+01_jprb,2.8063e+01_jprb,5.4555e+01_jprb,8.1653e+01_jprb,1.0920e+02_jprb/)
1519 kbo( :, 5,19,16) = (/&
1520 &3.6015e+01_jprb,3.6209e+01_jprb,6.9418e+01_jprb,1.0398e+02_jprb,1.3897e+02_jprb/)
1521 kbo( :, 1,20,16) = (/&
1522 &1.3993e+01_jprb,1.3379e+01_jprb,2.5920e+01_jprb,3.8804e+01_jprb,5.1896e+01_jprb/)
1523 kbo( :, 2,20,16) = (/&
1524 &1.9857e+01_jprb,1.8711e+01_jprb,3.5970e+01_jprb,5.3858e+01_jprb,7.2020e+01_jprb/)
1525 kbo( :, 3,20,16) = (/&
1526 &2.6849e+01_jprb,2.5309e+01_jprb,4.8236e+01_jprb,7.2221e+01_jprb,9.6564e+01_jprb/)
1527 kbo( :, 4,20,16) = (/&
1528 &3.4854e+01_jprb,3.3204e+01_jprb,6.2605e+01_jprb,9.3754e+01_jprb,1.2532e+02_jprb/)
1529 kbo( :, 5,20,16) = (/&
1530 &4.3828e+01_jprb,4.2464e+01_jprb,7.8932e+01_jprb,1.1822e+02_jprb,1.5801e+02_jprb/)
1531 kbo( :, 1,21,16) = (/&
1532 &1.7315e+01_jprb,1.6114e+01_jprb,3.0129e+01_jprb,4.5115e+01_jprb,6.0314e+01_jprb/)
1533 kbo( :, 2,21,16) = (/&
1534 &2.4393e+01_jprb,2.2395e+01_jprb,4.1483e+01_jprb,6.2116e+01_jprb,8.3040e+01_jprb/)
1535 kbo( :, 3,21,16) = (/&
1536 &3.2776e+01_jprb,3.0091e+01_jprb,5.5119e+01_jprb,8.2559e+01_jprb,1.1033e+02_jprb/)
1537 kbo( :, 4,21,16) = (/&
1538 &4.2294e+01_jprb,3.9176e+01_jprb,7.0924e+01_jprb,1.0622e+02_jprb,1.4195e+02_jprb/)
1539 kbo( :, 5,21,16) = (/&
1540 &5.3038e+01_jprb,4.9692e+01_jprb,8.8908e+01_jprb,1.3317e+02_jprb,1.7794e+02_jprb/)
1541 kbo( :, 1,22,16) = (/&
1542 &2.1825e+01_jprb,1.9779e+01_jprb,3.5248e+01_jprb,5.2796e+01_jprb,7.0550e+01_jprb/)
1543 kbo( :, 2,22,16) = (/&
1544 &3.0396e+01_jprb,2.7253e+01_jprb,4.8033e+01_jprb,7.1948e+01_jprb,9.6125e+01_jprb/)
1545 kbo( :, 3,22,16) = (/&
1546 &4.0380e+01_jprb,3.6230e+01_jprb,6.3173e+01_jprb,9.4660e+01_jprb,1.2648e+02_jprb/)
1547 kbo( :, 4,22,16) = (/&
1548 &5.1797e+01_jprb,4.6707e+01_jprb,8.0766e+01_jprb,1.2099e+02_jprb,1.6165e+02_jprb/)
1549 kbo( :, 5,22,16) = (/&
1550 &6.4540e+01_jprb,5.8724e+01_jprb,1.0071e+02_jprb,1.5084e+02_jprb,2.0156e+02_jprb/)
1551 kbo( :, 1,23,16) = (/&
1552 &2.7320e+01_jprb,2.4188e+01_jprb,4.0693e+01_jprb,6.0960e+01_jprb,8.1453e+01_jprb/)
1553 kbo( :, 2,23,16) = (/&
1554 &3.7558e+01_jprb,3.2976e+01_jprb,5.4970e+01_jprb,8.2336e+01_jprb,1.1003e+02_jprb/)
1555 kbo( :, 3,23,16) = (/&
1556 &4.9408e+01_jprb,4.3375e+01_jprb,7.1816e+01_jprb,1.0759e+02_jprb,1.4373e+02_jprb/)
1557 kbo( :, 4,23,16) = (/&
1558 &6.2874e+01_jprb,5.5353e+01_jprb,9.1309e+01_jprb,1.3680e+02_jprb,1.8276e+02_jprb/)
1559 kbo( :, 5,23,16) = (/&
1560 &7.7698e+01_jprb,6.8961e+01_jprb,1.1333e+02_jprb,1.6978e+02_jprb,2.2679e+02_jprb/)
1561 kbo( :, 1,24,16) = (/&
1562 &3.3869e+01_jprb,2.9387e+01_jprb,4.6648e+01_jprb,6.9904e+01_jprb,9.3367e+01_jprb/)
1563 kbo( :, 2,24,16) = (/&
1564 &4.6006e+01_jprb,3.9622e+01_jprb,6.2515e+01_jprb,9.3679e+01_jprb,1.2511e+02_jprb/)
1565 kbo( :, 3,24,16) = (/&
1566 &5.9946e+01_jprb,5.1571e+01_jprb,8.1209e+01_jprb,1.2167e+02_jprb,1.6250e+02_jprb/)
1567 kbo( :, 4,24,16) = (/&
1568 &7.5539e+01_jprb,6.5110e+01_jprb,1.0265e+02_jprb,1.5380e+02_jprb,2.0542e+02_jprb/)
1569 kbo( :, 5,24,16) = (/&
1570 &9.2477e+01_jprb,8.0448e+01_jprb,1.2660e+02_jprb,1.8969e+02_jprb,2.5333e+02_jprb/)
1571 kbo( :, 1,25,16) = (/&
1572 &4.1599e+01_jprb,3.5454e+01_jprb,5.3146e+01_jprb,7.9642e+01_jprb,1.0635e+02_jprb/)
1573 kbo( :, 2,25,16) = (/&
1574 &5.5782e+01_jprb,4.7228e+01_jprb,7.0740e+01_jprb,1.0597e+02_jprb,1.4155e+02_jprb/)
1575 kbo( :, 3,25,16) = (/&
1576 &7.1943e+01_jprb,6.0744e+01_jprb,9.1338e+01_jprb,1.3688e+02_jprb,1.8276e+02_jprb/)
1577 kbo( :, 4,25,16) = (/&
1578 &8.9735e+01_jprb,7.6043e+01_jprb,1.1460e+02_jprb,1.7175e+02_jprb,2.2932e+02_jprb/)
1579 kbo( :, 5,25,16) = (/&
1580 &1.0881e+02_jprb,9.3022e+01_jprb,1.4062e+02_jprb,2.1079e+02_jprb,2.8133e+02_jprb/)
1581 kbo( :, 1,26,16) = (/&
1582 &5.0633e+01_jprb,4.2540e+01_jprb,6.0521e+01_jprb,9.0533e+01_jprb,1.2089e+02_jprb/)
1583 kbo( :, 2,26,16) = (/&
1584 &6.7031e+01_jprb,5.5881e+01_jprb,7.9837e+01_jprb,1.1964e+02_jprb,1.5974e+02_jprb/)
1585 kbo( :, 3,26,16) = (/&
1586 &8.5449e+01_jprb,7.1046e+01_jprb,1.0219e+02_jprb,1.5314e+02_jprb,2.0448e+02_jprb/)
1587 kbo( :, 4,26,16) = (/&
1588 &1.0550e+02_jprb,8.8104e+01_jprb,1.2741e+02_jprb,1.9092e+02_jprb,2.5490e+02_jprb/)
1589 kbo( :, 5,26,16) = (/&
1590 &1.2662e+02_jprb,1.0665e+02_jprb,1.5535e+02_jprb,2.3284e+02_jprb,3.1085e+02_jprb/)
1591 kbo( :, 1,27,16) = (/&
1592 &6.0760e+01_jprb,5.0362e+01_jprb,6.8627e+01_jprb,1.0214e+02_jprb,1.3635e+02_jprb/)
1593 kbo( :, 2,27,16) = (/&
1594 &7.9372e+01_jprb,6.5351e+01_jprb,8.9496e+01_jprb,1.3381e+02_jprb,1.7862e+02_jprb/)
1595 kbo( :, 3,27,16) = (/&
1596 &1.0007e+02_jprb,8.2171e+01_jprb,1.1350e+02_jprb,1.7014e+02_jprb,2.2709e+02_jprb/)
1597 kbo( :, 4,27,16) = (/&
1598 &1.2219e+02_jprb,1.0086e+02_jprb,1.4060e+02_jprb,2.1077e+02_jprb,2.8135e+02_jprb/)
1599 kbo( :, 5,27,16) = (/&
1600 &1.4517e+02_jprb,1.2078e+02_jprb,1.7031e+02_jprb,2.5527e+02_jprb,3.4078e+02_jprb/)
1601 kbo( :, 1,28,16) = (/&
1602 &7.1850e+01_jprb,5.8865e+01_jprb,7.7249e+01_jprb,1.1435e+02_jprb,1.5263e+02_jprb/)
1603 kbo( :, 2,28,16) = (/&
1604 &9.2653e+01_jprb,7.5393e+01_jprb,9.9671e+01_jprb,1.4851e+02_jprb,1.9822e+02_jprb/)
1605 kbo( :, 3,28,16) = (/&
1606 &1.1541e+02_jprb,9.3821e+01_jprb,1.2515e+02_jprb,1.8738e+02_jprb,2.5009e+02_jprb/)
1607 kbo( :, 4,28,16) = (/&
1608 &1.3940e+02_jprb,1.1403e+02_jprb,1.5381e+02_jprb,2.3053e+02_jprb,3.0770e+02_jprb/)
1609 kbo( :, 5,28,16) = (/&
1610 &1.6406e+02_jprb,1.3517e+02_jprb,1.8510e+02_jprb,2.7748e+02_jprb,3.7030e+02_jprb/)
1611 kbo( :, 1,29,16) = (/&
1612 &8.3876e+01_jprb,6.7955e+01_jprb,8.6536e+01_jprb,1.2716e+02_jprb,1.6971e+02_jprb/)
1613 kbo( :, 2,29,16) = (/&
1614 &1.0671e+02_jprb,8.6050e+01_jprb,1.1035e+02_jprb,1.6386e+02_jprb,2.1869e+02_jprb/)
1615 kbo( :, 3,29,16) = (/&
1616 &1.3128e+02_jprb,1.0596e+02_jprb,1.3736e+02_jprb,2.0522e+02_jprb,2.7387e+02_jprb/)
1617 kbo( :, 4,29,16) = (/&
1618 &1.5691e+02_jprb,1.2750e+02_jprb,1.6737e+02_jprb,2.5071e+02_jprb,3.3454e+02_jprb/)
1619 kbo( :, 5,29,16) = (/&
1620 &1.8307e+02_jprb,1.4968e+02_jprb,1.9986e+02_jprb,2.9963e+02_jprb,3.9981e+02_jprb/)
1621 kbo( :, 1,30,16) = (/&
1622 &9.6402e+01_jprb,7.7403e+01_jprb,9.6100e+01_jprb,1.4042e+02_jprb,1.8733e+02_jprb/)
1623 kbo( :, 2,30,16) = (/&
1624 &1.2111e+02_jprb,9.6917e+01_jprb,1.2129e+02_jprb,1.7953e+02_jprb,2.3957e+02_jprb/)
1625 kbo( :, 3,30,16) = (/&
1626 &1.4725e+02_jprb,1.1830e+02_jprb,1.4967e+02_jprb,2.2319e+02_jprb,2.9778e+02_jprb/)
1627 kbo( :, 4,30,16) = (/&
1628 &1.7435e+02_jprb,1.4089e+02_jprb,1.8090e+02_jprb,2.7076e+02_jprb,3.6126e+02_jprb/)
1629 kbo( :, 5,30,16) = (/&
1630 &2.0174e+02_jprb,1.6391e+02_jprb,2.1447e+02_jprb,3.2140e+02_jprb,4.2881e+02_jprb/)
1631 kbo( :, 1,31,16) = (/&
1632 &1.0938e+02_jprb,8.7129e+01_jprb,1.0605e+02_jprb,1.5425e+02_jprb,2.0576e+02_jprb/)
1633 kbo( :, 2,31,16) = (/&
1634 &1.3571e+02_jprb,1.0800e+02_jprb,1.3247e+02_jprb,1.9550e+02_jprb,2.6086e+02_jprb/)
1635 kbo( :, 3,31,16) = (/&
1636 &1.6324e+02_jprb,1.3063e+02_jprb,1.6212e+02_jprb,2.4122e+02_jprb,3.2182e+02_jprb/)
1637 kbo( :, 4,31,16) = (/&
1638 &1.9162e+02_jprb,1.5412e+02_jprb,1.9447e+02_jprb,2.9069e+02_jprb,3.8783e+02_jprb/)
1639 kbo( :, 5,31,16) = (/&
1640 &2.1989e+02_jprb,1.7781e+02_jprb,2.2900e+02_jprb,3.4301e+02_jprb,4.5761e+02_jprb/)
1641 kbo( :, 1,32,16) = (/&
1642 &1.2256e+02_jprb,9.7067e+01_jprb,1.1617e+02_jprb,1.6836e+02_jprb,2.2461e+02_jprb/)
1643 kbo( :, 2,32,16) = (/&
1644 &1.5030e+02_jprb,1.1913e+02_jprb,1.4393e+02_jprb,2.1170e+02_jprb,2.8241e+02_jprb/)
1645 kbo( :, 3,32,16) = (/&
1646 &1.7905e+02_jprb,1.4279e+02_jprb,1.7463e+02_jprb,2.5936e+02_jprb,3.4601e+02_jprb/)
1647 kbo( :, 4,32,16) = (/&
1648 &2.0835e+02_jprb,1.6700e+02_jprb,2.0791e+02_jprb,3.1047e+02_jprb,4.1404e+02_jprb/)
1649 kbo( :, 5,32,16) = (/&
1650 &2.3734e+02_jprb,1.9118e+02_jprb,2.4327e+02_jprb,3.6420e+02_jprb,4.8584e+02_jprb/)
1651 kbo( :, 1,33,16) = (/&
1652 &1.3570e+02_jprb,1.0705e+02_jprb,1.2638e+02_jprb,1.8277e+02_jprb,2.4379e+02_jprb/)
1653 kbo( :, 2,33,16) = (/&
1654 &1.6469e+02_jprb,1.3015e+02_jprb,1.5530e+02_jprb,2.2797e+02_jprb,3.0408e+02_jprb/)
1655 kbo( :, 3,33,16) = (/&
1656 &1.9448e+02_jprb,1.5467e+02_jprb,1.8707e+02_jprb,2.7733e+02_jprb,3.6994e+02_jprb/)
1657 kbo( :, 4,33,16) = (/&
1658 &2.2436e+02_jprb,1.7936e+02_jprb,2.2122e+02_jprb,3.2976e+02_jprb,4.3991e+02_jprb/)
1659 kbo( :, 5,33,16) = (/&
1660 &2.5393e+02_jprb,2.0390e+02_jprb,2.5728e+02_jprb,3.8487e+02_jprb,5.1330e+02_jprb/)
1661 kbo( :, 1,34,16) = (/&
1662 &1.4769e+02_jprb,1.1615e+02_jprb,1.3561e+02_jprb,1.9580e+02_jprb,2.6115e+02_jprb/)
1663 kbo( :, 2,34,16) = (/&
1664 &1.7765e+02_jprb,1.4013e+02_jprb,1.6546e+02_jprb,2.4255e+02_jprb,3.2352e+02_jprb/)
1665 kbo( :, 3,34,16) = (/&
1666 &2.0819e+02_jprb,1.6522e+02_jprb,1.9808e+02_jprb,2.9327e+02_jprb,3.9114e+02_jprb/)
1667 kbo( :, 4,34,16) = (/&
1668 &2.3855e+02_jprb,1.9025e+02_jprb,2.3293e+02_jprb,3.4692e+02_jprb,4.6270e+02_jprb/)
1669 kbo( :, 5,34,16) = (/&
1670 &2.6850e+02_jprb,2.1503e+02_jprb,2.6955e+02_jprb,4.0292e+02_jprb,5.3742e+02_jprb/)
1671 kbo( :, 1,35,16) = (/&
1672 &1.5643e+02_jprb,1.2270e+02_jprb,1.4190e+02_jprb,2.0436e+02_jprb,2.7254e+02_jprb/)
1673 kbo( :, 2,35,16) = (/&
1674 &1.8713e+02_jprb,1.4730e+02_jprb,1.7243e+02_jprb,2.5214e+02_jprb,3.3629e+02_jprb/)
1675 kbo( :, 3,35,16) = (/&
1676 &2.1819e+02_jprb,1.7282e+02_jprb,2.0562e+02_jprb,3.0372e+02_jprb,4.0506e+02_jprb/)
1677 kbo( :, 4,35,16) = (/&
1678 &2.4895e+02_jprb,1.9814e+02_jprb,2.4081e+02_jprb,3.5825e+02_jprb,4.7775e+02_jprb/)
1679 kbo( :, 5,35,16) = (/&
1680 &2.7917e+02_jprb,2.2313e+02_jprb,2.7780e+02_jprb,4.1495e+02_jprb,5.5336e+02_jprb/)
1681 kbo( :, 1,36,16) = (/&
1682 &1.6128e+02_jprb,1.2623e+02_jprb,1.4470e+02_jprb,2.0760e+02_jprb,2.7682e+02_jprb/)
1683 kbo( :, 2,36,16) = (/&
1684 &1.9250e+02_jprb,1.5118e+02_jprb,1.7553e+02_jprb,2.5587e+02_jprb,3.4124e+02_jprb/)
1685 kbo( :, 3,36,16) = (/&
1686 &2.2400e+02_jprb,1.7706e+02_jprb,2.0894e+02_jprb,3.0787e+02_jprb,4.1050e+02_jprb/)
1687 kbo( :, 4,36,16) = (/&
1688 &2.5511e+02_jprb,2.0265e+02_jprb,2.4435e+02_jprb,3.6281e+02_jprb,4.8383e+02_jprb/)
1689 kbo( :, 5,36,16) = (/&
1690 &2.8566e+02_jprb,2.2781e+02_jprb,2.8144e+02_jprb,4.1994e+02_jprb,5.6005e+02_jprb/)
1691 kbo( :, 1,37,16) = (/&
1692 &1.6074e+02_jprb,1.2562e+02_jprb,1.4270e+02_jprb,2.0342e+02_jprb,2.7131e+02_jprb/)
1693 kbo( :, 2,37,16) = (/&
1694 &1.9235e+02_jprb,1.5069e+02_jprb,1.7337e+02_jprb,2.5150e+02_jprb,3.3544e+02_jprb/)
1695 kbo( :, 3,37,16) = (/&
1696 &2.2422e+02_jprb,1.7676e+02_jprb,2.0661e+02_jprb,3.0337e+02_jprb,4.0456e+02_jprb/)
1697 kbo( :, 4,37,16) = (/&
1698 &2.5568e+02_jprb,2.0266e+02_jprb,2.4193e+02_jprb,3.5830e+02_jprb,4.7782e+02_jprb/)
1699 kbo( :, 5,37,16) = (/&
1700 &2.8661e+02_jprb,2.2807e+02_jprb,2.7894e+02_jprb,4.1548e+02_jprb,5.5411e+02_jprb/)
1701 kbo( :, 1,38,16) = (/&
1702 &1.5931e+02_jprb,1.2434e+02_jprb,1.4021e+02_jprb,1.9855e+02_jprb,2.6480e+02_jprb/)
1703 kbo( :, 2,38,16) = (/&
1704 &1.9120e+02_jprb,1.4947e+02_jprb,1.7064e+02_jprb,2.4634e+02_jprb,3.2849e+02_jprb/)
1705 kbo( :, 3,38,16) = (/&
1706 &2.2336e+02_jprb,1.7568e+02_jprb,2.0368e+02_jprb,2.9797e+02_jprb,3.9734e+02_jprb/)
1707 kbo( :, 4,38,16) = (/&
1708 &2.5520e+02_jprb,2.0184e+02_jprb,2.3879e+02_jprb,3.5282e+02_jprb,4.7045e+02_jprb/)
1709 kbo( :, 5,38,16) = (/&
1710 &2.8646e+02_jprb,2.2749e+02_jprb,2.7570e+02_jprb,4.0988e+02_jprb,5.4664e+02_jprb/)
1711 kbo( :, 1,39,16) = (/&
1712 &1.5737e+02_jprb,1.2272e+02_jprb,1.3752e+02_jprb,1.9347e+02_jprb,2.5800e+02_jprb/)
1713 kbo( :, 2,39,16) = (/&
1714 &1.8947e+02_jprb,1.4785e+02_jprb,1.6766e+02_jprb,2.4086e+02_jprb,3.2118e+02_jprb/)
1715 kbo( :, 3,39,16) = (/&
1716 &2.2190e+02_jprb,1.7414e+02_jprb,2.0048e+02_jprb,2.9227e+02_jprb,3.8976e+02_jprb/)
1717 kbo( :, 4,39,16) = (/&
1718 &2.5401e+02_jprb,2.0054e+02_jprb,2.3540e+02_jprb,3.4685e+02_jprb,4.6257e+02_jprb/)
1719 kbo( :, 5,39,16) = (/&
1720 &2.8557e+02_jprb,2.2640e+02_jprb,2.7220e+02_jprb,4.0387e+02_jprb,5.3853e+02_jprb/)
1721 kbo( :, 1,40,16) = (/&
1722 &1.5173e+02_jprb,1.1834e+02_jprb,1.3170e+02_jprb,1.8369e+02_jprb,2.4496e+02_jprb/)
1723 kbo( :, 2,40,16) = (/&
1724 &1.8387e+02_jprb,1.4326e+02_jprb,1.6126e+02_jprb,2.3014e+02_jprb,3.0690e+02_jprb/)
1725 kbo( :, 3,40,16) = (/&
1726 &2.1654e+02_jprb,1.6951e+02_jprb,1.9355e+02_jprb,2.8092e+02_jprb,3.7460e+02_jprb/)
1727 kbo( :, 4,40,16) = (/&
1728 &2.4896e+02_jprb,1.9611e+02_jprb,2.2806e+02_jprb,3.3490e+02_jprb,4.4658e+02_jprb/)
1729 kbo( :, 5,40,16) = (/&
1730 &2.8081e+02_jprb,2.2225e+02_jprb,2.6459e+02_jprb,3.9162e+02_jprb,5.2225e+02_jprb/)
1731 kbo( :, 1,41,16) = (/&
1732 &1.4531e+02_jprb,1.1344e+02_jprb,1.2539e+02_jprb,1.7342e+02_jprb,2.3126e+02_jprb/)
1733 kbo( :, 2,41,16) = (/&
1734 &1.7739e+02_jprb,1.3804e+02_jprb,1.5439e+02_jprb,2.1880e+02_jprb,2.9176e+02_jprb/)
1735 kbo( :, 3,41,16) = (/&
1736 &2.1022e+02_jprb,1.6418e+02_jprb,1.8612e+02_jprb,2.6873e+02_jprb,3.5832e+02_jprb/)
1737 kbo( :, 4,41,16) = (/&
1738 &2.4292e+02_jprb,1.9086e+02_jprb,2.2015e+02_jprb,3.2196e+02_jprb,4.2934e+02_jprb/)
1739 kbo( :, 5,41,16) = (/&
1740 &2.7507e+02_jprb,2.1730e+02_jprb,2.5630e+02_jprb,3.7839e+02_jprb,5.0449e+02_jprb/)
1741 kbo( :, 1,42,16) = (/&
1742 &1.3859e+02_jprb,1.0832e+02_jprb,1.1902e+02_jprb,1.6325e+02_jprb,2.1769e+02_jprb/)
1743 kbo( :, 2,42,16) = (/&
1744 &1.7052e+02_jprb,1.3266e+02_jprb,1.4745e+02_jprb,2.0749e+02_jprb,2.7665e+02_jprb/)
1745 kbo( :, 3,42,16) = (/&
1746 &2.0342e+02_jprb,1.5859e+02_jprb,1.7863e+02_jprb,2.5644e+02_jprb,3.4199e+02_jprb/)
1747 kbo( :, 4,42,16) = (/&
1748 &2.3635e+02_jprb,1.8528e+02_jprb,2.1215e+02_jprb,3.0913e+02_jprb,4.1213e+02_jprb/)
1749 kbo( :, 5,42,16) = (/&
1750 &2.6880e+02_jprb,2.1197e+02_jprb,2.4778e+02_jprb,3.6481e+02_jprb,4.8644e+02_jprb/)
1751 kbo( :, 1,43,16) = (/&
1752 &1.3001e+02_jprb,1.0178e+02_jprb,1.1123e+02_jprb,1.5100e+02_jprb,2.0132e+02_jprb/)
1753 kbo( :, 2,43,16) = (/&
1754 &1.6156e+02_jprb,1.2573e+02_jprb,1.3894e+02_jprb,1.9371e+02_jprb,2.5828e+02_jprb/)
1755 kbo( :, 3,43,16) = (/&
1756 &1.9443e+02_jprb,1.5128e+02_jprb,1.6930e+02_jprb,2.4134e+02_jprb,3.2182e+02_jprb/)
1757 kbo( :, 4,43,16) = (/&
1758 &2.2750e+02_jprb,1.7792e+02_jprb,2.0213e+02_jprb,2.9308e+02_jprb,3.9078e+02_jprb/)
1759 kbo( :, 5,43,16) = (/&
1760 &2.6025e+02_jprb,2.0480e+02_jprb,2.3724e+02_jprb,3.4798e+02_jprb,4.6403e+02_jprb/)
1761 kbo( :, 1,44,16) = (/&
1762 &1.2064e+02_jprb,9.4696e+01_jprb,1.0291e+02_jprb,1.3822e+02_jprb,1.8432e+02_jprb/)
1763 kbo( :, 2,44,16) = (/&
1764 &1.5164e+02_jprb,1.1817e+02_jprb,1.2980e+02_jprb,1.7913e+02_jprb,2.3893e+02_jprb/)
1765 kbo( :, 3,44,16) = (/&
1766 &1.8428e+02_jprb,1.4322e+02_jprb,1.5930e+02_jprb,2.2526e+02_jprb,3.0036e+02_jprb/)
1767 kbo( :, 4,44,16) = (/&
1768 &2.1753e+02_jprb,1.6972e+02_jprb,1.9139e+02_jprb,2.7583e+02_jprb,3.6782e+02_jprb/)
1769 kbo( :, 5,44,16) = (/&
1770 &2.5049e+02_jprb,1.9666e+02_jprb,2.2579e+02_jprb,3.2975e+02_jprb,4.3968e+02_jprb/)
1771 kbo( :, 1,45,16) = (/&
1772 &1.1151e+02_jprb,8.7613e+01_jprb,9.4790e+01_jprb,1.2608e+02_jprb,1.6812e+02_jprb/)
1773 kbo( :, 2,45,16) = (/&
1774 &1.4164e+02_jprb,1.1057e+02_jprb,1.2077e+02_jprb,1.6507e+02_jprb,2.2006e+02_jprb/)
1775 kbo( :, 3,45,16) = (/&
1776 &1.7396e+02_jprb,1.3520e+02_jprb,1.4945e+02_jprb,2.0958e+02_jprb,2.7946e+02_jprb/)
1777 kbo( :, 4,45,16) = (/&
1778 &2.0722e+02_jprb,1.6134e+02_jprb,1.8077e+02_jprb,2.5885e+02_jprb,3.4509e+02_jprb/)
1779 kbo( :, 5,45,16) = (/&
1780 &2.4041e+02_jprb,1.8823e+02_jprb,2.1441e+02_jprb,3.1179e+02_jprb,4.1569e+02_jprb/)
1781 kbo( :, 1,46,16) = (/&
1782 &1.0202e+02_jprb,8.0263e+01_jprb,8.6456e+01_jprb,1.1385e+02_jprb,1.5183e+02_jprb/)
1783 kbo( :, 2,46,16) = (/&
1784 &1.3102e+02_jprb,1.0251e+02_jprb,1.1143e+02_jprb,1.5058e+02_jprb,2.0077e+02_jprb/)
1785 kbo( :, 3,46,16) = (/&
1786 &1.6284e+02_jprb,1.2664e+02_jprb,1.3922e+02_jprb,1.9326e+02_jprb,2.5769e+02_jprb/)
1787 kbo( :, 4,46,16) = (/&
1788 &1.9593e+02_jprb,1.5228e+02_jprb,1.6961e+02_jprb,2.4101e+02_jprb,3.2127e+02_jprb/)
1789 kbo( :, 5,46,16) = (/&
1790 &2.2932e+02_jprb,1.7911e+02_jprb,2.0249e+02_jprb,2.9283e+02_jprb,3.9038e+02_jprb/)
1791 kbo( :, 1,47,16) = (/&
1792 &9.1833e+01_jprb,7.2521e+01_jprb,7.7492e+01_jprb,1.0107e+02_jprb,1.3478e+02_jprb/)
1793 kbo( :, 2,47,16) = (/&
1794 &1.1935e+02_jprb,9.3639e+01_jprb,1.0124e+02_jprb,1.3522e+02_jprb,1.8034e+02_jprb/)
1795 kbo( :, 3,47,16) = (/&
1796 &1.5031e+02_jprb,1.1714e+02_jprb,1.2800e+02_jprb,1.7568e+02_jprb,2.3430e+02_jprb/)
1797 kbo( :, 4,47,16) = (/&
1798 &1.8310e+02_jprb,1.4216e+02_jprb,1.5736e+02_jprb,2.2148e+02_jprb,2.9535e+02_jprb/)
1799 kbo( :, 5,47,16) = (/&
1800 &2.1655e+02_jprb,1.6875e+02_jprb,1.8931e+02_jprb,2.7187e+02_jprb,3.6261e+02_jprb/)
1801 kbo( :, 1,48,16) = (/&
1802 &8.2434e+01_jprb,6.5271e+01_jprb,6.9082e+01_jprb,8.9310e+01_jprb,1.1908e+02_jprb/)
1803 kbo( :, 2,48,16) = (/&
1804 &1.0815e+02_jprb,8.4940e+01_jprb,9.1497e+01_jprb,1.2085e+02_jprb,1.6117e+02_jprb/)
1805 kbo( :, 3,48,16) = (/&
1806 &1.3796e+02_jprb,1.0775e+02_jprb,1.1715e+02_jprb,1.5893e+02_jprb,2.1191e+02_jprb/)
1807 kbo( :, 4,48,16) = (/&
1808 &1.7024e+02_jprb,1.3227e+02_jprb,1.4550e+02_jprb,2.0275e+02_jprb,2.7033e+02_jprb/)
1809 kbo( :, 5,48,16) = (/&
1810 &2.0361e+02_jprb,1.5829e+02_jprb,1.7646e+02_jprb,2.5142e+02_jprb,3.3526e+02_jprb/)
1811 kbo( :, 1,49,16) = (/&
1812 &7.3591e+01_jprb,5.8555e+01_jprb,6.1217e+01_jprb,7.8585e+01_jprb,1.0478e+02_jprb/)
1813 kbo( :, 2,49,16) = (/&
1814 &9.7468e+01_jprb,7.6787e+01_jprb,8.2199e+01_jprb,1.0753e+02_jprb,1.4337e+02_jprb/)
1815 kbo( :, 3,49,16) = (/&
1816 &1.2589e+02_jprb,9.8595e+01_jprb,1.0664e+02_jprb,1.4299e+02_jprb,1.9063e+02_jprb/)
1817 kbo( :, 4,49,16) = (/&
1818 &1.5743e+02_jprb,1.2250e+02_jprb,1.3397e+02_jprb,1.8464e+02_jprb,2.4618e+02_jprb/)
1819 kbo( :, 5,49,16) = (/&
1820 &1.9052e+02_jprb,1.4794e+02_jprb,1.6391e+02_jprb,2.3149e+02_jprb,3.0868e+02_jprb/)
1821 kbo( :, 1,50,16) = (/&
1822 &6.5961e+01_jprb,5.2638e+01_jprb,5.4393e+01_jprb,6.9399e+01_jprb,9.2534e+01_jprb/)
1823 kbo( :, 2,50,16) = (/&
1824 &8.8116e+01_jprb,6.9616e+01_jprb,7.3948e+01_jprb,9.5883e+01_jprb,1.2784e+02_jprb/)
1825 kbo( :, 3,50,16) = (/&
1826 &1.1495e+02_jprb,9.0222e+01_jprb,9.7185e+01_jprb,1.2898e+02_jprb,1.7197e+02_jprb/)
1827 kbo( :, 4,50,16) = (/&
1828 &1.4556e+02_jprb,1.1350e+02_jprb,1.2350e+02_jprb,1.6846e+02_jprb,2.2453e+02_jprb/)
1829 kbo( :, 5,50,16) = (/&
1830 &1.7823e+02_jprb,1.3839e+02_jprb,1.5245e+02_jprb,2.1343e+02_jprb,2.8458e+02_jprb/)
1831 kbo( :, 1,51,16) = (/&
1832 &5.9119e+01_jprb,4.7354e+01_jprb,4.8344e+01_jprb,6.1204e+01_jprb,8.1604e+01_jprb/)
1833 kbo( :, 2,51,16) = (/&
1834 &7.9680e+01_jprb,6.3168e+01_jprb,6.6452e+01_jprb,8.5530e+01_jprb,1.1410e+02_jprb/)
1835 kbo( :, 3,51,16) = (/&
1836 &1.0482e+02_jprb,8.2356e+01_jprb,8.8430e+01_jprb,1.1623e+02_jprb,1.5497e+02_jprb/)
1837 kbo( :, 4,51,16) = (/&
1838 &1.3427e+02_jprb,1.0494e+02_jprb,1.1368e+02_jprb,1.5339e+02_jprb,2.0454e+02_jprb/)
1839 kbo( :, 5,51,16) = (/&
1840 &1.6639e+02_jprb,1.2932e+02_jprb,1.4173e+02_jprb,1.9652e+02_jprb,2.6202e+02_jprb/)
1841 kbo( :, 1,52,16) = (/&
1842 &5.2745e+01_jprb,4.2467e+01_jprb,4.2754e+01_jprb,5.3680e+01_jprb,7.1576e+01_jprb/)
1843 kbo( :, 2,52,16) = (/&
1844 &7.1747e+01_jprb,5.7129e+01_jprb,5.9424e+01_jprb,7.6073e+01_jprb,1.0142e+02_jprb/)
1845 kbo( :, 3,52,16) = (/&
1846 &9.5200e+01_jprb,7.5047e+01_jprb,8.0071e+01_jprb,1.0434e+02_jprb,1.3911e+02_jprb/)
1847 kbo( :, 4,52,16) = (/&
1848 &1.2328e+02_jprb,9.6608e+01_jprb,1.0420e+02_jprb,1.3918e+02_jprb,1.8556e+02_jprb/)
1849 kbo( :, 5,52,16) = (/&
1850 &1.5465e+02_jprb,1.2039e+02_jprb,1.3128e+02_jprb,1.8026e+02_jprb,2.4037e+02_jprb/)
1851 kbo( :, 1,53,16) = (/&
1852 &4.6931e+01_jprb,3.7942e+01_jprb,3.7717e+01_jprb,4.6873e+01_jprb,6.2479e+01_jprb/)
1853 kbo( :, 2,53,16) = (/&
1854 &6.4426e+01_jprb,5.1434e+01_jprb,5.2934e+01_jprb,6.7323e+01_jprb,8.9766e+01_jprb/)
1855 kbo( :, 3,53,16) = (/&
1856 &8.6242e+01_jprb,6.8154e+01_jprb,7.2147e+01_jprb,9.3266e+01_jprb,1.2436e+02_jprb/)
1857 kbo( :, 4,53,16) = (/&
1858 &1.1270e+02_jprb,8.8425e+01_jprb,9.5072e+01_jprb,1.2575e+02_jprb,1.6767e+02_jprb/)
1859 kbo( :, 5,53,16) = (/&
1860 &1.4306e+02_jprb,1.1161e+02_jprb,1.2116e+02_jprb,1.6465e+02_jprb,2.1957e+02_jprb/)
1861 kbo( :, 1,54,16) = (/&
1862 &4.2077e+01_jprb,3.4169e+01_jprb,3.3488e+01_jprb,4.1262e+01_jprb,5.4902e+01_jprb/)
1863 kbo( :, 2,54,16) = (/&
1864 &5.8190e+01_jprb,4.6634e+01_jprb,4.7441e+01_jprb,5.9915e+01_jprb,7.9878e+01_jprb/)
1865 kbo( :, 3,54,16) = (/&
1866 &7.8514e+01_jprb,6.2282e+01_jprb,6.5328e+01_jprb,8.3924e+01_jprb,1.1190e+02_jprb/)
1867 kbo( :, 4,54,16) = (/&
1868 &1.0342e+02_jprb,8.1276e+01_jprb,8.7086e+01_jprb,1.1420e+02_jprb,1.5227e+02_jprb/)
1869 kbo( :, 5,54,16) = (/&
1870 &1.3269e+02_jprb,1.0372e+02_jprb,1.1219e+02_jprb,1.5097e+02_jprb,2.0130e+02_jprb/)
1871 kbo( :, 1,55,16) = (/&
1872 &3.7797e+01_jprb,3.0836e+01_jprb,2.9805e+01_jprb,3.6383e+01_jprb,4.8271e+01_jprb/)
1873 kbo( :, 2,55,16) = (/&
1874 &5.2583e+01_jprb,4.2337e+01_jprb,4.2558e+01_jprb,5.3364e+01_jprb,7.1129e+01_jprb/)
1875 kbo( :, 3,55,16) = (/&
1876 &7.1538e+01_jprb,5.6971e+01_jprb,5.9162e+01_jprb,7.5653e+01_jprb,1.0088e+02_jprb/)
1877 kbo( :, 4,55,16) = (/&
1878 &9.4943e+01_jprb,7.4845e+01_jprb,7.9765e+01_jprb,1.0380e+02_jprb,1.3840e+02_jprb/)
1879 kbo( :, 5,55,16) = (/&
1880 &1.2300e+02_jprb,9.6367e+01_jprb,1.0384e+02_jprb,1.3854e+02_jprb,1.8472e+02_jprb/)
1881 kbo( :, 1,56,16) = (/&
1882 &3.3873e+01_jprb,2.7740e+01_jprb,2.6480e+01_jprb,3.1942e+01_jprb,4.2208e+01_jprb/)
1883 kbo( :, 2,56,16) = (/&
1884 &4.7453e+01_jprb,3.8343e+01_jprb,3.8125e+01_jprb,4.7379e+01_jprb,6.3148e+01_jprb/)
1885 kbo( :, 3,56,16) = (/&
1886 &6.5091e+01_jprb,5.1940e+01_jprb,5.3452e+01_jprb,6.7966e+01_jprb,9.0627e+01_jprb/)
1887 kbo( :, 4,56,16) = (/&
1888 &8.7046e+01_jprb,6.8764e+01_jprb,7.2784e+01_jprb,9.4072e+01_jprb,1.2543e+02_jprb/)
1889 kbo( :, 5,56,16) = (/&
1890 &1.1365e+02_jprb,8.9173e+01_jprb,9.5823e+01_jprb,1.2676e+02_jprb,1.6901e+02_jprb/)
1891 kbo( :, 1,57,16) = (/&
1892 &3.0269e+01_jprb,2.4887e+01_jprb,2.3522e+01_jprb,2.7966e+01_jprb,3.6672e+01_jprb/)
1893 kbo( :, 2,57,16) = (/&
1894 &4.2742e+01_jprb,3.4680e+01_jprb,3.4029e+01_jprb,4.1940e+01_jprb,5.5826e+01_jprb/)
1895 kbo( :, 3,57,16) = (/&
1896 &5.9049e+01_jprb,4.7291e+01_jprb,4.8146e+01_jprb,6.0813e+01_jprb,8.1079e+01_jprb/)
1897 kbo( :, 4,57,16) = (/&
1898 &7.9588e+01_jprb,6.3092e+01_jprb,6.6213e+01_jprb,8.5068e+01_jprb,1.1341e+02_jprb/)
1899 kbo( :, 5,57,16) = (/&
1900 &1.0467e+02_jprb,8.2241e+01_jprb,8.8127e+01_jprb,1.1561e+02_jprb,1.5417e+02_jprb/)
1901 kbo( :, 1,58,16) = (/&
1902 &2.7181e+01_jprb,2.2407e+01_jprb,2.1043e+01_jprb,2.4570e+01_jprb,3.1903e+01_jprb/)
1903 kbo( :, 2,58,16) = (/&
1904 &3.8607e+01_jprb,3.1473e+01_jprb,3.0470e+01_jprb,3.7255e+01_jprb,4.9462e+01_jprb/)
1905 kbo( :, 3,58,16) = (/&
1906 &5.3661e+01_jprb,4.3166e+01_jprb,4.3454e+01_jprb,5.4507e+01_jprb,7.2688e+01_jprb/)
1907 kbo( :, 4,58,16) = (/&
1908 &7.2881e+01_jprb,5.7996e+01_jprb,6.0310e+01_jprb,7.7125e+01_jprb,1.0284e+02_jprb/)
1909 kbo( :, 5,58,16) = (/&
1910 &9.6586e+01_jprb,7.6089e+01_jprb,8.1135e+01_jprb,1.0566e+02_jprb,1.4091e+02_jprb/)
1911 kbo( :, 1,59,16) = (/&
1912 &2.6031e+01_jprb,2.1482e+01_jprb,2.0126e+01_jprb,2.3303e+01_jprb,3.0129e+01_jprb/)
1913 kbo( :, 2,59,16) = (/&
1914 &3.7063e+01_jprb,3.0259e+01_jprb,2.9150e+01_jprb,3.5486e+01_jprb,4.7064e+01_jprb/)
1915 kbo( :, 3,59,16) = (/&
1916 &5.1630e+01_jprb,4.1596e+01_jprb,4.1690e+01_jprb,5.2144e+01_jprb,6.9539e+01_jprb/)
1917 kbo( :, 4,59,16) = (/&
1918 &7.0350e+01_jprb,5.6032e+01_jprb,5.8043e+01_jprb,7.4115e+01_jprb,9.8842e+01_jprb/)
1919 kbo( :, 5,59,16) = (/&
1920 &9.3474e+01_jprb,7.3716e+01_jprb,7.8416e+01_jprb,1.0186e+02_jprb,1.3581e+02_jprb/)
1921 
1922 
1923 ! -----------------------------------------------------------------
1924 RETURN
1925 END SUBROUTINE rrtm_kgb3_b4
yoerrto3::forrefo
real(kind=jprb), dimension(no3) forrefo
Definition: yoerrto3.F90:18
yoerrta3::absn2ob
real(kind=jprb), dimension(16) absn2ob
Definition: yoerrta3.F90:20
yoerrto3::fracrefbo
real(kind=jprb), dimension(no3, 5) fracrefbo
Definition: yoerrto3.F90:16
yoerrta3::h2oref
real(kind=jprb), dimension(59) h2oref
Definition: yoerrta3.F90:22
yoerrta3::co2ref
real(kind=jprb), dimension(59) co2ref
Definition: yoerrta3.F90:24
yoerrta3::n2oref
real(kind=jprb), dimension(59) n2oref
Definition: yoerrta3.F90:23
yoerrto3::kao
real(kind=jprb), dimension(10, 5, 13, no3) kao
Definition: yoerrto3.F90:22
yoerrta3::absn2oa
real(kind=jprb), dimension(16) absn2oa
Definition: yoerrta3.F90:19
rrtm_kgb3_b4
subroutine rrtm_kgb3_b4
Definition: rrtm_kgb3_B4.F90:3
yoerrto3::absn2obo
real(kind=jprb), dimension(no3) absn2obo
Definition: yoerrto3.F90:20
yoerrta3::etaref
real(kind=jprb), dimension(10) etaref
Definition: yoerrta3.F90:21
yoerrto3::kbo
real(kind=jprb), dimension(5, 5, 13:59, no3) kbo
Definition: yoerrto3.F90:23
yoerrta3::strrat
real(kind=jprb) strrat
Definition: yoerrta3.F90:29
yoerrto3::selfrefo
real(kind=jprb), dimension(10, no3) selfrefo
Definition: yoerrto3.F90:24
yoerrto3::fracrefao
real(kind=jprb), dimension(no3, 10) fracrefao
Definition: yoerrto3.F90:16
yoerrto3::absn2oao
real(kind=jprb), dimension(no3) absn2oao
Definition: yoerrto3.F90:19