rrtm_kgb7_BB.F90

Go to the documentation of this file.

!OCL SCALAR
SUBROUTINE rrtm_kgb7_bb

!     Originally by Eli J. Mlawer, Atmospheric & Environmental Research.
!     BAND 7:  980-1080 cm-1 (low - H2O,O3; high - O3)
!     Reformatted for F90 by JJMorcrette, ECMWF
!     Reformatted for NEC by H.Gallée   , LGGE  (splitting)

!     ------------------------------------------------------------------

#include "tsmbkind.h"

USE yoerrto7 , ONLY : kao     ,kbo     ,selfrefo   ,fracrefao  ,&
           &fracrefbo  ,absco2o
USE yoerrta7 , ONLY : strrat

!     ------------------------------------------------------------------


IMPLICIT NONE

!     ------------------------------------------------------------------

!     The array KBO contains absorption coefs at the 16 chosen g-values 
!     for a range of pressure levels < ~100mb and temperatures. The first 
!     index in the array, JT, which runs from 1 to 5, corresponds to 
!     different temperatures.  More specifically, JT = 3 means that the 
!     data are for the reference temperature TREF for this pressure 
!     level, JT = 2 refers to the temperature TREF-15, JT = 1 is for
!     TREF-30, JT = 4 is for TREF+15, and JT = 5 is for TREF+30.  
!     The second index, JP, runs from 13 to 59 and refers to the JPth
!     reference pressure level (see taumol.f for the value of these
!     pressure levels in mb).  The third index, IG, goes from 1 to 16,
!     and tells us which g-interval the absorption coefficients are for.

