source: LMDZ5/trunk/libf/phymar/rrtm_kgb3_B4.F90 @ 5450

Last change on this file since 5450 was 2089, checked in by Laurent Fairhead, 10 years ago

Inclusion de la physique de MAR


Integration of MAR physics

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