source: LMDZ6/branches/LMDZ-COSP/libf/phymar/rrtm_kgb3_B3.F90 @ 5420

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