kbo( :,13, 1) = (/&
&5.1259e-02_jprb,7.3611e-02_jprb,1.0293e-01_jprb,1.3958e-01_jprb,1.8370e-01_jprb/)
kbo( :,14, 1) = (/&
&4.5713e-02_jprb,6.5277e-02_jprb,9.0553e-02_jprb,1.2145e-01_jprb,1.5795e-01_jprb/)
kbo( :,15, 1) = (/&
&4.0795e-02_jprb,5.7938e-02_jprb,7.9664e-02_jprb,1.0581e-01_jprb,1.3605e-01_jprb/)
kbo( :,16, 1) = (/&
&3.6460e-02_jprb,5.1532e-02_jprb,7.0278e-02_jprb,9.2517e-02_jprb,1.1775e-01_jprb/)
kbo( :,17, 1) = (/&
&3.2358e-02_jprb,4.5390e-02_jprb,6.1388e-02_jprb,8.0070e-02_jprb,1.0088e-01_jprb/)
kbo( :,18, 1) = (/&
&2.8485e-02_jprb,3.9634e-02_jprb,5.3109e-02_jprb,6.8586e-02_jprb,8.5607e-02_jprb/)
kbo( :,19, 1) = (/&
&2.4839e-02_jprb,3.4251e-02_jprb,4.5451e-02_jprb,5.8119e-02_jprb,7.1935e-02_jprb/)
kbo( :,20, 1) = (/&
&2.1646e-02_jprb,2.9549e-02_jprb,3.8829e-02_jprb,4.9218e-02_jprb,6.0534e-02_jprb/)
kbo( :,21, 1) = (/&
&1.8726e-02_jprb,2.5319e-02_jprb,3.2990e-02_jprb,4.1539e-02_jprb,5.0831e-02_jprb/)
kbo( :,22, 1) = (/&
&1.6430e-02_jprb,2.1972e-02_jprb,2.8373e-02_jprb,3.5469e-02_jprb,4.3144e-02_jprb/)
kbo( :,23, 1) = (/&
&1.4344e-02_jprb,1.9007e-02_jprb,2.4347e-02_jprb,3.0236e-02_jprb,3.6575e-02_jprb/)
kbo( :,24, 1) = (/&
&1.2498e-02_jprb,1.6422e-02_jprb,2.0874e-02_jprb,2.5759e-02_jprb,3.0990e-02_jprb/)
kbo( :,25, 1) = (/&
&1.0890e-02_jprb,1.4194e-02_jprb,1.7906e-02_jprb,2.1962e-02_jprb,2.6282e-02_jprb/)
kbo( :,26, 1) = (/&
&9.5169e-03_jprb,1.2303e-02_jprb,1.5406e-02_jprb,1.8780e-02_jprb,2.2347e-02_jprb/)
kbo( :,27, 1) = (/&
&8.3127e-03_jprb,1.0661e-02_jprb,1.3260e-02_jprb,1.6073e-02_jprb,1.9015e-02_jprb/)
kbo( :,28, 1) = (/&
&7.2555e-03_jprb,9.2333e-03_jprb,1.1414e-02_jprb,1.3752e-02_jprb,1.6182e-02_jprb/)
kbo( :,29, 1) = (/&
&6.3460e-03_jprb,8.0168e-03_jprb,9.8497e-03_jprb,1.1797e-02_jprb,1.3808e-02_jprb/)
kbo( :,30, 1) = (/&
&5.5479e-03_jprb,6.9613e-03_jprb,8.4972e-03_jprb,1.0118e-02_jprb,1.1783e-02_jprb/)
kbo( :,31, 1) = (/&
&4.8584e-03_jprb,6.0543e-03_jprb,7.3446e-03_jprb,8.6964e-03_jprb,1.0081e-02_jprb/)
kbo( :,32, 1) = (/&
&4.2533e-03_jprb,5.2649e-03_jprb,6.3493e-03_jprb,7.4778e-03_jprb,8.6341e-03_jprb/)
kbo( :,33, 1) = (/&
&3.7229e-03_jprb,4.5793e-03_jprb,5.4910e-03_jprb,6.4373e-03_jprb,7.4041e-03_jprb/)
kbo( :,34, 1) = (/&
&3.2276e-03_jprb,3.9492e-03_jprb,4.7134e-03_jprb,5.5048e-03_jprb,6.3115e-03_jprb/)
kbo( :,35, 1) = (/&
&2.7399e-03_jprb,3.3442e-03_jprb,3.9827e-03_jprb,4.6441e-03_jprb,5.3183e-03_jprb/)
kbo( :,36, 1) = (/&
&2.2726e-03_jprb,2.7751e-03_jprb,3.3064e-03_jprb,3.8585e-03_jprb,4.4216e-03_jprb/)
kbo( :,37, 1) = (/&
&1.8221e-03_jprb,2.2350e-03_jprb,2.6736e-03_jprb,3.1310e-03_jprb,3.5993e-03_jprb/)
kbo( :,38, 1) = (/&
&1.4592e-03_jprb,1.7985e-03_jprb,2.1611e-03_jprb,2.5404e-03_jprb,2.9304e-03_jprb/)
kbo( :,39, 1) = (/&
&1.1699e-03_jprb,1.4493e-03_jprb,1.7501e-03_jprb,2.0658e-03_jprb,2.3919e-03_jprb/)
kbo( :,40, 1) = (/&
&9.1194e-04_jprb,1.1380e-03_jprb,1.3840e-03_jprb,1.6433e-03_jprb,1.9130e-03_jprb/)
kbo( :,41, 1) = (/&
&7.0723e-04_jprb,8.8961e-04_jprb,1.0899e-03_jprb,1.3025e-03_jprb,1.5252e-03_jprb/)
kbo( :,42, 1) = (/&
&5.4756e-04_jprb,6.9456e-04_jprb,8.5764e-04_jprb,1.0321e-03_jprb,1.2157e-03_jprb/)
kbo( :,43, 1) = (/&
&4.1699e-04_jprb,5.3448e-04_jprb,6.6629e-04_jprb,8.0890e-04_jprb,9.6007e-04_jprb/)
kbo( :,44, 1) = (/&
&3.1440e-04_jprb,4.0792e-04_jprb,5.1407e-04_jprb,6.3038e-04_jprb,7.5481e-04_jprb/)
kbo( :,45, 1) = (/&
&2.3640e-04_jprb,3.1074e-04_jprb,3.9606e-04_jprb,4.9085e-04_jprb,5.9335e-04_jprb/)
kbo( :,46, 1) = (/&
&1.7594e-04_jprb,2.3455e-04_jprb,3.0267e-04_jprb,3.7967e-04_jprb,4.6391e-04_jprb/)
kbo( :,47, 1) = (/&
&1.2843e-04_jprb,1.7389e-04_jprb,2.2775e-04_jprb,2.8951e-04_jprb,3.5820e-04_jprb/)
kbo( :,48, 1) = (/&
&9.3343e-05_jprb,1.2837e-04_jprb,1.7092e-04_jprb,2.2045e-04_jprb,2.7649e-04_jprb/)
kbo( :,49, 1) = (/&
&6.7599e-05_jprb,9.4536e-05_jprb,1.2808e-04_jprb,1.6786e-04_jprb,2.1369e-04_jprb/)
kbo( :,50, 1) = (/&
&4.8948e-05_jprb,6.9502e-05_jprb,9.5623e-05_jprb,1.2729e-04_jprb,1.6435e-04_jprb/)
kbo( :,51, 1) = (/&
&3.5346e-05_jprb,5.0921e-05_jprb,7.1079e-05_jprb,9.6095e-05_jprb,1.2578e-04_jprb/)
kbo( :,52, 1) = (/&
&2.5450e-05_jprb,3.7196e-05_jprb,5.2726e-05_jprb,7.2442e-05_jprb,9.6232e-05_jprb/)
kbo( :,53, 1) = (/&
&1.8296e-05_jprb,2.7103e-05_jprb,3.9075e-05_jprb,5.4599e-05_jprb,7.3735e-05_jprb/)
kbo( :,54, 1) = (/&
&1.3152e-05_jprb,1.9639e-05_jprb,2.8663e-05_jprb,4.0549e-05_jprb,5.5484e-05_jprb/)
kbo( :,55, 1) = (/&
&9.4445e-06_jprb,1.4166e-05_jprb,2.0853e-05_jprb,2.9772e-05_jprb,4.1184e-05_jprb/)
kbo( :,56, 1) = (/&
&6.7805e-06_jprb,1.0206e-05_jprb,1.5127e-05_jprb,2.1803e-05_jprb,3.0469e-05_jprb/)
kbo( :,57, 1) = (/&
&4.8676e-06_jprb,7.3427e-06_jprb,1.0945e-05_jprb,1.5922e-05_jprb,2.2468e-05_jprb/)
kbo( :,58, 1) = (/&
&3.5190e-06_jprb,5.3050e-06_jprb,7.9365e-06_jprb,1.1632e-05_jprb,1.6547e-05_jprb/)
kbo( :,59, 1) = (/&
&2.7224e-06_jprb,4.0826e-06_jprb,6.0785e-06_jprb,8.8720e-06_jprb,1.2572e-05_jprb/)
kbo( :,13, 2) = (/&
&2.7119e-01_jprb,3.6310e-01_jprb,4.7414e-01_jprb,6.0307e-01_jprb,7.4957e-01_jprb/)
kbo( :,14, 2) = (/&
&2.5353e-01_jprb,3.3756e-01_jprb,4.3733e-01_jprb,5.5227e-01_jprb,6.8177e-01_jprb/)
kbo( :,15, 2) = (/&
&2.3613e-01_jprb,3.1296e-01_jprb,4.0272e-01_jprb,5.0521e-01_jprb,6.1950e-01_jprb/)
kbo( :,16, 2) = (/&
&2.1883e-01_jprb,2.8892e-01_jprb,3.7007e-01_jprb,4.6171e-01_jprb,5.6222e-01_jprb/)
kbo( :,17, 2) = (/&
&2.0046e-01_jprb,2.6387e-01_jprb,3.3671e-01_jprb,4.1802e-01_jprb,5.0615e-01_jprb/)
kbo( :,18, 2) = (/&
&1.8162e-01_jprb,2.3837e-01_jprb,3.0306e-01_jprb,3.7451e-01_jprb,4.5033e-01_jprb/)
kbo( :,19, 2) = (/&
&1.6273e-01_jprb,2.1280e-01_jprb,2.6942e-01_jprb,3.3081e-01_jprb,3.9474e-01_jprb/)
kbo( :,20, 2) = (/&
&1.4529e-01_jprb,1.8899e-01_jprb,2.3756e-01_jprb,2.8972e-01_jprb,3.4258e-01_jprb/)
kbo( :,21, 2) = (/&
&1.2870e-01_jprb,1.6616e-01_jprb,2.0730e-01_jprb,2.5076e-01_jprb,2.9377e-01_jprb/)
kbo( :,22, 2) = (/&
&1.1499e-01_jprb,1.4695e-01_jprb,1.8158e-01_jprb,2.1711e-01_jprb,2.5164e-01_jprb/)
kbo( :,23, 2) = (/&
&1.0194e-01_jprb,1.2892e-01_jprb,1.5758e-01_jprb,1.8624e-01_jprb,2.1370e-01_jprb/)
kbo( :,24, 2) = (/&
&8.9789e-02_jprb,1.1229e-01_jprb,1.3567e-01_jprb,1.5862e-01_jprb,1.8060e-01_jprb/)
kbo( :,25, 2) = (/&
&7.8662e-02_jprb,9.7205e-02_jprb,1.1609e-01_jprb,1.3460e-01_jprb,1.5226e-01_jprb/)
kbo( :,26, 2) = (/&
&6.8677e-02_jprb,8.3839e-02_jprb,9.9146e-02_jprb,1.1408e-01_jprb,1.2832e-01_jprb/)
kbo( :,27, 2) = (/&
&5.9597e-02_jprb,7.2017e-02_jprb,8.4456e-02_jprb,9.6525e-02_jprb,1.0804e-01_jprb/)
kbo( :,28, 2) = (/&
&5.1479e-02_jprb,6.1677e-02_jprb,7.1788e-02_jprb,8.1553e-02_jprb,9.0870e-02_jprb/)
kbo( :,29, 2) = (/&
&4.4418e-02_jprb,5.2773e-02_jprb,6.1008e-02_jprb,6.8941e-02_jprb,7.6507e-02_jprb/)
kbo( :,30, 2) = (/&
&3.8240e-02_jprb,4.5084e-02_jprb,5.1802e-02_jprb,5.8270e-02_jprb,6.4403e-02_jprb/)
kbo( :,31, 2) = (/&
&3.2906e-02_jprb,3.8522e-02_jprb,4.4011e-02_jprb,4.9308e-02_jprb,5.4268e-02_jprb/)
kbo( :,32, 2) = (/&
&2.8286e-02_jprb,3.2899e-02_jprb,3.7402e-02_jprb,4.1721e-02_jprb,4.5728e-02_jprb/)
kbo( :,33, 2) = (/&
&2.4296e-02_jprb,2.8097e-02_jprb,3.1779e-02_jprb,3.5285e-02_jprb,3.8510e-02_jprb/)
kbo( :,34, 2) = (/&
&2.0730e-02_jprb,2.3844e-02_jprb,2.6852e-02_jprb,2.9683e-02_jprb,3.2295e-02_jprb/)
kbo( :,35, 2) = (/&
&1.7417e-02_jprb,1.9970e-02_jprb,2.2433e-02_jprb,2.4741e-02_jprb,2.6876e-02_jprb/)
kbo( :,36, 2) = (/&
&1.4391e-02_jprb,1.6493e-02_jprb,1.8520e-02_jprb,2.0421e-02_jprb,2.2183e-02_jprb/)
kbo( :,37, 2) = (/&
&1.1614e-02_jprb,1.3354e-02_jprb,1.5031e-02_jprb,1.6611e-02_jprb,1.8085e-02_jprb/)
kbo( :,38, 2) = (/&
&9.3636e-03_jprb,1.0802e-02_jprb,1.2193e-02_jprb,1.3510e-02_jprb,1.4737e-02_jprb/)
kbo( :,39, 2) = (/&
&7.5541e-03_jprb,8.7439e-03_jprb,9.8975e-03_jprb,1.0998e-02_jprb,1.2026e-02_jprb/)
kbo( :,40, 2) = (/&
&5.9794e-03_jprb,6.9606e-03_jprb,7.9183e-03_jprb,8.8404e-03_jprb,9.7022e-03_jprb/)
kbo( :,41, 2) = (/&
&4.7162e-03_jprb,5.5242e-03_jprb,6.3175e-03_jprb,7.0884e-03_jprb,7.8122e-03_jprb/)
kbo( :,42, 2) = (/&
&3.7141e-03_jprb,4.3793e-03_jprb,5.0373e-03_jprb,5.6797e-03_jprb,6.2875e-03_jprb/)
kbo( :,43, 2) = (/&
&2.8894e-03_jprb,3.4367e-03_jprb,3.9819e-03_jprb,4.5167e-03_jprb,5.0302e-03_jprb/)
kbo( :,44, 2) = (/&
&2.2311e-03_jprb,2.6800e-03_jprb,3.1318e-03_jprb,3.5777e-03_jprb,4.0109e-03_jprb/)
kbo( :,45, 2) = (/&
&1.7190e-03_jprb,2.0864e-03_jprb,2.4595e-03_jprb,2.8305e-03_jprb,3.1948e-03_jprb/)
kbo( :,46, 2) = (/&
&1.3144e-03_jprb,1.6127e-03_jprb,1.9198e-03_jprb,2.2288e-03_jprb,2.5338e-03_jprb/)
kbo( :,47, 2) = (/&
&9.9072e-04_jprb,1.2307e-03_jprb,1.4827e-03_jprb,1.7388e-03_jprb,1.9939e-03_jprb/)
kbo( :,48, 2) = (/&
&7.4328e-04_jprb,9.3584e-04_jprb,1.1422e-03_jprb,1.3542e-03_jprb,1.5673e-03_jprb/)
kbo( :,49, 2) = (/&
&5.5568e-04_jprb,7.0962e-04_jprb,8.7747e-04_jprb,1.0533e-03_jprb,1.2311e-03_jprb/)
kbo( :,50, 2) = (/&
&4.1543e-04_jprb,5.3759e-04_jprb,6.7298e-04_jprb,8.1754e-04_jprb,9.6501e-04_jprb/)
kbo( :,51, 2) = (/&
&3.0972e-04_jprb,4.0612e-04_jprb,5.1480e-04_jprb,6.3279e-04_jprb,7.5447e-04_jprb/)
kbo( :,52, 2) = (/&
&2.2960e-04_jprb,3.0589e-04_jprb,3.9277e-04_jprb,4.8863e-04_jprb,5.8929e-04_jprb/)
kbo( :,53, 2) = (/&
&1.6933e-04_jprb,2.2968e-04_jprb,2.9891e-04_jprb,3.7665e-04_jprb,4.6003e-04_jprb/)
kbo( :,54, 2) = (/&
&1.2476e-04_jprb,1.7207e-04_jprb,2.2658e-04_jprb,2.8866e-04_jprb,3.5637e-04_jprb/)
kbo( :,55, 2) = (/&
&9.1638e-05_jprb,1.2832e-04_jprb,1.7102e-04_jprb,2.1999e-04_jprb,2.7423e-04_jprb/)
kbo( :,56, 2) = (/&
&6.6998e-05_jprb,9.5270e-05_jprb,1.2875e-04_jprb,1.6725e-04_jprb,2.1034e-04_jprb/)
kbo( :,57, 2) = (/&
&4.8715e-05_jprb,7.0398e-05_jprb,9.6609e-05_jprb,1.2676e-04_jprb,1.6093e-04_jprb/)
kbo( :,58, 2) = (/&
&3.5429e-05_jprb,5.2045e-05_jprb,7.2448e-05_jprb,9.6079e-05_jprb,1.2306e-04_jprb/)
kbo( :,59, 2) = (/&
&2.7567e-05_jprb,4.0660e-05_jprb,5.6784e-05_jprb,7.5471e-05_jprb,9.6741e-05_jprb/)
kbo( :,13, 3) = (/&
&1.0985e+00_jprb,1.3471e+00_jprb,1.6024e+00_jprb,1.8569e+00_jprb,2.1065e+00_jprb/)
kbo( :,14, 3) = (/&
&1.0057e+00_jprb,1.2261e+00_jprb,1.4487e+00_jprb,1.6701e+00_jprb,1.8867e+00_jprb/)
kbo( :,15, 3) = (/&
&9.2327e-01_jprb,1.1163e+00_jprb,1.3096e+00_jprb,1.5013e+00_jprb,1.6927e+00_jprb/)
kbo( :,16, 3) = (/&
&8.4655e-01_jprb,1.0142e+00_jprb,1.1813e+00_jprb,1.3501e+00_jprb,1.5181e+00_jprb/)
kbo( :,17, 3) = (/&
&7.7095e-01_jprb,9.1488e-01_jprb,1.0609e+00_jprb,1.2083e+00_jprb,1.3539e+00_jprb/)
kbo( :,18, 3) = (/&
&6.9584e-01_jprb,8.2061e-01_jprb,9.4796e-01_jprb,1.0751e+00_jprb,1.2000e+00_jprb/)
kbo( :,19, 3) = (/&
&6.2275e-01_jprb,7.3128e-01_jprb,8.4109e-01_jprb,9.5006e-01_jprb,1.0557e+00_jprb/)
kbo( :,20, 3) = (/&
&5.5466e-01_jprb,6.4877e-01_jprb,7.4343e-01_jprb,8.3591e-01_jprb,9.2515e-01_jprb/)
kbo( :,21, 3) = (/&
&4.8960e-01_jprb,5.7076e-01_jprb,6.5178e-01_jprb,7.3033e-01_jprb,8.0430e-01_jprb/)
kbo( :,22, 3) = (/&
&4.3303e-01_jprb,5.0259e-01_jprb,5.7096e-01_jprb,6.3565e-01_jprb,6.9649e-01_jprb/)
kbo( :,23, 3) = (/&
&3.8028e-01_jprb,4.3904e-01_jprb,4.9534e-01_jprb,5.4802e-01_jprb,5.9732e-01_jprb/)
kbo( :,24, 3) = (/&
&3.3218e-01_jprb,3.8059e-01_jprb,4.2634e-01_jprb,4.6878e-01_jprb,5.0765e-01_jprb/)
kbo( :,25, 3) = (/&
&2.8849e-01_jprb,3.2793e-01_jprb,3.6460e-01_jprb,3.9816e-01_jprb,4.2820e-01_jprb/)
kbo( :,26, 3) = (/&
&2.4952e-01_jprb,2.8128e-01_jprb,3.1016e-01_jprb,3.3620e-01_jprb,3.5944e-01_jprb/)
kbo( :,27, 3) = (/&
&2.1458e-01_jprb,2.3971e-01_jprb,2.6222e-01_jprb,2.8249e-01_jprb,3.0071e-01_jprb/)
kbo( :,28, 3) = (/&
&1.8348e-01_jprb,2.0307e-01_jprb,2.2063e-01_jprb,2.3668e-01_jprb,2.5103e-01_jprb/)
kbo( :,29, 3) = (/&
&1.5612e-01_jprb,1.7138e-01_jprb,1.8529e-01_jprb,1.9807e-01_jprb,2.0946e-01_jprb/)
kbo( :,30, 3) = (/&
&1.3217e-01_jprb,1.4426e-01_jprb,1.5536e-01_jprb,1.6555e-01_jprb,1.7467e-01_jprb/)
kbo( :,31, 3) = (/&
&1.1164e-01_jprb,1.2131e-01_jprb,1.3020e-01_jprb,1.3837e-01_jprb,1.4579e-01_jprb/)
kbo( :,32, 3) = (/&
&9.4160e-02_jprb,1.0190e-01_jprb,1.0909e-01_jprb,1.1569e-01_jprb,1.2174e-01_jprb/)
kbo( :,33, 3) = (/&
&7.9328e-02_jprb,8.5579e-02_jprb,9.1418e-02_jprb,9.6812e-02_jprb,1.0174e-01_jprb/)
kbo( :,34, 3) = (/&
&6.6575e-02_jprb,7.1681e-02_jprb,7.6449e-02_jprb,8.0861e-02_jprb,8.4837e-02_jprb/)
kbo( :,35, 3) = (/&
&5.5452e-02_jprb,5.9669e-02_jprb,6.3583e-02_jprb,6.7195e-02_jprb,7.0402e-02_jprb/)
kbo( :,36, 3) = (/&
&4.5817e-02_jprb,4.9311e-02_jprb,5.2541e-02_jprb,5.5500e-02_jprb,5.8136e-02_jprb/)
kbo( :,37, 3) = (/&
&3.7392e-02_jprb,4.0307e-02_jprb,4.2995e-02_jprb,4.5443e-02_jprb,4.7667e-02_jprb/)
kbo( :,38, 3) = (/&
&3.0507e-02_jprb,3.2931e-02_jprb,3.5170e-02_jprb,3.7213e-02_jprb,3.9076e-02_jprb/)
kbo( :,39, 3) = (/&
&2.4900e-02_jprb,2.6916e-02_jprb,2.8785e-02_jprb,3.0496e-02_jprb,3.2065e-02_jprb/)
kbo( :,40, 3) = (/&
&2.0117e-02_jprb,2.1794e-02_jprb,2.3370e-02_jprb,2.4808e-02_jprb,2.6137e-02_jprb/)
kbo( :,41, 3) = (/&
&1.6225e-02_jprb,1.7626e-02_jprb,1.8947e-02_jprb,2.0157e-02_jprb,2.1285e-02_jprb/)
kbo( :,42, 3) = (/&
&1.3079e-02_jprb,1.4250e-02_jprb,1.5359e-02_jprb,1.6379e-02_jprb,1.7329e-02_jprb/)
kbo( :,43, 3) = (/&
&1.0482e-02_jprb,1.1462e-02_jprb,1.2394e-02_jprb,1.3257e-02_jprb,1.4064e-02_jprb/)
kbo( :,44, 3) = (/&
&8.3710e-03_jprb,9.1942e-03_jprb,9.9787e-03_jprb,1.0713e-02_jprb,1.1396e-02_jprb/)
kbo( :,45, 3) = (/&
&6.6788e-03_jprb,7.3702e-03_jprb,8.0298e-03_jprb,8.6522e-03_jprb,9.2329e-03_jprb/)
kbo( :,46, 3) = (/&
&5.3081e-03_jprb,5.8891e-03_jprb,6.4422e-03_jprb,6.9706e-03_jprb,7.4651e-03_jprb/)
kbo( :,47, 3) = (/&
&4.1866e-03_jprb,4.6766e-03_jprb,5.1419e-03_jprb,5.5881e-03_jprb,6.0116e-03_jprb/)
kbo( :,48, 3) = (/&
&3.2935e-03_jprb,3.7074e-03_jprb,4.1001e-03_jprb,4.4778e-03_jprb,4.8397e-03_jprb/)
kbo( :,49, 3) = (/&
&2.5846e-03_jprb,2.9354e-03_jprb,3.2677e-03_jprb,3.5868e-03_jprb,3.8959e-03_jprb/)
kbo( :,50, 3) = (/&
&2.0269e-03_jprb,2.3221e-03_jprb,2.6022e-03_jprb,2.8709e-03_jprb,3.1320e-03_jprb/)
kbo( :,51, 3) = (/&
&1.5861e-03_jprb,1.8335e-03_jprb,2.0693e-03_jprb,2.2950e-03_jprb,2.5144e-03_jprb/)
kbo( :,52, 3) = (/&
&1.2373e-03_jprb,1.4448e-03_jprb,1.6433e-03_jprb,1.8335e-03_jprb,2.0181e-03_jprb/)
kbo( :,53, 3) = (/&
&9.6238e-04_jprb,1.1359e-03_jprb,1.3032e-03_jprb,1.4639e-03_jprb,1.6200e-03_jprb/)
kbo( :,54, 3) = (/&
&7.4760e-04_jprb,8.9109e-04_jprb,1.0310e-03_jprb,1.1653e-03_jprb,1.2951e-03_jprb/)
kbo( :,55, 3) = (/&
&5.7948e-04_jprb,6.9751e-04_jprb,8.1351e-04_jprb,9.2482e-04_jprb,1.0323e-03_jprb/)
kbo( :,56, 3) = (/&
&4.4747e-04_jprb,5.4475e-04_jprb,6.4072e-04_jprb,7.3311e-04_jprb,8.2203e-04_jprb/)
kbo( :,57, 3) = (/&
&3.4377e-04_jprb,4.2418e-04_jprb,5.0351e-04_jprb,5.8007e-04_jprb,6.5383e-04_jprb/)
kbo( :,58, 3) = (/&
&2.6362e-04_jprb,3.3015e-04_jprb,3.9544e-04_jprb,4.5883e-04_jprb,5.1985e-04_jprb/)
kbo( :,59, 3) = (/&
&2.1059e-04_jprb,2.6499e-04_jprb,3.1808e-04_jprb,3.6954e-04_jprb,4.1891e-04_jprb/)
kbo( :,13, 4) = (/&
&3.3302e+00_jprb,3.5900e+00_jprb,3.8490e+00_jprb,4.0993e+00_jprb,4.3544e+00_jprb/)
kbo( :,14, 4) = (/&
&2.9375e+00_jprb,3.1623e+00_jprb,3.3912e+00_jprb,3.6192e+00_jprb,3.8536e+00_jprb/)
kbo( :,15, 4) = (/&
&2.5847e+00_jprb,2.7829e+00_jprb,2.9920e+00_jprb,3.2042e+00_jprb,3.4159e+00_jprb/)
kbo( :,16, 4) = (/&
&2.2723e+00_jprb,2.4555e+00_jprb,2.6487e+00_jprb,2.8409e+00_jprb,3.0352e+00_jprb/)
kbo( :,17, 4) = (/&
&1.9985e+00_jprb,2.1683e+00_jprb,2.3422e+00_jprb,2.5153e+00_jprb,2.6950e+00_jprb/)
kbo( :,18, 4) = (/&
&1.7574e+00_jprb,1.9111e+00_jprb,2.0646e+00_jprb,2.2235e+00_jprb,2.3882e+00_jprb/)
kbo( :,19, 4) = (/&
&1.5417e+00_jprb,1.6771e+00_jprb,1.8159e+00_jprb,1.9608e+00_jprb,2.1091e+00_jprb/)
kbo( :,20, 4) = (/&
&1.3501e+00_jprb,1.4708e+00_jprb,1.5966e+00_jprb,1.7265e+00_jprb,1.8579e+00_jprb/)
kbo( :,21, 4) = (/&
&1.1792e+00_jprb,1.2872e+00_jprb,1.3996e+00_jprb,1.5140e+00_jprb,1.6291e+00_jprb/)
kbo( :,22, 4) = (/&
&1.0331e+00_jprb,1.1299e+00_jprb,1.2292e+00_jprb,1.3301e+00_jprb,1.4294e+00_jprb/)
kbo( :,23, 4) = (/&
&9.0257e-01_jprb,9.8785e-01_jprb,1.0758e+00_jprb,1.1637e+00_jprb,1.2469e+00_jprb/)
kbo( :,24, 4) = (/&
&7.8462e-01_jprb,8.6035e-01_jprb,9.3739e-01_jprb,1.0117e+00_jprb,1.0795e+00_jprb/)
kbo( :,25, 4) = (/&
&6.8021e-01_jprb,7.4644e-01_jprb,8.1147e-01_jprb,8.7243e-01_jprb,9.2768e-01_jprb/)
kbo( :,26, 4) = (/&
&5.8877e-01_jprb,6.4489e-01_jprb,6.9856e-01_jprb,7.4767e-01_jprb,7.9152e-01_jprb/)
kbo( :,27, 4) = (/&
&5.0790e-01_jprb,5.5427e-01_jprb,5.9771e-01_jprb,6.3660e-01_jprb,6.7040e-01_jprb/)
kbo( :,28, 4) = (/&
&4.3619e-01_jprb,4.7420e-01_jprb,5.0861e-01_jprb,5.3858e-01_jprb,5.6428e-01_jprb/)
kbo( :,29, 4) = (/&
&3.7351e-01_jprb,4.0404e-01_jprb,4.3062e-01_jprb,4.5356e-01_jprb,4.7355e-01_jprb/)
kbo( :,30, 4) = (/&
&3.1877e-01_jprb,3.4252e-01_jprb,3.6291e-01_jprb,3.8087e-01_jprb,3.9669e-01_jprb/)
kbo( :,31, 4) = (/&
&2.7097e-01_jprb,2.8918e-01_jprb,3.0519e-01_jprb,3.1945e-01_jprb,3.3218e-01_jprb/)
kbo( :,32, 4) = (/&
&2.2933e-01_jprb,2.4355e-01_jprb,2.5629e-01_jprb,2.6778e-01_jprb,2.7819e-01_jprb/)
kbo( :,33, 4) = (/&
&1.9352e-01_jprb,2.0488e-01_jprb,2.1514e-01_jprb,2.2453e-01_jprb,2.3322e-01_jprb/)
kbo( :,34, 4) = (/&
&1.6266e-01_jprb,1.7186e-01_jprb,1.8021e-01_jprb,1.8806e-01_jprb,1.9533e-01_jprb/)
kbo( :,35, 4) = (/&
&1.3588e-01_jprb,1.4344e-01_jprb,1.5044e-01_jprb,1.5708e-01_jprb,1.6319e-01_jprb/)
kbo( :,36, 4) = (/&
&1.1281e-01_jprb,1.1914e-01_jprb,1.2508e-01_jprb,1.3072e-01_jprb,1.3587e-01_jprb/)
kbo( :,37, 4) = (/&
&9.2816e-02_jprb,9.8205e-02_jprb,1.0328e-01_jprb,1.0804e-01_jprb,1.1242e-01_jprb/)
kbo( :,38, 4) = (/&
&7.6370e-02_jprb,8.0963e-02_jprb,8.5283e-02_jprb,8.9321e-02_jprb,9.2973e-02_jprb/)
kbo( :,39, 4) = (/&
&6.2888e-02_jprb,6.6805e-02_jprb,7.0475e-02_jprb,7.3875e-02_jprb,7.6971e-02_jprb/)
kbo( :,40, 4) = (/&
&5.1396e-02_jprb,5.4708e-02_jprb,5.7829e-02_jprb,6.0714e-02_jprb,6.3350e-02_jprb/)
kbo( :,41, 4) = (/&
&4.1955e-02_jprb,4.4762e-02_jprb,4.7396e-02_jprb,4.9843e-02_jprb,5.2102e-02_jprb/)
kbo( :,42, 4) = (/&
&3.4234e-02_jprb,3.6611e-02_jprb,3.8848e-02_jprb,4.0922e-02_jprb,4.2851e-02_jprb/)
kbo( :,43, 4) = (/&
&2.7815e-02_jprb,2.9825e-02_jprb,3.1727e-02_jprb,3.3492e-02_jprb,3.5154e-02_jprb/)
kbo( :,44, 4) = (/&
&2.2537e-02_jprb,2.4240e-02_jprb,2.5867e-02_jprb,2.7378e-02_jprb,2.8807e-02_jprb/)
kbo( :,45, 4) = (/&
&1.8246e-02_jprb,1.9697e-02_jprb,2.1085e-02_jprb,2.2374e-02_jprb,2.3604e-02_jprb/)
kbo( :,46, 4) = (/&
&1.4728e-02_jprb,1.5964e-02_jprb,1.7142e-02_jprb,1.8251e-02_jprb,1.9308e-02_jprb/)
kbo( :,47, 4) = (/&
&1.1818e-02_jprb,1.2873e-02_jprb,1.3878e-02_jprb,1.4831e-02_jprb,1.5740e-02_jprb/)
kbo( :,48, 4) = (/&
&9.4657e-03_jprb,1.0367e-02_jprb,1.1228e-02_jprb,1.2052e-02_jprb,1.2833e-02_jprb/)
kbo( :,49, 4) = (/&
&7.5680e-03_jprb,8.3421e-03_jprb,9.0805e-03_jprb,9.7902e-03_jprb,1.0464e-02_jprb/)
kbo( :,50, 4) = (/&
&6.0502e-03_jprb,6.7078e-03_jprb,7.3374e-03_jprb,7.9442e-03_jprb,8.5226e-03_jprb/)
kbo( :,51, 4) = (/&
&4.8299e-03_jprb,5.3854e-03_jprb,5.9216e-03_jprb,6.4376e-03_jprb,6.9334e-03_jprb/)
kbo( :,52, 4) = (/&
&3.8467e-03_jprb,4.3164e-03_jprb,4.7737e-03_jprb,5.2128e-03_jprb,5.6384e-03_jprb/)
kbo( :,53, 4) = (/&
&3.0576e-03_jprb,3.4544e-03_jprb,3.8447e-03_jprb,4.2192e-03_jprb,4.5847e-03_jprb/)
kbo( :,54, 4) = (/&
&2.4302e-03_jprb,2.7614e-03_jprb,3.0899e-03_jprb,3.4056e-03_jprb,3.7134e-03_jprb/)
kbo( :,55, 4) = (/&
&1.9293e-03_jprb,2.2038e-03_jprb,2.4777e-03_jprb,2.7424e-03_jprb,2.9994e-03_jprb/)
kbo( :,56, 4) = (/&
&1.5286e-03_jprb,1.7562e-03_jprb,1.9841e-03_jprb,2.2060e-03_jprb,2.4199e-03_jprb/)
kbo( :,57, 4) = (/&
&1.2085e-03_jprb,1.3971e-03_jprb,1.5864e-03_jprb,1.7724e-03_jprb,1.9514e-03_jprb/)
kbo( :,58, 4) = (/&
&9.5537e-04_jprb,1.1118e-03_jprb,1.2685e-03_jprb,1.4237e-03_jprb,1.5733e-03_jprb/)
kbo( :,59, 4) = (/&
&7.7590e-04_jprb,9.0437e-04_jprb,1.0323e-03_jprb,1.1597e-03_jprb,1.2822e-03_jprb/)
kbo( :,13, 5) = (/&
&6.9141e+00_jprb,7.1545e+00_jprb,7.4046e+00_jprb,7.6833e+00_jprb,7.9432e+00_jprb/)
kbo( :,14, 5) = (/&
&6.0755e+00_jprb,6.2987e+00_jprb,6.5306e+00_jprb,6.7873e+00_jprb,7.0278e+00_jprb/)
kbo( :,15, 5) = (/&
&5.3116e+00_jprb,5.5269e+00_jprb,5.7512e+00_jprb,5.9835e+00_jprb,6.2117e+00_jprb/)
kbo( :,16, 5) = (/&
&4.6343e+00_jprb,4.8449e+00_jprb,5.0585e+00_jprb,5.2837e+00_jprb,5.5069e+00_jprb/)
kbo( :,17, 5) = (/&
&4.0419e+00_jprb,4.2430e+00_jprb,4.4508e+00_jprb,4.6718e+00_jprb,4.8821e+00_jprb/)
kbo( :,18, 5) = (/&
&3.5281e+00_jprb,3.7196e+00_jprb,3.9254e+00_jprb,4.1289e+00_jprb,4.3250e+00_jprb/)
kbo( :,19, 5) = (/&
&3.0859e+00_jprb,3.2697e+00_jprb,3.4594e+00_jprb,3.6428e+00_jprb,3.8279e+00_jprb/)
kbo( :,20, 5) = (/&
&2.7073e+00_jprb,2.8768e+00_jprb,3.0450e+00_jprb,3.2129e+00_jprb,3.3880e+00_jprb/)
kbo( :,21, 5) = (/&
&2.3737e+00_jprb,2.5247e+00_jprb,2.6757e+00_jprb,2.8327e+00_jprb,2.9960e+00_jprb/)
kbo( :,22, 5) = (/&
&2.0857e+00_jprb,2.2199e+00_jprb,2.3591e+00_jprb,2.5039e+00_jprb,2.6519e+00_jprb/)
kbo( :,23, 5) = (/&
&1.8289e+00_jprb,1.9512e+00_jprb,2.0778e+00_jprb,2.2081e+00_jprb,2.3436e+00_jprb/)
kbo( :,24, 5) = (/&
&1.6014e+00_jprb,1.7122e+00_jprb,1.8266e+00_jprb,1.9454e+00_jprb,2.0684e+00_jprb/)
kbo( :,25, 5) = (/&
&1.3998e+00_jprb,1.4999e+00_jprb,1.6048e+00_jprb,1.7138e+00_jprb,1.8217e+00_jprb/)
kbo( :,26, 5) = (/&
&1.2210e+00_jprb,1.3132e+00_jprb,1.4097e+00_jprb,1.5070e+00_jprb,1.6011e+00_jprb/)
kbo( :,27, 5) = (/&
&1.0633e+00_jprb,1.1477e+00_jprb,1.2343e+00_jprb,1.3197e+00_jprb,1.4013e+00_jprb/)
kbo( :,28, 5) = (/&
&9.2471e-01_jprb,1.0003e+00_jprb,1.0762e+00_jprb,1.1506e+00_jprb,1.2207e+00_jprb/)
kbo( :,29, 5) = (/&
&8.0378e-01_jprb,8.6991e-01_jprb,9.3571e-01_jprb,9.9918e-01_jprb,1.0579e+00_jprb/)
kbo( :,30, 5) = (/&
&6.9745e-01_jprb,7.5481e-01_jprb,8.1124e-01_jprb,8.6394e-01_jprb,9.1132e-01_jprb/)
kbo( :,31, 5) = (/&
&6.0465e-01_jprb,6.5420e-01_jprb,7.0129e-01_jprb,7.4415e-01_jprb,7.8220e-01_jprb/)
kbo( :,32, 5) = (/&
&5.2389e-01_jprb,5.6576e-01_jprb,6.0408e-01_jprb,6.3888e-01_jprb,6.7018e-01_jprb/)
kbo( :,33, 5) = (/&
&4.5339e-01_jprb,4.8777e-01_jprb,5.1895e-01_jprb,5.4778e-01_jprb,5.7413e-01_jprb/)
kbo( :,34, 5) = (/&
&3.9043e-01_jprb,4.1838e-01_jprb,4.4436e-01_jprb,4.6859e-01_jprb,4.9150e-01_jprb/)
kbo( :,35, 5) = (/&
&3.3304e-01_jprb,3.5641e-01_jprb,3.7837e-01_jprb,3.9937e-01_jprb,4.1969e-01_jprb/)
kbo( :,36, 5) = (/&
&2.8159e-01_jprb,3.0146e-01_jprb,3.2042e-01_jprb,3.3894e-01_jprb,3.5721e-01_jprb/)
kbo( :,37, 5) = (/&
&2.3528e-01_jprb,2.5243e-01_jprb,2.6898e-01_jprb,2.8542e-01_jprb,3.0190e-01_jprb/)
kbo( :,38, 5) = (/&
&1.9653e-01_jprb,2.1135e-01_jprb,2.2593e-01_jprb,2.4055e-01_jprb,2.5537e-01_jprb/)
kbo( :,39, 5) = (/&
&1.6424e-01_jprb,1.7712e-01_jprb,1.9008e-01_jprb,2.0314e-01_jprb,2.1645e-01_jprb/)
kbo( :,40, 5) = (/&
&1.3599e-01_jprb,1.4712e-01_jprb,1.5856e-01_jprb,1.7013e-01_jprb,1.8191e-01_jprb/)
kbo( :,41, 5) = (/&
&1.1240e-01_jprb,1.2208e-01_jprb,1.3208e-01_jprb,1.4229e-01_jprb,1.5269e-01_jprb/)
kbo( :,42, 5) = (/&
&9.2848e-02_jprb,1.0126e-01_jprb,1.1003e-01_jprb,1.1902e-01_jprb,1.2816e-01_jprb/)
kbo( :,43, 5) = (/&
&7.6272e-02_jprb,8.3551e-02_jprb,9.1173e-02_jprb,9.9059e-02_jprb,1.0710e-01_jprb/)
kbo( :,44, 5) = (/&
&6.2420e-02_jprb,6.8705e-02_jprb,7.5347e-02_jprb,8.2255e-02_jprb,8.9304e-02_jprb/)
kbo( :,45, 5) = (/&
&5.1037e-02_jprb,5.6461e-02_jprb,6.2222e-02_jprb,6.8245e-02_jprb,7.4410e-02_jprb/)
kbo( :,46, 5) = (/&
&4.1575e-02_jprb,4.6220e-02_jprb,5.1187e-02_jprb,5.6431e-02_jprb,6.1814e-02_jprb/)
kbo( :,47, 5) = (/&
&3.3624e-02_jprb,3.7569e-02_jprb,4.1825e-02_jprb,4.6358e-02_jprb,5.1051e-02_jprb/)
kbo( :,48, 5) = (/&
&2.7133e-02_jprb,3.0477e-02_jprb,3.4127e-02_jprb,3.8049e-02_jprb,4.2137e-02_jprb/)
kbo( :,49, 5) = (/&
&2.1850e-02_jprb,2.4695e-02_jprb,2.7812e-02_jprb,3.1199e-02_jprb,3.4749e-02_jprb/)
kbo( :,50, 5) = (/&
&1.7588e-02_jprb,1.9999e-02_jprb,2.2640e-02_jprb,2.5547e-02_jprb,2.8612e-02_jprb/)
kbo( :,51, 5) = (/&
&1.4133e-02_jprb,1.6172e-02_jprb,1.8401e-02_jprb,2.0880e-02_jprb,2.3515e-02_jprb/)
kbo( :,52, 5) = (/&
&1.1330e-02_jprb,1.3052e-02_jprb,1.4932e-02_jprb,1.7041e-02_jprb,1.9304e-02_jprb/)
kbo( :,53, 5) = (/&
&9.0563e-03_jprb,1.0511e-02_jprb,1.2096e-02_jprb,1.3890e-02_jprb,1.5837e-02_jprb/)
kbo( :,54, 5) = (/&
&7.2337e-03_jprb,8.4542e-03_jprb,9.7774e-03_jprb,1.1280e-02_jprb,1.2936e-02_jprb/)
kbo( :,55, 5) = (/&
&5.7674e-03_jprb,6.7888e-03_jprb,7.8837e-03_jprb,9.1276e-03_jprb,1.0528e-02_jprb/)
kbo( :,56, 5) = (/&
&4.5854e-03_jprb,5.4402e-03_jprb,6.3461e-03_jprb,7.3755e-03_jprb,8.5458e-03_jprb/)
kbo( :,57, 5) = (/&
&3.6334e-03_jprb,4.3489e-03_jprb,5.0994e-03_jprb,5.9486e-03_jprb,6.9270e-03_jprb/)
kbo( :,58, 5) = (/&
&2.8784e-03_jprb,3.4761e-03_jprb,4.0992e-03_jprb,4.7976e-03_jprb,5.6122e-03_jprb/)
kbo( :,59, 5) = (/&
&2.3567e-03_jprb,2.8551e-03_jprb,3.3744e-03_jprb,3.9529e-03_jprb,4.6311e-03_jprb/)
kbo( :,13, 6) = (/&
&1.3830e+01_jprb,1.4015e+01_jprb,1.4160e+01_jprb,1.4307e+01_jprb,1.4522e+01_jprb/)
kbo( :,14, 6) = (/&
&1.2340e+01_jprb,1.2516e+01_jprb,1.2660e+01_jprb,1.2793e+01_jprb,1.2966e+01_jprb/)
kbo( :,15, 6) = (/&
&1.0924e+01_jprb,1.1092e+01_jprb,1.1224e+01_jprb,1.1351e+01_jprb,1.1516e+01_jprb/)
kbo( :,16, 6) = (/&
&9.6024e+00_jprb,9.7501e+00_jprb,9.8836e+00_jprb,1.0029e+01_jprb,1.0212e+01_jprb/)
kbo( :,17, 6) = (/&
&8.3708e+00_jprb,8.5153e+00_jprb,8.6644e+00_jprb,8.8329e+00_jprb,9.0401e+00_jprb/)
kbo( :,18, 6) = (/&
&7.2569e+00_jprb,7.4102e+00_jprb,7.5767e+00_jprb,7.7740e+00_jprb,8.0051e+00_jprb/)
kbo( :,19, 6) = (/&
&6.2750e+00_jprb,6.4411e+00_jprb,6.6283e+00_jprb,6.8499e+00_jprb,7.0924e+00_jprb/)
kbo( :,20, 6) = (/&
&5.4324e+00_jprb,5.6127e+00_jprb,5.8201e+00_jprb,6.0515e+00_jprb,6.2952e+00_jprb/)
kbo( :,21, 6) = (/&
&4.7199e+00_jprb,4.9098e+00_jprb,5.1220e+00_jprb,5.3512e+00_jprb,5.5929e+00_jprb/)
kbo( :,22, 6) = (/&
&4.1275e+00_jprb,4.3173e+00_jprb,4.5250e+00_jprb,4.7472e+00_jprb,4.9873e+00_jprb/)
kbo( :,23, 6) = (/&
&3.6186e+00_jprb,3.8008e+00_jprb,4.0007e+00_jprb,4.2194e+00_jprb,4.4546e+00_jprb/)
kbo( :,24, 6) = (/&
&3.1789e+00_jprb,3.3535e+00_jprb,3.5481e+00_jprb,3.7602e+00_jprb,3.9826e+00_jprb/)
kbo( :,25, 6) = (/&
&2.8009e+00_jprb,2.9702e+00_jprb,3.1571e+00_jprb,3.3553e+00_jprb,3.5661e+00_jprb/)
kbo( :,26, 6) = (/&
&2.4787e+00_jprb,2.6417e+00_jprb,2.8161e+00_jprb,3.0035e+00_jprb,3.2026e+00_jprb/)
kbo( :,27, 6) = (/&
&2.1990e+00_jprb,2.3537e+00_jprb,2.5197e+00_jprb,2.6976e+00_jprb,2.8845e+00_jprb/)
kbo( :,28, 6) = (/&
&1.9523e+00_jprb,2.1013e+00_jprb,2.2618e+00_jprb,2.4297e+00_jprb,2.6035e+00_jprb/)
kbo( :,29, 6) = (/&
&1.7370e+00_jprb,1.8823e+00_jprb,2.0367e+00_jprb,2.1958e+00_jprb,2.3561e+00_jprb/)
kbo( :,30, 6) = (/&
&1.5497e+00_jprb,1.6904e+00_jprb,1.8375e+00_jprb,1.9876e+00_jprb,2.1376e+00_jprb/)
kbo( :,31, 6) = (/&
&1.3874e+00_jprb,1.5222e+00_jprb,1.6617e+00_jprb,1.8040e+00_jprb,1.9446e+00_jprb/)
kbo( :,32, 6) = (/&
&1.2460e+00_jprb,1.3738e+00_jprb,1.5067e+00_jprb,1.6408e+00_jprb,1.7720e+00_jprb/)
kbo( :,33, 6) = (/&
&1.1223e+00_jprb,1.2436e+00_jprb,1.3697e+00_jprb,1.4955e+00_jprb,1.6172e+00_jprb/)
kbo( :,34, 6) = (/&
&1.0099e+00_jprb,1.1249e+00_jprb,1.2434e+00_jprb,1.3608e+00_jprb,1.4735e+00_jprb/)
kbo( :,35, 6) = (/&
&9.0209e-01_jprb,1.0096e+00_jprb,1.1199e+00_jprb,1.2299e+00_jprb,1.3354e+00_jprb/)
kbo( :,36, 6) = (/&
&7.9733e-01_jprb,8.9688e-01_jprb,9.9932e-01_jprb,1.1023e+00_jprb,1.2028e+00_jprb/)
kbo( :,37, 6) = (/&
&6.9211e-01_jprb,7.8344e-01_jprb,8.7821e-01_jprb,9.7443e-01_jprb,1.0708e+00_jprb/)
kbo( :,38, 6) = (/&
&6.0006e-01_jprb,6.8377e-01_jprb,7.7149e-01_jprb,8.6171e-01_jprb,9.5413e-01_jprb/)
kbo( :,39, 6) = (/&
&5.2043e-01_jprb,5.9726e-01_jprb,6.7852e-01_jprb,7.6343e-01_jprb,8.5244e-01_jprb/)
kbo( :,40, 6) = (/&
&4.4416e-01_jprb,5.1399e-01_jprb,5.8862e-01_jprb,6.6792e-01_jprb,7.5268e-01_jprb/)
kbo( :,41, 6) = (/&
&3.7776e-01_jprb,4.4092e-01_jprb,5.0931e-01_jprb,5.8308e-01_jprb,6.6368e-01_jprb/)
kbo( :,42, 6) = (/&
&3.2073e-01_jprb,3.7777e-01_jprb,4.4039e-01_jprb,5.0902e-01_jprb,5.8559e-01_jprb/)
kbo( :,43, 6) = (/&
&2.6920e-01_jprb,3.2022e-01_jprb,3.7707e-01_jprb,4.4047e-01_jprb,5.1263e-01_jprb/)
kbo( :,44, 6) = (/&
&2.2419e-01_jprb,2.6949e-01_jprb,3.2089e-01_jprb,3.7919e-01_jprb,4.4668e-01_jprb/)
kbo( :,45, 6) = (/&
&1.8610e-01_jprb,2.2623e-01_jprb,2.7250e-01_jprb,3.2589e-01_jprb,3.8881e-01_jprb/)
kbo( :,46, 6) = (/&
&1.5321e-01_jprb,1.8844e-01_jprb,2.2973e-01_jprb,2.7826e-01_jprb,3.3646e-01_jprb/)
kbo( :,47, 6) = (/&
&1.2434e-01_jprb,1.5480e-01_jprb,1.9116e-01_jprb,2.3462e-01_jprb,2.8768e-01_jprb/)
kbo( :,48, 6) = (/&
&1.0036e-01_jprb,1.2653e-01_jprb,1.5835e-01_jprb,1.9711e-01_jprb,2.4528e-01_jprb/)
kbo( :,49, 6) = (/&
&8.0612e-02_jprb,1.0295e-01_jprb,1.3061e-01_jprb,1.6496e-01_jprb,2.0845e-01_jprb/)
kbo( :,50, 6) = (/&
&6.4743e-02_jprb,8.3670e-02_jprb,1.0758e-01_jprb,1.3777e-01_jprb,1.7673e-01_jprb/)
kbo( :,51, 6) = (/&
&5.1836e-02_jprb,6.7752e-02_jprb,8.8282e-02_jprb,1.1466e-01_jprb,1.4926e-01_jprb/)
kbo( :,52, 6) = (/&
&4.1270e-02_jprb,5.4579e-02_jprb,7.2088e-02_jprb,9.5008e-02_jprb,1.2557e-01_jprb/)
kbo( :,53, 6) = (/&
&3.2703e-02_jprb,4.3723e-02_jprb,5.8551e-02_jprb,7.8358e-02_jprb,1.0523e-01_jprb/)
kbo( :,54, 6) = (/&
&2.5932e-02_jprb,3.5025e-02_jprb,4.7496e-02_jprb,6.4433e-02_jprb,8.7763e-02_jprb/)
kbo( :,55, 6) = (/&
&2.0516e-02_jprb,2.7980e-02_jprb,3.8384e-02_jprb,5.2720e-02_jprb,7.2773e-02_jprb/)
kbo( :,56, 6) = (/&
&1.6157e-02_jprb,2.2243e-02_jprb,3.0860e-02_jprb,4.2933e-02_jprb,6.0054e-02_jprb/)
kbo( :,57, 6) = (/&
&1.2662e-02_jprb,1.7594e-02_jprb,2.4676e-02_jprb,3.4773e-02_jprb,4.9299e-02_jprb/)
kbo( :,58, 6) = (/&
&9.9314e-03_jprb,1.3912e-02_jprb,1.9723e-02_jprb,2.8150e-02_jprb,4.0439e-02_jprb/)
kbo( :,59, 6) = (/&
&8.2224e-03_jprb,1.1623e-02_jprb,1.6659e-02_jprb,2.4055e-02_jprb,3.5006e-02_jprb/)
kbo( :,13, 7) = (/&
&2.6335e+01_jprb,2.6343e+01_jprb,2.6317e+01_jprb,2.6278e+01_jprb,2.6240e+01_jprb/)
kbo( :,14, 7) = (/&
&2.4335e+01_jprb,2.4368e+01_jprb,2.4378e+01_jprb,2.4360e+01_jprb,2.4346e+01_jprb/)
kbo( :,15, 7) = (/&
&2.2209e+01_jprb,2.2271e+01_jprb,2.2317e+01_jprb,2.2351e+01_jprb,2.2363e+01_jprb/)
kbo( :,16, 7) = (/&
&2.0041e+01_jprb,2.0151e+01_jprb,2.0235e+01_jprb,2.0297e+01_jprb,2.0322e+01_jprb/)
kbo( :,17, 7) = (/&
&1.7927e+01_jprb,1.8060e+01_jprb,1.8168e+01_jprb,1.8242e+01_jprb,1.8304e+01_jprb/)
kbo( :,18, 7) = (/&
&1.5898e+01_jprb,1.6045e+01_jprb,1.6164e+01_jprb,1.6266e+01_jprb,1.6378e+01_jprb/)
kbo( :,19, 7) = (/&
&1.3992e+01_jprb,1.4142e+01_jprb,1.4282e+01_jprb,1.4427e+01_jprb,1.4606e+01_jprb/)
kbo( :,20, 7) = (/&
&1.2229e+01_jprb,1.2396e+01_jprb,1.2574e+01_jprb,1.2781e+01_jprb,1.3031e+01_jprb/)
kbo( :,21, 7) = (/&
&1.0639e+01_jprb,1.0839e+01_jprb,1.1068e+01_jprb,1.1335e+01_jprb,1.1649e+01_jprb/)
kbo( :,22, 7) = (/&
&9.2636e+00_jprb,9.5053e+00_jprb,9.7840e+00_jprb,1.0108e+01_jprb,1.0461e+01_jprb/)
kbo( :,23, 7) = (/&
&8.0952e+00_jprb,8.3738e+00_jprb,8.6908e+00_jprb,9.0366e+00_jprb,9.4060e+00_jprb/)
kbo( :,24, 7) = (/&
&7.1130e+00_jprb,7.4146e+00_jprb,7.7429e+00_jprb,8.0993e+00_jprb,8.4864e+00_jprb/)
kbo( :,25, 7) = (/&
&6.2837e+00_jprb,6.5877e+00_jprb,6.9205e+00_jprb,7.2883e+00_jprb,7.6912e+00_jprb/)
kbo( :,26, 7) = (/&
&5.5745e+00_jprb,5.8760e+00_jprb,6.2151e+00_jprb,6.5923e+00_jprb,7.0080e+00_jprb/)
kbo( :,27, 7) = (/&
&4.9643e+00_jprb,5.2682e+00_jprb,5.6134e+00_jprb,5.9978e+00_jprb,6.4129e+00_jprb/)
kbo( :,28, 7) = (/&
&4.4473e+00_jprb,4.7539e+00_jprb,5.1020e+00_jprb,5.4857e+00_jprb,5.8980e+00_jprb/)
kbo( :,29, 7) = (/&
&4.0139e+00_jprb,4.3228e+00_jprb,4.6679e+00_jprb,5.0477e+00_jprb,5.4611e+00_jprb/)
kbo( :,30, 7) = (/&
&3.6503e+00_jprb,3.9570e+00_jprb,4.2982e+00_jprb,4.6765e+00_jprb,5.0904e+00_jprb/)
kbo( :,31, 7) = (/&
&3.3458e+00_jprb,3.6492e+00_jprb,3.9896e+00_jprb,4.3657e+00_jprb,4.7803e+00_jprb/)
kbo( :,32, 7) = (/&
&3.0885e+00_jprb,3.3924e+00_jprb,3.7326e+00_jprb,4.1089e+00_jprb,4.5242e+00_jprb/)
kbo( :,33, 7) = (/&
&2.8733e+00_jprb,3.1791e+00_jprb,3.5210e+00_jprb,3.8996e+00_jprb,4.3193e+00_jprb/)
kbo( :,34, 7) = (/&
&2.6844e+00_jprb,2.9924e+00_jprb,3.3348e+00_jprb,3.7181e+00_jprb,4.1445e+00_jprb/)
kbo( :,35, 7) = (/&
&2.4984e+00_jprb,2.8075e+00_jprb,3.1505e+00_jprb,3.5359e+00_jprb,3.9675e+00_jprb/)
kbo( :,36, 7) = (/&
&2.3072e+00_jprb,2.6159e+00_jprb,2.9582e+00_jprb,3.3431e+00_jprb,3.7763e+00_jprb/)
kbo( :,37, 7) = (/&
&2.0954e+00_jprb,2.4005e+00_jprb,2.7380e+00_jprb,3.1168e+00_jprb,3.5461e+00_jprb/)
kbo( :,38, 7) = (/&
&1.9034e+00_jprb,2.2055e+00_jprb,2.5402e+00_jprb,2.9151e+00_jprb,3.3403e+00_jprb/)
kbo( :,39, 7) = (/&
&1.7317e+00_jprb,2.0312e+00_jprb,2.3647e+00_jprb,2.7379e+00_jprb,3.1615e+00_jprb/)
kbo( :,40, 7) = (/&
&1.5481e+00_jprb,1.8407e+00_jprb,2.1704e+00_jprb,2.5377e+00_jprb,2.9544e+00_jprb/)
kbo( :,41, 7) = (/&
&1.3778e+00_jprb,1.6628e+00_jprb,1.9879e+00_jprb,2.3508e+00_jprb,2.7602e+00_jprb/)
kbo( :,42, 7) = (/&
&1.2232e+00_jprb,1.4999e+00_jprb,1.8203e+00_jprb,2.1797e+00_jprb,2.5828e+00_jprb/)
kbo( :,43, 7) = (/&
&1.0698e+00_jprb,1.3347e+00_jprb,1.6469e+00_jprb,2.0008e+00_jprb,2.3963e+00_jprb/)
kbo( :,44, 7) = (/&
&9.2588e-01_jprb,1.1760e+00_jprb,1.4777e+00_jprb,1.8247e+00_jprb,2.2132e+00_jprb/)
kbo( :,45, 7) = (/&
&7.9702e-01_jprb,1.0315e+00_jprb,1.3210e+00_jprb,1.6600e+00_jprb,2.0420e+00_jprb/)
kbo( :,46, 7) = (/&
&6.7818e-01_jprb,8.9459e-01_jprb,1.1684e+00_jprb,1.4973e+00_jprb,1.8716e+00_jprb/)
kbo( :,47, 7) = (/&
&5.6580e-01_jprb,7.6097e-01_jprb,1.0151e+00_jprb,1.3286e+00_jprb,1.6923e+00_jprb/)
kbo( :,48, 7) = (/&
&4.6791e-01_jprb,6.4213e-01_jprb,8.7532e-01_jprb,1.1714e+00_jprb,1.5227e+00_jprb/)
kbo( :,49, 7) = (/&
&3.8353e-01_jprb,5.3743e-01_jprb,7.4923e-01_jprb,1.0257e+00_jprb,1.3624e+00_jprb/)
kbo( :,50, 7) = (/&
&3.1398e-01_jprb,4.4906e-01_jprb,6.4014e-01_jprb,8.9685e-01_jprb,1.2172e+00_jprb/)
kbo( :,51, 7) = (/&
&2.5573e-01_jprb,3.7326e-01_jprb,5.4427e-01_jprb,7.8065e-01_jprb,1.0832e+00_jprb/)
kbo( :,52, 7) = (/&
&2.0647e-01_jprb,3.0764e-01_jprb,4.5931e-01_jprb,6.7487e-01_jprb,9.5820e-01_jprb/)
kbo( :,53, 7) = (/&
&1.6527e-01_jprb,2.5130e-01_jprb,3.8436e-01_jprb,5.7911e-01_jprb,8.4227e-01_jprb/)
kbo( :,54, 7) = (/&
&1.3250e-01_jprb,2.0520e-01_jprb,3.2144e-01_jprb,4.9663e-01_jprb,7.3948e-01_jprb/)
kbo( :,55, 7) = (/&
&1.0586e-01_jprb,1.6687e-01_jprb,2.6744e-01_jprb,4.2379e-01_jprb,6.4623e-01_jprb/)
kbo( :,56, 7) = (/&
&8.3917e-02_jprb,1.3459e-01_jprb,2.2056e-01_jprb,3.5886e-01_jprb,5.6114e-01_jprb/)
kbo( :,57, 7) = (/&
&6.5997e-02_jprb,1.0758e-01_jprb,1.8019e-01_jprb,3.0131e-01_jprb,4.8364e-01_jprb/)
kbo( :,58, 7) = (/&
&5.1899e-02_jprb,8.5940e-02_jprb,1.4705e-01_jprb,2.5263e-01_jprb,4.1642e-01_jprb/)
kbo( :,59, 7) = (/&
&4.4275e-02_jprb,7.4915e-02_jprb,1.3121e-01_jprb,2.3019e-01_jprb,3.8591e-01_jprb/)
kbo( :,13, 8) = (/&
&5.0965e+01_jprb,5.0361e+01_jprb,4.9768e+01_jprb,4.9177e+01_jprb,4.8632e+01_jprb/)
kbo( :,14, 8) = (/&
&4.9580e+01_jprb,4.9133e+01_jprb,4.8669e+01_jprb,4.8207e+01_jprb,4.7744e+01_jprb/)
kbo( :,15, 8) = (/&
&4.7755e+01_jprb,4.7423e+01_jprb,4.7054e+01_jprb,4.6684e+01_jprb,4.6310e+01_jprb/)
kbo( :,16, 8) = (/&
&4.5437e+01_jprb,4.5197e+01_jprb,4.4948e+01_jprb,4.4674e+01_jprb,4.4398e+01_jprb/)
kbo( :,17, 8) = (/&
&4.2668e+01_jprb,4.2548e+01_jprb,4.2401e+01_jprb,4.2228e+01_jprb,4.2024e+01_jprb/)
kbo( :,18, 8) = (/&
&3.9590e+01_jprb,3.9566e+01_jprb,3.9492e+01_jprb,3.9393e+01_jprb,3.9273e+01_jprb/)
kbo( :,19, 8) = (/&
&3.6298e+01_jprb,3.6335e+01_jprb,3.6351e+01_jprb,3.6334e+01_jprb,3.6282e+01_jprb/)
kbo( :,20, 8) = (/&
&3.2906e+01_jprb,3.3017e+01_jprb,3.3099e+01_jprb,3.3142e+01_jprb,3.3168e+01_jprb/)
kbo( :,21, 8) = (/&
&2.9547e+01_jprb,2.9709e+01_jprb,2.9845e+01_jprb,2.9969e+01_jprb,3.0103e+01_jprb/)
kbo( :,22, 8) = (/&
&2.6311e+01_jprb,2.6524e+01_jprb,2.6733e+01_jprb,2.6954e+01_jprb,2.7222e+01_jprb/)
kbo( :,23, 8) = (/&
&2.3277e+01_jprb,2.3556e+01_jprb,2.3854e+01_jprb,2.4204e+01_jprb,2.4638e+01_jprb/)
kbo( :,24, 8) = (/&
&2.0517e+01_jprb,2.0874e+01_jprb,2.1304e+01_jprb,2.1801e+01_jprb,2.2391e+01_jprb/)
kbo( :,25, 8) = (/&
&1.8081e+01_jprb,1.8550e+01_jprb,1.9103e+01_jprb,1.9746e+01_jprb,2.0474e+01_jprb/)
kbo( :,26, 8) = (/&
&1.6011e+01_jprb,1.6594e+01_jprb,1.7264e+01_jprb,1.8029e+01_jprb,1.8873e+01_jprb/)
kbo( :,27, 8) = (/&
&1.4287e+01_jprb,1.4961e+01_jprb,1.5728e+01_jprb,1.6587e+01_jprb,1.7528e+01_jprb/)
kbo( :,28, 8) = (/&
&1.2856e+01_jprb,1.3605e+01_jprb,1.4442e+01_jprb,1.5375e+01_jprb,1.6398e+01_jprb/)
kbo( :,29, 8) = (/&
&1.1675e+01_jprb,1.2478e+01_jprb,1.3380e+01_jprb,1.4384e+01_jprb,1.5477e+01_jprb/)
kbo( :,30, 8) = (/&
&1.0695e+01_jprb,1.1550e+01_jprb,1.2511e+01_jprb,1.3578e+01_jprb,1.4743e+01_jprb/)
kbo( :,31, 8) = (/&
&9.8981e+00_jprb,1.0807e+01_jprb,1.1824e+01_jprb,1.2957e+01_jprb,1.4200e+01_jprb/)
kbo( :,32, 8) = (/&
&9.2617e+00_jprb,1.0217e+01_jprb,1.1294e+01_jprb,1.2501e+01_jprb,1.3819e+01_jprb/)
kbo( :,33, 8) = (/&
&8.7596e+00_jprb,9.7694e+00_jprb,1.0911e+01_jprb,1.2196e+01_jprb,1.3598e+01_jprb/)
kbo( :,34, 8) = (/&
&8.3433e+00_jprb,9.4056e+00_jprb,1.0617e+01_jprb,1.1977e+01_jprb,1.3459e+01_jprb/)
kbo( :,35, 8) = (/&
&7.9357e+00_jprb,9.0427e+00_jprb,1.0314e+01_jprb,1.1736e+01_jprb,1.3286e+01_jprb/)
kbo( :,36, 8) = (/&
&7.5046e+00_jprb,8.6413e+00_jprb,9.9524e+00_jprb,1.1425e+01_jprb,1.3024e+01_jprb/)
kbo( :,37, 8) = (/&
&6.9879e+00_jprb,8.1265e+00_jprb,9.4503e+00_jprb,1.0942e+01_jprb,1.2567e+01_jprb/)
kbo( :,38, 8) = (/&
&6.5288e+00_jprb,7.6643e+00_jprb,8.9952e+00_jprb,1.0502e+01_jprb,1.2144e+01_jprb/)
kbo( :,39, 8) = (/&
&6.1286e+00_jprb,7.2600e+00_jprb,8.5928e+00_jprb,1.0109e+01_jprb,1.1767e+01_jprb/)
kbo( :,40, 8) = (/&
&5.6684e+00_jprb,6.7740e+00_jprb,8.0799e+00_jprb,9.5804e+00_jprb,1.1233e+01_jprb/)
kbo( :,41, 8) = (/&
&5.2402e+00_jprb,6.3138e+00_jprb,7.5882e+00_jprb,9.0624e+00_jprb,1.0701e+01_jprb/)
kbo( :,42, 8) = (/&
&4.8506e+00_jprb,5.8918e+00_jprb,7.1323e+00_jprb,8.5740e+00_jprb,1.0194e+01_jprb/)
kbo( :,43, 8) = (/&
&4.4438e+00_jprb,5.4412e+00_jprb,6.6345e+00_jprb,8.0293e+00_jprb,9.6145e+00_jprb/)
kbo( :,44, 8) = (/&
&4.0493e+00_jprb,4.9983e+00_jprb,6.1400e+00_jprb,7.4797e+00_jprb,9.0187e+00_jprb/)
kbo( :,45, 8) = (/&
&3.6876e+00_jprb,4.5888e+00_jprb,5.6785e+00_jprb,6.9623e+00_jprb,8.4500e+00_jprb/)
kbo( :,46, 8) = (/&
&3.3383e+00_jprb,4.1880e+00_jprb,5.2207e+00_jprb,6.4454e+00_jprb,7.8745e+00_jprb/)
kbo( :,47, 8) = (/&
&2.9856e+00_jprb,3.7780e+00_jprb,4.7472e+00_jprb,5.9041e+00_jprb,7.2615e+00_jprb/)
kbo( :,48, 8) = (/&
&2.6572e+00_jprb,3.4003e+00_jprb,4.3078e+00_jprb,5.3986e+00_jprb,6.6852e+00_jprb/)
kbo( :,49, 8) = (/&
&2.3488e+00_jprb,3.0535e+00_jprb,3.9013e+00_jprb,4.9276e+00_jprb,6.1472e+00_jprb/)
kbo( :,50, 8) = (/&
&2.0729e+00_jprb,2.7473e+00_jprb,3.5436e+00_jprb,4.5091e+00_jprb,5.6655e+00_jprb/)
kbo( :,51, 8) = (/&
&1.8206e+00_jprb,2.4651e+00_jprb,3.2190e+00_jprb,4.1264e+00_jprb,5.2204e+00_jprb/)
kbo( :,52, 8) = (/&
&1.5859e+00_jprb,2.1977e+00_jprb,2.9176e+00_jprb,3.7698e+00_jprb,4.8036e+00_jprb/)
kbo( :,53, 8) = (/&
&1.3682e+00_jprb,1.9445e+00_jprb,2.6333e+00_jprb,3.4378e+00_jprb,4.4138e+00_jprb/)
kbo( :,54, 8) = (/&
&1.1812e+00_jprb,1.7215e+00_jprb,2.3803e+00_jprb,3.1453e+00_jprb,4.0633e+00_jprb/)
kbo( :,55, 8) = (/&
&1.0150e+00_jprb,1.5193e+00_jprb,2.1463e+00_jprb,2.8770e+00_jprb,3.7398e+00_jprb/)
kbo( :,56, 8) = (/&
&8.6368e-01_jprb,1.3309e+00_jprb,1.9241e+00_jprb,2.6237e+00_jprb,3.4375e+00_jprb/)
kbo( :,57, 8) = (/&
&7.2682e-01_jprb,1.1556e+00_jprb,1.7137e+00_jprb,2.3824e+00_jprb,3.1551e+00_jprb/)
kbo( :,58, 8) = (/&
&6.0967e-01_jprb,1.0012e+00_jprb,1.5247e+00_jprb,2.1627e+00_jprb,2.9020e+00_jprb/)
kbo( :,59, 8) = (/&
&5.5853e-01_jprb,9.3598e-01_jprb,1.4448e+00_jprb,2.0692e+00_jprb,2.7925e+00_jprb/)
kbo( :,13, 9) = (/&
&9.9288e+01_jprb,9.7856e+01_jprb,9.6419e+01_jprb,9.4961e+01_jprb,9.3473e+01_jprb/)
kbo( :,14, 9) = (/&
&1.0412e+02_jprb,1.0269e+02_jprb,1.0123e+02_jprb,9.9736e+01_jprb,9.8238e+01_jprb/)
kbo( :,15, 9) = (/&
&1.0817e+02_jprb,1.0679e+02_jprb,1.0540e+02_jprb,1.0396e+02_jprb,1.0249e+02_jprb/)
kbo( :,16, 9) = (/&
&1.1129e+02_jprb,1.1004e+02_jprb,1.0873e+02_jprb,1.0740e+02_jprb,1.0603e+02_jprb/)
kbo( :,17, 9) = (/&
&1.1340e+02_jprb,1.1230e+02_jprb,1.1113e+02_jprb,1.0995e+02_jprb,1.0873e+02_jprb/)
kbo( :,18, 9) = (/&
&1.1434e+02_jprb,1.1342e+02_jprb,1.1248e+02_jprb,1.1144e+02_jprb,1.1034e+02_jprb/)
kbo( :,19, 9) = (/&
&1.1401e+02_jprb,1.1333e+02_jprb,1.1256e+02_jprb,1.1172e+02_jprb,1.1083e+02_jprb/)
kbo( :,20, 9) = (/&
&1.1234e+02_jprb,1.1193e+02_jprb,1.1143e+02_jprb,1.1085e+02_jprb,1.1019e+02_jprb/)
kbo( :,21, 9) = (/&
&1.0946e+02_jprb,1.0935e+02_jprb,1.0914e+02_jprb,1.0884e+02_jprb,1.0846e+02_jprb/)
kbo( :,22, 9) = (/&
&1.0557e+02_jprb,1.0577e+02_jprb,1.0588e+02_jprb,1.0590e+02_jprb,1.0584e+02_jprb/)
kbo( :,23, 9) = (/&
&1.0094e+02_jprb,1.0149e+02_jprb,1.0194e+02_jprb,1.0233e+02_jprb,1.0260e+02_jprb/)
kbo( :,24, 9) = (/&
&9.5817e+01_jprb,9.6736e+01_jprb,9.7569e+01_jprb,9.8330e+01_jprb,9.9010e+01_jprb/)
kbo( :,25, 9) = (/&
&9.0469e+01_jprb,9.1797e+01_jprb,9.3074e+01_jprb,9.4238e+01_jprb,9.5339e+01_jprb/)
kbo( :,26, 9) = (/&
&8.5212e+01_jprb,8.6963e+01_jprb,8.8676e+01_jprb,9.0313e+01_jprb,9.1842e+01_jprb/)
kbo( :,27, 9) = (/&
&8.0235e+01_jprb,8.2437e+01_jprb,8.4599e+01_jprb,8.6731e+01_jprb,8.8747e+01_jprb/)
kbo( :,28, 9) = (/&
&7.5722e+01_jprb,7.8382e+01_jprb,8.1040e+01_jprb,8.3660e+01_jprb,8.6177e+01_jprb/)
kbo( :,29, 9) = (/&
&7.1851e+01_jprb,7.4992e+01_jprb,7.8130e+01_jprb,8.1223e+01_jprb,8.4209e+01_jprb/)
kbo( :,30, 9) = (/&
&6.8679e+01_jprb,7.2286e+01_jprb,7.5891e+01_jprb,7.9421e+01_jprb,8.2811e+01_jprb/)
kbo( :,31, 9) = (/&
&6.6225e+01_jprb,7.0279e+01_jprb,7.4326e+01_jprb,7.8245e+01_jprb,8.1966e+01_jprb/)
kbo( :,32, 9) = (/&
&6.4479e+01_jprb,6.8946e+01_jprb,7.3367e+01_jprb,7.7627e+01_jprb,8.1643e+01_jprb/)
kbo( :,33, 9) = (/&
&6.3393e+01_jprb,6.8225e+01_jprb,7.2967e+01_jprb,7.7506e+01_jprb,8.1771e+01_jprb/)
kbo( :,34, 9) = (/&
&6.2705e+01_jprb,6.7842e+01_jprb,7.2848e+01_jprb,7.7622e+01_jprb,8.2086e+01_jprb/)
kbo( :,35, 9) = (/&
&6.1970e+01_jprb,6.7369e+01_jprb,7.2611e+01_jprb,7.7614e+01_jprb,8.2278e+01_jprb/)
kbo( :,36, 9) = (/&
&6.0967e+01_jprb,6.6598e+01_jprb,7.2072e+01_jprb,7.7300e+01_jprb,8.2185e+01_jprb/)
kbo( :,37, 9) = (/&
&5.9279e+01_jprb,6.5142e+01_jprb,7.0846e+01_jprb,7.6292e+01_jprb,8.1436e+01_jprb/)
kbo( :,38, 9) = (/&
&5.7701e+01_jprb,6.3776e+01_jprb,6.9699e+01_jprb,7.5382e+01_jprb,8.0760e+01_jprb/)
kbo( :,39, 9) = (/&
&5.6270e+01_jprb,6.2546e+01_jprb,6.8688e+01_jprb,7.4617e+01_jprb,8.0162e+01_jprb/)
kbo( :,40, 9) = (/&
&5.4230e+01_jprb,6.0690e+01_jprb,6.6996e+01_jprb,7.3138e+01_jprb,7.8857e+01_jprb/)
kbo( :,41, 9) = (/&
&5.2156e+01_jprb,5.8758e+01_jprb,6.5235e+01_jprb,7.1572e+01_jprb,7.7464e+01_jprb/)
kbo( :,42, 9) = (/&
&5.0129e+01_jprb,5.6855e+01_jprb,6.3499e+01_jprb,7.0016e+01_jprb,7.6080e+01_jprb/)
kbo( :,43, 9) = (/&
&4.7760e+01_jprb,5.4598e+01_jprb,6.1399e+01_jprb,6.8099e+01_jprb,7.4350e+01_jprb/)
kbo( :,44, 9) = (/&
&4.5249e+01_jprb,5.2184e+01_jprb,5.9131e+01_jprb,6.6010e+01_jprb,7.2452e+01_jprb/)
kbo( :,45, 9) = (/&
&4.2770e+01_jprb,4.9790e+01_jprb,5.6875e+01_jprb,6.3919e+01_jprb,7.0547e+01_jprb/)
kbo( :,46, 9) = (/&
&4.0163e+01_jprb,4.7243e+01_jprb,5.4479e+01_jprb,6.1655e+01_jprb,6.8464e+01_jprb/)
kbo( :,47, 9) = (/&
&3.7279e+01_jprb,4.4372e+01_jprb,5.1688e+01_jprb,5.9007e+01_jprb,6.6000e+01_jprb/)
kbo( :,48, 9) = (/&
&3.4455e+01_jprb,4.1531e+01_jprb,4.8914e+01_jprb,5.6355e+01_jprb,6.3516e+01_jprb/)
kbo( :,49, 9) = (/&
&3.1707e+01_jprb,3.8733e+01_jprb,4.6179e+01_jprb,5.3719e+01_jprb,6.1038e+01_jprb/)
kbo( :,50, 9) = (/&
&2.9168e+01_jprb,3.6084e+01_jprb,4.3531e+01_jprb,5.1127e+01_jprb,5.8574e+01_jprb/)
kbo( :,51, 9) = (/&
&2.6765e+01_jprb,3.3523e+01_jprb,4.0920e+01_jprb,4.8550e+01_jprb,5.6098e+01_jprb/)
kbo( :,52, 9) = (/&
&2.4432e+01_jprb,3.1037e+01_jprb,3.8359e+01_jprb,4.5995e+01_jprb,5.3635e+01_jprb/)
kbo( :,53, 9) = (/&
&2.2208e+01_jprb,2.8629e+01_jprb,3.5855e+01_jprb,4.3474e+01_jprb,5.1186e+01_jprb/)
kbo( :,54, 9) = (/&
&2.0205e+01_jprb,2.6401e+01_jprb,3.3414e+01_jprb,4.0973e+01_jprb,4.8699e+01_jprb/)
kbo( :,55, 9) = (/&
&1.8353e+01_jprb,2.4282e+01_jprb,3.1024e+01_jprb,3.8470e+01_jprb,4.6173e+01_jprb/)
kbo( :,56, 9) = (/&
&1.6601e+01_jprb,2.2262e+01_jprb,2.8733e+01_jprb,3.6003e+01_jprb,4.3640e+01_jprb/)
kbo( :,57, 9) = (/&
&1.4942e+01_jprb,2.0332e+01_jprb,2.6541e+01_jprb,3.3571e+01_jprb,4.1137e+01_jprb/)
kbo( :,58, 9) = (/&
&1.3455e+01_jprb,1.8580e+01_jprb,2.4530e+01_jprb,3.1284e+01_jprb,3.8733e+01_jprb/)
kbo( :,59, 9) = (/&
&1.2865e+01_jprb,1.7859e+01_jprb,2.3642e+01_jprb,3.0152e+01_jprb,3.7359e+01_jprb/)
kbo( :,13,10) = (/&
&1.4836e+02_jprb,1.4604e+02_jprb,1.4370e+02_jprb,1.4155e+02_jprb,1.3951e+02_jprb/)
kbo( :,14,10) = (/&
&1.6431e+02_jprb,1.6174e+02_jprb,1.5931e+02_jprb,1.5707e+02_jprb,1.5447e+02_jprb/)
kbo( :,15,10) = (/&
&1.8088e+02_jprb,1.7844e+02_jprb,1.7598e+02_jprb,1.7321e+02_jprb,1.7049e+02_jprb/)
kbo( :,16,10) = (/&
&1.9837e+02_jprb,1.9582e+02_jprb,1.9294e+02_jprb,1.9007e+02_jprb,1.8732e+02_jprb/)
kbo( :,17,10) = (/&
&2.1550e+02_jprb,2.1268e+02_jprb,2.0959e+02_jprb,2.0637e+02_jprb,2.0299e+02_jprb/)
kbo( :,18,10) = (/&
&2.3147e+02_jprb,2.2811e+02_jprb,2.2491e+02_jprb,2.2179e+02_jprb,2.1873e+02_jprb/)
kbo( :,19,10) = (/&
&2.4561e+02_jprb,2.4282e+02_jprb,2.3998e+02_jprb,2.3673e+02_jprb,2.3333e+02_jprb/)
kbo( :,20,10) = (/&
&2.5875e+02_jprb,2.5597e+02_jprb,2.5299e+02_jprb,2.4975e+02_jprb,2.4650e+02_jprb/)
kbo( :,21,10) = (/&
&2.6956e+02_jprb,2.6694e+02_jprb,2.6416e+02_jprb,2.6126e+02_jprb,2.5829e+02_jprb/)
kbo( :,22,10) = (/&
&2.7742e+02_jprb,2.7556e+02_jprb,2.7346e+02_jprb,2.7109e+02_jprb,2.6822e+02_jprb/)
kbo( :,23,10) = (/&
&2.8259e+02_jprb,2.8167e+02_jprb,2.8054e+02_jprb,2.7877e+02_jprb,2.7640e+02_jprb/)
kbo( :,24,10) = (/&
&2.8579e+02_jprb,2.8593e+02_jprb,2.8555e+02_jprb,2.8452e+02_jprb,2.8281e+02_jprb/)
kbo( :,25,10) = (/&
&2.8759e+02_jprb,2.8855e+02_jprb,2.8897e+02_jprb,2.8899e+02_jprb,2.8805e+02_jprb/)
kbo( :,26,10) = (/&
&2.8827e+02_jprb,2.9039e+02_jprb,2.9171e+02_jprb,2.9254e+02_jprb,2.9232e+02_jprb/)
kbo( :,27,10) = (/&
&2.8831e+02_jprb,2.9160e+02_jprb,2.9410e+02_jprb,2.9547e+02_jprb,2.9582e+02_jprb/)
kbo( :,28,10) = (/&
&2.8830e+02_jprb,2.9281e+02_jprb,2.9591e+02_jprb,2.9817e+02_jprb,2.9880e+02_jprb/)
kbo( :,29,10) = (/&
&2.8819e+02_jprb,2.9390e+02_jprb,2.9762e+02_jprb,3.0035e+02_jprb,3.0140e+02_jprb/)
kbo( :,30,10) = (/&
&2.8853e+02_jprb,2.9509e+02_jprb,2.9931e+02_jprb,3.0230e+02_jprb,3.0384e+02_jprb/)
kbo( :,31,10) = (/&
&2.8941e+02_jprb,2.9638e+02_jprb,3.0093e+02_jprb,3.0407e+02_jprb,3.0610e+02_jprb/)
kbo( :,32,10) = (/&
&2.9067e+02_jprb,2.9787e+02_jprb,3.0275e+02_jprb,3.0577e+02_jprb,3.0795e+02_jprb/)
kbo( :,33,10) = (/&
&2.9222e+02_jprb,2.9942e+02_jprb,3.0456e+02_jprb,3.0752e+02_jprb,3.0966e+02_jprb/)
kbo( :,34,10) = (/&
&2.9363e+02_jprb,3.0091e+02_jprb,3.0608e+02_jprb,3.0904e+02_jprb,3.1115e+02_jprb/)
kbo( :,35,10) = (/&
&2.9423e+02_jprb,3.0182e+02_jprb,3.0717e+02_jprb,3.1018e+02_jprb,3.1229e+02_jprb/)
kbo( :,36,10) = (/&
&2.9400e+02_jprb,3.0205e+02_jprb,3.0771e+02_jprb,3.1091e+02_jprb,3.1314e+02_jprb/)
kbo( :,37,10) = (/&
&2.9277e+02_jprb,3.0116e+02_jprb,3.0745e+02_jprb,3.1132e+02_jprb,3.1369e+02_jprb/)
kbo( :,38,10) = (/&
&2.9103e+02_jprb,3.0008e+02_jprb,3.0698e+02_jprb,3.1126e+02_jprb,3.1405e+02_jprb/)
kbo( :,39,10) = (/&
&2.8923e+02_jprb,2.9890e+02_jprb,3.0637e+02_jprb,3.1107e+02_jprb,3.1517e+02_jprb/)
kbo( :,40,10) = (/&
&2.8609e+02_jprb,2.9711e+02_jprb,3.0497e+02_jprb,3.1036e+02_jprb,3.1550e+02_jprb/)
kbo( :,41,10) = (/&
&2.8252e+02_jprb,2.9448e+02_jprb,3.0316e+02_jprb,3.0942e+02_jprb,3.1556e+02_jprb/)
kbo( :,42,10) = (/&
&2.7862e+02_jprb,2.9160e+02_jprb,3.0113e+02_jprb,3.0834e+02_jprb,3.1556e+02_jprb/)
kbo( :,43,10) = (/&
&2.7361e+02_jprb,2.8779e+02_jprb,2.9836e+02_jprb,3.0666e+02_jprb,3.1512e+02_jprb/)
kbo( :,44,10) = (/&
&2.6782e+02_jprb,2.8324e+02_jprb,2.9499e+02_jprb,3.0453e+02_jprb,3.1441e+02_jprb/)
kbo( :,45,10) = (/&
&2.6165e+02_jprb,2.7823e+02_jprb,2.9120e+02_jprb,3.0219e+02_jprb,3.1362e+02_jprb/)
kbo( :,46,10) = (/&
&2.5462e+02_jprb,2.7249e+02_jprb,2.8693e+02_jprb,2.9929e+02_jprb,3.1228e+02_jprb/)
kbo( :,47,10) = (/&
&2.4622e+02_jprb,2.6556e+02_jprb,2.8145e+02_jprb,2.9525e+02_jprb,3.0983e+02_jprb/)
kbo( :,48,10) = (/&
&2.3713e+02_jprb,2.5803e+02_jprb,2.7541e+02_jprb,2.9095e+02_jprb,3.0719e+02_jprb/)
kbo( :,49,10) = (/&
&2.2739e+02_jprb,2.4986e+02_jprb,2.6881e+02_jprb,2.8662e+02_jprb,3.0453e+02_jprb/)
kbo( :,50,10) = (/&
&2.1772e+02_jprb,2.4169e+02_jprb,2.6202e+02_jprb,2.8158e+02_jprb,3.0094e+02_jprb/)
kbo( :,51,10) = (/&
&2.0784e+02_jprb,2.3330e+02_jprb,2.5496e+02_jprb,2.7591e+02_jprb,2.9666e+02_jprb/)
kbo( :,52,10) = (/&
&1.9746e+02_jprb,2.2442e+02_jprb,2.4742e+02_jprb,2.7004e+02_jprb,2.9216e+02_jprb/)
kbo( :,53,10) = (/&
&1.8667e+02_jprb,2.1498e+02_jprb,2.3949e+02_jprb,2.6404e+02_jprb,2.8766e+02_jprb/)
kbo( :,54,10) = (/&
&1.7641e+02_jprb,2.0557e+02_jprb,2.3152e+02_jprb,2.5629e+02_jprb,2.8134e+02_jprb/)
kbo( :,55,10) = (/&
&1.6630e+02_jprb,1.9645e+02_jprb,2.2352e+02_jprb,2.4801e+02_jprb,2.7356e+02_jprb/)
kbo( :,56,10) = (/&
&1.5594e+02_jprb,1.8700e+02_jprb,2.1520e+02_jprb,2.3992e+02_jprb,2.6576e+02_jprb/)
kbo( :,57,10) = (/&
&1.4539e+02_jprb,1.7728e+02_jprb,2.0648e+02_jprb,2.3204e+02_jprb,2.5725e+02_jprb/)
kbo( :,58,10) = (/&
&1.3524e+02_jprb,1.6780e+02_jprb,1.9789e+02_jprb,2.2459e+02_jprb,2.4918e+02_jprb/)
kbo( :,59,10) = (/&
&1.3112e+02_jprb,1.6391e+02_jprb,1.9433e+02_jprb,2.2152e+02_jprb,2.4535e+02_jprb/)
kbo( :,13,11) = (/&
&1.6552e+02_jprb,1.6259e+02_jprb,1.5976e+02_jprb,1.5701e+02_jprb,1.5440e+02_jprb/)
kbo( :,14,11) = (/&
&1.8516e+02_jprb,1.8233e+02_jprb,1.7933e+02_jprb,1.7635e+02_jprb,1.7362e+02_jprb/)
kbo( :,15,11) = (/&
&2.0794e+02_jprb,2.0481e+02_jprb,2.0174e+02_jprb,1.9859e+02_jprb,1.9534e+02_jprb/)
kbo( :,16,11) = (/&
&2.3251e+02_jprb,2.2934e+02_jprb,2.2596e+02_jprb,2.2193e+02_jprb,2.1747e+02_jprb/)
kbo( :,17,11) = (/&
&2.5822e+02_jprb,2.5449e+02_jprb,2.5028e+02_jprb,2.4575e+02_jprb,2.4111e+02_jprb/)
kbo( :,18,11) = (/&
&2.8377e+02_jprb,2.7983e+02_jprb,2.7512e+02_jprb,2.7022e+02_jprb,2.6507e+02_jprb/)
kbo( :,19,11) = (/&
&3.0872e+02_jprb,3.0403e+02_jprb,2.9887e+02_jprb,2.9373e+02_jprb,2.8833e+02_jprb/)
kbo( :,20,11) = (/&
&3.3154e+02_jprb,3.2667e+02_jprb,3.2149e+02_jprb,3.1658e+02_jprb,3.1110e+02_jprb/)
kbo( :,21,11) = (/&
&3.5303e+02_jprb,3.4859e+02_jprb,3.4368e+02_jprb,3.3863e+02_jprb,3.3281e+02_jprb/)
kbo( :,22,11) = (/&
&3.7308e+02_jprb,3.6866e+02_jprb,3.6382e+02_jprb,3.5853e+02_jprb,3.5259e+02_jprb/)
kbo( :,23,11) = (/&
&3.9085e+02_jprb,3.8660e+02_jprb,3.8185e+02_jprb,3.7650e+02_jprb,3.7123e+02_jprb/)
kbo( :,24,11) = (/&
&4.0631e+02_jprb,4.0255e+02_jprb,3.9828e+02_jprb,3.9348e+02_jprb,3.8793e+02_jprb/)
kbo( :,25,11) = (/&
&4.1938e+02_jprb,4.1686e+02_jprb,4.1282e+02_jprb,4.0821e+02_jprb,4.0269e+02_jprb/)
kbo( :,26,11) = (/&
&4.3004e+02_jprb,4.2864e+02_jprb,4.2545e+02_jprb,4.2097e+02_jprb,4.1544e+02_jprb/)
kbo( :,27,11) = (/&
&4.3932e+02_jprb,4.3875e+02_jprb,4.3604e+02_jprb,4.3201e+02_jprb,4.2641e+02_jprb/)
kbo( :,28,11) = (/&
&4.4708e+02_jprb,4.4715e+02_jprb,4.4516e+02_jprb,4.4121e+02_jprb,4.3584e+02_jprb/)
kbo( :,29,11) = (/&
&4.5390e+02_jprb,4.5431e+02_jprb,4.5282e+02_jprb,4.4905e+02_jprb,4.4353e+02_jprb/)
kbo( :,30,11) = (/&
&4.5978e+02_jprb,4.6051e+02_jprb,4.5914e+02_jprb,4.5563e+02_jprb,4.4966e+02_jprb/)
kbo( :,31,11) = (/&
&4.6502e+02_jprb,4.6582e+02_jprb,4.6429e+02_jprb,4.6092e+02_jprb,4.5451e+02_jprb/)
kbo( :,32,11) = (/&
&4.6952e+02_jprb,4.7023e+02_jprb,4.6854e+02_jprb,4.6499e+02_jprb,4.5830e+02_jprb/)
kbo( :,33,11) = (/&
&4.7348e+02_jprb,4.7409e+02_jprb,4.7192e+02_jprb,4.6794e+02_jprb,4.6103e+02_jprb/)
kbo( :,34,11) = (/&
&4.7685e+02_jprb,4.7731e+02_jprb,4.7475e+02_jprb,4.7028e+02_jprb,4.6319e+02_jprb/)
kbo( :,35,11) = (/&
&4.7958e+02_jprb,4.8002e+02_jprb,4.7736e+02_jprb,4.7259e+02_jprb,4.6551e+02_jprb/)
kbo( :,36,11) = (/&
&4.8169e+02_jprb,4.8240e+02_jprb,4.7987e+02_jprb,4.7499e+02_jprb,4.6813e+02_jprb/)
kbo( :,37,11) = (/&
&4.8298e+02_jprb,4.8446e+02_jprb,4.8243e+02_jprb,4.7809e+02_jprb,4.7147e+02_jprb/)
kbo( :,38,11) = (/&
&4.8394e+02_jprb,4.8606e+02_jprb,4.8459e+02_jprb,4.8068e+02_jprb,4.7405e+02_jprb/)
kbo( :,39,11) = (/&
&4.8451e+02_jprb,4.8733e+02_jprb,4.8637e+02_jprb,4.8291e+02_jprb,4.7658e+02_jprb/)
kbo( :,40,11) = (/&
&4.8421e+02_jprb,4.8736e+02_jprb,4.8800e+02_jprb,4.8523e+02_jprb,4.7946e+02_jprb/)
kbo( :,41,11) = (/&
&4.8335e+02_jprb,4.8764e+02_jprb,4.8927e+02_jprb,4.8717e+02_jprb,4.8206e+02_jprb/)
kbo( :,42,11) = (/&
&4.8204e+02_jprb,4.8748e+02_jprb,4.9006e+02_jprb,4.8875e+02_jprb,4.8434e+02_jprb/)
kbo( :,43,11) = (/&
&4.7975e+02_jprb,4.8654e+02_jprb,4.9041e+02_jprb,4.9008e+02_jprb,4.8652e+02_jprb/)
kbo( :,44,11) = (/&
&4.7655e+02_jprb,4.8494e+02_jprb,4.9019e+02_jprb,4.9098e+02_jprb,4.8839e+02_jprb/)
kbo( :,45,11) = (/&
&4.7253e+02_jprb,4.8276e+02_jprb,4.8943e+02_jprb,4.9145e+02_jprb,4.9003e+02_jprb/)
kbo( :,46,11) = (/&
&4.6734e+02_jprb,4.7968e+02_jprb,4.8743e+02_jprb,4.9144e+02_jprb,4.9142e+02_jprb/)
kbo( :,47,11) = (/&
&4.6037e+02_jprb,4.7532e+02_jprb,4.8503e+02_jprb,4.9075e+02_jprb,4.9230e+02_jprb/)
kbo( :,48,11) = (/&
&4.5226e+02_jprb,4.6987e+02_jprb,4.8198e+02_jprb,4.8932e+02_jprb,4.9295e+02_jprb/)
kbo( :,49,11) = (/&
&4.4290e+02_jprb,4.6342e+02_jprb,4.7813e+02_jprb,4.8707e+02_jprb,4.9364e+02_jprb/)
kbo( :,50,11) = (/&
&4.3303e+02_jprb,4.5634e+02_jprb,4.7362e+02_jprb,4.8430e+02_jprb,4.9319e+02_jprb/)
kbo( :,51,11) = (/&
&4.2231e+02_jprb,4.4854e+02_jprb,4.6823e+02_jprb,4.8097e+02_jprb,4.9173e+02_jprb/)
kbo( :,52,11) = (/&
&4.1028e+02_jprb,4.3983e+02_jprb,4.6194e+02_jprb,4.7695e+02_jprb,4.9018e+02_jprb/)
kbo( :,53,11) = (/&
&3.9747e+02_jprb,4.3006e+02_jprb,4.5475e+02_jprb,4.7218e+02_jprb,4.8896e+02_jprb/)
kbo( :,54,11) = (/&
&3.8468e+02_jprb,4.1991e+02_jprb,4.4737e+02_jprb,4.6699e+02_jprb,4.8405e+02_jprb/)
kbo( :,55,11) = (/&
&3.7148e+02_jprb,4.0953e+02_jprb,4.3953e+02_jprb,4.6157e+02_jprb,4.7789e+02_jprb/)
kbo( :,56,11) = (/&
&3.5741e+02_jprb,3.9825e+02_jprb,4.3092e+02_jprb,4.5516e+02_jprb,4.7290e+02_jprb/)
kbo( :,57,11) = (/&
&3.4261e+02_jprb,3.8598e+02_jprb,4.2152e+02_jprb,4.4813e+02_jprb,4.6777e+02_jprb/)
kbo( :,58,11) = (/&
&3.2780e+02_jprb,3.7359e+02_jprb,4.1192e+02_jprb,4.4072e+02_jprb,4.6249e+02_jprb/)
kbo( :,59,11) = (/&
&3.2152e+02_jprb,3.6839e+02_jprb,4.0780e+02_jprb,4.3751e+02_jprb,4.6016e+02_jprb/)
kbo( :,13,12) = (/&
&1.8421e+02_jprb,1.8166e+02_jprb,1.7879e+02_jprb,1.7574e+02_jprb,1.7251e+02_jprb/)
kbo( :,14,12) = (/&
&2.0903e+02_jprb,2.0619e+02_jprb,2.0324e+02_jprb,1.9988e+02_jprb,1.9636e+02_jprb/)
kbo( :,15,12) = (/&
&2.3780e+02_jprb,2.3442e+02_jprb,2.3068e+02_jprb,2.2666e+02_jprb,2.2225e+02_jprb/)
kbo( :,16,12) = (/&
&2.7012e+02_jprb,2.6570e+02_jprb,2.6084e+02_jprb,2.5612e+02_jprb,2.5162e+02_jprb/)
kbo( :,17,12) = (/&
&3.0507e+02_jprb,2.9990e+02_jprb,2.9472e+02_jprb,2.8913e+02_jprb,2.8362e+02_jprb/)
kbo( :,18,12) = (/&
&3.4264e+02_jprb,3.3653e+02_jprb,3.3027e+02_jprb,3.2388e+02_jprb,3.1713e+02_jprb/)
kbo( :,19,12) = (/&
&3.8113e+02_jprb,3.7455e+02_jprb,3.6765e+02_jprb,3.6040e+02_jprb,3.5292e+02_jprb/)
kbo( :,20,12) = (/&
&4.2119e+02_jprb,4.1426e+02_jprb,4.0655e+02_jprb,3.9813e+02_jprb,3.8981e+02_jprb/)
kbo( :,21,12) = (/&
&4.6191e+02_jprb,4.5363e+02_jprb,4.4508e+02_jprb,4.3611e+02_jprb,4.2662e+02_jprb/)
kbo( :,22,12) = (/&
&5.0045e+02_jprb,4.9187e+02_jprb,4.8228e+02_jprb,4.7267e+02_jprb,4.6269e+02_jprb/)
kbo( :,23,12) = (/&
&5.3771e+02_jprb,5.2859e+02_jprb,5.1832e+02_jprb,5.0803e+02_jprb,4.9670e+02_jprb/)
kbo( :,24,12) = (/&
&5.7227e+02_jprb,5.6260e+02_jprb,5.5214e+02_jprb,5.4076e+02_jprb,5.2846e+02_jprb/)
kbo( :,25,12) = (/&
&6.0401e+02_jprb,5.9384e+02_jprb,5.8279e+02_jprb,5.7065e+02_jprb,5.5724e+02_jprb/)
kbo( :,26,12) = (/&
&6.3275e+02_jprb,6.2182e+02_jprb,6.0975e+02_jprb,5.9668e+02_jprb,5.8248e+02_jprb/)
kbo( :,27,12) = (/&
&6.5788e+02_jprb,6.4612e+02_jprb,6.3329e+02_jprb,6.1912e+02_jprb,6.0393e+02_jprb/)
kbo( :,28,12) = (/&
&6.7977e+02_jprb,6.6741e+02_jprb,6.5368e+02_jprb,6.3839e+02_jprb,6.2186e+02_jprb/)
kbo( :,29,12) = (/&
&6.9860e+02_jprb,6.8540e+02_jprb,6.7056e+02_jprb,6.5407e+02_jprb,6.3669e+02_jprb/)
kbo( :,30,12) = (/&
&7.1428e+02_jprb,7.0014e+02_jprb,6.8436e+02_jprb,6.6687e+02_jprb,6.4843e+02_jprb/)
kbo( :,31,12) = (/&
&7.2707e+02_jprb,7.1224e+02_jprb,6.9535e+02_jprb,6.7679e+02_jprb,6.5732e+02_jprb/)
kbo( :,32,12) = (/&
&7.3739e+02_jprb,7.2161e+02_jprb,7.0352e+02_jprb,6.8424e+02_jprb,6.6374e+02_jprb/)
kbo( :,33,12) = (/&
&7.4529e+02_jprb,7.2852e+02_jprb,7.0939e+02_jprb,6.8945e+02_jprb,6.6810e+02_jprb/)
kbo( :,34,12) = (/&
&7.5166e+02_jprb,7.3380e+02_jprb,7.1390e+02_jprb,6.9344e+02_jprb,6.7141e+02_jprb/)
kbo( :,35,12) = (/&
&7.5785e+02_jprb,7.3918e+02_jprb,7.1874e+02_jprb,6.9799e+02_jprb,6.7527e+02_jprb/)
kbo( :,36,12) = (/&
&7.6435e+02_jprb,7.4538e+02_jprb,7.2454e+02_jprb,7.0358e+02_jprb,6.8040e+02_jprb/)
kbo( :,37,12) = (/&
&7.7161e+02_jprb,7.5340e+02_jprb,7.3251e+02_jprb,7.1089e+02_jprb,6.8800e+02_jprb/)
kbo( :,38,12) = (/&
&7.7853e+02_jprb,7.6067e+02_jprb,7.3983e+02_jprb,7.1816e+02_jprb,6.9536e+02_jprb/)
kbo( :,39,12) = (/&
&7.8464e+02_jprb,7.6713e+02_jprb,7.4647e+02_jprb,7.2475e+02_jprb,7.0178e+02_jprb/)
kbo( :,40,12) = (/&
&7.9160e+02_jprb,7.7414e+02_jprb,7.5465e+02_jprb,7.3306e+02_jprb,7.1009e+02_jprb/)
kbo( :,41,12) = (/&
&7.9795e+02_jprb,7.8137e+02_jprb,7.6252e+02_jprb,7.4117e+02_jprb,7.1825e+02_jprb/)
kbo( :,42,12) = (/&
&8.0363e+02_jprb,7.8805e+02_jprb,7.6985e+02_jprb,7.4880e+02_jprb,7.2604e+02_jprb/)
kbo( :,43,12) = (/&
&8.0918e+02_jprb,7.9503e+02_jprb,7.7774e+02_jprb,7.5724e+02_jprb,7.3478e+02_jprb/)
kbo( :,44,12) = (/&
&8.1405e+02_jprb,8.0171e+02_jprb,7.8561e+02_jprb,7.6584e+02_jprb,7.4379e+02_jprb/)
kbo( :,45,12) = (/&
&8.1783e+02_jprb,8.0759e+02_jprb,7.9294e+02_jprb,7.7397e+02_jprb,7.5240e+02_jprb/)
kbo( :,46,12) = (/&
&8.2078e+02_jprb,8.1309e+02_jprb,8.0010e+02_jprb,7.8201e+02_jprb,7.6131e+02_jprb/)
kbo( :,47,12) = (/&
&8.2288e+02_jprb,8.1791e+02_jprb,8.0688e+02_jprb,7.9031e+02_jprb,7.7082e+02_jprb/)
kbo( :,48,12) = (/&
&8.2365e+02_jprb,8.2167e+02_jprb,8.1273e+02_jprb,7.9796e+02_jprb,7.7963e+02_jprb/)
kbo( :,49,12) = (/&
&8.2287e+02_jprb,8.2431e+02_jprb,8.1763e+02_jprb,8.0487e+02_jprb,7.8791e+02_jprb/)
kbo( :,50,12) = (/&
&8.2045e+02_jprb,8.2549e+02_jprb,8.2124e+02_jprb,8.1073e+02_jprb,7.9521e+02_jprb/)
kbo( :,51,12) = (/&
&8.1647e+02_jprb,8.2526e+02_jprb,8.2370e+02_jprb,8.1563e+02_jprb,8.0180e+02_jprb/)
kbo( :,52,12) = (/&
&8.1121e+02_jprb,8.2367e+02_jprb,8.2531e+02_jprb,8.1967e+02_jprb,8.0788e+02_jprb/)
kbo( :,53,12) = (/&
&8.0411e+02_jprb,8.2055e+02_jprb,8.2579e+02_jprb,8.2272e+02_jprb,8.1321e+02_jprb/)
kbo( :,54,12) = (/&
&7.9588e+02_jprb,8.1607e+02_jprb,8.2504e+02_jprb,8.2471e+02_jprb,8.1743e+02_jprb/)
kbo( :,55,12) = (/&
&7.8606e+02_jprb,8.1098e+02_jprb,8.2328e+02_jprb,8.2571e+02_jprb,8.2076e+02_jprb/)
kbo( :,56,12) = (/&
&7.7445e+02_jprb,8.0478e+02_jprb,8.2051e+02_jprb,8.2610e+02_jprb,8.2295e+02_jprb/)
kbo( :,57,12) = (/&
&7.6082e+02_jprb,7.9711e+02_jprb,8.1649e+02_jprb,8.2552e+02_jprb,8.2493e+02_jprb/)
kbo( :,58,12) = (/&
&7.4626e+02_jprb,7.8808e+02_jprb,8.1174e+02_jprb,8.2409e+02_jprb,8.2621e+02_jprb/)
kbo( :,59,12) = (/&
&7.3987e+02_jprb,7.8401e+02_jprb,8.0954e+02_jprb,8.2334e+02_jprb,8.2653e+02_jprb/)
kbo( :,13,13) = (/&
&2.0706e+02_jprb,2.0275e+02_jprb,1.9960e+02_jprb,1.9642e+02_jprb,1.9325e+02_jprb/)
kbo( :,14,13) = (/&
&2.3740e+02_jprb,2.3314e+02_jprb,2.2927e+02_jprb,2.2508e+02_jprb,2.2071e+02_jprb/)
kbo( :,15,13) = (/&
&2.7338e+02_jprb,2.6831e+02_jprb,2.6304e+02_jprb,2.5795e+02_jprb,2.5294e+02_jprb/)
kbo( :,16,13) = (/&
&3.1308e+02_jprb,3.0705e+02_jprb,3.0154e+02_jprb,2.9582e+02_jprb,2.8990e+02_jprb/)
kbo( :,17,13) = (/&
&3.5766e+02_jprb,3.5096e+02_jprb,3.4421e+02_jprb,3.3769e+02_jprb,3.3070e+02_jprb/)
kbo( :,18,13) = (/&
&4.0731e+02_jprb,3.9992e+02_jprb,3.9262e+02_jprb,3.8506e+02_jprb,3.7703e+02_jprb/)
kbo( :,19,13) = (/&
&4.6388e+02_jprb,4.5553e+02_jprb,4.4668e+02_jprb,4.3762e+02_jprb,4.2783e+02_jprb/)
kbo( :,20,13) = (/&
&5.2583e+02_jprb,5.1576e+02_jprb,5.0510e+02_jprb,4.9383e+02_jprb,4.8218e+02_jprb/)
kbo( :,21,13) = (/&
&5.9116e+02_jprb,5.7950e+02_jprb,5.6656e+02_jprb,5.5310e+02_jprb,5.3897e+02_jprb/)
kbo( :,22,13) = (/&
&6.5823e+02_jprb,6.4391e+02_jprb,6.2839e+02_jprb,6.1210e+02_jprb,5.9534e+02_jprb/)
kbo( :,23,13) = (/&
&7.2542e+02_jprb,7.0808e+02_jprb,6.8952e+02_jprb,6.6991e+02_jprb,6.4969e+02_jprb/)
kbo( :,24,13) = (/&
&7.9029e+02_jprb,7.7002e+02_jprb,7.4790e+02_jprb,7.2486e+02_jprb,7.0140e+02_jprb/)
kbo( :,25,13) = (/&
&8.5203e+02_jprb,8.2748e+02_jprb,8.0207e+02_jprb,7.7556e+02_jprb,7.4909e+02_jprb/)
kbo( :,26,13) = (/&
&9.0879e+02_jprb,8.8008e+02_jprb,8.5133e+02_jprb,8.2123e+02_jprb,7.9187e+02_jprb/)
kbo( :,27,13) = (/&
&9.5929e+02_jprb,9.2767e+02_jprb,8.9539e+02_jprb,8.6200e+02_jprb,8.2944e+02_jprb/)
kbo( :,28,13) = (/&
&1.0038e+03_jprb,9.6874e+02_jprb,9.3346e+02_jprb,8.9698e+02_jprb,8.6129e+02_jprb/)
kbo( :,29,13) = (/&
&1.0414e+03_jprb,1.0031e+03_jprb,9.6490e+02_jprb,9.2572e+02_jprb,8.8715e+02_jprb/)
kbo( :,30,13) = (/&
&1.0721e+03_jprb,1.0311e+03_jprb,9.9002e+02_jprb,9.4833e+02_jprb,9.0740e+02_jprb/)
kbo( :,31,13) = (/&
&1.0964e+03_jprb,1.0523e+03_jprb,1.0091e+03_jprb,9.6516e+02_jprb,9.2258e+02_jprb/)
kbo( :,32,13) = (/&
&1.1144e+03_jprb,1.0680e+03_jprb,1.0228e+03_jprb,9.7704e+02_jprb,9.3296e+02_jprb/)
kbo( :,33,13) = (/&
&1.1268e+03_jprb,1.0785e+03_jprb,1.0318e+03_jprb,9.8453e+02_jprb,9.3914e+02_jprb/)
kbo( :,34,13) = (/&
&1.1363e+03_jprb,1.0866e+03_jprb,1.0383e+03_jprb,9.8991e+02_jprb,9.4342e+02_jprb/)
kbo( :,35,13) = (/&
&1.1468e+03_jprb,1.0959e+03_jprb,1.0463e+03_jprb,9.9687e+02_jprb,9.4938e+02_jprb/)
kbo( :,36,13) = (/&
&1.1600e+03_jprb,1.1078e+03_jprb,1.0572e+03_jprb,1.0067e+03_jprb,9.5830e+02_jprb/)
kbo( :,37,13) = (/&
&1.1790e+03_jprb,1.1257e+03_jprb,1.0738e+03_jprb,1.0220e+03_jprb,9.7295e+02_jprb/)
kbo( :,38,13) = (/&
&1.1965e+03_jprb,1.1423e+03_jprb,1.0895e+03_jprb,1.0368e+03_jprb,9.8736e+02_jprb/)
kbo( :,39,13) = (/&
&1.2126e+03_jprb,1.1577e+03_jprb,1.1039e+03_jprb,1.0505e+03_jprb,1.0002e+03_jprb/)
kbo( :,40,13) = (/&
&1.2331e+03_jprb,1.1780e+03_jprb,1.1227e+03_jprb,1.0686e+03_jprb,1.0174e+03_jprb/)
kbo( :,41,13) = (/&
&1.2534e+03_jprb,1.1977e+03_jprb,1.1416e+03_jprb,1.0868e+03_jprb,1.0348e+03_jprb/)
kbo( :,42,13) = (/&
&1.2728e+03_jprb,1.2168e+03_jprb,1.1600e+03_jprb,1.1045e+03_jprb,1.0518e+03_jprb/)
kbo( :,43,13) = (/&
&1.2945e+03_jprb,1.2387e+03_jprb,1.1810e+03_jprb,1.1249e+03_jprb,1.0714e+03_jprb/)
kbo( :,44,13) = (/&
&1.3174e+03_jprb,1.2614e+03_jprb,1.2031e+03_jprb,1.1464e+03_jprb,1.0923e+03_jprb/)
kbo( :,45,13) = (/&
&1.3398e+03_jprb,1.2836e+03_jprb,1.2250e+03_jprb,1.1678e+03_jprb,1.1130e+03_jprb/)
kbo( :,46,13) = (/&
&1.3628e+03_jprb,1.3065e+03_jprb,1.2489e+03_jprb,1.1905e+03_jprb,1.1348e+03_jprb/)
kbo( :,47,13) = (/&
&1.3873e+03_jprb,1.3317e+03_jprb,1.2742e+03_jprb,1.2156e+03_jprb,1.1587e+03_jprb/)
kbo( :,48,13) = (/&
&1.4108e+03_jprb,1.3565e+03_jprb,1.2991e+03_jprb,1.2406e+03_jprb,1.1829e+03_jprb/)
kbo( :,49,13) = (/&
&1.4335e+03_jprb,1.3803e+03_jprb,1.3234e+03_jprb,1.2654e+03_jprb,1.2072e+03_jprb/)
kbo( :,50,13) = (/&
&1.4541e+03_jprb,1.4021e+03_jprb,1.3460e+03_jprb,1.2885e+03_jprb,1.2302e+03_jprb/)
kbo( :,51,13) = (/&
&1.4730e+03_jprb,1.4228e+03_jprb,1.3681e+03_jprb,1.3104e+03_jprb,1.2525e+03_jprb/)
kbo( :,52,13) = (/&
&1.4907e+03_jprb,1.4427e+03_jprb,1.3898e+03_jprb,1.3321e+03_jprb,1.2744e+03_jprb/)
kbo( :,53,13) = (/&
&1.5061e+03_jprb,1.4619e+03_jprb,1.4106e+03_jprb,1.3539e+03_jprb,1.2962e+03_jprb/)
kbo( :,54,13) = (/&
&1.5192e+03_jprb,1.4794e+03_jprb,1.4292e+03_jprb,1.3736e+03_jprb,1.3161e+03_jprb/)
kbo( :,55,13) = (/&
&1.5309e+03_jprb,1.4941e+03_jprb,1.4465e+03_jprb,1.3926e+03_jprb,1.3351e+03_jprb/)
kbo( :,56,13) = (/&
&1.5407e+03_jprb,1.5075e+03_jprb,1.4630e+03_jprb,1.4106e+03_jprb,1.3542e+03_jprb/)
kbo( :,57,13) = (/&
&1.5484e+03_jprb,1.5197e+03_jprb,1.4789e+03_jprb,1.4283e+03_jprb,1.3728e+03_jprb/)
kbo( :,58,13) = (/&
&1.5535e+03_jprb,1.5303e+03_jprb,1.4929e+03_jprb,1.4443e+03_jprb,1.3902e+03_jprb/)
kbo( :,59,13) = (/&
&1.5550e+03_jprb,1.5344e+03_jprb,1.4983e+03_jprb,1.4507e+03_jprb,1.3972e+03_jprb/)
kbo( :,13,14) = (/&
&2.5200e+02_jprb,2.4567e+02_jprb,2.3912e+02_jprb,2.3261e+02_jprb,2.2671e+02_jprb/)
kbo( :,14,14) = (/&
&2.8356e+02_jprb,2.7567e+02_jprb,2.6762e+02_jprb,2.6041e+02_jprb,2.5414e+02_jprb/)
kbo( :,15,14) = (/&
&3.2000e+02_jprb,3.1086e+02_jprb,3.0278e+02_jprb,2.9520e+02_jprb,2.8835e+02_jprb/)
kbo( :,16,14) = (/&
&3.6501e+02_jprb,3.5545e+02_jprb,3.4663e+02_jprb,3.3835e+02_jprb,3.3040e+02_jprb/)
kbo( :,17,14) = (/&
&4.2043e+02_jprb,4.1003e+02_jprb,4.0038e+02_jprb,3.9117e+02_jprb,3.8254e+02_jprb/)
kbo( :,18,14) = (/&
&4.8684e+02_jprb,4.7541e+02_jprb,4.6423e+02_jprb,4.5366e+02_jprb,4.4317e+02_jprb/)
kbo( :,19,14) = (/&
&5.6352e+02_jprb,5.4977e+02_jprb,5.3699e+02_jprb,5.2451e+02_jprb,5.1166e+02_jprb/)
kbo( :,20,14) = (/&
&6.4946e+02_jprb,6.3281e+02_jprb,6.1710e+02_jprb,6.0187e+02_jprb,5.8639e+02_jprb/)
kbo( :,21,14) = (/&
&7.4362e+02_jprb,7.2356e+02_jprb,7.0410e+02_jprb,6.8448e+02_jprb,6.6564e+02_jprb/)
kbo( :,22,14) = (/&
&8.4333e+02_jprb,8.1844e+02_jprb,7.9450e+02_jprb,7.7017e+02_jprb,7.4626e+02_jprb/)
kbo( :,23,14) = (/&
&9.4680e+02_jprb,9.1686e+02_jprb,8.8724e+02_jprb,8.5711e+02_jprb,8.2794e+02_jprb/)
kbo( :,24,14) = (/&
&1.0528e+03_jprb,1.0161e+03_jprb,9.7917e+02_jprb,9.4320e+02_jprb,9.0772e+02_jprb/)
kbo( :,25,14) = (/&
&1.1567e+03_jprb,1.1128e+03_jprb,1.0684e+03_jprb,1.0249e+03_jprb,9.8260e+02_jprb/)
kbo( :,26,14) = (/&
&1.2530e+03_jprb,1.2021e+03_jprb,1.1497e+03_jprb,1.0989e+03_jprb,1.0499e+03_jprb/)
kbo( :,27,14) = (/&
&1.3414e+03_jprb,1.2817e+03_jprb,1.2215e+03_jprb,1.1632e+03_jprb,1.1083e+03_jprb/)
kbo( :,28,14) = (/&
&1.4184e+03_jprb,1.3503e+03_jprb,1.2822e+03_jprb,1.2175e+03_jprb,1.1569e+03_jprb/)
kbo( :,29,14) = (/&
&1.4829e+03_jprb,1.4069e+03_jprb,1.3322e+03_jprb,1.2616e+03_jprb,1.1958e+03_jprb/)
kbo( :,30,14) = (/&
&1.5347e+03_jprb,1.4521e+03_jprb,1.3719e+03_jprb,1.2961e+03_jprb,1.2258e+03_jprb/)
kbo( :,31,14) = (/&
&1.5740e+03_jprb,1.4863e+03_jprb,1.4011e+03_jprb,1.3213e+03_jprb,1.2473e+03_jprb/)
kbo( :,32,14) = (/&
&1.6019e+03_jprb,1.5104e+03_jprb,1.4212e+03_jprb,1.3381e+03_jprb,1.2613e+03_jprb/)
kbo( :,33,14) = (/&
&1.6206e+03_jprb,1.5254e+03_jprb,1.4335e+03_jprb,1.3478e+03_jprb,1.2690e+03_jprb/)
kbo( :,34,14) = (/&
&1.6343e+03_jprb,1.5362e+03_jprb,1.4422e+03_jprb,1.3545e+03_jprb,1.2743e+03_jprb/)
kbo( :,35,14) = (/&
&1.6513e+03_jprb,1.5505e+03_jprb,1.4543e+03_jprb,1.3647e+03_jprb,1.2829e+03_jprb/)
kbo( :,36,14) = (/&
&1.6747e+03_jprb,1.5711e+03_jprb,1.4723e+03_jprb,1.3806e+03_jprb,1.2969e+03_jprb/)
kbo( :,37,14) = (/&
&1.7119e+03_jprb,1.6037e+03_jprb,1.5018e+03_jprb,1.4086e+03_jprb,1.3210e+03_jprb/)
kbo( :,38,14) = (/&
&1.7464e+03_jprb,1.6348e+03_jprb,1.5298e+03_jprb,1.4339e+03_jprb,1.3446e+03_jprb/)
kbo( :,39,14) = (/&
&1.7785e+03_jprb,1.6638e+03_jprb,1.5560e+03_jprb,1.4575e+03_jprb,1.3661e+03_jprb/)
kbo( :,40,14) = (/&
&1.8213e+03_jprb,1.7031e+03_jprb,1.5916e+03_jprb,1.4897e+03_jprb,1.3957e+03_jprb/)
kbo( :,41,14) = (/&
&1.8650e+03_jprb,1.7429e+03_jprb,1.6279e+03_jprb,1.5226e+03_jprb,1.4260e+03_jprb/)
kbo( :,42,14) = (/&
&1.9083e+03_jprb,1.7822e+03_jprb,1.6638e+03_jprb,1.5553e+03_jprb,1.4560e+03_jprb/)
kbo( :,43,14) = (/&
&1.9590e+03_jprb,1.8282e+03_jprb,1.7062e+03_jprb,1.5939e+03_jprb,1.4914e+03_jprb/)
kbo( :,44,14) = (/&
&2.0135e+03_jprb,1.8780e+03_jprb,1.7518e+03_jprb,1.6354e+03_jprb,1.5294e+03_jprb/)
kbo( :,45,14) = (/&
&2.0686e+03_jprb,1.9283e+03_jprb,1.7978e+03_jprb,1.6776e+03_jprb,1.5679e+03_jprb/)
kbo( :,46,14) = (/&
&2.1281e+03_jprb,1.9824e+03_jprb,1.8468e+03_jprb,1.7228e+03_jprb,1.6096e+03_jprb/)
kbo( :,47,14) = (/&
&2.1954e+03_jprb,2.0435e+03_jprb,1.9031e+03_jprb,1.7740e+03_jprb,1.6572e+03_jprb/)
kbo( :,48,14) = (/&
&2.2648e+03_jprb,2.1064e+03_jprb,1.9610e+03_jprb,1.8268e+03_jprb,1.7061e+03_jprb/)
kbo( :,49,14) = (/&
&2.3361e+03_jprb,2.1712e+03_jprb,2.0209e+03_jprb,1.8815e+03_jprb,1.7562e+03_jprb/)
kbo( :,50,14) = (/&
&2.4045e+03_jprb,2.2339e+03_jprb,2.0788e+03_jprb,1.9343e+03_jprb,1.8042e+03_jprb/)
kbo( :,51,14) = (/&
&2.4726e+03_jprb,2.2963e+03_jprb,2.1361e+03_jprb,1.9873e+03_jprb,1.8522e+03_jprb/)
kbo( :,52,14) = (/&
&2.5428e+03_jprb,2.3607e+03_jprb,2.1949e+03_jprb,2.0419e+03_jprb,1.9016e+03_jprb/)
kbo( :,53,14) = (/&
&2.6141e+03_jprb,2.4269e+03_jprb,2.2555e+03_jprb,2.0978e+03_jprb,1.9528e+03_jprb/)
kbo( :,54,14) = (/&
&2.6807e+03_jprb,2.4886e+03_jprb,2.3128e+03_jprb,2.1502e+03_jprb,2.0011e+03_jprb/)
kbo( :,55,14) = (/&
&2.7459e+03_jprb,2.5495e+03_jprb,2.3693e+03_jprb,2.2020e+03_jprb,2.0486e+03_jprb/)
kbo( :,56,14) = (/&
&2.8130e+03_jprb,2.6116e+03_jprb,2.4267e+03_jprb,2.2548e+03_jprb,2.0964e+03_jprb/)
kbo( :,57,14) = (/&
&2.8820e+03_jprb,2.6749e+03_jprb,2.4855e+03_jprb,2.3093e+03_jprb,2.1460e+03_jprb/)
kbo( :,58,14) = (/&
&2.9481e+03_jprb,2.7364e+03_jprb,2.5424e+03_jprb,2.3624e+03_jprb,2.1944e+03_jprb/)
kbo( :,59,14) = (/&
&2.9753e+03_jprb,2.7616e+03_jprb,2.5658e+03_jprb,2.3843e+03_jprb,2.2142e+03_jprb/)
kbo( :,13,15) = (/&
&3.0496e+02_jprb,3.0081e+02_jprb,2.9676e+02_jprb,2.9051e+02_jprb,2.8450e+02_jprb/)
kbo( :,14,15) = (/&
&3.4462e+02_jprb,3.4099e+02_jprb,3.3527e+02_jprb,3.3016e+02_jprb,3.2406e+02_jprb/)
kbo( :,15,15) = (/&
&3.8936e+02_jprb,3.8628e+02_jprb,3.8183e+02_jprb,3.7492e+02_jprb,3.6807e+02_jprb/)
kbo( :,16,15) = (/&
&4.4332e+02_jprb,4.3856e+02_jprb,4.3430e+02_jprb,4.2589e+02_jprb,4.1877e+02_jprb/)
kbo( :,17,15) = (/&
&5.0835e+02_jprb,5.0183e+02_jprb,4.9489e+02_jprb,4.8561e+02_jprb,4.7621e+02_jprb/)
kbo( :,18,15) = (/&
&5.8677e+02_jprb,5.7885e+02_jprb,5.6791e+02_jprb,5.5537e+02_jprb,5.4279e+02_jprb/)
kbo( :,19,15) = (/&
&6.8130e+02_jprb,6.6815e+02_jprb,6.5194e+02_jprb,6.3561e+02_jprb,6.1955e+02_jprb/)
kbo( :,20,15) = (/&
&7.8879e+02_jprb,7.7015e+02_jprb,7.4875e+02_jprb,7.2676e+02_jprb,7.0600e+02_jprb/)
kbo( :,21,15) = (/&
&9.1167e+02_jprb,8.8542e+02_jprb,8.5728e+02_jprb,8.2924e+02_jprb,8.0222e+02_jprb/)
kbo( :,22,15) = (/&
&1.0456e+03_jprb,1.0104e+03_jprb,9.7413e+02_jprb,9.3830e+02_jprb,9.0416e+02_jprb/)
kbo( :,23,15) = (/&
&1.1890e+03_jprb,1.1427e+03_jprb,1.0964e+03_jprb,1.0517e+03_jprb,1.0073e+03_jprb/)
kbo( :,24,15) = (/&
&1.3341e+03_jprb,1.2769e+03_jprb,1.2199e+03_jprb,1.1637e+03_jprb,1.1097e+03_jprb/)
kbo( :,25,15) = (/&
&1.4777e+03_jprb,1.4064e+03_jprb,1.3371e+03_jprb,1.2692e+03_jprb,1.2051e+03_jprb/)
kbo( :,26,15) = (/&
&1.6127e+03_jprb,1.5257e+03_jprb,1.4439e+03_jprb,1.3652e+03_jprb,1.2908e+03_jprb/)
kbo( :,27,15) = (/&
&1.7363e+03_jprb,1.6345e+03_jprb,1.5403e+03_jprb,1.4516e+03_jprb,1.3681e+03_jprb/)
kbo( :,28,15) = (/&
&1.8456e+03_jprb,1.7310e+03_jprb,1.6252e+03_jprb,1.5262e+03_jprb,1.4343e+03_jprb/)
kbo( :,29,15) = (/&
&1.9374e+03_jprb,1.8114e+03_jprb,1.6953e+03_jprb,1.5870e+03_jprb,1.4880e+03_jprb/)
kbo( :,30,15) = (/&
&2.0123e+03_jprb,1.8759e+03_jprb,1.7509e+03_jprb,1.6347e+03_jprb,1.5297e+03_jprb/)
kbo( :,31,15) = (/&
&2.0695e+03_jprb,1.9241e+03_jprb,1.7919e+03_jprb,1.6696e+03_jprb,1.5595e+03_jprb/)
kbo( :,32,15) = (/&
&2.1098e+03_jprb,1.9573e+03_jprb,1.8199e+03_jprb,1.6927e+03_jprb,1.5791e+03_jprb/)
kbo( :,33,15) = (/&
&2.1350e+03_jprb,1.9776e+03_jprb,1.8360e+03_jprb,1.7058e+03_jprb,1.5896e+03_jprb/)
kbo( :,34,15) = (/&
&2.1531e+03_jprb,1.9921e+03_jprb,1.8473e+03_jprb,1.7146e+03_jprb,1.5966e+03_jprb/)
kbo( :,35,15) = (/&
&2.1773e+03_jprb,2.0121e+03_jprb,1.8641e+03_jprb,1.7288e+03_jprb,1.6085e+03_jprb/)
kbo( :,36,15) = (/&
&2.2124e+03_jprb,2.0424e+03_jprb,1.8903e+03_jprb,1.7515e+03_jprb,1.6285e+03_jprb/)
kbo( :,37,15) = (/&
&2.2692e+03_jprb,2.0922e+03_jprb,1.9342e+03_jprb,1.7916e+03_jprb,1.6630e+03_jprb/)
kbo( :,38,15) = (/&
&2.3243e+03_jprb,2.1400e+03_jprb,1.9765e+03_jprb,1.8290e+03_jprb,1.6948e+03_jprb/)
kbo( :,39,15) = (/&
&2.3761e+03_jprb,2.1849e+03_jprb,2.0163e+03_jprb,1.8643e+03_jprb,1.7262e+03_jprb/)
kbo( :,40,15) = (/&
&2.4467e+03_jprb,2.2470e+03_jprb,2.0711e+03_jprb,1.9128e+03_jprb,1.7697e+03_jprb/)
kbo( :,41,15) = (/&
&2.5197e+03_jprb,2.3108e+03_jprb,2.1276e+03_jprb,1.9630e+03_jprb,1.8147e+03_jprb/)
kbo( :,42,15) = (/&
&2.5927e+03_jprb,2.3746e+03_jprb,2.1839e+03_jprb,2.0131e+03_jprb,1.8595e+03_jprb/)
kbo( :,43,15) = (/&
&2.6795e+03_jprb,2.4509e+03_jprb,2.2509e+03_jprb,2.0729e+03_jprb,1.9127e+03_jprb/)
kbo( :,44,15) = (/&
&2.7746e+03_jprb,2.5346e+03_jprb,2.3244e+03_jprb,2.1382e+03_jprb,1.9711e+03_jprb/)
kbo( :,45,15) = (/&
&2.8725e+03_jprb,2.6210e+03_jprb,2.4001e+03_jprb,2.2052e+03_jprb,2.0310e+03_jprb/)
kbo( :,46,15) = (/&
&2.9808e+03_jprb,2.7160e+03_jprb,2.4820e+03_jprb,2.2786e+03_jprb,2.0965e+03_jprb/)
kbo( :,47,15) = (/&
&3.1065e+03_jprb,2.8260e+03_jprb,2.5776e+03_jprb,2.3630e+03_jprb,2.1714e+03_jprb/)
kbo( :,48,15) = (/&
&3.2382e+03_jprb,2.9414e+03_jprb,2.6779e+03_jprb,2.4515e+03_jprb,2.2491e+03_jprb/)
kbo( :,49,15) = (/&
&3.3769e+03_jprb,3.0628e+03_jprb,2.7828e+03_jprb,2.5435e+03_jprb,2.3301e+03_jprb/)
kbo( :,50,15) = (/&
&3.5153e+03_jprb,3.1825e+03_jprb,2.8860e+03_jprb,2.6340e+03_jprb,2.4097e+03_jprb/)
kbo( :,51,15) = (/&
&3.6567e+03_jprb,3.3043e+03_jprb,2.9915e+03_jprb,2.7258e+03_jprb,2.4905e+03_jprb/)
kbo( :,52,15) = (/&
&3.8059e+03_jprb,3.4316e+03_jprb,3.1018e+03_jprb,2.8218e+03_jprb,2.5746e+03_jprb/)
kbo( :,53,15) = (/&
&3.9647e+03_jprb,3.5659e+03_jprb,3.2181e+03_jprb,2.9226e+03_jprb,2.6623e+03_jprb/)
kbo( :,54,15) = (/&
&4.1182e+03_jprb,3.6932e+03_jprb,3.3305e+03_jprb,3.0197e+03_jprb,2.7461e+03_jprb/)
kbo( :,55,15) = (/&
&4.2719e+03_jprb,3.8244e+03_jprb,3.4429e+03_jprb,3.1156e+03_jprb,2.8302e+03_jprb/)
kbo( :,56,15) = (/&
&4.4321e+03_jprb,3.9623e+03_jprb,3.5606e+03_jprb,3.2171e+03_jprb,2.9172e+03_jprb/)
kbo( :,57,15) = (/&
&4.6005e+03_jprb,4.1071e+03_jprb,3.6841e+03_jprb,3.3227e+03_jprb,3.0093e+03_jprb/)
kbo( :,58,15) = (/&
&4.7711e+03_jprb,4.2512e+03_jprb,3.8068e+03_jprb,3.4270e+03_jprb,3.1000e+03_jprb/)
kbo( :,59,15) = (/&
&4.8435e+03_jprb,4.3113e+03_jprb,3.8580e+03_jprb,3.4704e+03_jprb,3.1379e+03_jprb/)
kbo( :,13,16) = (/&
&3.6480e+02_jprb,3.5145e+02_jprb,3.4350e+02_jprb,3.3674e+02_jprb,3.3295e+02_jprb/)
kbo( :,14,16) = (/&
&4.3305e+02_jprb,4.2002e+02_jprb,4.0834e+02_jprb,4.0114e+02_jprb,3.9514e+02_jprb/)
kbo( :,15,16) = (/&
&5.1021e+02_jprb,4.9566e+02_jprb,4.8445e+02_jprb,4.7500e+02_jprb,4.6664e+02_jprb/)
kbo( :,16,16) = (/&
&6.0095e+02_jprb,5.8332e+02_jprb,5.7034e+02_jprb,5.5793e+02_jprb,5.4743e+02_jprb/)
kbo( :,17,16) = (/&
&6.9984e+02_jprb,6.8135e+02_jprb,6.6501e+02_jprb,6.5003e+02_jprb,6.3773e+02_jprb/)
kbo( :,18,16) = (/&
&8.1052e+02_jprb,7.8978e+02_jprb,7.6911e+02_jprb,7.5277e+02_jprb,7.3709e+02_jprb/)
kbo( :,19,16) = (/&
&9.3185e+02_jprb,9.0651e+02_jprb,8.8287e+02_jprb,8.6357e+02_jprb,8.4262e+02_jprb/)
kbo( :,20,16) = (/&
&1.0617e+03_jprb,1.0323e+03_jprb,1.0033e+03_jprb,9.7715e+02_jprb,9.5295e+02_jprb/)
kbo( :,21,16) = (/&
&1.1955e+03_jprb,1.1605e+03_jprb,1.1266e+03_jprb,1.0931e+03_jprb,1.0626e+03_jprb/)
kbo( :,22,16) = (/&
&1.3313e+03_jprb,1.2888e+03_jprb,1.2452e+03_jprb,1.2039e+03_jprb,1.1668e+03_jprb/)
kbo( :,23,16) = (/&
&1.4677e+03_jprb,1.4171e+03_jprb,1.3647e+03_jprb,1.3122e+03_jprb,1.2693e+03_jprb/)
kbo( :,24,16) = (/&
&1.6031e+03_jprb,1.5431e+03_jprb,1.4805e+03_jprb,1.4214e+03_jprb,1.3711e+03_jprb/)
kbo( :,25,16) = (/&
&1.7446e+03_jprb,1.6761e+03_jprb,1.6075e+03_jprb,1.5354e+03_jprb,1.4755e+03_jprb/)
kbo( :,26,16) = (/&
&1.8991e+03_jprb,1.8163e+03_jprb,1.7331e+03_jprb,1.6466e+03_jprb,1.5750e+03_jprb/)
kbo( :,27,16) = (/&
&2.0473e+03_jprb,1.9486e+03_jprb,1.8508e+03_jprb,1.7507e+03_jprb,1.6645e+03_jprb/)
kbo( :,28,16) = (/&
&2.1841e+03_jprb,2.0672e+03_jprb,1.9532e+03_jprb,1.8416e+03_jprb,1.7427e+03_jprb/)
kbo( :,29,16) = (/&
&2.3013e+03_jprb,2.1668e+03_jprb,2.0380e+03_jprb,1.9159e+03_jprb,1.8061e+03_jprb/)
kbo( :,30,16) = (/&
&2.3968e+03_jprb,2.2468e+03_jprb,2.1057e+03_jprb,1.9742e+03_jprb,1.8547e+03_jprb/)
kbo( :,31,16) = (/&
&2.4698e+03_jprb,2.3066e+03_jprb,2.1555e+03_jprb,2.0162e+03_jprb,1.8899e+03_jprb/)
kbo( :,32,16) = (/&
&2.5212e+03_jprb,2.3480e+03_jprb,2.1899e+03_jprb,2.0439e+03_jprb,1.9131e+03_jprb/)
kbo( :,33,16) = (/&
&2.5535e+03_jprb,2.3733e+03_jprb,2.2102e+03_jprb,2.0593e+03_jprb,1.9261e+03_jprb/)
kbo( :,34,16) = (/&
&2.5772e+03_jprb,2.3915e+03_jprb,2.2247e+03_jprb,2.0705e+03_jprb,1.9349e+03_jprb/)
kbo( :,35,16) = (/&
&2.6073e+03_jprb,2.4161e+03_jprb,2.2452e+03_jprb,2.0872e+03_jprb,1.9493e+03_jprb/)
kbo( :,36,16) = (/&
&2.6509e+03_jprb,2.4529e+03_jprb,2.2766e+03_jprb,2.1138e+03_jprb,1.9720e+03_jprb/)
kbo( :,37,16) = (/&
&2.7188e+03_jprb,2.5136e+03_jprb,2.3285e+03_jprb,2.1597e+03_jprb,2.0114e+03_jprb/)
kbo( :,38,16) = (/&
&2.7845e+03_jprb,2.5721e+03_jprb,2.3785e+03_jprb,2.2030e+03_jprb,2.0515e+03_jprb/)
kbo( :,39,16) = (/&
&2.8472e+03_jprb,2.6270e+03_jprb,2.4254e+03_jprb,2.2449e+03_jprb,2.0875e+03_jprb/)
kbo( :,40,16) = (/&
&2.9330e+03_jprb,2.6993e+03_jprb,2.4900e+03_jprb,2.3030e+03_jprb,2.1374e+03_jprb/)
kbo( :,41,16) = (/&
&3.0218e+03_jprb,2.7769e+03_jprb,2.5568e+03_jprb,2.3631e+03_jprb,2.1888e+03_jprb/)
kbo( :,42,16) = (/&
&3.1113e+03_jprb,2.8546e+03_jprb,2.6243e+03_jprb,2.4236e+03_jprb,2.2399e+03_jprb/)
kbo( :,43,16) = (/&
&3.2191e+03_jprb,2.9464e+03_jprb,2.7051e+03_jprb,2.4953e+03_jprb,2.3016e+03_jprb/)
kbo( :,44,16) = (/&
&3.3385e+03_jprb,3.0469e+03_jprb,2.7942e+03_jprb,2.5737e+03_jprb,2.3700e+03_jprb/)
kbo( :,45,16) = (/&
&3.4626e+03_jprb,3.1506e+03_jprb,2.8863e+03_jprb,2.6539e+03_jprb,2.4394e+03_jprb/)
kbo( :,46,16) = (/&
&3.6001e+03_jprb,3.2642e+03_jprb,2.9874e+03_jprb,2.7413e+03_jprb,2.5151e+03_jprb/)
kbo( :,47,16) = (/&
&3.7610e+03_jprb,3.3965e+03_jprb,3.1046e+03_jprb,2.8425e+03_jprb,2.6031e+03_jprb/)
kbo( :,48,16) = (/&
&3.9321e+03_jprb,3.5361e+03_jprb,3.2276e+03_jprb,2.9476e+03_jprb,2.6982e+03_jprb/)
kbo( :,49,16) = (/&
&4.1176e+03_jprb,3.6899e+03_jprb,3.3583e+03_jprb,3.0595e+03_jprb,2.7974e+03_jprb/)
kbo( :,50,16) = (/&
&4.3032e+03_jprb,3.8456e+03_jprb,3.4873e+03_jprb,3.1701e+03_jprb,2.8952e+03_jprb/)
kbo( :,51,16) = (/&
&4.4935e+03_jprb,4.0060e+03_jprb,3.6203e+03_jprb,3.2826e+03_jprb,2.9949e+03_jprb/)
kbo( :,52,16) = (/&
&4.6944e+03_jprb,4.1760e+03_jprb,3.7596e+03_jprb,3.4020e+03_jprb,3.0994e+03_jprb/)
kbo( :,53,16) = (/&
&4.9137e+03_jprb,4.3562e+03_jprb,3.9079e+03_jprb,3.5294e+03_jprb,3.2093e+03_jprb/)
kbo( :,54,16) = (/&
&5.1332e+03_jprb,4.5465e+03_jprb,4.0538e+03_jprb,3.6533e+03_jprb,3.3147e+03_jprb/)
kbo( :,55,16) = (/&
&5.3615e+03_jprb,4.7268e+03_jprb,4.2040e+03_jprb,3.7715e+03_jprb,3.4204e+03_jprb/)
kbo( :,56,16) = (/&
&5.6101e+03_jprb,4.9206e+03_jprb,4.3611e+03_jprb,3.9031e+03_jprb,3.5302e+03_jprb/)
kbo( :,57,16) = (/&
&5.8786e+03_jprb,5.1280e+03_jprb,4.5273e+03_jprb,4.0416e+03_jprb,3.6469e+03_jprb/)
kbo( :,58,16) = (/&
&6.1495e+03_jprb,5.3426e+03_jprb,4.6971e+03_jprb,4.1821e+03_jprb,3.7629e+03_jprb/)
kbo( :,59,16) = (/&
&6.2646e+03_jprb,5.4342e+03_jprb,4.7694e+03_jprb,4.2411e+03_jprb,3.8114e+03_jprb/)

!     -----------------------------------------------------------------
RETURN
END SUBROUTINE rrtm_kgb7_bb