source: LMDZ5/branches/testing/libf/phymar/rrtm_kgb15_A1.F90 @ 3157

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

Merged trunk changes -r2070:2158 into testing branch. Compilation problems introduced by revision r2155 have been corrected by hand

File size: 89.6 KB
RevLine 
[2089]1!OCL SCALAR
2SUBROUTINE RRTM_KGB15_A1
3
4!     Originally by Eli J. Mlawer, Atmospheric & Environmental Research.
5!     BAND 15:  2380-2600 cm-1 (low - N2O,CO2; high - nothing)
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 YOERRTO15, ONLY : KAO     ,SELFREFO   ,FRACREFAO
14USE YOERRTA15, ONLY : STRRAT
15
16!     ------------------------------------------------------------------
17
18
19IMPLICIT NONE
20
21!     ------------------------------------------------------------------
22
23!     The array KAO contains absorption coefs at the 16 chosen g-values
24!     for a range of pressure levels> ~100mb, temperatures, and binary
25!     species parameters (see taumol.f for definition).  The first
26!     index in the array, JS, runs from 1 to 9, and corresponds to
27!     different values of the binary species parameter.  For instance,
28!     JS=1 refers to dry air, JS = 2 corresponds to the paramter value 1/8,
29!     JS = 3 corresponds to the parameter value 2/8, etc.  The second index
30!     in the array, JT, which runs from 1 to 5, corresponds to different
31!     temperatures.  More specifically, JT = 3 means that the data are for
32!     the reference temperature TREF for this  pressure level, JT = 2 refers
33!     to TREF-15, JT = 1 is for TREF-30, JT = 4 is for TREF+15, and JT = 5
34!     is for TREF+30.  The third index, JP, runs from 1 to 13 and refers
35!     to the JPth reference pressure level (see taumol.f for these levels
36!     in mb).  The fourth index, IG, goes from 1 to 16, and indicates
37!     which g-interval the absorption coefficients are for.
38
39KAO( :, 1, 1, 1) = (/&
40&4.2962E-03_JPRB,1.5232E-02_JPRB,1.9579E-02_JPRB,2.1453E-02_JPRB,2.1148E-02_JPRB,1.9096E-02_JPRB,&
41&1.5358E-02_JPRB,9.6936E-03_JPRB,2.2149E+00_JPRB/)
42KAO( :, 2, 1, 1) = (/&
43&4.2518E-03_JPRB,1.5711E-02_JPRB,2.0424E-02_JPRB,2.2179E-02_JPRB,2.1702E-02_JPRB,1.9467E-02_JPRB,&
44&1.5548E-02_JPRB,9.9480E-03_JPRB,2.1772E+00_JPRB/)
45KAO( :, 3, 1, 1) = (/&
46&4.2138E-03_JPRB,1.6217E-02_JPRB,2.1181E-02_JPRB,2.2786E-02_JPRB,2.2148E-02_JPRB,1.9747E-02_JPRB,&
47&1.5738E-02_JPRB,1.0309E-02_JPRB,2.1464E+00_JPRB/)
48KAO( :, 4, 1, 1) = (/&
49&4.1834E-03_JPRB,1.6748E-02_JPRB,2.1843E-02_JPRB,2.3305E-02_JPRB,2.2496E-02_JPRB,1.9972E-02_JPRB,&
50&1.5965E-02_JPRB,1.0775E-02_JPRB,2.1191E+00_JPRB/)
51KAO( :, 5, 1, 1) = (/&
52&4.1558E-03_JPRB,1.7275E-02_JPRB,2.2401E-02_JPRB,2.3742E-02_JPRB,2.2783E-02_JPRB,2.0184E-02_JPRB,&
53&1.6265E-02_JPRB,1.1330E-02_JPRB,2.0949E+00_JPRB/)
54KAO( :, 1, 2, 1) = (/&
55&3.2144E-03_JPRB,1.2713E-02_JPRB,1.6397E-02_JPRB,1.7964E-02_JPRB,1.7671E-02_JPRB,1.5897E-02_JPRB,&
56&1.2690E-02_JPRB,7.9486E-03_JPRB,1.7669E+00_JPRB/)
57KAO( :, 2, 2, 1) = (/&
58&3.1641E-03_JPRB,1.3084E-02_JPRB,1.7085E-02_JPRB,1.8507E-02_JPRB,1.8077E-02_JPRB,1.6151E-02_JPRB,&
59&1.2818E-02_JPRB,8.1279E-03_JPRB,1.7352E+00_JPRB/)
60KAO( :, 3, 2, 1) = (/&
61&3.1193E-03_JPRB,1.3476E-02_JPRB,1.7665E-02_JPRB,1.8949E-02_JPRB,1.8392E-02_JPRB,1.6337E-02_JPRB,&
62&1.2943E-02_JPRB,8.3974E-03_JPRB,1.7079E+00_JPRB/)
63KAO( :, 4, 2, 1) = (/&
64&3.0784E-03_JPRB,1.3887E-02_JPRB,1.8147E-02_JPRB,1.9317E-02_JPRB,1.8624E-02_JPRB,1.6477E-02_JPRB,&
65&1.3099E-02_JPRB,8.7556E-03_JPRB,1.6824E+00_JPRB/)
66KAO( :, 5, 2, 1) = (/&
67&3.0409E-03_JPRB,1.4281E-02_JPRB,1.8529E-02_JPRB,1.9610E-02_JPRB,1.8808E-02_JPRB,1.6609E-02_JPRB,&
68&1.3316E-02_JPRB,9.1921E-03_JPRB,1.6588E+00_JPRB/)
69KAO( :, 1, 3, 1) = (/&
70&2.3395E-03_JPRB,1.0516E-02_JPRB,1.3567E-02_JPRB,1.4918E-02_JPRB,1.4648E-02_JPRB,1.3103E-02_JPRB,&
71&1.0421E-02_JPRB,6.4902E-03_JPRB,1.3955E+00_JPRB/)
72KAO( :, 2, 3, 1) = (/&
73&2.2828E-03_JPRB,1.0805E-02_JPRB,1.4151E-02_JPRB,1.5331E-02_JPRB,1.4952E-02_JPRB,1.3287E-02_JPRB,&
74&1.0515E-02_JPRB,6.5971E-03_JPRB,1.3684E+00_JPRB/)
75KAO( :, 3, 3, 1) = (/&
76&2.2291E-03_JPRB,1.1094E-02_JPRB,1.4601E-02_JPRB,1.5662E-02_JPRB,1.5177E-02_JPRB,1.3417E-02_JPRB,&
77&1.0594E-02_JPRB,6.7764E-03_JPRB,1.3430E+00_JPRB/)
78KAO( :, 4, 3, 1) = (/&
79&2.1795E-03_JPRB,1.1390E-02_JPRB,1.4954E-02_JPRB,1.5923E-02_JPRB,1.5330E-02_JPRB,1.3512E-02_JPRB,&
80&1.0687E-02_JPRB,7.0307E-03_JPRB,1.3188E+00_JPRB/)
81KAO( :, 5, 3, 1) = (/&
82&2.1341E-03_JPRB,1.1671E-02_JPRB,1.5220E-02_JPRB,1.6118E-02_JPRB,1.5441E-02_JPRB,1.3589E-02_JPRB,&
83&1.0824E-02_JPRB,7.3529E-03_JPRB,1.2961E+00_JPRB/)
84KAO( :, 1, 4, 1) = (/&
85&1.7840E-03_JPRB,8.7256E-03_JPRB,1.1210E-02_JPRB,1.2367E-02_JPRB,1.2063E-02_JPRB,1.0762E-02_JPRB,&
86&8.5444E-03_JPRB,5.3058E-03_JPRB,1.1276E+00_JPRB/)
87KAO( :, 2, 4, 1) = (/&
88&1.7259E-03_JPRB,8.9625E-03_JPRB,1.1715E-02_JPRB,1.2698E-02_JPRB,1.2306E-02_JPRB,1.0908E-02_JPRB,&
89&8.6186E-03_JPRB,5.3631E-03_JPRB,1.1050E+00_JPRB/)
90KAO( :, 3, 4, 1) = (/&
91&1.6740E-03_JPRB,9.1828E-03_JPRB,1.2089E-02_JPRB,1.2950E-02_JPRB,1.2485E-02_JPRB,1.1008E-02_JPRB,&
92&8.6759E-03_JPRB,5.4730E-03_JPRB,1.0830E+00_JPRB/)
93KAO( :, 4, 4, 1) = (/&
94&1.6269E-03_JPRB,9.4080E-03_JPRB,1.2363E-02_JPRB,1.3144E-02_JPRB,1.2603E-02_JPRB,1.1084E-02_JPRB,&
95&8.7331E-03_JPRB,5.6457E-03_JPRB,1.0617E+00_JPRB/)
96KAO( :, 5, 4, 1) = (/&
97&1.5826E-03_JPRB,9.6219E-03_JPRB,1.2561E-02_JPRB,1.3277E-02_JPRB,1.2681E-02_JPRB,1.1138E-02_JPRB,&
98&8.8166E-03_JPRB,5.8778E-03_JPRB,1.0410E+00_JPRB/)
99KAO( :, 1, 5, 1) = (/&
100&1.4218E-03_JPRB,7.2507E-03_JPRB,9.2498E-03_JPRB,1.0184E-02_JPRB,9.8965E-03_JPRB,8.8186E-03_JPRB,&
101&6.9985E-03_JPRB,4.3450E-03_JPRB,9.2779E-01_JPRB/)
102KAO( :, 2, 5, 1) = (/&
103&1.3666E-03_JPRB,7.4483E-03_JPRB,9.6959E-03_JPRB,1.0459E-02_JPRB,1.0098E-02_JPRB,8.9432E-03_JPRB,&
104&7.0603E-03_JPRB,4.3726E-03_JPRB,9.0832E-01_JPRB/)
105KAO( :, 3, 5, 1) = (/&
106&1.3168E-03_JPRB,7.6293E-03_JPRB,1.0015E-02_JPRB,1.0662E-02_JPRB,1.0249E-02_JPRB,9.0283E-03_JPRB,&
107&7.1071E-03_JPRB,4.4354E-03_JPRB,8.8937E-01_JPRB/)
108KAO( :, 4, 5, 1) = (/&
109&1.2715E-03_JPRB,7.8071E-03_JPRB,1.0236E-02_JPRB,1.0812E-02_JPRB,1.0352E-02_JPRB,9.0911E-03_JPRB,&
110&7.1478E-03_JPRB,4.5476E-03_JPRB,8.7061E-01_JPRB/)
111KAO( :, 5, 5, 1) = (/&
112&1.2303E-03_JPRB,7.9773E-03_JPRB,1.0389E-02_JPRB,1.0918E-02_JPRB,1.0419E-02_JPRB,9.1375E-03_JPRB,&
113&7.1984E-03_JPRB,4.7106E-03_JPRB,8.5172E-01_JPRB/)
114KAO( :, 1, 6, 1) = (/&
115&1.1609E-03_JPRB,5.9982E-03_JPRB,7.5441E-03_JPRB,8.3219E-03_JPRB,8.0915E-03_JPRB,7.2051E-03_JPRB,&
116&5.7215E-03_JPRB,3.5604E-03_JPRB,7.7269E-01_JPRB/)
117KAO( :, 2, 6, 1) = (/&
118&1.1108E-03_JPRB,6.1686E-03_JPRB,7.9597E-03_JPRB,8.5717E-03_JPRB,8.2612E-03_JPRB,7.3195E-03_JPRB,&
119&5.7777E-03_JPRB,3.5731E-03_JPRB,7.5578E-01_JPRB/)
120KAO( :, 3, 6, 1) = (/&
121&1.0654E-03_JPRB,6.3243E-03_JPRB,8.2392E-03_JPRB,8.7441E-03_JPRB,8.3924E-03_JPRB,7.3948E-03_JPRB,&
122&5.8188E-03_JPRB,3.6047E-03_JPRB,7.3901E-01_JPRB/)
123KAO( :, 4, 6, 1) = (/&
124&1.0238E-03_JPRB,6.4720E-03_JPRB,8.4331E-03_JPRB,8.8696E-03_JPRB,8.4869E-03_JPRB,7.4498E-03_JPRB,&
125&5.8508E-03_JPRB,3.6714E-03_JPRB,7.2195E-01_JPRB/)
126KAO( :, 5, 6, 1) = (/&
127&9.8558E-04_JPRB,6.6127E-03_JPRB,8.5578E-03_JPRB,8.9617E-03_JPRB,8.5506E-03_JPRB,7.4929E-03_JPRB,&
128&5.8848E-03_JPRB,3.7810E-03_JPRB,7.0447E-01_JPRB/)
129KAO( :, 1, 7, 1) = (/&
130&9.5793E-04_JPRB,4.9392E-03_JPRB,6.0959E-03_JPRB,6.7658E-03_JPRB,6.6008E-03_JPRB,5.8761E-03_JPRB,&
131&4.6722E-03_JPRB,2.9165E-03_JPRB,6.5237E-01_JPRB/)
132KAO( :, 2, 7, 1) = (/&
133&9.1189E-04_JPRB,5.0775E-03_JPRB,6.4806E-03_JPRB,7.0004E-03_JPRB,6.7455E-03_JPRB,5.9796E-03_JPRB,&
134&4.7234E-03_JPRB,2.9250E-03_JPRB,6.3689E-01_JPRB/)
135KAO( :, 3, 7, 1) = (/&
136&8.7036E-04_JPRB,5.2121E-03_JPRB,6.7389E-03_JPRB,7.1547E-03_JPRB,6.8614E-03_JPRB,6.0502E-03_JPRB,&
137&4.7609E-03_JPRB,2.9391E-03_JPRB,6.2141E-01_JPRB/)
138KAO( :, 4, 7, 1) = (/&
139&8.3275E-04_JPRB,5.3378E-03_JPRB,6.9169E-03_JPRB,7.2639E-03_JPRB,6.9474E-03_JPRB,6.1007E-03_JPRB,&
140&4.7893E-03_JPRB,2.9754E-03_JPRB,6.0575E-01_JPRB/)
141KAO( :, 5, 7, 1) = (/&
142&7.9855E-04_JPRB,5.4591E-03_JPRB,7.0288E-03_JPRB,7.3444E-03_JPRB,7.0074E-03_JPRB,6.1400E-03_JPRB,&
143&4.8149E-03_JPRB,3.0449E-03_JPRB,5.8968E-01_JPRB/)
144KAO( :, 1, 8, 1) = (/&
145&7.9465E-04_JPRB,4.0550E-03_JPRB,4.9071E-03_JPRB,5.4722E-03_JPRB,5.3709E-03_JPRB,4.7864E-03_JPRB,&
146&3.8134E-03_JPRB,2.3876E-03_JPRB,5.5983E-01_JPRB/)
147KAO( :, 2, 8, 1) = (/&
148&7.5211E-04_JPRB,4.1645E-03_JPRB,5.2395E-03_JPRB,5.6983E-03_JPRB,5.5014E-03_JPRB,4.8765E-03_JPRB,&
149&3.8582E-03_JPRB,2.3958E-03_JPRB,5.4541E-01_JPRB/)
150KAO( :, 3, 8, 1) = (/&
151&7.1425E-04_JPRB,4.2775E-03_JPRB,5.4907E-03_JPRB,5.8442E-03_JPRB,5.6010E-03_JPRB,4.9449E-03_JPRB,&
152&3.8932E-03_JPRB,2.4025E-03_JPRB,5.3089E-01_JPRB/)
153KAO( :, 4, 8, 1) = (/&
154&6.8017E-04_JPRB,4.3807E-03_JPRB,5.6532E-03_JPRB,5.9396E-03_JPRB,5.6779E-03_JPRB,4.9919E-03_JPRB,&
155&3.9191E-03_JPRB,2.4205E-03_JPRB,5.1625E-01_JPRB/)
156KAO( :, 5, 8, 1) = (/&
157&6.4915E-04_JPRB,4.4822E-03_JPRB,5.7602E-03_JPRB,6.0112E-03_JPRB,5.7346E-03_JPRB,5.0274E-03_JPRB,&
158&3.9402E-03_JPRB,2.4616E-03_JPRB,5.0156E-01_JPRB/)
159KAO( :, 1, 9, 1) = (/&
160&6.6256E-04_JPRB,3.3231E-03_JPRB,3.9423E-03_JPRB,4.3965E-03_JPRB,4.3550E-03_JPRB,3.8950E-03_JPRB,&
161&3.1106E-03_JPRB,1.9527E-03_JPRB,4.7909E-01_JPRB/)
162KAO( :, 2, 9, 1) = (/&
163&6.2337E-04_JPRB,3.4093E-03_JPRB,4.2109E-03_JPRB,4.6231E-03_JPRB,4.4821E-03_JPRB,3.9733E-03_JPRB,&
164&3.1493E-03_JPRB,1.9618E-03_JPRB,4.6525E-01_JPRB/)
165KAO( :, 3, 9, 1) = (/&
166&5.8859E-04_JPRB,3.5021E-03_JPRB,4.4524E-03_JPRB,4.7638E-03_JPRB,4.5675E-03_JPRB,4.0358E-03_JPRB,&
167&3.1809E-03_JPRB,1.9669E-03_JPRB,4.5157E-01_JPRB/)
168KAO( :, 4, 9, 1) = (/&
169&5.5740E-04_JPRB,3.5874E-03_JPRB,4.6083E-03_JPRB,4.8522E-03_JPRB,4.6363E-03_JPRB,4.0813E-03_JPRB,&
170&3.2054E-03_JPRB,1.9751E-03_JPRB,4.3811E-01_JPRB/)
171KAO( :, 5, 9, 1) = (/&
172&5.2927E-04_JPRB,3.6711E-03_JPRB,4.7102E-03_JPRB,4.9155E-03_JPRB,4.6887E-03_JPRB,4.1135E-03_JPRB,&
173&3.2248E-03_JPRB,1.9974E-03_JPRB,4.2484E-01_JPRB/)
174KAO( :, 1,10, 1) = (/&
175&5.5819E-04_JPRB,2.7284E-03_JPRB,3.1809E-03_JPRB,3.5314E-03_JPRB,3.5278E-03_JPRB,3.1713E-03_JPRB,&
176&2.5390E-03_JPRB,1.5979E-03_JPRB,4.1170E-01_JPRB/)
177KAO( :, 2,10, 1) = (/&
178&5.2264E-04_JPRB,2.7960E-03_JPRB,3.3951E-03_JPRB,3.7490E-03_JPRB,3.6516E-03_JPRB,3.2397E-03_JPRB,&
179&2.5727E-03_JPRB,1.6061E-03_JPRB,3.9866E-01_JPRB/)
180KAO( :, 3,10, 1) = (/&
181&4.9139E-04_JPRB,2.8693E-03_JPRB,3.6092E-03_JPRB,3.8820E-03_JPRB,3.7278E-03_JPRB,3.2940E-03_JPRB,&
182&2.5999E-03_JPRB,1.6112E-03_JPRB,3.8585E-01_JPRB/)
183KAO( :, 4,10, 1) = (/&
184&4.6354E-04_JPRB,2.9405E-03_JPRB,3.7573E-03_JPRB,3.9654E-03_JPRB,3.7869E-03_JPRB,3.3368E-03_JPRB,&
185&2.6225E-03_JPRB,1.6157E-03_JPRB,3.7334E-01_JPRB/)
186KAO( :, 5,10, 1) = (/&
187&4.3854E-04_JPRB,3.0087E-03_JPRB,3.8506E-03_JPRB,4.0212E-03_JPRB,3.8338E-03_JPRB,3.3662E-03_JPRB,&
188&2.6402E-03_JPRB,1.6279E-03_JPRB,3.6129E-01_JPRB/)
189KAO( :, 1,11, 1) = (/&
190&4.5821E-04_JPRB,2.2621E-03_JPRB,2.6447E-03_JPRB,2.9297E-03_JPRB,2.9129E-03_JPRB,2.6105E-03_JPRB,&
191&2.0860E-03_JPRB,1.3108E-03_JPRB,3.4781E-01_JPRB/)
192KAO( :, 2,11, 1) = (/&
193&4.2863E-04_JPRB,2.3183E-03_JPRB,2.8194E-03_JPRB,3.0973E-03_JPRB,3.0077E-03_JPRB,2.6638E-03_JPRB,&
194&2.1125E-03_JPRB,1.3172E-03_JPRB,3.3606E-01_JPRB/)
195KAO( :, 3,11, 1) = (/&
196&4.0252E-04_JPRB,2.3779E-03_JPRB,2.9883E-03_JPRB,3.2000E-03_JPRB,3.0663E-03_JPRB,2.7064E-03_JPRB,&
197&2.1343E-03_JPRB,1.3214E-03_JPRB,3.2458E-01_JPRB/)
198KAO( :, 4,11, 1) = (/&
199&3.7927E-04_JPRB,2.4351E-03_JPRB,3.1025E-03_JPRB,3.2639E-03_JPRB,3.1126E-03_JPRB,2.7399E-03_JPRB,&
200&2.1527E-03_JPRB,1.3253E-03_JPRB,3.1358E-01_JPRB/)
201KAO( :, 5,11, 1) = (/&
202&3.5851E-04_JPRB,2.4897E-03_JPRB,3.1743E-03_JPRB,3.3073E-03_JPRB,3.1494E-03_JPRB,2.7631E-03_JPRB,&
203&2.1670E-03_JPRB,1.3357E-03_JPRB,3.0304E-01_JPRB/)
204KAO( :, 1,12, 1) = (/&
205&3.7566E-04_JPRB,1.8705E-03_JPRB,2.1955E-03_JPRB,2.4263E-03_JPRB,2.4027E-03_JPRB,2.1477E-03_JPRB,&
206&1.7133E-03_JPRB,1.0753E-03_JPRB,2.9614E-01_JPRB/)
207KAO( :, 2,12, 1) = (/&
208&3.5112E-04_JPRB,1.9175E-03_JPRB,2.3381E-03_JPRB,2.5565E-03_JPRB,2.4759E-03_JPRB,2.1892E-03_JPRB,&
209&1.7343E-03_JPRB,1.0803E-03_JPRB,2.8551E-01_JPRB/)
210KAO( :, 3,12, 1) = (/&
211&3.2946E-04_JPRB,1.9676E-03_JPRB,2.4711E-03_JPRB,2.6363E-03_JPRB,2.5213E-03_JPRB,2.2227E-03_JPRB,&
212&1.7519E-03_JPRB,1.0837E-03_JPRB,2.7528E-01_JPRB/)
213KAO( :, 4,12, 1) = (/&
214&3.1028E-04_JPRB,2.0138E-03_JPRB,2.5600E-03_JPRB,2.6860E-03_JPRB,2.5577E-03_JPRB,2.2494E-03_JPRB,&
215&1.7667E-03_JPRB,1.0872E-03_JPRB,2.6557E-01_JPRB/)
216KAO( :, 5,12, 1) = (/&
217&2.9320E-04_JPRB,2.0583E-03_JPRB,2.6161E-03_JPRB,2.7200E-03_JPRB,2.5866E-03_JPRB,2.2676E-03_JPRB,&
218&1.7779E-03_JPRB,1.0961E-03_JPRB,2.5635E-01_JPRB/)
219KAO( :, 1,13, 1) = (/&
220&3.0764E-04_JPRB,1.5429E-03_JPRB,1.8188E-03_JPRB,2.0063E-03_JPRB,1.9799E-03_JPRB,1.7660E-03_JPRB,&
221&1.4068E-03_JPRB,8.8203E-04_JPRB,2.5899E-01_JPRB/)
222KAO( :, 2,13, 1) = (/&
223&2.8735E-04_JPRB,1.5821E-03_JPRB,1.9364E-03_JPRB,2.1086E-03_JPRB,2.0369E-03_JPRB,1.7986E-03_JPRB,&
224&1.4237E-03_JPRB,8.8599E-04_JPRB,2.4914E-01_JPRB/)
225KAO( :, 3,13, 1) = (/&
226&2.6953E-04_JPRB,1.6236E-03_JPRB,2.0412E-03_JPRB,2.1709E-03_JPRB,2.0725E-03_JPRB,1.8251E-03_JPRB,&
227&1.4376E-03_JPRB,8.8887E-04_JPRB,2.3982E-01_JPRB/)
228KAO( :, 4,13, 1) = (/&
229&2.5380E-04_JPRB,1.6612E-03_JPRB,2.1113E-03_JPRB,2.2099E-03_JPRB,2.1013E-03_JPRB,1.8462E-03_JPRB,&
230&1.4493E-03_JPRB,8.9188E-04_JPRB,2.3102E-01_JPRB/)
231KAO( :, 5,13, 1) = (/&
232&2.3980E-04_JPRB,1.6979E-03_JPRB,2.1555E-03_JPRB,2.2365E-03_JPRB,2.1241E-03_JPRB,1.8607E-03_JPRB,&
233&1.4583E-03_JPRB,8.9931E-04_JPRB,2.2279E-01_JPRB/)
234KAO( :, 1, 1, 2) = (/&
235&7.0943E-03_JPRB,3.8387E-02_JPRB,4.3151E-02_JPRB,4.2731E-02_JPRB,4.0946E-02_JPRB,3.8949E-02_JPRB,&
236&3.7362E-02_JPRB,3.5997E-02_JPRB,3.1543E+00_JPRB/)
237KAO( :, 2, 1, 2) = (/&
238&7.0850E-03_JPRB,3.8454E-02_JPRB,4.2900E-02_JPRB,4.3028E-02_JPRB,4.2284E-02_JPRB,4.1753E-02_JPRB,&
239&4.1711E-02_JPRB,4.1528E-02_JPRB,3.1189E+00_JPRB/)
240KAO( :, 3, 1, 2) = (/&
241&7.0813E-03_JPRB,3.8363E-02_JPRB,4.2614E-02_JPRB,4.3463E-02_JPRB,4.3963E-02_JPRB,4.4905E-02_JPRB,&
242&4.6271E-02_JPRB,4.7132E-02_JPRB,3.0948E+00_JPRB/)
243KAO( :, 4, 1, 2) = (/&
244&7.0651E-03_JPRB,3.8151E-02_JPRB,4.2395E-02_JPRB,4.4068E-02_JPRB,4.5862E-02_JPRB,4.8163E-02_JPRB,&
245&5.0764E-02_JPRB,5.2533E-02_JPRB,3.0805E+00_JPRB/)
246KAO( :, 5, 1, 2) = (/&
247&7.0475E-03_JPRB,3.7840E-02_JPRB,4.2280E-02_JPRB,4.4809E-02_JPRB,4.7823E-02_JPRB,5.1372E-02_JPRB,&
248&5.5020E-02_JPRB,5.7574E-02_JPRB,3.0698E+00_JPRB/)
249KAO( :, 1, 2, 2) = (/&
250&5.4133E-03_JPRB,3.2388E-02_JPRB,3.6287E-02_JPRB,3.5903E-02_JPRB,3.4407E-02_JPRB,3.2747E-02_JPRB,&
251&3.1453E-02_JPRB,3.0272E-02_JPRB,2.5533E+00_JPRB/)
252KAO( :, 2, 2, 2) = (/&
253&5.3611E-03_JPRB,3.2430E-02_JPRB,3.6074E-02_JPRB,3.6216E-02_JPRB,3.5593E-02_JPRB,3.5203E-02_JPRB,&
254&3.5194E-02_JPRB,3.4997E-02_JPRB,2.5086E+00_JPRB/)
255KAO( :, 3, 2, 2) = (/&
256&5.3281E-03_JPRB,3.2322E-02_JPRB,3.5847E-02_JPRB,3.6639E-02_JPRB,3.7078E-02_JPRB,3.7935E-02_JPRB,&
257&3.9143E-02_JPRB,3.9849E-02_JPRB,2.4723E+00_JPRB/)
258KAO( :, 4, 2, 2) = (/&
259&5.3094E-03_JPRB,3.2112E-02_JPRB,3.5677E-02_JPRB,3.7178E-02_JPRB,3.8741E-02_JPRB,4.0767E-02_JPRB,&
260&4.3021E-02_JPRB,4.4489E-02_JPRB,2.4475E+00_JPRB/)
261KAO( :, 5, 2, 2) = (/&
262&5.2887E-03_JPRB,3.1839E-02_JPRB,3.5583E-02_JPRB,3.7831E-02_JPRB,4.0436E-02_JPRB,4.3525E-02_JPRB,&
263&4.6680E-02_JPRB,4.8869E-02_JPRB,2.4311E+00_JPRB/)
264KAO( :, 1, 3, 2) = (/&
265&4.0611E-03_JPRB,2.7170E-02_JPRB,3.0405E-02_JPRB,3.0026E-02_JPRB,2.8647E-02_JPRB,2.7115E-02_JPRB,&
266&2.5770E-02_JPRB,2.4484E-02_JPRB,2.0491E+00_JPRB/)
267KAO( :, 2, 3, 2) = (/&
268&3.9775E-03_JPRB,2.7189E-02_JPRB,3.0241E-02_JPRB,3.0301E-02_JPRB,2.9626E-02_JPRB,2.9114E-02_JPRB,&
269&2.8843E-02_JPRB,2.8434E-02_JPRB,1.9991E+00_JPRB/)
270KAO( :, 3, 3, 2) = (/&
271&3.9065E-03_JPRB,2.7099E-02_JPRB,3.0059E-02_JPRB,3.0647E-02_JPRB,3.0854E-02_JPRB,3.1397E-02_JPRB,&
272&3.2170E-02_JPRB,3.2541E-02_JPRB,1.9562E+00_JPRB/)
273KAO( :, 4, 3, 2) = (/&
274&3.8466E-03_JPRB,2.6925E-02_JPRB,2.9905E-02_JPRB,3.1087E-02_JPRB,3.2235E-02_JPRB,3.3772E-02_JPRB,&
275&3.5477E-02_JPRB,3.6558E-02_JPRB,1.9207E+00_JPRB/)
276KAO( :, 5, 3, 2) = (/&
277&3.7983E-03_JPRB,2.6668E-02_JPRB,2.9797E-02_JPRB,3.1593E-02_JPRB,3.3666E-02_JPRB,3.6136E-02_JPRB,&
278&3.8655E-02_JPRB,4.0337E-02_JPRB,1.8904E+00_JPRB/)
279KAO( :, 1, 4, 2) = (/&
280&3.1618E-03_JPRB,2.2735E-02_JPRB,2.5430E-02_JPRB,2.5073E-02_JPRB,2.3860E-02_JPRB,2.2346E-02_JPRB,&
281&2.0906E-02_JPRB,1.9493E-02_JPRB,1.6815E+00_JPRB/)
282KAO( :, 2, 4, 2) = (/&
283&3.0772E-03_JPRB,2.2769E-02_JPRB,2.5323E-02_JPRB,2.5294E-02_JPRB,2.4614E-02_JPRB,2.3917E-02_JPRB,&
284&2.3363E-02_JPRB,2.2717E-02_JPRB,1.6300E+00_JPRB/)
285KAO( :, 3, 4, 2) = (/&
286&2.9989E-03_JPRB,2.2705E-02_JPRB,2.5187E-02_JPRB,2.5585E-02_JPRB,2.5590E-02_JPRB,2.5772E-02_JPRB,&
287&2.6101E-02_JPRB,2.6159E-02_JPRB,1.5868E+00_JPRB/)
288KAO( :, 4, 4, 2) = (/&
289&2.9269E-03_JPRB,2.2567E-02_JPRB,2.5061E-02_JPRB,2.5933E-02_JPRB,2.6708E-02_JPRB,2.7738E-02_JPRB,&
290&2.8897E-02_JPRB,2.9580E-02_JPRB,1.5492E+00_JPRB/)
291KAO( :, 5, 4, 2) = (/&
292&2.8633E-03_JPRB,2.2345E-02_JPRB,2.4951E-02_JPRB,2.6338E-02_JPRB,2.7898E-02_JPRB,2.9732E-02_JPRB,&
293&3.1610E-02_JPRB,3.2830E-02_JPRB,1.5179E+00_JPRB/)
294KAO( :, 1, 5, 2) = (/&
295&2.5495E-03_JPRB,1.8985E-02_JPRB,2.1259E-02_JPRB,2.0956E-02_JPRB,1.9882E-02_JPRB,1.8351E-02_JPRB,&
296&1.6812E-02_JPRB,1.5262E-02_JPRB,1.4081E+00_JPRB/)
297KAO( :, 2, 5, 2) = (/&
298&2.4663E-03_JPRB,1.9038E-02_JPRB,2.1177E-02_JPRB,2.1145E-02_JPRB,2.0437E-02_JPRB,1.9579E-02_JPRB,&
299&1.8803E-02_JPRB,1.7942E-02_JPRB,1.3595E+00_JPRB/)
300KAO( :, 3, 5, 2) = (/&
301&2.3921E-03_JPRB,1.9006E-02_JPRB,2.1089E-02_JPRB,2.1375E-02_JPRB,2.1189E-02_JPRB,2.1072E-02_JPRB,&
302&2.1043E-02_JPRB,2.0814E-02_JPRB,1.3176E+00_JPRB/)
303KAO( :, 4, 5, 2) = (/&
304&2.3238E-03_JPRB,1.8899E-02_JPRB,2.0991E-02_JPRB,2.1643E-02_JPRB,2.2082E-02_JPRB,2.2687E-02_JPRB,&
305&2.3376E-02_JPRB,2.3722E-02_JPRB,1.2814E+00_JPRB/)
306KAO( :, 5, 5, 2) = (/&
307&2.2609E-03_JPRB,1.8711E-02_JPRB,2.0886E-02_JPRB,2.1958E-02_JPRB,2.3037E-02_JPRB,2.4321E-02_JPRB,&
308&2.5657E-02_JPRB,2.6474E-02_JPRB,1.2502E+00_JPRB/)
309KAO( :, 1, 6, 2) = (/&
310&2.1136E-03_JPRB,1.5844E-02_JPRB,1.7815E-02_JPRB,1.7475E-02_JPRB,1.6448E-02_JPRB,1.4925E-02_JPRB,&
311&1.3323E-02_JPRB,1.1714E-02_JPRB,1.1933E+00_JPRB/)
312KAO( :, 2, 6, 2) = (/&
313&2.0306E-03_JPRB,1.5911E-02_JPRB,1.7725E-02_JPRB,1.7645E-02_JPRB,1.6857E-02_JPRB,1.5846E-02_JPRB,&
314&1.4877E-02_JPRB,1.3852E-02_JPRB,1.1478E+00_JPRB/)
315KAO( :, 3, 6, 2) = (/&
316&1.9573E-03_JPRB,1.5900E-02_JPRB,1.7665E-02_JPRB,1.7815E-02_JPRB,1.7433E-02_JPRB,1.7030E-02_JPRB,&
317&1.6681E-02_JPRB,1.6204E-02_JPRB,1.1091E+00_JPRB/)
318KAO( :, 4, 6, 2) = (/&
319&1.8915E-03_JPRB,1.5823E-02_JPRB,1.7587E-02_JPRB,1.8019E-02_JPRB,1.8141E-02_JPRB,1.8355E-02_JPRB,&
320&1.8615E-02_JPRB,1.8633E-02_JPRB,1.0755E+00_JPRB/)
321KAO( :, 5, 6, 2) = (/&
322&1.8316E-03_JPRB,1.5671E-02_JPRB,1.7495E-02_JPRB,1.8250E-02_JPRB,1.8907E-02_JPRB,1.9704E-02_JPRB,&
323&2.0534E-02_JPRB,2.0986E-02_JPRB,1.0458E+00_JPRB/)
324KAO( :, 1, 7, 2) = (/&
325&1.7779E-03_JPRB,1.3214E-02_JPRB,1.4915E-02_JPRB,1.4490E-02_JPRB,1.3534E-02_JPRB,1.2115E-02_JPRB,&
326&1.0525E-02_JPRB,8.9151E-03_JPRB,1.0250E+00_JPRB/)
327KAO( :, 2, 7, 2) = (/&
328&1.6955E-03_JPRB,1.3308E-02_JPRB,1.4823E-02_JPRB,1.4622E-02_JPRB,1.3840E-02_JPRB,1.2763E-02_JPRB,&
329&1.1685E-02_JPRB,1.0574E-02_JPRB,9.8268E-01_JPRB/)
330KAO( :, 3, 7, 2) = (/&
331&1.6237E-03_JPRB,1.3311E-02_JPRB,1.4766E-02_JPRB,1.4761E-02_JPRB,1.4249E-02_JPRB,1.3650E-02_JPRB,&
332&1.3091E-02_JPRB,1.2450E-02_JPRB,9.4696E-01_JPRB/)
333KAO( :, 4, 7, 2) = (/&
334&1.5603E-03_JPRB,1.3256E-02_JPRB,1.4695E-02_JPRB,1.4910E-02_JPRB,1.4782E-02_JPRB,1.4700E-02_JPRB,&
335&1.4648E-02_JPRB,1.4438E-02_JPRB,9.1575E-01_JPRB/)
336KAO( :, 5, 7, 2) = (/&
337&1.5029E-03_JPRB,1.3127E-02_JPRB,1.4617E-02_JPRB,1.5078E-02_JPRB,1.5382E-02_JPRB,1.5792E-02_JPRB,&
338&1.6228E-02_JPRB,1.6399E-02_JPRB,8.8786E-01_JPRB/)
339KAO( :, 1, 8, 2) = (/&
340&1.5020E-03_JPRB,1.1002E-02_JPRB,1.2408E-02_JPRB,1.1986E-02_JPRB,1.1101E-02_JPRB,9.8378E-03_JPRB,&
341&8.3304E-03_JPRB,6.7732E-03_JPRB,8.9770E-01_JPRB/)
342KAO( :, 2, 8, 2) = (/&
343&1.4230E-03_JPRB,1.1110E-02_JPRB,1.2342E-02_JPRB,1.2073E-02_JPRB,1.1340E-02_JPRB,1.0282E-02_JPRB,&
344&9.1665E-03_JPRB,8.0270E-03_JPRB,8.5759E-01_JPRB/)
345KAO( :, 3, 8, 2) = (/&
346&1.3543E-03_JPRB,1.1124E-02_JPRB,1.2281E-02_JPRB,1.2183E-02_JPRB,1.1624E-02_JPRB,1.0918E-02_JPRB,&
347&1.0231E-02_JPRB,9.4957E-03_JPRB,8.2343E-01_JPRB/)
348KAO( :, 4, 8, 2) = (/&
349&1.2937E-03_JPRB,1.1088E-02_JPRB,1.2220E-02_JPRB,1.2293E-02_JPRB,1.2008E-02_JPRB,1.1719E-02_JPRB,&
350&1.1453E-02_JPRB,1.1081E-02_JPRB,7.9354E-01_JPRB/)
351KAO( :, 5, 8, 2) = (/&
352&1.2398E-03_JPRB,1.0985E-02_JPRB,1.2152E-02_JPRB,1.2411E-02_JPRB,1.2469E-02_JPRB,1.2594E-02_JPRB,&
353&1.2739E-02_JPRB,1.2705E-02_JPRB,7.6694E-01_JPRB/)
354KAO( :, 1, 9, 2) = (/&
355&1.2772E-03_JPRB,9.1185E-03_JPRB,1.0283E-02_JPRB,9.9108E-03_JPRB,9.0933E-03_JPRB,7.9937E-03_JPRB,&
356&6.6146E-03_JPRB,5.1482E-03_JPRB,7.8565E-01_JPRB/)
357KAO( :, 2, 9, 2) = (/&
358&1.2008E-03_JPRB,9.2246E-03_JPRB,1.0254E-02_JPRB,9.9497E-03_JPRB,9.2744E-03_JPRB,8.2956E-03_JPRB,&
359&7.1977E-03_JPRB,6.0715E-03_JPRB,7.4762E-01_JPRB/)
360KAO( :, 3, 9, 2) = (/&
361&1.1346E-03_JPRB,9.2567E-03_JPRB,1.0190E-02_JPRB,1.0030E-02_JPRB,9.4797E-03_JPRB,8.7349E-03_JPRB,&
362&7.9799E-03_JPRB,7.1919E-03_JPRB,7.1506E-01_JPRB/)
363KAO( :, 4, 9, 2) = (/&
364&1.0767E-03_JPRB,9.2317E-03_JPRB,1.0137E-02_JPRB,1.0114E-02_JPRB,9.7458E-03_JPRB,9.3188E-03_JPRB,&
365&8.9121E-03_JPRB,8.4415E-03_JPRB,6.8636E-01_JPRB/)
366KAO( :, 5, 9, 2) = (/&
367&1.0254E-03_JPRB,9.1543E-03_JPRB,1.0077E-02_JPRB,1.0198E-02_JPRB,1.0088E-02_JPRB,1.0005E-02_JPRB,&
368&9.9430E-03_JPRB,9.7610E-03_JPRB,6.6072E-01_JPRB/)
369KAO( :, 1,10, 2) = (/&
370&1.0908E-03_JPRB,7.5349E-03_JPRB,8.5055E-03_JPRB,8.1913E-03_JPRB,7.4594E-03_JPRB,6.5117E-03_JPRB,&
371&5.3043E-03_JPRB,3.9738E-03_JPRB,6.8647E-01_JPRB/)
372KAO( :, 2,10, 2) = (/&
373&1.0219E-03_JPRB,7.6350E-03_JPRB,8.4942E-03_JPRB,8.2002E-03_JPRB,7.5922E-03_JPRB,6.7288E-03_JPRB,&
374&5.7099E-03_JPRB,4.6532E-03_JPRB,6.5148E-01_JPRB/)
375KAO( :, 3,10, 2) = (/&
376&9.6216E-04_JPRB,7.6768E-03_JPRB,8.4412E-03_JPRB,8.2544E-03_JPRB,7.7463E-03_JPRB,7.0316E-03_JPRB,&
377&6.2789E-03_JPRB,5.5007E-03_JPRB,6.2153E-01_JPRB/)
378KAO( :, 4,10, 2) = (/&
379&9.0949E-04_JPRB,7.6636E-03_JPRB,8.3915E-03_JPRB,8.3156E-03_JPRB,7.9306E-03_JPRB,7.4536E-03_JPRB,&
380&6.9877E-03_JPRB,6.4813E-03_JPRB,5.9517E-01_JPRB/)
381KAO( :, 5,10, 2) = (/&
382&8.6244E-04_JPRB,7.6028E-03_JPRB,8.3387E-03_JPRB,8.3779E-03_JPRB,8.1810E-03_JPRB,7.9831E-03_JPRB,&
383&7.7997E-03_JPRB,7.5371E-03_JPRB,5.7147E-01_JPRB/)
384KAO( :, 1,11, 2) = (/&
385&9.0171E-04_JPRB,6.2591E-03_JPRB,7.0260E-03_JPRB,6.7592E-03_JPRB,6.1582E-03_JPRB,5.3757E-03_JPRB,&
386&4.3823E-03_JPRB,3.2909E-03_JPRB,5.8305E-01_JPRB/)
387KAO( :, 2,11, 2) = (/&
388&8.4471E-04_JPRB,6.3292E-03_JPRB,7.0117E-03_JPRB,6.7680E-03_JPRB,6.2644E-03_JPRB,5.5512E-03_JPRB,&
389&4.7161E-03_JPRB,3.8488E-03_JPRB,5.5321E-01_JPRB/)
390KAO( :, 3,11, 2) = (/&
391&7.9501E-04_JPRB,6.3542E-03_JPRB,6.9623E-03_JPRB,6.8076E-03_JPRB,6.3850E-03_JPRB,5.7984E-03_JPRB,&
392&5.1814E-03_JPRB,4.5421E-03_JPRB,5.2752E-01_JPRB/)
393KAO( :, 4,11, 2) = (/&
394&7.5106E-04_JPRB,6.3305E-03_JPRB,6.9164E-03_JPRB,6.8517E-03_JPRB,6.5339E-03_JPRB,6.1441E-03_JPRB,&
395&5.7616E-03_JPRB,5.3442E-03_JPRB,5.0480E-01_JPRB/)
396KAO( :, 5,11, 2) = (/&
397&7.1176E-04_JPRB,6.2680E-03_JPRB,6.8638E-03_JPRB,6.9010E-03_JPRB,6.7399E-03_JPRB,6.5787E-03_JPRB,&
398&6.4276E-03_JPRB,6.2093E-03_JPRB,4.8460E-01_JPRB/)
399KAO( :, 1,12, 2) = (/&
400&7.4344E-04_JPRB,5.1893E-03_JPRB,5.7960E-03_JPRB,5.5712E-03_JPRB,5.0774E-03_JPRB,4.4320E-03_JPRB,&
401&3.6146E-03_JPRB,2.7192E-03_JPRB,4.9987E-01_JPRB/)
402KAO( :, 2,12, 2) = (/&
403&6.9630E-04_JPRB,5.2389E-03_JPRB,5.7776E-03_JPRB,5.5769E-03_JPRB,5.1607E-03_JPRB,4.5730E-03_JPRB,&
404&3.8872E-03_JPRB,3.1759E-03_JPRB,4.7411E-01_JPRB/)
405KAO( :, 3,12, 2) = (/&
406&6.5505E-04_JPRB,5.2495E-03_JPRB,5.7335E-03_JPRB,5.6051E-03_JPRB,5.2555E-03_JPRB,4.7752E-03_JPRB,&
407&4.2687E-03_JPRB,3.7439E-03_JPRB,4.5176E-01_JPRB/)
408KAO( :, 4,12, 2) = (/&
409&6.1851E-04_JPRB,5.2199E-03_JPRB,5.6893E-03_JPRB,5.6379E-03_JPRB,5.3780E-03_JPRB,5.0596E-03_JPRB,&
410&4.7451E-03_JPRB,4.4010E-03_JPRB,4.3213E-01_JPRB/)
411KAO( :, 5,12, 2) = (/&
412&5.8564E-04_JPRB,5.1584E-03_JPRB,5.6408E-03_JPRB,5.6781E-03_JPRB,5.5493E-03_JPRB,5.4174E-03_JPRB,&
413&5.2919E-03_JPRB,5.1102E-03_JPRB,4.1474E-01_JPRB/)
414KAO( :, 1,13, 2) = (/&
415&6.1162E-04_JPRB,4.2978E-03_JPRB,4.7775E-03_JPRB,4.5861E-03_JPRB,4.1806E-03_JPRB,3.6483E-03_JPRB,&
416&2.9761E-03_JPRB,2.2409E-03_JPRB,4.4173E-01_JPRB/)
417KAO( :, 2,13, 2) = (/&
418&5.7264E-04_JPRB,4.3335E-03_JPRB,4.7546E-03_JPRB,4.5895E-03_JPRB,4.2458E-03_JPRB,3.7618E-03_JPRB,&
419&3.1994E-03_JPRB,2.6153E-03_JPRB,4.1858E-01_JPRB/)
420KAO( :, 3,13, 2) = (/&
421&5.3845E-04_JPRB,4.3324E-03_JPRB,4.7152E-03_JPRB,4.6098E-03_JPRB,4.3213E-03_JPRB,3.9280E-03_JPRB,&
422&3.5124E-03_JPRB,3.0807E-03_JPRB,3.9852E-01_JPRB/)
423KAO( :, 4,13, 2) = (/&
424&5.0800E-04_JPRB,4.3007E-03_JPRB,4.6739E-03_JPRB,4.6354E-03_JPRB,4.4237E-03_JPRB,4.1636E-03_JPRB,&
425&3.9041E-03_JPRB,3.6190E-03_JPRB,3.8103E-01_JPRB/)
426KAO( :, 5,13, 2) = (/&
427&4.8061E-04_JPRB,4.2432E-03_JPRB,4.6321E-03_JPRB,4.6674E-03_JPRB,4.5673E-03_JPRB,4.4592E-03_JPRB,&
428&4.3539E-03_JPRB,4.2010E-03_JPRB,3.6549E-01_JPRB/)
429KAO( :, 1, 1, 3) = (/&
430&1.1504E-02_JPRB,5.1115E-02_JPRB,6.3490E-02_JPRB,7.5739E-02_JPRB,8.9129E-02_JPRB,1.0261E-01_JPRB,&
431&1.1510E-01_JPRB,1.2497E-01_JPRB,4.5470E+00_JPRB/)
432KAO( :, 2, 1, 3) = (/&
433&1.1411E-02_JPRB,5.0441E-02_JPRB,6.4398E-02_JPRB,7.8958E-02_JPRB,9.4436E-02_JPRB,1.0965E-01_JPRB,&
434&1.2371E-01_JPRB,1.3505E-01_JPRB,4.5111E+00_JPRB/)
435KAO( :, 3, 1, 3) = (/&
436&1.1360E-02_JPRB,4.9859E-02_JPRB,6.5352E-02_JPRB,8.1890E-02_JPRB,9.8960E-02_JPRB,1.1556E-01_JPRB,&
437&1.3095E-01_JPRB,1.4357E-01_JPRB,4.4964E+00_JPRB/)
438KAO( :, 4, 1, 3) = (/&
439&1.1361E-02_JPRB,4.9396E-02_JPRB,6.6358E-02_JPRB,8.4565E-02_JPRB,1.0289E-01_JPRB,1.2064E-01_JPRB,&
440&1.3719E-01_JPRB,1.5089E-01_JPRB,4.4952E+00_JPRB/)
441KAO( :, 5, 1, 3) = (/&
442&1.1398E-02_JPRB,4.9071E-02_JPRB,6.7320E-02_JPRB,8.6942E-02_JPRB,1.0642E-01_JPRB,1.2520E-01_JPRB,&
443&1.4278E-01_JPRB,1.5748E-01_JPRB,4.5069E+00_JPRB/)
444KAO( :, 1, 2, 3) = (/&
445&9.0800E-03_JPRB,4.3518E-02_JPRB,5.4317E-02_JPRB,6.5007E-02_JPRB,7.6680E-02_JPRB,8.8428E-02_JPRB,&
446&9.9245E-02_JPRB,1.0777E-01_JPRB,3.7305E+00_JPRB/)
447KAO( :, 2, 2, 3) = (/&
448&8.9700E-03_JPRB,4.2947E-02_JPRB,5.5146E-02_JPRB,6.7953E-02_JPRB,8.1575E-02_JPRB,9.4893E-02_JPRB,&
449&1.0724E-01_JPRB,1.1720E-01_JPRB,3.6786E+00_JPRB/)
450KAO( :, 3, 2, 3) = (/&
451&8.8659E-03_JPRB,4.2433E-02_JPRB,5.6085E-02_JPRB,7.0736E-02_JPRB,8.5859E-02_JPRB,1.0050E-01_JPRB,&
452&1.1405E-01_JPRB,1.2513E-01_JPRB,3.6433E+00_JPRB/)
453KAO( :, 4, 2, 3) = (/&
454&8.7765E-03_JPRB,4.1995E-02_JPRB,5.7083E-02_JPRB,7.3307E-02_JPRB,8.9633E-02_JPRB,1.0538E-01_JPRB,&
455&1.1996E-01_JPRB,1.3207E-01_JPRB,3.6200E+00_JPRB/)
456KAO( :, 5, 2, 3) = (/&
457&8.7192E-03_JPRB,4.1672E-02_JPRB,5.8019E-02_JPRB,7.5546E-02_JPRB,9.2932E-02_JPRB,1.0966E-01_JPRB,&
458&1.2527E-01_JPRB,1.3822E-01_JPRB,3.6042E+00_JPRB/)
459KAO( :, 1, 3, 3) = (/&
460&6.9828E-03_JPRB,3.6975E-02_JPRB,4.6012E-02_JPRB,5.4717E-02_JPRB,6.4326E-02_JPRB,7.4011E-02_JPRB,&
461&8.2981E-02_JPRB,8.9968E-02_JPRB,3.0198E+00_JPRB/)
462KAO( :, 2, 3, 3) = (/&
463&6.8270E-03_JPRB,3.6472E-02_JPRB,4.6704E-02_JPRB,5.7392E-02_JPRB,6.8826E-02_JPRB,8.0074E-02_JPRB,&
464&9.0443E-02_JPRB,9.8762E-02_JPRB,2.9461E+00_JPRB/)
465KAO( :, 3, 3, 3) = (/&
466&6.7044E-03_JPRB,3.6003E-02_JPRB,4.7551E-02_JPRB,5.9975E-02_JPRB,7.2865E-02_JPRB,8.5354E-02_JPRB,&
467&9.6922E-02_JPRB,1.0635E-01_JPRB,2.8886E+00_JPRB/)
468KAO( :, 4, 3, 3) = (/&
469&6.5993E-03_JPRB,3.5562E-02_JPRB,4.8474E-02_JPRB,6.2398E-02_JPRB,7.6490E-02_JPRB,9.0037E-02_JPRB,&
470&1.0257E-01_JPRB,1.1285E-01_JPRB,2.8436E+00_JPRB/)
471KAO( :, 5, 3, 3) = (/&
472&6.5059E-03_JPRB,3.5210E-02_JPRB,4.9353E-02_JPRB,6.4534E-02_JPRB,7.9605E-02_JPRB,9.4094E-02_JPRB,&
473&1.0752E-01_JPRB,1.1864E-01_JPRB,2.8111E+00_JPRB/)
474KAO( :, 1, 4, 3) = (/&
475&5.5908E-03_JPRB,3.1365E-02_JPRB,3.8737E-02_JPRB,4.5544E-02_JPRB,5.3149E-02_JPRB,6.0919E-02_JPRB,&
476&6.8125E-02_JPRB,7.3670E-02_JPRB,2.5046E+00_JPRB/)
477KAO( :, 2, 4, 3) = (/&
478&5.3957E-03_JPRB,3.0920E-02_JPRB,3.9328E-02_JPRB,4.7957E-02_JPRB,5.7284E-02_JPRB,6.6485E-02_JPRB,&
479&7.5002E-02_JPRB,8.1748E-02_JPRB,2.4277E+00_JPRB/)
480KAO( :, 3, 4, 3) = (/&
481&5.2334E-03_JPRB,3.0500E-02_JPRB,4.0047E-02_JPRB,5.0287E-02_JPRB,6.0995E-02_JPRB,7.1412E-02_JPRB,&
482&8.1019E-02_JPRB,8.8826E-02_JPRB,2.3616E+00_JPRB/)
483KAO( :, 4, 4, 3) = (/&
484&5.0990E-03_JPRB,3.0103E-02_JPRB,4.0857E-02_JPRB,5.2515E-02_JPRB,6.4366E-02_JPRB,7.5769E-02_JPRB,&
485&8.6313E-02_JPRB,9.4909E-02_JPRB,2.3071E+00_JPRB/)
486KAO( :, 5, 4, 3) = (/&
487&4.9843E-03_JPRB,2.9769E-02_JPRB,4.1653E-02_JPRB,5.4480E-02_JPRB,6.7248E-02_JPRB,7.9493E-02_JPRB,&
488&9.0850E-02_JPRB,1.0015E-01_JPRB,2.2622E+00_JPRB/)
489KAO( :, 1, 5, 3) = (/&
490&4.6371E-03_JPRB,2.6536E-02_JPRB,3.2443E-02_JPRB,3.7642E-02_JPRB,4.3487E-02_JPRB,4.9620E-02_JPRB,&
491&5.5321E-02_JPRB,5.9691E-02_JPRB,2.1169E+00_JPRB/)
492KAO( :, 2, 5, 3) = (/&
493&4.4354E-03_JPRB,2.6146E-02_JPRB,3.2937E-02_JPRB,3.9753E-02_JPRB,4.7206E-02_JPRB,5.4649E-02_JPRB,&
494&6.1517E-02_JPRB,6.6941E-02_JPRB,2.0403E+00_JPRB/)
495KAO( :, 3, 5, 3) = (/&
496&4.2621E-03_JPRB,2.5770E-02_JPRB,3.3534E-02_JPRB,4.1840E-02_JPRB,5.0602E-02_JPRB,5.9123E-02_JPRB,&
497&6.7019E-02_JPRB,7.3387E-02_JPRB,1.9782E+00_JPRB/)
498KAO( :, 4, 5, 3) = (/&
499&4.1136E-03_JPRB,2.5421E-02_JPRB,3.4232E-02_JPRB,4.3837E-02_JPRB,5.3645E-02_JPRB,6.3092E-02_JPRB,&
500&7.1794E-02_JPRB,7.8876E-02_JPRB,1.9264E+00_JPRB/)
501KAO( :, 5, 5, 3) = (/&
502&3.9859E-03_JPRB,2.5135E-02_JPRB,3.4954E-02_JPRB,4.5597E-02_JPRB,5.6243E-02_JPRB,6.6466E-02_JPRB,&
503&7.5915E-02_JPRB,8.3643E-02_JPRB,1.8824E+00_JPRB/)
504KAO( :, 1, 6, 3) = (/&
505&3.9304E-03_JPRB,2.2403E-02_JPRB,2.7063E-02_JPRB,3.0926E-02_JPRB,3.5302E-02_JPRB,4.0017E-02_JPRB,&
506&4.4453E-02_JPRB,4.7785E-02_JPRB,1.8116E+00_JPRB/)
507KAO( :, 2, 6, 3) = (/&
508&3.7327E-03_JPRB,2.2045E-02_JPRB,2.7456E-02_JPRB,3.2698E-02_JPRB,3.8563E-02_JPRB,4.4474E-02_JPRB,&
509&4.9934E-02_JPRB,5.4194E-02_JPRB,1.7392E+00_JPRB/)
510KAO( :, 3, 6, 3) = (/&
511&3.5637E-03_JPRB,2.1717E-02_JPRB,2.7946E-02_JPRB,3.4540E-02_JPRB,4.1589E-02_JPRB,4.8508E-02_JPRB,&
512&5.4887E-02_JPRB,6.0005E-02_JPRB,1.6805E+00_JPRB/)
513KAO( :, 4, 6, 3) = (/&
514&3.4181E-03_JPRB,2.1413E-02_JPRB,2.8528E-02_JPRB,3.6294E-02_JPRB,4.4304E-02_JPRB,5.2019E-02_JPRB,&
515&5.9160E-02_JPRB,6.4927E-02_JPRB,1.6325E+00_JPRB/)
516KAO( :, 5, 6, 3) = (/&
517&3.2918E-03_JPRB,2.1166E-02_JPRB,2.9161E-02_JPRB,3.7872E-02_JPRB,4.6642E-02_JPRB,5.5066E-02_JPRB,&
518&6.2852E-02_JPRB,6.9193E-02_JPRB,1.5934E+00_JPRB/)
519KAO( :, 1, 7, 3) = (/&
520&3.3611E-03_JPRB,1.8890E-02_JPRB,2.2580E-02_JPRB,2.5423E-02_JPRB,2.8547E-02_JPRB,3.2022E-02_JPRB,&
521&3.5350E-02_JPRB,3.7816E-02_JPRB,1.5699E+00_JPRB/)
522KAO( :, 2, 7, 3) = (/&
523&3.1761E-03_JPRB,1.8547E-02_JPRB,2.2859E-02_JPRB,2.6861E-02_JPRB,3.1328E-02_JPRB,3.5924E-02_JPRB,&
524&4.0179E-02_JPRB,4.3442E-02_JPRB,1.5027E+00_JPRB/)
525KAO( :, 3, 7, 3) = (/&
526&3.0174E-03_JPRB,1.8258E-02_JPRB,2.3246E-02_JPRB,2.8428E-02_JPRB,3.4019E-02_JPRB,3.9530E-02_JPRB,&
527&4.4619E-02_JPRB,4.8631E-02_JPRB,1.4482E+00_JPRB/)
528KAO( :, 4, 7, 3) = (/&
529&2.8795E-03_JPRB,1.7993E-02_JPRB,2.3728E-02_JPRB,2.9950E-02_JPRB,3.6407E-02_JPRB,4.2653E-02_JPRB,&
530&4.8406E-02_JPRB,5.3042E-02_JPRB,1.4039E+00_JPRB/)
531KAO( :, 5, 7, 3) = (/&
532&2.7589E-03_JPRB,1.7786E-02_JPRB,2.4255E-02_JPRB,3.1342E-02_JPRB,3.8508E-02_JPRB,4.5385E-02_JPRB,&
533&5.1742E-02_JPRB,5.6887E-02_JPRB,1.3676E+00_JPRB/)
534KAO( :, 1, 8, 3) = (/&
535&2.8871E-03_JPRB,1.5916E-02_JPRB,1.8850E-02_JPRB,2.0853E-02_JPRB,2.2958E-02_JPRB,2.5335E-02_JPRB,&
536&2.7709E-02_JPRB,2.9422E-02_JPRB,1.3854E+00_JPRB/)
537KAO( :, 2, 8, 3) = (/&
538&2.7155E-03_JPRB,1.5597E-02_JPRB,1.9055E-02_JPRB,2.1994E-02_JPRB,2.5264E-02_JPRB,2.8724E-02_JPRB,&
539&3.1943E-02_JPRB,3.4360E-02_JPRB,1.3215E+00_JPRB/)
540KAO( :, 3, 8, 3) = (/&
541&2.5680E-03_JPRB,1.5338E-02_JPRB,1.9338E-02_JPRB,2.3296E-02_JPRB,2.7614E-02_JPRB,3.1925E-02_JPRB,&
542&3.5879E-02_JPRB,3.8941E-02_JPRB,1.2707E+00_JPRB/)
543KAO( :, 4, 8, 3) = (/&
544&2.4392E-03_JPRB,1.5108E-02_JPRB,1.9717E-02_JPRB,2.4602E-02_JPRB,2.9735E-02_JPRB,3.4708E-02_JPRB,&
545&3.9299E-02_JPRB,4.2946E-02_JPRB,1.2299E+00_JPRB/)
546KAO( :, 5, 8, 3) = (/&
547&2.3263E-03_JPRB,1.4926E-02_JPRB,2.0145E-02_JPRB,2.5818E-02_JPRB,3.1599E-02_JPRB,3.7151E-02_JPRB,&
548&4.2259E-02_JPRB,4.6364E-02_JPRB,1.1947E+00_JPRB/)
549KAO( :, 1, 9, 3) = (/&
550&2.4934E-03_JPRB,1.3429E-02_JPRB,1.5676E-02_JPRB,1.6996E-02_JPRB,1.8299E-02_JPRB,1.9797E-02_JPRB,&
551&2.1368E-02_JPRB,2.2488E-02_JPRB,1.2194E+00_JPRB/)
552KAO( :, 2, 9, 3) = (/&
553&2.3370E-03_JPRB,1.3137E-02_JPRB,1.5812E-02_JPRB,1.7884E-02_JPRB,2.0163E-02_JPRB,2.2642E-02_JPRB,&
554&2.5001E-02_JPRB,2.6734E-02_JPRB,1.1601E+00_JPRB/)
555KAO( :, 3, 9, 3) = (/&
556&2.2009E-03_JPRB,1.2890E-02_JPRB,1.6023E-02_JPRB,1.8937E-02_JPRB,2.2155E-02_JPRB,2.5427E-02_JPRB,&
557&2.8446E-02_JPRB,3.0735E-02_JPRB,1.1135E+00_JPRB/)
558KAO( :, 4, 9, 3) = (/&
559&2.0815E-03_JPRB,1.2690E-02_JPRB,1.6303E-02_JPRB,2.0037E-02_JPRB,2.4017E-02_JPRB,2.7921E-02_JPRB,&
560&3.1498E-02_JPRB,3.4306E-02_JPRB,1.0751E+00_JPRB/)
561KAO( :, 5, 9, 3) = (/&
562&1.9758E-03_JPRB,1.2522E-02_JPRB,1.6643E-02_JPRB,2.1089E-02_JPRB,2.5672E-02_JPRB,3.0080E-02_JPRB,&
563&3.4128E-02_JPRB,3.7357E-02_JPRB,1.0412E+00_JPRB/)
564KAO( :, 1,10, 3) = (/&
565&2.1444E-03_JPRB,1.1292E-02_JPRB,1.2992E-02_JPRB,1.3863E-02_JPRB,1.4632E-02_JPRB,1.5527E-02_JPRB,&
566&1.6522E-02_JPRB,1.7216E-02_JPRB,1.0697E+00_JPRB/)
567KAO( :, 2,10, 3) = (/&
568&2.0062E-03_JPRB,1.1025E-02_JPRB,1.3086E-02_JPRB,1.4548E-02_JPRB,1.6122E-02_JPRB,1.7867E-02_JPRB,&
569&1.9575E-02_JPRB,2.0804E-02_JPRB,1.0168E+00_JPRB/)
570KAO( :, 3,10, 3) = (/&
571&1.8858E-03_JPRB,1.0796E-02_JPRB,1.3240E-02_JPRB,1.5386E-02_JPRB,1.7762E-02_JPRB,2.0237E-02_JPRB,&
572&2.2522E-02_JPRB,2.4230E-02_JPRB,9.7508E-01_JPRB/)
573KAO( :, 4,10, 3) = (/&
574&1.7806E-03_JPRB,1.0614E-02_JPRB,1.3451E-02_JPRB,1.6297E-02_JPRB,1.9372E-02_JPRB,2.2410E-02_JPRB,&
575&2.5204E-02_JPRB,2.7358E-02_JPRB,9.3955E-01_JPRB/)
576KAO( :, 5,10, 3) = (/&
577&1.6877E-03_JPRB,1.0465E-02_JPRB,1.3712E-02_JPRB,1.7180E-02_JPRB,2.0798E-02_JPRB,2.4286E-02_JPRB,&
578&2.7488E-02_JPRB,3.0016E-02_JPRB,9.0793E-01_JPRB/)
579KAO( :, 1,11, 3) = (/&
580&1.7833E-03_JPRB,9.3555E-03_JPRB,1.0771E-02_JPRB,1.1508E-02_JPRB,1.2189E-02_JPRB,1.2975E-02_JPRB,&
581&1.3836E-02_JPRB,1.4432E-02_JPRB,9.1283E-01_JPRB/)
582KAO( :, 2,11, 3) = (/&
583&1.6687E-03_JPRB,9.1314E-03_JPRB,1.0850E-02_JPRB,1.2098E-02_JPRB,1.3448E-02_JPRB,1.4933E-02_JPRB,&
584&1.6373E-02_JPRB,1.7407E-02_JPRB,8.7061E-01_JPRB/)
585KAO( :, 3,11, 3) = (/&
586&1.5693E-03_JPRB,8.9406E-03_JPRB,1.0990E-02_JPRB,1.2807E-02_JPRB,1.4816E-02_JPRB,1.6890E-02_JPRB,&
587&1.8802E-02_JPRB,2.0227E-02_JPRB,8.3514E-01_JPRB/)
588KAO( :, 4,11, 3) = (/&
589&1.4823E-03_JPRB,8.7931E-03_JPRB,1.1163E-02_JPRB,1.3552E-02_JPRB,1.6124E-02_JPRB,1.8657E-02_JPRB,&
590&2.0985E-02_JPRB,2.2777E-02_JPRB,8.0415E-01_JPRB/)
591KAO( :, 5,11, 3) = (/&
592&1.4048E-03_JPRB,8.6627E-03_JPRB,1.1377E-02_JPRB,1.4262E-02_JPRB,1.7270E-02_JPRB,2.0165E-02_JPRB,&
593&2.2814E-02_JPRB,2.4901E-02_JPRB,7.7610E-01_JPRB/)
594KAO( :, 1,12, 3) = (/&
595&1.4795E-03_JPRB,7.7320E-03_JPRB,8.9123E-03_JPRB,9.5371E-03_JPRB,1.0129E-02_JPRB,1.0809E-02_JPRB,&
596&1.1546E-02_JPRB,1.2053E-02_JPRB,7.8854E-01_JPRB/)
597KAO( :, 2,12, 3) = (/&
598&1.3850E-03_JPRB,7.5464E-03_JPRB,8.9834E-03_JPRB,1.0043E-02_JPRB,1.1188E-02_JPRB,1.2441E-02_JPRB,&
599&1.3647E-02_JPRB,1.4511E-02_JPRB,7.5243E-01_JPRB/)
600KAO( :, 3,12, 3) = (/&
601&1.3027E-03_JPRB,7.3902E-03_JPRB,9.1016E-03_JPRB,1.0632E-02_JPRB,1.2313E-02_JPRB,1.4042E-02_JPRB,&
602&1.5632E-02_JPRB,1.6816E-02_JPRB,7.2138E-01_JPRB/)
603KAO( :, 4,12, 3) = (/&
604&1.2303E-03_JPRB,7.2649E-03_JPRB,9.2431E-03_JPRB,1.1235E-02_JPRB,1.3368E-02_JPRB,1.5466E-02_JPRB,&
605&1.7392E-02_JPRB,1.8872E-02_JPRB,6.9377E-01_JPRB/)
606KAO( :, 5,12, 3) = (/&
607&1.1660E-03_JPRB,7.1513E-03_JPRB,9.4159E-03_JPRB,1.1801E-02_JPRB,1.4281E-02_JPRB,1.6671E-02_JPRB,&
608&1.8852E-02_JPRB,2.0566E-02_JPRB,6.6914E-01_JPRB/)
609KAO( :, 1,13, 3) = (/&
610&1.2249E-03_JPRB,6.3782E-03_JPRB,7.3622E-03_JPRB,7.8943E-03_JPRB,8.4021E-03_JPRB,8.9820E-03_JPRB,&
611&9.6036E-03_JPRB,1.0029E-02_JPRB,7.0365E-01_JPRB/)
612KAO( :, 2,13, 3) = (/&
613&1.1466E-03_JPRB,6.2255E-03_JPRB,7.4265E-03_JPRB,8.3184E-03_JPRB,9.2818E-03_JPRB,1.0328E-02_JPRB,&
614&1.1327E-02_JPRB,1.2042E-02_JPRB,6.7076E-01_JPRB/)
615KAO( :, 3,13, 3) = (/&
616&1.0784E-03_JPRB,6.0974E-03_JPRB,7.5218E-03_JPRB,8.8021E-03_JPRB,1.0201E-02_JPRB,1.1630E-02_JPRB,&
617&1.2945E-02_JPRB,1.3920E-02_JPRB,6.4220E-01_JPRB/)
618KAO( :, 4,13, 3) = (/&
619&1.0185E-03_JPRB,5.9888E-03_JPRB,7.6372E-03_JPRB,9.2865E-03_JPRB,1.1046E-02_JPRB,1.2772E-02_JPRB,&
620&1.4357E-02_JPRB,1.5571E-02_JPRB,6.1693E-01_JPRB/)
621KAO( :, 5,13, 3) = (/&
622&9.6529E-04_JPRB,5.8902E-03_JPRB,7.7765E-03_JPRB,9.7442E-03_JPRB,1.1781E-02_JPRB,1.3744E-02_JPRB,&
623&1.5534E-02_JPRB,1.6937E-02_JPRB,5.9454E-01_JPRB/)
624KAO( :, 1, 1, 4) = (/&
625&1.8021E-02_JPRB,6.5790E-02_JPRB,9.7338E-02_JPRB,1.3126E-01_JPRB,1.6473E-01_JPRB,1.9719E-01_JPRB,&
626&2.2788E-01_JPRB,2.5486E-01_JPRB,6.7734E+00_JPRB/)
627KAO( :, 2, 1, 4) = (/&
628&1.7655E-02_JPRB,6.4900E-02_JPRB,9.8783E-02_JPRB,1.3458E-01_JPRB,1.6983E-01_JPRB,2.0389E-01_JPRB,&
629&2.3625E-01_JPRB,2.6464E-01_JPRB,6.6229E+00_JPRB/)
630KAO( :, 3, 1, 4) = (/&
631&1.7413E-02_JPRB,6.4418E-02_JPRB,1.0054E-01_JPRB,1.3796E-01_JPRB,1.7471E-01_JPRB,2.1025E-01_JPRB,&
632&2.4393E-01_JPRB,2.7353E-01_JPRB,6.4891E+00_JPRB/)
633KAO( :, 4, 1, 4) = (/&
634&1.7262E-02_JPRB,6.4165E-02_JPRB,1.0227E-01_JPRB,1.4108E-01_JPRB,1.7917E-01_JPRB,2.1605E-01_JPRB,&
635&2.5091E-01_JPRB,2.8164E-01_JPRB,6.3763E+00_JPRB/)
636KAO( :, 5, 1, 4) = (/&
637&1.7196E-02_JPRB,6.4095E-02_JPRB,1.0392E-01_JPRB,1.4402E-01_JPRB,1.8328E-01_JPRB,2.2127E-01_JPRB,&
638&2.5722E-01_JPRB,2.8879E-01_JPRB,6.2911E+00_JPRB/)
639KAO( :, 1, 2, 4) = (/&
640&1.4529E-02_JPRB,5.6872E-02_JPRB,8.5086E-02_JPRB,1.1534E-01_JPRB,1.4512E-01_JPRB,1.7394E-01_JPRB,&
641&2.0123E-01_JPRB,2.2499E-01_JPRB,5.6977E+00_JPRB/)
642KAO( :, 2, 2, 4) = (/&
643&1.4123E-02_JPRB,5.6310E-02_JPRB,8.6845E-02_JPRB,1.1891E-01_JPRB,1.5031E-01_JPRB,1.8072E-01_JPRB,&
644&2.0938E-01_JPRB,2.3448E-01_JPRB,5.5431E+00_JPRB/)
645KAO( :, 3, 2, 4) = (/&
646&1.3817E-02_JPRB,5.6056E-02_JPRB,8.8719E-02_JPRB,1.2233E-01_JPRB,1.5523E-01_JPRB,1.8697E-01_JPRB,&
647&2.1702E-01_JPRB,2.4322E-01_JPRB,5.4063E+00_JPRB/)
648KAO( :, 4, 2, 4) = (/&
649&1.3599E-02_JPRB,5.5957E-02_JPRB,9.0467E-02_JPRB,1.2549E-01_JPRB,1.5975E-01_JPRB,1.9279E-01_JPRB,&
650&2.2406E-01_JPRB,2.5131E-01_JPRB,5.2860E+00_JPRB/)
651KAO( :, 5, 2, 4) = (/&
652&1.3460E-02_JPRB,5.5961E-02_JPRB,9.2180E-02_JPRB,1.2851E-01_JPRB,1.6399E-01_JPRB,1.9829E-01_JPRB,&
653&2.3058E-01_JPRB,2.5880E-01_JPRB,5.1861E+00_JPRB/)
654KAO( :, 1, 3, 4) = (/&
655&1.1705E-02_JPRB,4.8966E-02_JPRB,7.3479E-02_JPRB,9.9794E-02_JPRB,1.2575E-01_JPRB,1.5078E-01_JPRB,&
656&1.7441E-01_JPRB,1.9480E-01_JPRB,4.7593E+00_JPRB/)
657KAO( :, 2, 3, 4) = (/&
658&1.1254E-02_JPRB,4.8604E-02_JPRB,7.5346E-02_JPRB,1.0340E-01_JPRB,1.3083E-01_JPRB,1.5727E-01_JPRB,&
659&1.8221E-01_JPRB,2.0377E-01_JPRB,4.6048E+00_JPRB/)
660KAO( :, 3, 3, 4) = (/&
661&1.0873E-02_JPRB,4.8463E-02_JPRB,7.7240E-02_JPRB,1.0681E-01_JPRB,1.3563E-01_JPRB,1.6344E-01_JPRB,&
662&1.8954E-01_JPRB,2.1219E-01_JPRB,4.4612E+00_JPRB/)
663KAO( :, 4, 3, 4) = (/&
664&1.0555E-02_JPRB,4.8429E-02_JPRB,7.9010E-02_JPRB,1.0996E-01_JPRB,1.4012E-01_JPRB,1.6913E-01_JPRB,&
665&1.9654E-01_JPRB,2.2020E-01_JPRB,4.3302E+00_JPRB/)
666KAO( :, 5, 3, 4) = (/&
667&1.0298E-02_JPRB,4.8470E-02_JPRB,8.0657E-02_JPRB,1.1290E-01_JPRB,1.4434E-01_JPRB,1.7459E-01_JPRB,&
668&2.0310E-01_JPRB,2.2776E-01_JPRB,4.2150E+00_JPRB/)
669KAO( :, 1, 4, 4) = (/&
670&9.6427E-03_JPRB,4.2071E-02_JPRB,6.2842E-02_JPRB,8.5269E-02_JPRB,1.0739E-01_JPRB,1.2873E-01_JPRB,&
671&1.4874E-01_JPRB,1.6592E-01_JPRB,4.0400E+00_JPRB/)
672KAO( :, 2, 4, 4) = (/&
673&9.2011E-03_JPRB,4.1815E-02_JPRB,6.4680E-02_JPRB,8.8757E-02_JPRB,1.1230E-01_JPRB,1.3495E-01_JPRB,&
674&1.5622E-01_JPRB,1.7447E-01_JPRB,3.8793E+00_JPRB/)
675KAO( :, 3, 4, 4) = (/&
676&8.8205E-03_JPRB,4.1737E-02_JPRB,6.6556E-02_JPRB,9.2068E-02_JPRB,1.1693E-01_JPRB,1.4084E-01_JPRB,&
677&1.6327E-01_JPRB,1.8245E-01_JPRB,3.7400E+00_JPRB/)
678KAO( :, 4, 4, 4) = (/&
679&8.4836E-03_JPRB,4.1724E-02_JPRB,6.8311E-02_JPRB,9.5165E-02_JPRB,1.2127E-01_JPRB,1.4641E-01_JPRB,&
680&1.6997E-01_JPRB,1.9023E-01_JPRB,3.6160E+00_JPRB/)
681KAO( :, 5, 4, 4) = (/&
682&8.1913E-03_JPRB,4.1779E-02_JPRB,6.9919E-02_JPRB,9.8052E-02_JPRB,1.2544E-01_JPRB,1.5176E-01_JPRB,&
683&1.7649E-01_JPRB,1.9765E-01_JPRB,3.5010E+00_JPRB/)
684KAO( :, 1, 5, 4) = (/&
685&8.1345E-03_JPRB,3.6015E-02_JPRB,5.3335E-02_JPRB,7.2138E-02_JPRB,9.0702E-02_JPRB,1.0859E-01_JPRB,&
686&1.2537E-01_JPRB,1.3961E-01_JPRB,3.4725E+00_JPRB/)
687KAO( :, 2, 5, 4) = (/&
688&7.7094E-03_JPRB,3.5776E-02_JPRB,5.4998E-02_JPRB,7.5337E-02_JPRB,9.5240E-02_JPRB,1.1439E-01_JPRB,&
689&1.3227E-01_JPRB,1.4749E-01_JPRB,3.3178E+00_JPRB/)
690KAO( :, 3, 5, 4) = (/&
691&7.3411E-03_JPRB,3.5699E-02_JPRB,5.6747E-02_JPRB,7.8425E-02_JPRB,9.9566E-02_JPRB,1.1985E-01_JPRB,&
692&1.3882E-01_JPRB,1.5490E-01_JPRB,3.1804E+00_JPRB/)
693KAO( :, 4, 5, 4) = (/&
694&7.0201E-03_JPRB,3.5715E-02_JPRB,5.8432E-02_JPRB,8.1402E-02_JPRB,1.0370E-01_JPRB,1.2511E-01_JPRB,&
695&1.4516E-01_JPRB,1.6215E-01_JPRB,3.0592E+00_JPRB/)
696KAO( :, 5, 5, 4) = (/&
697&6.7383E-03_JPRB,3.5791E-02_JPRB,5.9960E-02_JPRB,8.4146E-02_JPRB,1.0763E-01_JPRB,1.3019E-01_JPRB,&
698&1.5126E-01_JPRB,1.6919E-01_JPRB,2.9545E+00_JPRB/)
699KAO( :, 1, 6, 4) = (/&
700&6.9574E-03_JPRB,3.0705E-02_JPRB,4.4873E-02_JPRB,6.0368E-02_JPRB,7.5716E-02_JPRB,9.0457E-02_JPRB,&
701&1.0422E-01_JPRB,1.1586E-01_JPRB,3.0030E+00_JPRB/)
702KAO( :, 2, 6, 4) = (/&
703&6.5599E-03_JPRB,3.0473E-02_JPRB,4.6327E-02_JPRB,6.3240E-02_JPRB,7.9791E-02_JPRB,9.5693E-02_JPRB,&
704&1.1056E-01_JPRB,1.2311E-01_JPRB,2.8591E+00_JPRB/)
705KAO( :, 3, 6, 4) = (/&
706&6.2154E-03_JPRB,3.0355E-02_JPRB,4.7875E-02_JPRB,6.6021E-02_JPRB,8.3704E-02_JPRB,1.0067E-01_JPRB,&
707&1.1647E-01_JPRB,1.2979E-01_JPRB,2.7316E+00_JPRB/)
708KAO( :, 4, 6, 4) = (/&
709&5.9146E-03_JPRB,3.0358E-02_JPRB,4.9433E-02_JPRB,6.8766E-02_JPRB,8.7543E-02_JPRB,1.0553E-01_JPRB,&
710&1.2232E-01_JPRB,1.3650E-01_JPRB,2.6198E+00_JPRB/)
711KAO( :, 5, 6, 4) = (/&
712&5.6484E-03_JPRB,3.0432E-02_JPRB,5.0868E-02_JPRB,7.1327E-02_JPRB,9.1169E-02_JPRB,1.1020E-01_JPRB,&
713&1.2797E-01_JPRB,1.4294E-01_JPRB,2.5219E+00_JPRB/)
714KAO( :, 1, 7, 4) = (/&
715&5.9858E-03_JPRB,2.6066E-02_JPRB,3.7491E-02_JPRB,5.0091E-02_JPRB,6.2632E-02_JPRB,7.4695E-02_JPRB,&
716&8.5899E-02_JPRB,9.5307E-02_JPRB,2.6265E+00_JPRB/)
717KAO( :, 2, 7, 4) = (/&
718&5.6201E-03_JPRB,2.5818E-02_JPRB,3.8713E-02_JPRB,5.2603E-02_JPRB,6.6261E-02_JPRB,7.9344E-02_JPRB,&
719&9.1528E-02_JPRB,1.0179E-01_JPRB,2.4915E+00_JPRB/)
720KAO( :, 3, 7, 4) = (/&
721&5.3028E-03_JPRB,2.5679E-02_JPRB,4.0067E-02_JPRB,5.5077E-02_JPRB,6.9715E-02_JPRB,8.3744E-02_JPRB,&
722&9.6820E-02_JPRB,1.0780E-01_JPRB,2.3737E+00_JPRB/)
723KAO( :, 4, 7, 4) = (/&
724&5.0250E-03_JPRB,2.5664E-02_JPRB,4.1469E-02_JPRB,5.7563E-02_JPRB,7.3190E-02_JPRB,8.8174E-02_JPRB,&
725&1.0210E-01_JPRB,1.1380E-01_JPRB,2.2719E+00_JPRB/)
726KAO( :, 5, 7, 4) = (/&
727&4.7808E-03_JPRB,2.5724E-02_JPRB,4.2789E-02_JPRB,5.9902E-02_JPRB,7.6504E-02_JPRB,9.2382E-02_JPRB,&
728&1.0715E-01_JPRB,1.1955E-01_JPRB,2.1838E+00_JPRB/)
729KAO( :, 1, 8, 4) = (/&
730&5.1596E-03_JPRB,2.2052E-02_JPRB,3.1199E-02_JPRB,4.1353E-02_JPRB,5.1554E-02_JPRB,6.1370E-02_JPRB,&
731&7.0499E-02_JPRB,7.8103E-02_JPRB,2.3369E+00_JPRB/)
732KAO( :, 2, 8, 4) = (/&
733&4.8272E-03_JPRB,2.1774E-02_JPRB,3.2180E-02_JPRB,4.3545E-02_JPRB,5.4719E-02_JPRB,6.5446E-02_JPRB,&
734&7.5433E-02_JPRB,8.3810E-02_JPRB,2.2096E+00_JPRB/)
735KAO( :, 3, 8, 4) = (/&
736&4.5379E-03_JPRB,2.1626E-02_JPRB,3.3329E-02_JPRB,4.5683E-02_JPRB,5.7755E-02_JPRB,6.9313E-02_JPRB,&
737&8.0057E-02_JPRB,8.9096E-02_JPRB,2.0999E+00_JPRB/)
738KAO( :, 4, 8, 4) = (/&
739&4.2850E-03_JPRB,2.1592E-02_JPRB,3.4574E-02_JPRB,4.7884E-02_JPRB,6.0825E-02_JPRB,7.3203E-02_JPRB,&
740&8.4719E-02_JPRB,9.4365E-02_JPRB,2.0061E+00_JPRB/)
741KAO( :, 5, 8, 4) = (/&
742&4.0623E-03_JPRB,2.1641E-02_JPRB,3.5762E-02_JPRB,4.9985E-02_JPRB,6.3751E-02_JPRB,7.6922E-02_JPRB,&
743&8.9154E-02_JPRB,9.9364E-02_JPRB,1.9265E+00_JPRB/)
744KAO( :, 1, 9, 4) = (/&
745&4.4531E-03_JPRB,1.8626E-02_JPRB,2.5958E-02_JPRB,3.4051E-02_JPRB,4.2290E-02_JPRB,5.0232E-02_JPRB,&
746&5.7580E-02_JPRB,6.3645E-02_JPRB,2.0688E+00_JPRB/)
747KAO( :, 2, 9, 4) = (/&
748&4.1555E-03_JPRB,1.8330E-02_JPRB,2.6712E-02_JPRB,3.5938E-02_JPRB,4.5066E-02_JPRB,5.3798E-02_JPRB,&
749&6.1907E-02_JPRB,6.8669E-02_JPRB,1.9511E+00_JPRB/)
750KAO( :, 3, 9, 4) = (/&
751&3.8980E-03_JPRB,1.8171E-02_JPRB,2.7659E-02_JPRB,3.7795E-02_JPRB,4.7683E-02_JPRB,5.7159E-02_JPRB,&
752&6.5983E-02_JPRB,7.3362E-02_JPRB,1.8504E+00_JPRB/)
753KAO( :, 4, 9, 4) = (/&
754&3.6726E-03_JPRB,1.8123E-02_JPRB,2.8719E-02_JPRB,3.9685E-02_JPRB,5.0340E-02_JPRB,6.0531E-02_JPRB,&
755&6.9978E-02_JPRB,7.7857E-02_JPRB,1.7654E+00_JPRB/)
756KAO( :, 5, 9, 4) = (/&
757&3.4732E-03_JPRB,1.8155E-02_JPRB,2.9764E-02_JPRB,4.1511E-02_JPRB,5.2898E-02_JPRB,6.3750E-02_JPRB,&
758&7.3823E-02_JPRB,8.2208E-02_JPRB,1.6947E+00_JPRB/)
759KAO( :, 1,10, 4) = (/&
760&3.8264E-03_JPRB,1.5718E-02_JPRB,2.1595E-02_JPRB,2.8016E-02_JPRB,3.4614E-02_JPRB,4.0975E-02_JPRB,&
761&4.6868E-02_JPRB,5.1662E-02_JPRB,1.8197E+00_JPRB/)
762KAO( :, 2,10, 4) = (/&
763&3.5642E-03_JPRB,1.5429E-02_JPRB,2.2178E-02_JPRB,2.9617E-02_JPRB,3.7012E-02_JPRB,4.4107E-02_JPRB,&
764&5.0673E-02_JPRB,5.6104E-02_JPRB,1.7127E+00_JPRB/)
765KAO( :, 3,10, 4) = (/&
766&3.3388E-03_JPRB,1.5262E-02_JPRB,2.2939E-02_JPRB,3.1209E-02_JPRB,3.9306E-02_JPRB,4.7049E-02_JPRB,&
767&5.4217E-02_JPRB,6.0186E-02_JPRB,1.6230E+00_JPRB/)
768KAO( :, 4,10, 4) = (/&
769&3.1419E-03_JPRB,1.5205E-02_JPRB,2.3835E-02_JPRB,3.2828E-02_JPRB,4.1571E-02_JPRB,4.9911E-02_JPRB,&
770&5.7637E-02_JPRB,6.4044E-02_JPRB,1.5488E+00_JPRB/)
771KAO( :, 5,10, 4) = (/&
772&2.9677E-03_JPRB,1.5219E-02_JPRB,2.4740E-02_JPRB,3.4412E-02_JPRB,4.3767E-02_JPRB,5.2705E-02_JPRB,&
773&6.0972E-02_JPRB,6.7792E-02_JPRB,1.4876E+00_JPRB/)
774KAO( :, 1,11, 4) = (/&
775&3.1779E-03_JPRB,1.3095E-02_JPRB,1.8055E-02_JPRB,2.3506E-02_JPRB,2.9061E-02_JPRB,3.4415E-02_JPRB,&
776&3.9369E-02_JPRB,4.3393E-02_JPRB,1.5476E+00_JPRB/)
777KAO( :, 2,11, 4) = (/&
778&2.9632E-03_JPRB,1.2861E-02_JPRB,1.8568E-02_JPRB,2.4842E-02_JPRB,3.1070E-02_JPRB,3.7036E-02_JPRB,&
779&4.2545E-02_JPRB,4.7085E-02_JPRB,1.4599E+00_JPRB/)
780KAO( :, 3,11, 4) = (/&
781&2.7773E-03_JPRB,1.2736E-02_JPRB,1.9231E-02_JPRB,2.6199E-02_JPRB,3.3009E-02_JPRB,3.9506E-02_JPRB,&
782&4.5515E-02_JPRB,5.0494E-02_JPRB,1.3882E+00_JPRB/)
783KAO( :, 4,11, 4) = (/&
784&2.6144E-03_JPRB,1.2699E-02_JPRB,1.9998E-02_JPRB,2.7568E-02_JPRB,3.4911E-02_JPRB,4.1912E-02_JPRB,&
785&4.8384E-02_JPRB,5.3719E-02_JPRB,1.3291E+00_JPRB/)
786KAO( :, 5,11, 4) = (/&
787&2.4704E-03_JPRB,1.2732E-02_JPRB,2.0751E-02_JPRB,2.8878E-02_JPRB,3.6736E-02_JPRB,4.4233E-02_JPRB,&
788&5.1154E-02_JPRB,5.6829E-02_JPRB,1.2767E+00_JPRB/)
789KAO( :, 1,12, 4) = (/&
790&2.6367E-03_JPRB,1.0870E-02_JPRB,1.5028E-02_JPRB,1.9613E-02_JPRB,2.4267E-02_JPRB,2.8743E-02_JPRB,&
791&3.2886E-02_JPRB,3.6247E-02_JPRB,1.3323E+00_JPRB/)
792KAO( :, 2,12, 4) = (/&
793&2.4596E-03_JPRB,1.0682E-02_JPRB,1.5472E-02_JPRB,2.0731E-02_JPRB,2.5941E-02_JPRB,3.0929E-02_JPRB,&
794&3.5529E-02_JPRB,3.9309E-02_JPRB,1.2608E+00_JPRB/)
795KAO( :, 3,12, 4) = (/&
796&2.3058E-03_JPRB,1.0585E-02_JPRB,1.6043E-02_JPRB,2.1873E-02_JPRB,2.7564E-02_JPRB,3.2990E-02_JPRB,&
797&3.8001E-02_JPRB,4.2137E-02_JPRB,1.2024E+00_JPRB/)
798KAO( :, 4,12, 4) = (/&
799&2.1711E-03_JPRB,1.0572E-02_JPRB,1.6696E-02_JPRB,2.3023E-02_JPRB,2.9157E-02_JPRB,3.5001E-02_JPRB,&
800&4.0396E-02_JPRB,4.4820E-02_JPRB,1.1510E+00_JPRB/)
801KAO( :, 5,12, 4) = (/&
802&2.0522E-03_JPRB,1.0605E-02_JPRB,1.7302E-02_JPRB,2.4078E-02_JPRB,3.0631E-02_JPRB,3.6880E-02_JPRB,&
803&4.2638E-02_JPRB,4.7351E-02_JPRB,1.1041E+00_JPRB/)
804KAO( :, 1,13, 4) = (/&
805&2.1839E-03_JPRB,8.9998E-03_JPRB,1.2472E-02_JPRB,1.6303E-02_JPRB,2.0181E-02_JPRB,2.3909E-02_JPRB,&
806&2.7356E-02_JPRB,3.0152E-02_JPRB,1.1877E+00_JPRB/)
807KAO( :, 2,13, 4) = (/&
808&2.0376E-03_JPRB,8.8480E-03_JPRB,1.2851E-02_JPRB,1.7235E-02_JPRB,2.1572E-02_JPRB,2.5723E-02_JPRB,&
809&2.9547E-02_JPRB,3.2688E-02_JPRB,1.1266E+00_JPRB/)
810KAO( :, 3,13, 4) = (/&
811&1.9106E-03_JPRB,8.7808E-03_JPRB,1.3344E-02_JPRB,1.8195E-02_JPRB,2.2927E-02_JPRB,2.7435E-02_JPRB,&
812&3.1599E-02_JPRB,3.5023E-02_JPRB,1.0740E+00_JPRB/)
813KAO( :, 4,13, 4) = (/&
814&1.7994E-03_JPRB,8.7806E-03_JPRB,1.3884E-02_JPRB,1.9140E-02_JPRB,2.4232E-02_JPRB,2.9085E-02_JPRB,&
815&3.3560E-02_JPRB,3.7215E-02_JPRB,1.0271E+00_JPRB/)
816KAO( :, 5,13, 4) = (/&
817&1.7009E-03_JPRB,8.8054E-03_JPRB,1.4366E-02_JPRB,1.9979E-02_JPRB,2.5409E-02_JPRB,3.0588E-02_JPRB,&
818&3.5352E-02_JPRB,3.9242E-02_JPRB,9.8352E-01_JPRB/)
819KAO( :, 1, 1, 5) = (/&
820&2.7821E-02_JPRB,9.4758E-02_JPRB,1.5999E-01_JPRB,2.2454E-01_JPRB,2.8692E-01_JPRB,3.4665E-01_JPRB,&
821&4.0214E-01_JPRB,4.4847E-01_JPRB,9.2144E+00_JPRB/)
822KAO( :, 2, 1, 5) = (/&
823&2.6913E-02_JPRB,9.4630E-02_JPRB,1.6244E-01_JPRB,2.2902E-01_JPRB,2.9341E-01_JPRB,3.5518E-01_JPRB,&
824&4.1260E-01_JPRB,4.6112E-01_JPRB,8.9389E+00_JPRB/)
825KAO( :, 3, 1, 5) = (/&
826&2.6162E-02_JPRB,9.4753E-02_JPRB,1.6454E-01_JPRB,2.3287E-01_JPRB,2.9898E-01_JPRB,3.6235E-01_JPRB,&
827&4.2172E-01_JPRB,4.7189E-01_JPRB,8.6829E+00_JPRB/)
828KAO( :, 4, 1, 5) = (/&
829&2.5554E-02_JPRB,9.5076E-02_JPRB,1.6645E-01_JPRB,2.3629E-01_JPRB,3.0381E-01_JPRB,3.6863E-01_JPRB,&
830&4.2942E-01_JPRB,4.8118E-01_JPRB,8.4692E+00_JPRB/)
831KAO( :, 5, 1, 5) = (/&
832&2.5132E-02_JPRB,9.5584E-02_JPRB,1.6836E-01_JPRB,2.3931E-01_JPRB,3.0801E-01_JPRB,3.7403E-01_JPRB,&
833&4.3587E-01_JPRB,4.8876E-01_JPRB,8.2899E+00_JPRB/)
834KAO( :, 1, 2, 5) = (/&
835&2.2786E-02_JPRB,8.2873E-02_JPRB,1.4193E-01_JPRB,2.0025E-01_JPRB,2.5674E-01_JPRB,3.1069E-01_JPRB,&
836&3.6090E-01_JPRB,4.0281E-01_JPRB,7.8467E+00_JPRB/)
837KAO( :, 2, 2, 5) = (/&
838&2.1926E-02_JPRB,8.2844E-02_JPRB,1.4423E-01_JPRB,2.0445E-01_JPRB,2.6273E-01_JPRB,3.1850E-01_JPRB,&
839&3.7058E-01_JPRB,4.1426E-01_JPRB,7.5685E+00_JPRB/)
840KAO( :, 3, 2, 5) = (/&
841&2.1216E-02_JPRB,8.3137E-02_JPRB,1.4626E-01_JPRB,2.0800E-01_JPRB,2.6778E-01_JPRB,3.2530E-01_JPRB,&
842&3.7887E-01_JPRB,4.2447E-01_JPRB,7.3113E+00_JPRB/)
843KAO( :, 4, 2, 5) = (/&
844&2.0609E-02_JPRB,8.3648E-02_JPRB,1.4825E-01_JPRB,2.1130E-01_JPRB,2.7244E-01_JPRB,3.3120E-01_JPRB,&
845&3.8633E-01_JPRB,4.3319E-01_JPRB,7.0868E+00_JPRB/)
846KAO( :, 5, 2, 5) = (/&
847&2.0124E-02_JPRB,8.4283E-02_JPRB,1.5023E-01_JPRB,2.1439E-01_JPRB,2.7658E-01_JPRB,3.3624E-01_JPRB,&
848&3.9227E-01_JPRB,4.4011E-01_JPRB,6.8977E+00_JPRB/)
849KAO( :, 1, 3, 5) = (/&
850&1.8617E-02_JPRB,7.1627E-02_JPRB,1.2381E-01_JPRB,1.7543E-01_JPRB,2.2536E-01_JPRB,2.7317E-01_JPRB,&
851&3.1745E-01_JPRB,3.5456E-01_JPRB,6.6821E+00_JPRB/)
852KAO( :, 2, 3, 5) = (/&
853&1.7803E-02_JPRB,7.1692E-02_JPRB,1.2605E-01_JPRB,1.7941E-01_JPRB,2.3119E-01_JPRB,2.8073E-01_JPRB,&
854&3.2696E-01_JPRB,3.6594E-01_JPRB,6.4024E+00_JPRB/)
855KAO( :, 3, 3, 5) = (/&
856&1.7094E-02_JPRB,7.2019E-02_JPRB,1.2810E-01_JPRB,1.8301E-01_JPRB,2.3626E-01_JPRB,2.8733E-01_JPRB,&
857&3.3525E-01_JPRB,3.7585E-01_JPRB,6.1586E+00_JPRB/)
858KAO( :, 4, 3, 5) = (/&
859&1.6473E-02_JPRB,7.2618E-02_JPRB,1.3012E-01_JPRB,1.8637E-01_JPRB,2.4089E-01_JPRB,2.9345E-01_JPRB,&
860&3.4253E-01_JPRB,3.8463E-01_JPRB,5.9399E+00_JPRB/)
861KAO( :, 5, 3, 5) = (/&
862&1.5950E-02_JPRB,7.3287E-02_JPRB,1.3213E-01_JPRB,1.8950E-01_JPRB,2.4513E-01_JPRB,2.9856E-01_JPRB,&
863&3.4870E-01_JPRB,3.9140E-01_JPRB,5.7373E+00_JPRB/)
864KAO( :, 1, 4, 5) = (/&
865&1.5580E-02_JPRB,6.1790E-02_JPRB,1.0733E-01_JPRB,1.5233E-01_JPRB,1.9578E-01_JPRB,2.3731E-01_JPRB,&
866&2.7596E-01_JPRB,3.0816E-01_JPRB,5.7644E+00_JPRB/)
867KAO( :, 2, 4, 5) = (/&
868&1.4777E-02_JPRB,6.1923E-02_JPRB,1.0950E-01_JPRB,1.5621E-01_JPRB,2.0143E-01_JPRB,2.4487E-01_JPRB,&
869&2.8520E-01_JPRB,3.1931E-01_JPRB,5.4929E+00_JPRB/)
870KAO( :, 3, 4, 5) = (/&
871&1.4083E-02_JPRB,6.2360E-02_JPRB,1.1165E-01_JPRB,1.5990E-01_JPRB,2.0675E-01_JPRB,2.5162E-01_JPRB,&
872&2.9363E-01_JPRB,3.2936E-01_JPRB,5.2479E+00_JPRB/)
873KAO( :, 4, 4, 5) = (/&
874&1.3489E-02_JPRB,6.3056E-02_JPRB,1.1379E-01_JPRB,1.6338E-01_JPRB,2.1152E-01_JPRB,2.5770E-01_JPRB,&
875&3.0103E-01_JPRB,3.3790E-01_JPRB,5.0295E+00_JPRB/)
876KAO( :, 5, 4, 5) = (/&
877&1.2974E-02_JPRB,6.3786E-02_JPRB,1.1583E-01_JPRB,1.6662E-01_JPRB,2.1582E-01_JPRB,2.6318E-01_JPRB,&
878&3.0742E-01_JPRB,3.4538E-01_JPRB,4.8395E+00_JPRB/)
879KAO( :, 1, 5, 5) = (/&
880&1.3213E-02_JPRB,5.3251E-02_JPRB,9.2575E-02_JPRB,1.3138E-01_JPRB,1.6890E-01_JPRB,2.0468E-01_JPRB,&
881&2.3789E-01_JPRB,2.6563E-01_JPRB,4.9912E+00_JPRB/)
882KAO( :, 2, 5, 5) = (/&
883&1.2469E-02_JPRB,5.3471E-02_JPRB,9.4761E-02_JPRB,1.3531E-01_JPRB,1.7451E-01_JPRB,2.1205E-01_JPRB,&
884&2.4715E-01_JPRB,2.7671E-01_JPRB,4.7367E+00_JPRB/)
885KAO( :, 3, 5, 5) = (/&
886&1.1826E-02_JPRB,5.4006E-02_JPRB,9.6957E-02_JPRB,1.3905E-01_JPRB,1.7980E-01_JPRB,2.1900E-01_JPRB,&
887&2.5553E-01_JPRB,2.8664E-01_JPRB,4.5084E+00_JPRB/)
888KAO( :, 4, 5, 5) = (/&
889&1.1265E-02_JPRB,5.4777E-02_JPRB,9.9171E-02_JPRB,1.4252E-01_JPRB,1.8466E-01_JPRB,2.2509E-01_JPRB,&
890&2.6296E-01_JPRB,2.9525E-01_JPRB,4.3062E+00_JPRB/)
891KAO( :, 5, 5, 5) = (/&
892&1.0774E-02_JPRB,5.5536E-02_JPRB,1.0132E-01_JPRB,1.4589E-01_JPRB,1.8914E-01_JPRB,2.3064E-01_JPRB,&
893&2.6960E-01_JPRB,3.0272E-01_JPRB,4.1237E+00_JPRB/)
894KAO( :, 1, 6, 5) = (/&
895&1.1298E-02_JPRB,4.5718E-02_JPRB,7.9200E-02_JPRB,1.1232E-01_JPRB,1.4430E-01_JPRB,1.7486E-01_JPRB,&
896&2.0309E-01_JPRB,2.2655E-01_JPRB,4.3329E+00_JPRB/)
897KAO( :, 2, 6, 5) = (/&
898&1.0622E-02_JPRB,4.6005E-02_JPRB,8.1486E-02_JPRB,1.1629E-01_JPRB,1.5001E-01_JPRB,1.8222E-01_JPRB,&
899&2.1218E-01_JPRB,2.3741E-01_JPRB,4.0960E+00_JPRB/)
900KAO( :, 3, 6, 5) = (/&
901&1.0034E-02_JPRB,4.6615E-02_JPRB,8.3719E-02_JPRB,1.2009E-01_JPRB,1.5528E-01_JPRB,1.8897E-01_JPRB,&
902&2.2052E-01_JPRB,2.4712E-01_JPRB,3.8879E+00_JPRB/)
903KAO( :, 4, 6, 5) = (/&
904&9.5191E-03_JPRB,4.7402E-02_JPRB,8.5902E-02_JPRB,1.2353E-01_JPRB,1.5997E-01_JPRB,1.9501E-01_JPRB,&
905&2.2766E-01_JPRB,2.5531E-01_JPRB,3.7023E+00_JPRB/)
906KAO( :, 5, 6, 5) = (/&
907&9.0694E-03_JPRB,4.8127E-02_JPRB,8.7970E-02_JPRB,1.2673E-01_JPRB,1.6428E-01_JPRB,2.0026E-01_JPRB,&
908&2.3384E-01_JPRB,2.6225E-01_JPRB,3.5368E+00_JPRB/)
909KAO( :, 1, 7, 5) = (/&
910&9.7003E-03_JPRB,3.9103E-02_JPRB,6.7303E-02_JPRB,9.5321E-02_JPRB,1.2233E-01_JPRB,1.4806E-01_JPRB,&
911&1.7192E-01_JPRB,1.9156E-01_JPRB,3.7979E+00_JPRB/)
912KAO( :, 2, 7, 5) = (/&
913&9.0880E-03_JPRB,3.9405E-02_JPRB,6.9590E-02_JPRB,9.9254E-02_JPRB,1.2789E-01_JPRB,1.5530E-01_JPRB,&
914&1.8072E-01_JPRB,2.0187E-01_JPRB,3.5772E+00_JPRB/)
915KAO( :, 3, 7, 5) = (/&
916&8.5547E-03_JPRB,3.9999E-02_JPRB,7.1749E-02_JPRB,1.0282E-01_JPRB,1.3290E-01_JPRB,1.6166E-01_JPRB,&
917&1.8835E-01_JPRB,2.1077E-01_JPRB,3.3854E+00_JPRB/)
918KAO( :, 4, 7, 5) = (/&
919&8.0885E-03_JPRB,4.0699E-02_JPRB,7.3711E-02_JPRB,1.0595E-01_JPRB,1.3715E-01_JPRB,1.6698E-01_JPRB,&
920&1.9485E-01_JPRB,2.1815E-01_JPRB,3.2157E+00_JPRB/)
921KAO( :, 5, 7, 5) = (/&
922&7.6793E-03_JPRB,4.1301E-02_JPRB,7.5502E-02_JPRB,1.0878E-01_JPRB,1.4090E-01_JPRB,1.7170E-01_JPRB,&
923&2.0034E-01_JPRB,2.2441E-01_JPRB,3.0651E+00_JPRB/)
924KAO( :, 1, 8, 5) = (/&
925&8.3356E-03_JPRB,3.3311E-02_JPRB,5.6870E-02_JPRB,8.0308E-02_JPRB,1.0295E-01_JPRB,1.2448E-01_JPRB,&
926&1.4428E-01_JPRB,1.6086E-01_JPRB,3.3908E+00_JPRB/)
927KAO( :, 2, 8, 5) = (/&
928&7.7853E-03_JPRB,3.3608E-02_JPRB,5.9028E-02_JPRB,8.4055E-02_JPRB,1.0819E-01_JPRB,1.3119E-01_JPRB,&
929&1.5248E-01_JPRB,1.7004E-01_JPRB,3.1845E+00_JPRB/)
930KAO( :, 3, 8, 5) = (/&
931&7.3065E-03_JPRB,3.4089E-02_JPRB,6.0968E-02_JPRB,8.7276E-02_JPRB,1.1264E-01_JPRB,1.3686E-01_JPRB,&
932&1.5934E-01_JPRB,1.7794E-01_JPRB,3.0043E+00_JPRB/)
933KAO( :, 4, 8, 5) = (/&
934&6.8879E-03_JPRB,3.4663E-02_JPRB,6.2677E-02_JPRB,8.9967E-02_JPRB,1.1635E-01_JPRB,1.4158E-01_JPRB,&
935&1.6491E-01_JPRB,1.8439E-01_JPRB,2.8456E+00_JPRB/)
936KAO( :, 5, 8, 5) = (/&
937&6.5199E-03_JPRB,3.5157E-02_JPRB,6.4215E-02_JPRB,9.2448E-02_JPRB,1.1974E-01_JPRB,1.4577E-01_JPRB,&
938&1.7002E-01_JPRB,1.9020E-01_JPRB,2.7064E+00_JPRB/)
939KAO( :, 1, 9, 5) = (/&
940&7.1670E-03_JPRB,2.8264E-02_JPRB,4.7722E-02_JPRB,6.7185E-02_JPRB,8.5943E-02_JPRB,1.0376E-01_JPRB,&
941&1.2019E-01_JPRB,1.3426E-01_JPRB,3.0087E+00_JPRB/)
942KAO( :, 2, 9, 5) = (/&
943&6.6733E-03_JPRB,2.8499E-02_JPRB,4.9676E-02_JPRB,7.0525E-02_JPRB,9.0644E-02_JPRB,1.0983E-01_JPRB,&
944&1.2746E-01_JPRB,1.4211E-01_JPRB,2.8169E+00_JPRB/)
945KAO( :, 3, 9, 5) = (/&
946&6.2464E-03_JPRB,2.8870E-02_JPRB,5.1362E-02_JPRB,7.3368E-02_JPRB,9.4608E-02_JPRB,1.1481E-01_JPRB,&
947&1.3345E-01_JPRB,1.4885E-01_JPRB,2.6506E+00_JPRB/)
948KAO( :, 4, 9, 5) = (/&
949&5.8753E-03_JPRB,2.9313E-02_JPRB,5.2839E-02_JPRB,7.5761E-02_JPRB,9.7853E-02_JPRB,1.1892E-01_JPRB,&
950&1.3848E-01_JPRB,1.5462E-01_JPRB,2.5062E+00_JPRB/)
951KAO( :, 5, 9, 5) = (/&
952&5.5500E-03_JPRB,2.9736E-02_JPRB,5.4197E-02_JPRB,7.7953E-02_JPRB,1.0085E-01_JPRB,1.2274E-01_JPRB,&
953&1.4297E-01_JPRB,1.5977E-01_JPRB,2.3796E+00_JPRB/)
954KAO( :, 1,10, 5) = (/&
955&6.1244E-03_JPRB,2.3891E-02_JPRB,3.9969E-02_JPRB,5.6166E-02_JPRB,7.1759E-02_JPRB,8.6539E-02_JPRB,&
956&1.0009E-01_JPRB,1.1231E-01_JPRB,2.6506E+00_JPRB/)
957KAO( :, 2,10, 5) = (/&
958&5.6882E-03_JPRB,2.4047E-02_JPRB,4.1658E-02_JPRB,5.9064E-02_JPRB,7.5818E-02_JPRB,9.1738E-02_JPRB,&
959&1.0641E-01_JPRB,1.1881E-01_JPRB,2.4752E+00_JPRB/)
960KAO( :, 3,10, 5) = (/&
961&5.3134E-03_JPRB,2.4335E-02_JPRB,4.3112E-02_JPRB,6.1483E-02_JPRB,7.9176E-02_JPRB,9.6027E-02_JPRB,&
962&1.1160E-01_JPRB,1.2443E-01_JPRB,2.3246E+00_JPRB/)
963KAO( :, 4,10, 5) = (/&
964&4.9890E-03_JPRB,2.4682E-02_JPRB,4.4370E-02_JPRB,6.3529E-02_JPRB,8.2017E-02_JPRB,9.9655E-02_JPRB,&
965&1.1591E-01_JPRB,1.2935E-01_JPRB,2.1952E+00_JPRB/)
966KAO( :, 5,10, 5) = (/&
967&4.7070E-03_JPRB,2.5048E-02_JPRB,4.5565E-02_JPRB,6.5484E-02_JPRB,8.4705E-02_JPRB,1.0298E-01_JPRB,&
968&1.1992E-01_JPRB,1.3395E-01_JPRB,2.0819E+00_JPRB/)
969KAO( :, 1,11, 5) = (/&
970&5.0497E-03_JPRB,2.0186E-02_JPRB,3.4078E-02_JPRB,4.7979E-02_JPRB,6.1354E-02_JPRB,7.4036E-02_JPRB,&
971&8.5636E-02_JPRB,9.6183E-02_JPRB,2.2490E+00_JPRB/)
972KAO( :, 2,11, 5) = (/&
973&4.6938E-03_JPRB,2.0334E-02_JPRB,3.5429E-02_JPRB,5.0287E-02_JPRB,6.4580E-02_JPRB,7.8155E-02_JPRB,&
974&9.0667E-02_JPRB,1.0125E-01_JPRB,2.1005E+00_JPRB/)
975KAO( :, 3,11, 5) = (/&
976&4.3895E-03_JPRB,2.0572E-02_JPRB,3.6577E-02_JPRB,5.2195E-02_JPRB,6.7235E-02_JPRB,8.1560E-02_JPRB,&
977&9.4765E-02_JPRB,1.0567E-01_JPRB,1.9750E+00_JPRB/)
978KAO( :, 4,11, 5) = (/&
979&4.1271E-03_JPRB,2.0876E-02_JPRB,3.7641E-02_JPRB,5.3937E-02_JPRB,6.9658E-02_JPRB,8.4612E-02_JPRB,&
980&9.8403E-02_JPRB,1.0977E-01_JPRB,1.8669E+00_JPRB/)
981KAO( :, 5,11, 5) = (/&
982&3.8988E-03_JPRB,2.1198E-02_JPRB,3.8649E-02_JPRB,5.5601E-02_JPRB,7.1927E-02_JPRB,8.7466E-02_JPRB,&
983&1.0184E-01_JPRB,1.1364E-01_JPRB,1.7763E+00_JPRB/)
984KAO( :, 1,12, 5) = (/&
985&4.1728E-03_JPRB,1.6993E-02_JPRB,2.8852E-02_JPRB,4.0662E-02_JPRB,5.2011E-02_JPRB,6.2760E-02_JPRB,&
986&7.2578E-02_JPRB,8.1564E-02_JPRB,1.9301E+00_JPRB/)
987KAO( :, 2,12, 5) = (/&
988&3.8841E-03_JPRB,1.7115E-02_JPRB,2.9921E-02_JPRB,4.2476E-02_JPRB,5.4549E-02_JPRB,6.6006E-02_JPRB,&
989&7.6561E-02_JPRB,8.5509E-02_JPRB,1.8048E+00_JPRB/)
990KAO( :, 3,12, 5) = (/&
991&3.6372E-03_JPRB,1.7332E-02_JPRB,3.0872E-02_JPRB,4.4059E-02_JPRB,5.6757E-02_JPRB,6.8840E-02_JPRB,&
992&7.9938E-02_JPRB,8.9112E-02_JPRB,1.6994E+00_JPRB/)
993KAO( :, 4,12, 5) = (/&
994&3.4237E-03_JPRB,1.7595E-02_JPRB,3.1771E-02_JPRB,4.5538E-02_JPRB,5.8804E-02_JPRB,7.1398E-02_JPRB,&
995&8.2985E-02_JPRB,9.2488E-02_JPRB,1.6111E+00_JPRB/)
996KAO( :, 5,12, 5) = (/&
997&3.2373E-03_JPRB,1.7880E-02_JPRB,3.2595E-02_JPRB,4.6898E-02_JPRB,6.0660E-02_JPRB,7.3740E-02_JPRB,&
998&8.5835E-02_JPRB,9.5657E-02_JPRB,1.5338E+00_JPRB/)
999KAO( :, 1,13, 5) = (/&
1000&3.4531E-03_JPRB,1.4217E-02_JPRB,2.4215E-02_JPRB,3.4135E-02_JPRB,4.3667E-02_JPRB,5.2684E-02_JPRB,&
1001&6.0918E-02_JPRB,6.8490E-02_JPRB,1.7191E+00_JPRB/)
1002KAO( :, 2,13, 5) = (/&
1003&3.2166E-03_JPRB,1.4327E-02_JPRB,2.5086E-02_JPRB,3.5607E-02_JPRB,4.5722E-02_JPRB,5.5317E-02_JPRB,&
1004&6.4142E-02_JPRB,7.1650E-02_JPRB,1.6100E+00_JPRB/)
1005KAO( :, 3,13, 5) = (/&
1006&3.0139E-03_JPRB,1.4515E-02_JPRB,2.5871E-02_JPRB,3.6915E-02_JPRB,4.7550E-02_JPRB,5.7658E-02_JPRB,&
1007&6.6926E-02_JPRB,7.4589E-02_JPRB,1.5199E+00_JPRB/)
1008KAO( :, 4,13, 5) = (/&
1009&2.8380E-03_JPRB,1.4739E-02_JPRB,2.6616E-02_JPRB,3.8152E-02_JPRB,4.9253E-02_JPRB,5.9779E-02_JPRB,&
1010&6.9455E-02_JPRB,7.7339E-02_JPRB,1.4413E+00_JPRB/)
1011KAO( :, 5,13, 5) = (/&
1012&2.6842E-03_JPRB,1.4990E-02_JPRB,2.7278E-02_JPRB,3.9228E-02_JPRB,5.0729E-02_JPRB,6.1660E-02_JPRB,&
1013&7.1747E-02_JPRB,7.9916E-02_JPRB,1.3713E+00_JPRB/)
1014KAO( :, 1, 1, 6) = (/&
1015&3.8632E-02_JPRB,1.4563E-01_JPRB,2.6438E-01_JPRB,3.7994E-01_JPRB,4.9178E-01_JPRB,5.9825E-01_JPRB,&
1016&6.9697E-01_JPRB,7.7896E-01_JPRB,1.1356E+01_JPRB/)
1017KAO( :, 2, 1, 6) = (/&
1018&3.7252E-02_JPRB,1.4645E-01_JPRB,2.6646E-01_JPRB,3.8318E-01_JPRB,4.9611E-01_JPRB,6.0391E-01_JPRB,&
1019&7.0433E-01_JPRB,7.8721E-01_JPRB,1.0913E+01_JPRB/)
1020KAO( :, 3, 1, 6) = (/&
1021&3.6055E-02_JPRB,1.4710E-01_JPRB,2.6822E-01_JPRB,3.8583E-01_JPRB,4.9949E-01_JPRB,6.0852E-01_JPRB,&
1022&7.0979E-01_JPRB,7.9483E-01_JPRB,1.0530E+01_JPRB/)
1023KAO( :, 4, 1, 6) = (/&
1024&3.5090E-02_JPRB,1.4760E-01_JPRB,2.6956E-01_JPRB,3.8772E-01_JPRB,5.0210E-01_JPRB,6.1181E-01_JPRB,&
1025&7.1390E-01_JPRB,7.9958E-01_JPRB,1.0180E+01_JPRB/)
1026KAO( :, 5, 1, 6) = (/&
1027&3.4260E-02_JPRB,1.4804E-01_JPRB,2.7047E-01_JPRB,3.8919E-01_JPRB,5.0401E-01_JPRB,6.1383E-01_JPRB,&
1028&7.1642E-01_JPRB,8.0271E-01_JPRB,9.8574E+00_JPRB/)
1029KAO( :, 1, 2, 6) = (/&
1030&3.1826E-02_JPRB,1.3117E-01_JPRB,2.4082E-01_JPRB,3.4734E-01_JPRB,4.4987E-01_JPRB,5.4781E-01_JPRB,&
1031&6.3804E-01_JPRB,7.1206E-01_JPRB,9.6043E+00_JPRB/)
1032KAO( :, 2, 2, 6) = (/&
1033&3.0580E-02_JPRB,1.3188E-01_JPRB,2.4250E-01_JPRB,3.4978E-01_JPRB,4.5341E-01_JPRB,5.5237E-01_JPRB,&
1034&6.4380E-01_JPRB,7.1952E-01_JPRB,9.2042E+00_JPRB/)
1035KAO( :, 3, 2, 6) = (/&
1036&2.9477E-02_JPRB,1.3242E-01_JPRB,2.4394E-01_JPRB,3.5199E-01_JPRB,4.5646E-01_JPRB,5.5595E-01_JPRB,&
1037&6.4859E-01_JPRB,7.2500E-01_JPRB,8.8547E+00_JPRB/)
1038KAO( :, 4, 2, 6) = (/&
1039&2.8580E-02_JPRB,1.3291E-01_JPRB,2.4517E-01_JPRB,3.5389E-01_JPRB,4.5886E-01_JPRB,5.5917E-01_JPRB,&
1040&6.5208E-01_JPRB,7.2920E-01_JPRB,8.5255E+00_JPRB/)
1041KAO( :, 5, 2, 6) = (/&
1042&2.7810E-02_JPRB,1.3345E-01_JPRB,2.4608E-01_JPRB,3.5526E-01_JPRB,4.6068E-01_JPRB,5.6160E-01_JPRB,&
1043&6.5500E-01_JPRB,7.3217E-01_JPRB,8.2220E+00_JPRB/)
1044KAO( :, 1, 3, 6) = (/&
1045&2.6420E-02_JPRB,1.1646E-01_JPRB,2.1549E-01_JPRB,3.1138E-01_JPRB,4.0359E-01_JPRB,4.9120E-01_JPRB,&
1046&5.7225E-01_JPRB,6.3794E-01_JPRB,8.1678E+00_JPRB/)
1047KAO( :, 2, 3, 6) = (/&
1048&2.5165E-02_JPRB,1.1697E-01_JPRB,2.1694E-01_JPRB,3.1375E-01_JPRB,4.0678E-01_JPRB,4.9551E-01_JPRB,&
1049&5.7728E-01_JPRB,6.4420E-01_JPRB,7.7828E+00_JPRB/)
1050KAO( :, 3, 3, 6) = (/&
1051&2.4099E-02_JPRB,1.1741E-01_JPRB,2.1826E-01_JPRB,3.1581E-01_JPRB,4.0983E-01_JPRB,4.9937E-01_JPRB,&
1052&5.8185E-01_JPRB,6.4952E-01_JPRB,7.4421E+00_JPRB/)
1053KAO( :, 4, 3, 6) = (/&
1054&2.3226E-02_JPRB,1.1793E-01_JPRB,2.1960E-01_JPRB,3.1782E-01_JPRB,4.1268E-01_JPRB,5.0276E-01_JPRB,&
1055&5.8605E-01_JPRB,6.5374E-01_JPRB,7.1416E+00_JPRB/)
1056KAO( :, 5, 3, 6) = (/&
1057&2.2449E-02_JPRB,1.1853E-01_JPRB,2.2074E-01_JPRB,3.1965E-01_JPRB,4.1487E-01_JPRB,5.0573E-01_JPRB,&
1058&5.8935E-01_JPRB,6.5775E-01_JPRB,6.8702E+00_JPRB/)
1059KAO( :, 1, 4, 6) = (/&
1060&2.2282E-02_JPRB,1.0267E-01_JPRB,1.9038E-01_JPRB,2.7507E-01_JPRB,3.5668E-01_JPRB,4.3406E-01_JPRB,&
1061&5.0509E-01_JPRB,5.6272E-01_JPRB,7.0192E+00_JPRB/)
1062KAO( :, 2, 4, 6) = (/&
1063&2.1101E-02_JPRB,1.0311E-01_JPRB,1.9184E-01_JPRB,2.7754E-01_JPRB,3.5984E-01_JPRB,4.3790E-01_JPRB,&
1064&5.1005E-01_JPRB,5.6828E-01_JPRB,6.6594E+00_JPRB/)
1065KAO( :, 3, 4, 6) = (/&
1066&2.0092E-02_JPRB,1.0356E-01_JPRB,1.9318E-01_JPRB,2.7978E-01_JPRB,3.6293E-01_JPRB,4.4207E-01_JPRB,&
1067&5.1463E-01_JPRB,5.7356E-01_JPRB,6.3438E+00_JPRB/)
1068KAO( :, 4, 4, 6) = (/&
1069&1.9228E-02_JPRB,1.0414E-01_JPRB,1.9468E-01_JPRB,2.8199E-01_JPRB,3.6599E-01_JPRB,4.4583E-01_JPRB,&
1070&5.1913E-01_JPRB,5.7829E-01_JPRB,6.0576E+00_JPRB/)
1071KAO( :, 5, 4, 6) = (/&
1072&1.8478E-02_JPRB,1.0486E-01_JPRB,1.9620E-01_JPRB,2.8416E-01_JPRB,3.6882E-01_JPRB,4.4907E-01_JPRB,&
1073&5.2302E-01_JPRB,5.8267E-01_JPRB,5.7987E+00_JPRB/)
1074KAO( :, 1, 5, 6) = (/&
1075&1.8927E-02_JPRB,8.9665E-02_JPRB,1.6623E-01_JPRB,2.4010E-01_JPRB,3.1103E-01_JPRB,3.7843E-01_JPRB,&
1076&4.4012E-01_JPRB,4.9065E-01_JPRB,6.0454E+00_JPRB/)
1077KAO( :, 2, 5, 6) = (/&
1078&1.7852E-02_JPRB,9.0154E-02_JPRB,1.6776E-01_JPRB,2.4246E-01_JPRB,3.1432E-01_JPRB,3.8239E-01_JPRB,&
1079&4.4467E-01_JPRB,4.9513E-01_JPRB,5.7165E+00_JPRB/)
1080KAO( :, 3, 5, 6) = (/&
1081&1.6931E-02_JPRB,9.0711E-02_JPRB,1.6930E-01_JPRB,2.4502E-01_JPRB,3.1769E-01_JPRB,3.8643E-01_JPRB,&
1082&4.4965E-01_JPRB,5.0025E-01_JPRB,5.4249E+00_JPRB/)
1083KAO( :, 4, 5, 6) = (/&
1084&1.6136E-02_JPRB,9.1383E-02_JPRB,1.7089E-01_JPRB,2.4749E-01_JPRB,3.2087E-01_JPRB,3.9057E-01_JPRB,&
1085&4.5430E-01_JPRB,5.0560E-01_JPRB,5.1610E+00_JPRB/)
1086KAO( :, 5, 5, 6) = (/&
1087&1.5442E-02_JPRB,9.2230E-02_JPRB,1.7257E-01_JPRB,2.4990E-01_JPRB,3.2412E-01_JPRB,3.9447E-01_JPRB,&
1088&4.5892E-01_JPRB,5.1059E-01_JPRB,4.9249E+00_JPRB/)
1089KAO( :, 1, 6, 6) = (/&
1090&1.6173E-02_JPRB,7.7572E-02_JPRB,1.4357E-01_JPRB,2.0729E-01_JPRB,2.6833E-01_JPRB,3.2615E-01_JPRB,&
1091&3.7930E-01_JPRB,4.2429E-01_JPRB,5.2215E+00_JPRB/)
1092KAO( :, 2, 6, 6) = (/&
1093&1.5200E-02_JPRB,7.8077E-02_JPRB,1.4510E-01_JPRB,2.0962E-01_JPRB,2.7142E-01_JPRB,3.3008E-01_JPRB,&
1094&3.8383E-01_JPRB,4.2773E-01_JPRB,4.9175E+00_JPRB/)
1095KAO( :, 3, 6, 6) = (/&
1096&1.4368E-02_JPRB,7.8730E-02_JPRB,1.4681E-01_JPRB,2.1218E-01_JPRB,2.7493E-01_JPRB,3.3435E-01_JPRB,&
1097&3.8857E-01_JPRB,4.3236E-01_JPRB,4.6498E+00_JPRB/)
1098KAO( :, 4, 6, 6) = (/&
1099&1.3651E-02_JPRB,7.9498E-02_JPRB,1.4852E-01_JPRB,2.1489E-01_JPRB,2.7853E-01_JPRB,3.3867E-01_JPRB,&
1100&3.9393E-01_JPRB,4.3813E-01_JPRB,4.4118E+00_JPRB/)
1101KAO( :, 5, 6, 6) = (/&
1102&1.3021E-02_JPRB,8.0512E-02_JPRB,1.5047E-01_JPRB,2.1785E-01_JPRB,2.8237E-01_JPRB,3.4356E-01_JPRB,&
1103&3.9943E-01_JPRB,4.4445E-01_JPRB,4.1985E+00_JPRB/)
1104KAO( :, 1, 7, 6) = (/&
1105&1.3842E-02_JPRB,6.6570E-02_JPRB,1.2297E-01_JPRB,1.7734E-01_JPRB,2.2958E-01_JPRB,2.7900E-01_JPRB,&
1106&3.2406E-01_JPRB,3.6469E-01_JPRB,4.5564E+00_JPRB/)
1107KAO( :, 2, 7, 6) = (/&
1108&1.2974E-02_JPRB,6.7120E-02_JPRB,1.2449E-01_JPRB,1.7977E-01_JPRB,2.3270E-01_JPRB,2.8277E-01_JPRB,&
1109&3.2872E-01_JPRB,3.6760E-01_JPRB,4.2769E+00_JPRB/)
1110KAO( :, 3, 7, 6) = (/&
1111&1.2231E-02_JPRB,6.7829E-02_JPRB,1.2627E-01_JPRB,1.8248E-01_JPRB,2.3625E-01_JPRB,2.8721E-01_JPRB,&
1112&3.3397E-01_JPRB,3.7214E-01_JPRB,4.0308E+00_JPRB/)
1113KAO( :, 4, 7, 6) = (/&
1114&1.1586E-02_JPRB,6.8704E-02_JPRB,1.2831E-01_JPRB,1.8551E-01_JPRB,2.4039E-01_JPRB,2.9244E-01_JPRB,&
1115&3.3993E-01_JPRB,3.7842E-01_JPRB,3.8137E+00_JPRB/)
1116KAO( :, 5, 7, 6) = (/&
1117&1.1019E-02_JPRB,6.9935E-02_JPRB,1.3064E-01_JPRB,1.8899E-01_JPRB,2.4502E-01_JPRB,2.9795E-01_JPRB,&
1118&3.4661E-01_JPRB,3.8562E-01_JPRB,3.6208E+00_JPRB/)
1119KAO( :, 1, 8, 6) = (/&
1120&1.1856E-02_JPRB,5.6687E-02_JPRB,1.0456E-01_JPRB,1.5068E-01_JPRB,1.9490E-01_JPRB,2.3680E-01_JPRB,&
1121&2.7529E-01_JPRB,3.1187E-01_JPRB,4.0573E+00_JPRB/)
1122KAO( :, 2, 8, 6) = (/&
1123&1.1084E-02_JPRB,5.7283E-02_JPRB,1.0610E-01_JPRB,1.5305E-01_JPRB,1.9814E-01_JPRB,2.4092E-01_JPRB,&
1124&2.8002E-01_JPRB,3.1482E-01_JPRB,3.7969E+00_JPRB/)
1125KAO( :, 3, 8, 6) = (/&
1126&1.0424E-02_JPRB,5.8111E-02_JPRB,1.0802E-01_JPRB,1.5601E-01_JPRB,2.0208E-01_JPRB,2.4566E-01_JPRB,&
1127&2.8562E-01_JPRB,3.1943E-01_JPRB,3.5697E+00_JPRB/)
1128KAO( :, 4, 8, 6) = (/&
1129&9.8517E-03_JPRB,5.9109E-02_JPRB,1.1026E-01_JPRB,1.5951E-01_JPRB,2.0663E-01_JPRB,2.5128E-01_JPRB,&
1130&2.9237E-01_JPRB,3.2591E-01_JPRB,3.3690E+00_JPRB/)
1131KAO( :, 5, 8, 6) = (/&
1132&9.3473E-03_JPRB,6.0458E-02_JPRB,1.1290E-01_JPRB,1.6330E-01_JPRB,2.1161E-01_JPRB,2.5747E-01_JPRB,&
1133&2.9929E-01_JPRB,3.3311E-01_JPRB,3.1918E+00_JPRB/)
1134KAO( :, 1, 9, 6) = (/&
1135&1.0174E-02_JPRB,4.8047E-02_JPRB,8.8410E-02_JPRB,1.2743E-01_JPRB,1.6481E-01_JPRB,2.0018E-01_JPRB,&
1136&2.3315E-01_JPRB,2.6585E-01_JPRB,3.5956E+00_JPRB/)
1137KAO( :, 2, 9, 6) = (/&
1138&9.4844E-03_JPRB,4.8661E-02_JPRB,9.0043E-02_JPRB,1.2994E-01_JPRB,1.6817E-01_JPRB,2.0441E-01_JPRB,&
1139&2.3776E-01_JPRB,2.6902E-01_JPRB,3.3539E+00_JPRB/)
1140KAO( :, 3, 9, 6) = (/&
1141&8.8959E-03_JPRB,4.9547E-02_JPRB,9.2085E-02_JPRB,1.3295E-01_JPRB,1.7216E-01_JPRB,2.0943E-01_JPRB,&
1142&2.4369E-01_JPRB,2.7374E-01_JPRB,3.1436E+00_JPRB/)
1143KAO( :, 4, 9, 6) = (/&
1144&8.3843E-03_JPRB,5.0652E-02_JPRB,9.4445E-02_JPRB,1.3652E-01_JPRB,1.7695E-01_JPRB,2.1526E-01_JPRB,&
1145&2.5026E-01_JPRB,2.7964E-01_JPRB,2.9597E+00_JPRB/)
1146KAO( :, 5, 9, 6) = (/&
1147&7.9361E-03_JPRB,5.1996E-02_JPRB,9.7022E-02_JPRB,1.4032E-01_JPRB,1.8172E-01_JPRB,2.2081E-01_JPRB,&
1148&2.5660E-01_JPRB,2.8539E-01_JPRB,2.7995E+00_JPRB/)
1149KAO( :, 1,10, 6) = (/&
1150&8.6910E-03_JPRB,4.0662E-02_JPRB,7.4709E-02_JPRB,1.0753E-01_JPRB,1.3903E-01_JPRB,1.6890E-01_JPRB,&
1151&1.9755E-01_JPRB,2.2624E-01_JPRB,3.1658E+00_JPRB/)
1152KAO( :, 2,10, 6) = (/&
1153&8.0781E-03_JPRB,4.1334E-02_JPRB,7.6396E-02_JPRB,1.1015E-01_JPRB,1.4261E-01_JPRB,1.7346E-01_JPRB,&
1154&2.0195E-01_JPRB,2.2973E-01_JPRB,2.9443E+00_JPRB/)
1155KAO( :, 3,10, 6) = (/&
1156&7.5558E-03_JPRB,4.2237E-02_JPRB,7.8425E-02_JPRB,1.1329E-01_JPRB,1.4677E-01_JPRB,1.7847E-01_JPRB,&
1157&2.0753E-01_JPRB,2.3421E-01_JPRB,2.7528E+00_JPRB/)
1158KAO( :, 4,10, 6) = (/&
1159&7.1052E-03_JPRB,4.3295E-02_JPRB,8.0652E-02_JPRB,1.1657E-01_JPRB,1.5091E-01_JPRB,1.8339E-01_JPRB,&
1160&2.1320E-01_JPRB,2.3872E-01_JPRB,2.5875E+00_JPRB/)
1161KAO( :, 5,10, 6) = (/&
1162&6.7112E-03_JPRB,4.4456E-02_JPRB,8.2854E-02_JPRB,1.1964E-01_JPRB,1.5483E-01_JPRB,1.8812E-01_JPRB,&
1163&2.1828E-01_JPRB,2.4305E-01_JPRB,2.4449E+00_JPRB/)
1164KAO( :, 1,11, 6) = (/&
1165&7.1546E-03_JPRB,3.4641E-02_JPRB,6.3729E-02_JPRB,9.1774E-02_JPRB,1.1873E-01_JPRB,1.4430E-01_JPRB,&
1166&1.6899E-01_JPRB,1.9377E-01_JPRB,2.6800E+00_JPRB/)
1167KAO( :, 2,11, 6) = (/&
1168&6.6497E-03_JPRB,3.5437E-02_JPRB,6.5581E-02_JPRB,9.4605E-02_JPRB,1.2249E-01_JPRB,1.4891E-01_JPRB,&
1169&1.7335E-01_JPRB,1.9740E-01_JPRB,2.4922E+00_JPRB/)
1170KAO( :, 3,11, 6) = (/&
1171&6.2203E-03_JPRB,3.6291E-02_JPRB,6.7410E-02_JPRB,9.7360E-02_JPRB,1.2600E-01_JPRB,1.5308E-01_JPRB,&
1172&1.7786E-01_JPRB,2.0080E-01_JPRB,2.3311E+00_JPRB/)
1173KAO( :, 4,11, 6) = (/&
1174&5.8484E-03_JPRB,3.7194E-02_JPRB,6.9237E-02_JPRB,9.9960E-02_JPRB,1.2931E-01_JPRB,1.5705E-01_JPRB,&
1175&1.8234E-01_JPRB,2.0415E-01_JPRB,2.1940E+00_JPRB/)
1176KAO( :, 5,11, 6) = (/&
1177&5.5242E-03_JPRB,3.8204E-02_JPRB,7.1094E-02_JPRB,1.0253E-01_JPRB,1.3260E-01_JPRB,1.6091E-01_JPRB,&
1178&1.8653E-01_JPRB,2.0766E-01_JPRB,2.0745E+00_JPRB/)
1179KAO( :, 1,12, 6) = (/&
1180&5.8816E-03_JPRB,2.9599E-02_JPRB,5.4489E-02_JPRB,7.8480E-02_JPRB,1.0153E-01_JPRB,1.2338E-01_JPRB,&
1181&1.4461E-01_JPRB,1.6589E-01_JPRB,2.2985E+00_JPRB/)
1182KAO( :, 2,12, 6) = (/&
1183&5.4688E-03_JPRB,3.0298E-02_JPRB,5.6046E-02_JPRB,8.0826E-02_JPRB,1.0456E-01_JPRB,1.2701E-01_JPRB,&
1184&1.4783E-01_JPRB,1.6844E-01_JPRB,2.1377E+00_JPRB/)
1185KAO( :, 3,12, 6) = (/&
1186&5.1175E-03_JPRB,3.1020E-02_JPRB,5.7585E-02_JPRB,8.3084E-02_JPRB,1.0742E-01_JPRB,1.3040E-01_JPRB,&
1187&1.5140E-01_JPRB,1.7099E-01_JPRB,2.0023E+00_JPRB/)
1188KAO( :, 4,12, 6) = (/&
1189&4.8144E-03_JPRB,3.1808E-02_JPRB,5.9123E-02_JPRB,8.5255E-02_JPRB,1.1020E-01_JPRB,1.3374E-01_JPRB,&
1190&1.5506E-01_JPRB,1.7366E-01_JPRB,1.8864E+00_JPRB/)
1191KAO( :, 5,12, 6) = (/&
1192&4.5497E-03_JPRB,3.2704E-02_JPRB,6.0814E-02_JPRB,8.7626E-02_JPRB,1.1321E-01_JPRB,1.3720E-01_JPRB,&
1193&1.5886E-01_JPRB,1.7678E-01_JPRB,1.7844E+00_JPRB/)
1194KAO( :, 1,13, 6) = (/&
1195&4.8422E-03_JPRB,2.5177E-02_JPRB,4.6344E-02_JPRB,6.6734E-02_JPRB,8.6291E-02_JPRB,1.0482E-01_JPRB,&
1196&1.2289E-01_JPRB,1.4102E-01_JPRB,2.0501E+00_JPRB/)
1197KAO( :, 2,13, 6) = (/&
1198&4.5082E-03_JPRB,2.5759E-02_JPRB,4.7623E-02_JPRB,6.8651E-02_JPRB,8.8749E-02_JPRB,1.0771E-01_JPRB,&
1199&1.2536E-01_JPRB,1.4285E-01_JPRB,1.9088E+00_JPRB/)
1200KAO( :, 3,13, 6) = (/&
1201&4.2221E-03_JPRB,2.6388E-02_JPRB,4.8921E-02_JPRB,7.0509E-02_JPRB,9.1098E-02_JPRB,1.1050E-01_JPRB,&
1202&1.2820E-01_JPRB,1.4481E-01_JPRB,1.7897E+00_JPRB/)
1203KAO( :, 4,13, 6) = (/&
1204&3.9753E-03_JPRB,2.7097E-02_JPRB,5.0270E-02_JPRB,7.2404E-02_JPRB,9.3520E-02_JPRB,1.1341E-01_JPRB,&
1205&1.3134E-01_JPRB,1.4713E-01_JPRB,1.6870E+00_JPRB/)
1206KAO( :, 5,13, 6) = (/&
1207&3.7603E-03_JPRB,2.7904E-02_JPRB,5.1825E-02_JPRB,7.4620E-02_JPRB,9.6277E-02_JPRB,1.1654E-01_JPRB,&
1208&1.3481E-01_JPRB,1.4987E-01_JPRB,1.5960E+00_JPRB/)
1209KAO( :, 1, 1, 7) = (/&
1210&5.2128E-02_JPRB,2.2573E-01_JPRB,4.1698E-01_JPRB,6.0142E-01_JPRB,7.7838E-01_JPRB,9.4635E-01_JPRB,&
1211&1.1013E+00_JPRB,1.2264E+00_JPRB,1.2683E+01_JPRB/)
1212KAO( :, 2, 1, 7) = (/&
1213&5.0382E-02_JPRB,2.2718E-01_JPRB,4.1897E-01_JPRB,6.0369E-01_JPRB,7.8036E-01_JPRB,9.4806E-01_JPRB,&
1214&1.1011E+00_JPRB,1.2250E+00_JPRB,1.2078E+01_JPRB/)
1215KAO( :, 3, 1, 7) = (/&
1216&4.9050E-02_JPRB,2.2916E-01_JPRB,4.2172E-01_JPRB,6.0675E-01_JPRB,7.8406E-01_JPRB,9.5134E-01_JPRB,&
1217&1.1038E+00_JPRB,1.2245E+00_JPRB,1.1561E+01_JPRB/)
1218KAO( :, 4, 1, 7) = (/&
1219&4.8000E-02_JPRB,2.3161E-01_JPRB,4.2498E-01_JPRB,6.1081E-01_JPRB,7.8880E-01_JPRB,9.5615E-01_JPRB,&
1220&1.1084E+00_JPRB,1.2283E+00_JPRB,1.1090E+01_JPRB/)
1221KAO( :, 5, 1, 7) = (/&
1222&4.7267E-02_JPRB,2.3436E-01_JPRB,4.2865E-01_JPRB,6.1543E-01_JPRB,7.9387E-01_JPRB,9.6245E-01_JPRB,&
1223&1.1147E+00_JPRB,1.2334E+00_JPRB,1.0665E+01_JPRB/)
1224KAO( :, 1, 2, 7) = (/&
1225&4.2932E-02_JPRB,2.1372E-01_JPRB,3.9561E-01_JPRB,5.6920E-01_JPRB,7.3515E-01_JPRB,8.9082E-01_JPRB,&
1226&1.0322E+00_JPRB,1.1443E+00_JPRB,1.0613E+01_JPRB/)
1227KAO( :, 2, 2, 7) = (/&
1228&4.1235E-02_JPRB,2.1562E-01_JPRB,3.9903E-01_JPRB,5.7421E-01_JPRB,7.4053E-01_JPRB,8.9640E-01_JPRB,&
1229&1.0375E+00_JPRB,1.1460E+00_JPRB,1.0106E+01_JPRB/)
1230KAO( :, 3, 2, 7) = (/&
1231&3.9904E-02_JPRB,2.1797E-01_JPRB,4.0322E-01_JPRB,5.7993E-01_JPRB,7.4744E-01_JPRB,9.0475E-01_JPRB,&
1232&1.0452E+00_JPRB,1.1527E+00_JPRB,9.6511E+00_JPRB/)
1233KAO( :, 4, 2, 7) = (/&
1234&3.8807E-02_JPRB,2.2063E-01_JPRB,4.0792E-01_JPRB,5.8615E-01_JPRB,7.5558E-01_JPRB,9.1342E-01_JPRB,&
1235&1.0550E+00_JPRB,1.1616E+00_JPRB,9.2444E+00_JPRB/)
1236KAO( :, 5, 2, 7) = (/&
1237&3.7944E-02_JPRB,2.2348E-01_JPRB,4.1278E-01_JPRB,5.9308E-01_JPRB,7.6392E-01_JPRB,9.2334E-01_JPRB,&
1238&1.0654E+00_JPRB,1.1718E+00_JPRB,8.8704E+00_JPRB/)
1239KAO( :, 1, 3, 7) = (/&
1240&3.5644E-02_JPRB,1.9900E-01_JPRB,3.6873E-01_JPRB,5.2969E-01_JPRB,6.8262E-01_JPRB,8.2576E-01_JPRB,&
1241&9.5330E-01_JPRB,1.0560E+00_JPRB,9.0225E+00_JPRB/)
1242KAO( :, 2, 3, 7) = (/&
1243&3.3919E-02_JPRB,2.0128E-01_JPRB,3.7328E-01_JPRB,5.3629E-01_JPRB,6.9070E-01_JPRB,8.3419E-01_JPRB,&
1244&9.6259E-01_JPRB,1.0599E+00_JPRB,8.5592E+00_JPRB/)
1245KAO( :, 3, 3, 7) = (/&
1246&3.2476E-02_JPRB,2.0401E-01_JPRB,3.7867E-01_JPRB,5.4408E-01_JPRB,7.0000E-01_JPRB,8.4506E-01_JPRB,&
1247&9.7370E-01_JPRB,1.0690E+00_JPRB,8.1409E+00_JPRB/)
1248KAO( :, 4, 3, 7) = (/&
1249&3.1249E-02_JPRB,2.0698E-01_JPRB,3.8457E-01_JPRB,5.5225E-01_JPRB,7.1038E-01_JPRB,8.5708E-01_JPRB,&
1250&9.8671E-01_JPRB,1.0811E+00_JPRB,7.7623E+00_JPRB/)
1251KAO( :, 5, 3, 7) = (/&
1252&3.0275E-02_JPRB,2.1021E-01_JPRB,3.9069E-01_JPRB,5.6104E-01_JPRB,7.2150E-01_JPRB,8.6973E-01_JPRB,&
1253&1.0004E+00_JPRB,1.0948E+00_JPRB,7.4273E+00_JPRB/)
1254KAO( :, 1, 4, 7) = (/&
1255&3.0097E-02_JPRB,1.8261E-01_JPRB,3.3811E-01_JPRB,4.8498E-01_JPRB,6.2347E-01_JPRB,7.5244E-01_JPRB,&
1256&8.6689E-01_JPRB,9.6397E-01_JPRB,7.7267E+00_JPRB/)
1257KAO( :, 2, 4, 7) = (/&
1258&2.8465E-02_JPRB,1.8532E-01_JPRB,3.4351E-01_JPRB,4.9262E-01_JPRB,6.3341E-01_JPRB,7.6377E-01_JPRB,&
1259&8.7850E-01_JPRB,9.6891E-01_JPRB,7.2971E+00_JPRB/)
1260KAO( :, 3, 4, 7) = (/&
1261&2.7069E-02_JPRB,1.8851E-01_JPRB,3.4990E-01_JPRB,5.0190E-01_JPRB,6.4465E-01_JPRB,7.7654E-01_JPRB,&
1262&8.9285E-01_JPRB,9.7883E-01_JPRB,6.9159E+00_JPRB/)
1263KAO( :, 4, 4, 7) = (/&
1264&2.5871E-02_JPRB,1.9199E-01_JPRB,3.5682E-01_JPRB,5.1175E-01_JPRB,6.5706E-01_JPRB,7.9119E-01_JPRB,&
1265&9.0820E-01_JPRB,9.9217E-01_JPRB,6.5751E+00_JPRB/)
1266KAO( :, 5, 4, 7) = (/&
1267&2.4866E-02_JPRB,1.9576E-01_JPRB,3.6404E-01_JPRB,5.2207E-01_JPRB,6.7030E-01_JPRB,8.0638E-01_JPRB,&
1268&9.2498E-01_JPRB,1.0073E+00_JPRB,6.2687E+00_JPRB/)
1269KAO( :, 1, 5, 7) = (/&
1270&2.5614E-02_JPRB,1.6487E-01_JPRB,3.0459E-01_JPRB,4.3623E-01_JPRB,5.5976E-01_JPRB,6.7396E-01_JPRB,&
1271&7.7520E-01_JPRB,8.6835E-01_JPRB,6.6219E+00_JPRB/)
1272KAO( :, 2, 5, 7) = (/&
1273&2.4116E-02_JPRB,1.6799E-01_JPRB,3.1096E-01_JPRB,4.4514E-01_JPRB,5.7096E-01_JPRB,6.8731E-01_JPRB,&
1274&7.8907E-01_JPRB,8.7442E-01_JPRB,6.2328E+00_JPRB/)
1275KAO( :, 3, 5, 7) = (/&
1276&2.2830E-02_JPRB,1.7162E-01_JPRB,3.1815E-01_JPRB,4.5551E-01_JPRB,5.8428E-01_JPRB,7.0249E-01_JPRB,&
1277&8.0544E-01_JPRB,8.8480E-01_JPRB,5.8899E+00_JPRB/)
1278KAO( :, 4, 5, 7) = (/&
1279&2.1736E-02_JPRB,1.7560E-01_JPRB,3.2603E-01_JPRB,4.6697E-01_JPRB,5.9854E-01_JPRB,7.1908E-01_JPRB,&
1280&8.2326E-01_JPRB,8.9862E-01_JPRB,5.5832E+00_JPRB/)
1281KAO( :, 5, 5, 7) = (/&
1282&2.0809E-02_JPRB,1.7988E-01_JPRB,3.3435E-01_JPRB,4.7875E-01_JPRB,6.1356E-01_JPRB,7.3657E-01_JPRB,&
1283&8.4234E-01_JPRB,9.1423E-01_JPRB,5.3090E+00_JPRB/)
1284KAO( :, 1, 6, 7) = (/&
1285&2.1880E-02_JPRB,1.4623E-01_JPRB,2.6962E-01_JPRB,3.8553E-01_JPRB,4.9437E-01_JPRB,5.9458E-01_JPRB,&
1286&6.8464E-01_JPRB,7.7290E-01_JPRB,5.6893E+00_JPRB/)
1287KAO( :, 2, 6, 7) = (/&
1288&2.0541E-02_JPRB,1.4964E-01_JPRB,2.7646E-01_JPRB,3.9534E-01_JPRB,5.0653E-01_JPRB,6.0867E-01_JPRB,&
1289&6.9802E-01_JPRB,7.7944E-01_JPRB,5.3383E+00_JPRB/)
1290KAO( :, 3, 6, 7) = (/&
1291&1.9387E-02_JPRB,1.5367E-01_JPRB,2.8442E-01_JPRB,4.0664E-01_JPRB,5.2073E-01_JPRB,6.2519E-01_JPRB,&
1292&7.1506E-01_JPRB,7.9013E-01_JPRB,5.0300E+00_JPRB/)
1293KAO( :, 4, 6, 7) = (/&
1294&1.8399E-02_JPRB,1.5808E-01_JPRB,2.9302E-01_JPRB,4.1898E-01_JPRB,5.3609E-01_JPRB,6.4281E-01_JPRB,&
1295&7.3443E-01_JPRB,8.0386E-01_JPRB,4.7570E+00_JPRB/)
1296KAO( :, 5, 6, 7) = (/&
1297&1.7565E-02_JPRB,1.6282E-01_JPRB,3.0216E-01_JPRB,4.3178E-01_JPRB,5.5216E-01_JPRB,6.6163E-01_JPRB,&
1298&7.5404E-01_JPRB,8.1847E-01_JPRB,4.5125E+00_JPRB/)
1299KAO( :, 1, 7, 7) = (/&
1300&1.8714E-02_JPRB,1.2767E-01_JPRB,2.3517E-01_JPRB,3.3585E-01_JPRB,4.3014E-01_JPRB,5.1698E-01_JPRB,&
1301&5.9889E-01_JPRB,6.8052E-01_JPRB,4.9475E+00_JPRB/)
1302KAO( :, 2, 7, 7) = (/&
1303&1.7519E-02_JPRB,1.3119E-01_JPRB,2.4211E-01_JPRB,3.4588E-01_JPRB,4.4292E-01_JPRB,5.3168E-01_JPRB,&
1304&6.1066E-01_JPRB,6.8710E-01_JPRB,4.6289E+00_JPRB/)
1305KAO( :, 3, 7, 7) = (/&
1306&1.6495E-02_JPRB,1.3547E-01_JPRB,2.5037E-01_JPRB,3.5759E-01_JPRB,4.5729E-01_JPRB,5.4816E-01_JPRB,&
1307&6.2674E-01_JPRB,6.9772E-01_JPRB,4.3494E+00_JPRB/)
1308KAO( :, 4, 7, 7) = (/&
1309&1.5623E-02_JPRB,1.4024E-01_JPRB,2.5938E-01_JPRB,3.7018E-01_JPRB,4.7307E-01_JPRB,5.6640E-01_JPRB,&
1310&6.4533E-01_JPRB,7.1032E-01_JPRB,4.1027E+00_JPRB/)
1311KAO( :, 5, 7, 7) = (/&
1312&1.4883E-02_JPRB,1.4521E-01_JPRB,2.6879E-01_JPRB,3.8347E-01_JPRB,4.8911E-01_JPRB,5.8444E-01_JPRB,&
1313&6.6428E-01_JPRB,7.2392E-01_JPRB,3.8827E+00_JPRB/)
1314KAO( :, 1, 8, 7) = (/&
1315&1.6011E-02_JPRB,1.1016E-01_JPRB,2.0259E-01_JPRB,2.8923E-01_JPRB,3.7024E-01_JPRB,4.4570E-01_JPRB,&
1316&5.1977E-01_JPRB,5.9363E-01_JPRB,4.3984E+00_JPRB/)
1317KAO( :, 2, 8, 7) = (/&
1318&1.4948E-02_JPRB,1.1367E-01_JPRB,2.0954E-01_JPRB,2.9900E-01_JPRB,3.8239E-01_JPRB,4.5865E-01_JPRB,&
1319&5.2962E-01_JPRB,5.9992E-01_JPRB,4.1028E+00_JPRB/)
1320KAO( :, 3, 8, 7) = (/&
1321&1.4043E-02_JPRB,1.1790E-01_JPRB,2.1765E-01_JPRB,3.1052E-01_JPRB,3.9683E-01_JPRB,4.7512E-01_JPRB,&
1322&5.4401E-01_JPRB,6.0979E-01_JPRB,3.8451E+00_JPRB/)
1323KAO( :, 4, 8, 7) = (/&
1324&1.3277E-02_JPRB,1.2271E-01_JPRB,2.2662E-01_JPRB,3.2293E-01_JPRB,4.1184E-01_JPRB,4.9204E-01_JPRB,&
1325&5.6016E-01_JPRB,6.2114E-01_JPRB,3.6180E+00_JPRB/)
1326KAO( :, 5, 8, 7) = (/&
1327&1.2628E-02_JPRB,1.2779E-01_JPRB,2.3576E-01_JPRB,3.3533E-01_JPRB,4.2713E-01_JPRB,5.0925E-01_JPRB,&
1328&5.7770E-01_JPRB,6.3359E-01_JPRB,3.4160E+00_JPRB/)
1329KAO( :, 1, 9, 7) = (/&
1330&1.3722E-02_JPRB,9.3985E-02_JPRB,1.7271E-01_JPRB,2.4639E-01_JPRB,3.1541E-01_JPRB,3.8164E-01_JPRB,&
1331&4.4798E-01_JPRB,5.1362E-01_JPRB,3.8929E+00_JPRB/)
1332KAO( :, 2, 9, 7) = (/&
1333&1.2777E-02_JPRB,9.7414E-02_JPRB,1.7934E-01_JPRB,2.5581E-01_JPRB,3.2699E-01_JPRB,3.9259E-01_JPRB,&
1334&4.5617E-01_JPRB,5.1941E-01_JPRB,3.6200E+00_JPRB/)
1335KAO( :, 3, 9, 7) = (/&
1336&1.1979E-02_JPRB,1.0152E-01_JPRB,1.8716E-01_JPRB,2.6666E-01_JPRB,3.4026E-01_JPRB,4.0688E-01_JPRB,&
1337&4.6784E-01_JPRB,5.2783E-01_JPRB,3.3828E+00_JPRB/)
1338KAO( :, 4, 9, 7) = (/&
1339&1.1306E-02_JPRB,1.0607E-01_JPRB,1.9536E-01_JPRB,2.7793E-01_JPRB,3.5411E-01_JPRB,4.2250E-01_JPRB,&
1340&4.8212E-01_JPRB,5.3856E-01_JPRB,3.1744E+00_JPRB/)
1341KAO( :, 5, 9, 7) = (/&
1342&1.0737E-02_JPRB,1.1080E-01_JPRB,2.0394E-01_JPRB,2.8968E-01_JPRB,3.6840E-01_JPRB,4.3899E-01_JPRB,&
1343&4.9835E-01_JPRB,5.5128E-01_JPRB,2.9902E+00_JPRB/)
1344KAO( :, 1,10, 7) = (/&
1345&1.1712E-02_JPRB,7.9698E-02_JPRB,1.4636E-01_JPRB,2.0884E-01_JPRB,2.6772E-01_JPRB,3.2572E-01_JPRB,&
1346&3.8403E-01_JPRB,4.4146E-01_JPRB,3.4238E+00_JPRB/)
1347KAO( :, 2,10, 7) = (/&
1348&1.0885E-02_JPRB,8.2934E-02_JPRB,1.5255E-01_JPRB,2.1737E-01_JPRB,2.7766E-01_JPRB,3.3439E-01_JPRB,&
1349&3.9066E-01_JPRB,4.4635E-01_JPRB,3.1745E+00_JPRB/)
1350KAO( :, 3,10, 7) = (/&
1351&1.0188E-02_JPRB,8.6824E-02_JPRB,1.5967E-01_JPRB,2.2716E-01_JPRB,2.8954E-01_JPRB,3.4626E-01_JPRB,&
1352&4.0034E-01_JPRB,4.5401E-01_JPRB,2.9589E+00_JPRB/)
1353KAO( :, 4,10, 7) = (/&
1354&9.6011E-03_JPRB,9.1065E-02_JPRB,1.6737E-01_JPRB,2.3778E-01_JPRB,3.0267E-01_JPRB,3.6104E-01_JPRB,&
1355&4.1369E-01_JPRB,4.6516E-01_JPRB,2.7702E+00_JPRB/)
1356KAO( :, 5,10, 7) = (/&
1357&9.1043E-03_JPRB,9.5561E-02_JPRB,1.7554E-01_JPRB,2.4912E-01_JPRB,3.1674E-01_JPRB,3.7708E-01_JPRB,&
1358&4.2925E-01_JPRB,4.7811E-01_JPRB,2.6047E+00_JPRB/)
1359KAO( :, 1,11, 7) = (/&
1360&9.6600E-03_JPRB,6.8416E-02_JPRB,1.2568E-01_JPRB,1.7918E-01_JPRB,2.2969E-01_JPRB,2.7960E-01_JPRB,&
1361&3.2973E-01_JPRB,3.7899E-01_JPRB,2.8930E+00_JPRB/)
1362KAO( :, 2,11, 7) = (/&
1363&8.9878E-03_JPRB,7.1652E-02_JPRB,1.3155E-01_JPRB,1.8712E-01_JPRB,2.3867E-01_JPRB,2.8757E-01_JPRB,&
1364&3.3629E-01_JPRB,3.8441E-01_JPRB,2.6816E+00_JPRB/)
1365KAO( :, 3,11, 7) = (/&
1366&8.4222E-03_JPRB,7.5378E-02_JPRB,1.3835E-01_JPRB,1.9668E-01_JPRB,2.5051E-01_JPRB,2.9968E-01_JPRB,&
1367&3.4702E-01_JPRB,3.9398E-01_JPRB,2.4985E+00_JPRB/)
1368KAO( :, 4,11, 7) = (/&
1369&7.9456E-03_JPRB,7.9499E-02_JPRB,1.4588E-01_JPRB,2.0704E-01_JPRB,2.6333E-01_JPRB,3.1396E-01_JPRB,&
1370&3.6037E-01_JPRB,4.0593E-01_JPRB,2.3394E+00_JPRB/)
1371KAO( :, 5,11, 7) = (/&
1372&7.5367E-03_JPRB,8.3782E-02_JPRB,1.5372E-01_JPRB,2.1807E-01_JPRB,2.7700E-01_JPRB,3.2966E-01_JPRB,&
1373&3.7579E-01_JPRB,4.1961E-01_JPRB,2.2005E+00_JPRB/)
1374KAO( :, 1,12, 7) = (/&
1375&7.9651E-03_JPRB,5.8686E-02_JPRB,1.0769E-01_JPRB,1.5334E-01_JPRB,1.9661E-01_JPRB,2.3953E-01_JPRB,&
1376&2.8260E-01_JPRB,3.2486E-01_JPRB,2.4784E+00_JPRB/)
1377KAO( :, 2,12, 7) = (/&
1378&7.4154E-03_JPRB,6.1767E-02_JPRB,1.1336E-01_JPRB,1.6127E-01_JPRB,2.0569E-01_JPRB,2.4818E-01_JPRB,&
1379&2.9059E-01_JPRB,3.3236E-01_JPRB,2.2967E+00_JPRB/)
1380KAO( :, 3,12, 7) = (/&
1381&6.9534E-03_JPRB,6.5368E-02_JPRB,1.1996E-01_JPRB,1.7048E-01_JPRB,2.1709E-01_JPRB,2.5998E-01_JPRB,&
1382&3.0158E-01_JPRB,3.4278E-01_JPRB,2.1399E+00_JPRB/)
1383KAO( :, 4,12, 7) = (/&
1384&6.5627E-03_JPRB,6.9215E-02_JPRB,1.2702E-01_JPRB,1.8030E-01_JPRB,2.2939E-01_JPRB,2.7353E-01_JPRB,&
1385&3.1454E-01_JPRB,3.5481E-01_JPRB,2.0047E+00_JPRB/)
1386KAO( :, 5,12, 7) = (/&
1387&6.2252E-03_JPRB,7.3310E-02_JPRB,1.3449E-01_JPRB,1.9068E-01_JPRB,2.4194E-01_JPRB,2.8763E-01_JPRB,&
1388&3.2799E-01_JPRB,3.6662E-01_JPRB,1.8867E+00_JPRB/)
1389KAO( :, 1,13, 7) = (/&
1390&6.5616E-03_JPRB,5.0380E-02_JPRB,9.2460E-02_JPRB,1.3167E-01_JPRB,1.6900E-01_JPRB,2.0616E-01_JPRB,&
1391&2.4338E-01_JPRB,2.7988E-01_JPRB,2.2117E+00_JPRB/)
1392KAO( :, 2,13, 7) = (/&
1393&6.1120E-03_JPRB,5.3375E-02_JPRB,9.7998E-02_JPRB,1.3948E-01_JPRB,1.7796E-01_JPRB,2.1500E-01_JPRB,&
1394&2.5201E-01_JPRB,2.8843E-01_JPRB,2.0497E+00_JPRB/)
1395KAO( :, 3,13, 7) = (/&
1396&5.7372E-03_JPRB,5.6731E-02_JPRB,1.0419E-01_JPRB,1.4804E-01_JPRB,1.8846E-01_JPRB,2.2583E-01_JPRB,&
1397&2.6228E-01_JPRB,2.9829E-01_JPRB,1.9105E+00_JPRB/)
1398KAO( :, 4,13, 7) = (/&
1399&5.4187E-03_JPRB,6.0281E-02_JPRB,1.1054E-01_JPRB,1.5676E-01_JPRB,1.9913E-01_JPRB,2.3709E-01_JPRB,&
1400&2.7280E-01_JPRB,3.0791E-01_JPRB,1.7905E+00_JPRB/)
1401KAO( :, 5,13, 7) = (/&
1402&5.1412E-03_JPRB,6.3942E-02_JPRB,1.1702E-01_JPRB,1.6550E-01_JPRB,2.0967E-01_JPRB,2.4883E-01_JPRB,&
1403&2.8378E-01_JPRB,3.1751E-01_JPRB,1.6855E+00_JPRB/)
1404KAO( :, 1, 1, 8) = (/&
1405&8.0925E-02_JPRB,4.4695E-01_JPRB,8.0232E-01_JPRB,1.1226E+00_JPRB,1.4103E+00_JPRB,1.6623E+00_JPRB,&
1406&1.8647E+00_JPRB,1.9976E+00_JPRB,1.3169E+01_JPRB/)
1407KAO( :, 2, 1, 8) = (/&
1408&7.9475E-02_JPRB,4.6155E-01_JPRB,8.2577E-01_JPRB,1.1515E+00_JPRB,1.4434E+00_JPRB,1.6972E+00_JPRB,&
1409&1.8967E+00_JPRB,2.0110E+00_JPRB,1.2516E+01_JPRB/)
1410KAO( :, 3, 1, 8) = (/&
1411&7.9284E-02_JPRB,4.7585E-01_JPRB,8.4839E-01_JPRB,1.1813E+00_JPRB,1.4771E+00_JPRB,1.7315E+00_JPRB,&
1412&1.9304E+00_JPRB,2.0281E+00_JPRB,1.1933E+01_JPRB/)
1413KAO( :, 4, 1, 8) = (/&
1414&8.0560E-02_JPRB,4.9019E-01_JPRB,8.7148E-01_JPRB,1.2102E+00_JPRB,1.5100E+00_JPRB,1.7671E+00_JPRB,&
1415&1.9624E+00_JPRB,2.0460E+00_JPRB,1.1433E+01_JPRB/)
1416KAO( :, 5, 1, 8) = (/&
1417&8.3397E-02_JPRB,5.0455E-01_JPRB,8.9392E-01_JPRB,1.2384E+00_JPRB,1.5426E+00_JPRB,1.7995E+00_JPRB,&
1418&1.9927E+00_JPRB,2.0655E+00_JPRB,1.1063E+01_JPRB/)
1419KAO( :, 1, 2, 8) = (/&
1420&6.6575E-02_JPRB,4.3479E-01_JPRB,7.7702E-01_JPRB,1.0845E+00_JPRB,1.3608E+00_JPRB,1.6027E+00_JPRB,&
1421&1.7979E+00_JPRB,1.9533E+00_JPRB,1.1027E+01_JPRB/)
1422KAO( :, 2, 2, 8) = (/&
1423&6.4692E-02_JPRB,4.5045E-01_JPRB,8.0204E-01_JPRB,1.1153E+00_JPRB,1.3951E+00_JPRB,1.6384E+00_JPRB,&
1424&1.8309E+00_JPRB,1.9634E+00_JPRB,1.0460E+01_JPRB/)
1425KAO( :, 3, 2, 8) = (/&
1426&6.3712E-02_JPRB,4.6604E-01_JPRB,8.2695E-01_JPRB,1.1467E+00_JPRB,1.4311E+00_JPRB,1.6740E+00_JPRB,&
1427&1.8639E+00_JPRB,1.9755E+00_JPRB,9.9574E+00_JPRB/)
1428KAO( :, 4, 2, 8) = (/&
1429&6.3793E-02_JPRB,4.8171E-01_JPRB,8.5176E-01_JPRB,1.1782E+00_JPRB,1.4648E+00_JPRB,1.7096E+00_JPRB,&
1430&1.8945E+00_JPRB,1.9900E+00_JPRB,9.5122E+00_JPRB/)
1431KAO( :, 5, 2, 8) = (/&
1432&6.5076E-02_JPRB,4.9750E-01_JPRB,8.7656E-01_JPRB,1.2084E+00_JPRB,1.4992E+00_JPRB,1.7428E+00_JPRB,&
1433&1.9259E+00_JPRB,2.0066E+00_JPRB,9.1382E+00_JPRB/)
1434KAO( :, 1, 3, 8) = (/&
1435&5.5145E-02_JPRB,4.1677E-01_JPRB,7.4511E-01_JPRB,1.0407E+00_JPRB,1.3075E+00_JPRB,1.5427E+00_JPRB,&
1436&1.7389E+00_JPRB,1.9204E+00_JPRB,9.3514E+00_JPRB/)
1437KAO( :, 2, 3, 8) = (/&
1438&5.2833E-02_JPRB,4.3270E-01_JPRB,7.7006E-01_JPRB,1.0719E+00_JPRB,1.3419E+00_JPRB,1.5776E+00_JPRB,&
1439&1.7672E+00_JPRB,1.9272E+00_JPRB,8.8440E+00_JPRB/)
1440KAO( :, 3, 3, 8) = (/&
1441&5.1113E-02_JPRB,4.4882E-01_JPRB,7.9562E-01_JPRB,1.1025E+00_JPRB,1.3760E+00_JPRB,1.6125E+00_JPRB,&
1442&1.7982E+00_JPRB,1.9366E+00_JPRB,8.3935E+00_JPRB/)
1443KAO( :, 4, 3, 8) = (/&
1444&5.0028E-02_JPRB,4.6513E-01_JPRB,8.2062E-01_JPRB,1.1341E+00_JPRB,1.4094E+00_JPRB,1.6457E+00_JPRB,&
1445&1.8296E+00_JPRB,1.9485E+00_JPRB,7.9906E+00_JPRB/)
1446KAO( :, 5, 3, 8) = (/&
1447&4.9686E-02_JPRB,4.8163E-01_JPRB,8.4610E-01_JPRB,1.1641E+00_JPRB,1.4433E+00_JPRB,1.6796E+00_JPRB,&
1448&1.8613E+00_JPRB,1.9622E+00_JPRB,7.6298E+00_JPRB/)
1449KAO( :, 1, 4, 8) = (/&
1450&4.6588E-02_JPRB,3.9692E-01_JPRB,7.1203E-01_JPRB,9.9677E-01_JPRB,1.2538E+00_JPRB,1.4779E+00_JPRB,&
1451&1.6775E+00_JPRB,1.8726E+00_JPRB,7.9787E+00_JPRB/)
1452KAO( :, 2, 4, 8) = (/&
1453&4.4258E-02_JPRB,4.1229E-01_JPRB,7.3599E-01_JPRB,1.0269E+00_JPRB,1.2877E+00_JPRB,1.5133E+00_JPRB,&
1454&1.7010E+00_JPRB,1.8766E+00_JPRB,7.5234E+00_JPRB/)
1455KAO( :, 3, 4, 8) = (/&
1456&4.2368E-02_JPRB,4.2843E-01_JPRB,7.6079E-01_JPRB,1.0562E+00_JPRB,1.3204E+00_JPRB,1.5488E+00_JPRB,&
1457&1.7282E+00_JPRB,1.8838E+00_JPRB,7.1193E+00_JPRB/)
1458KAO( :, 4, 4, 8) = (/&
1459&4.0943E-02_JPRB,4.4462E-01_JPRB,7.8470E-01_JPRB,1.0862E+00_JPRB,1.3538E+00_JPRB,1.5826E+00_JPRB,&
1460&1.7585E+00_JPRB,1.8945E+00_JPRB,6.7587E+00_JPRB/)
1461KAO( :, 5, 4, 8) = (/&
1462&4.0040E-02_JPRB,4.6133E-01_JPRB,8.0984E-01_JPRB,1.1157E+00_JPRB,1.3860E+00_JPRB,1.6174E+00_JPRB,&
1463&1.7900E+00_JPRB,1.9072E+00_JPRB,6.4359E+00_JPRB/)
1464KAO( :, 1, 5, 8) = (/&
1465&3.9526E-02_JPRB,3.7682E-01_JPRB,6.7689E-01_JPRB,9.4443E-01_JPRB,1.1824E+00_JPRB,1.3941E+00_JPRB,&
1466&1.5967E+00_JPRB,1.7951E+00_JPRB,6.8177E+00_JPRB/)
1467KAO( :, 2, 5, 8) = (/&
1468&3.7399E-02_JPRB,3.9138E-01_JPRB,7.0025E-01_JPRB,9.7513E-01_JPRB,1.2184E+00_JPRB,1.4257E+00_JPRB,&
1469&1.6138E+00_JPRB,1.7967E+00_JPRB,6.4101E+00_JPRB/)
1470KAO( :, 3, 5, 8) = (/&
1471&3.5621E-02_JPRB,4.0679E-01_JPRB,7.2414E-01_JPRB,1.0055E+00_JPRB,1.2524E+00_JPRB,1.4609E+00_JPRB,&
1472&1.6366E+00_JPRB,1.8029E+00_JPRB,6.0506E+00_JPRB/)
1473KAO( :, 4, 5, 8) = (/&
1474&3.4188E-02_JPRB,4.2215E-01_JPRB,7.4791E-01_JPRB,1.0353E+00_JPRB,1.2879E+00_JPRB,1.4982E+00_JPRB,&
1475&1.6647E+00_JPRB,1.8130E+00_JPRB,5.7295E+00_JPRB/)
1476KAO( :, 5, 5, 8) = (/&
1477&3.3152E-02_JPRB,4.3822E-01_JPRB,7.7182E-01_JPRB,1.0659E+00_JPRB,1.3217E+00_JPRB,1.5355E+00_JPRB,&
1478&1.6945E+00_JPRB,1.8268E+00_JPRB,5.4423E+00_JPRB/)
1479KAO( :, 1, 6, 8) = (/&
1480&3.3649E-02_JPRB,3.5246E-01_JPRB,6.2833E-01_JPRB,8.7232E-01_JPRB,1.0890E+00_JPRB,1.2936E+00_JPRB,&
1481&1.4963E+00_JPRB,1.6916E+00_JPRB,5.8468E+00_JPRB/)
1482KAO( :, 2, 6, 8) = (/&
1483&3.1717E-02_JPRB,3.6739E-01_JPRB,6.5289E-01_JPRB,9.0324E-01_JPRB,1.1228E+00_JPRB,1.3194E+00_JPRB,&
1484&1.5082E+00_JPRB,1.6913E+00_JPRB,5.4809E+00_JPRB/)
1485KAO( :, 3, 6, 8) = (/&
1486&3.0089E-02_JPRB,3.8258E-01_JPRB,6.7739E-01_JPRB,9.3533E-01_JPRB,1.1590E+00_JPRB,1.3502E+00_JPRB,&
1487&1.5266E+00_JPRB,1.6967E+00_JPRB,5.1581E+00_JPRB/)
1488KAO( :, 4, 6, 8) = (/&
1489&2.8750E-02_JPRB,3.9797E-01_JPRB,7.0274E-01_JPRB,9.6682E-01_JPRB,1.1958E+00_JPRB,1.3860E+00_JPRB,&
1490&1.5502E+00_JPRB,1.7067E+00_JPRB,4.8739E+00_JPRB/)
1491KAO( :, 5, 6, 8) = (/&
1492&2.7719E-02_JPRB,4.1340E-01_JPRB,7.2752E-01_JPRB,9.9958E-01_JPRB,1.2327E+00_JPRB,1.4235E+00_JPRB,&
1493&1.5795E+00_JPRB,1.7225E+00_JPRB,4.6250E+00_JPRB/)
1494KAO( :, 1, 7, 8) = (/&
1495&2.8686E-02_JPRB,3.2127E-01_JPRB,5.6887E-01_JPRB,7.8697E-01_JPRB,9.8824E-01_JPRB,1.1850E+00_JPRB,&
1496&1.3805E+00_JPRB,1.5678E+00_JPRB,5.0771E+00_JPRB/)
1497KAO( :, 2, 7, 8) = (/&
1498&2.6938E-02_JPRB,3.3637E-01_JPRB,5.9372E-01_JPRB,8.1756E-01_JPRB,1.0158E+00_JPRB,1.2031E+00_JPRB,&
1499&1.3885E+00_JPRB,1.5659E+00_JPRB,4.7449E+00_JPRB/)
1500KAO( :, 3, 7, 8) = (/&
1501&2.5461E-02_JPRB,3.5175E-01_JPRB,6.1823E-01_JPRB,8.4914E-01_JPRB,1.0491E+00_JPRB,1.2297E+00_JPRB,&
1502&1.4035E+00_JPRB,1.5709E+00_JPRB,4.4560E+00_JPRB/)
1503KAO( :, 4, 7, 8) = (/&
1504&2.4234E-02_JPRB,3.6782E-01_JPRB,6.4422E-01_JPRB,8.8204E-01_JPRB,1.0858E+00_JPRB,1.2613E+00_JPRB,&
1505&1.4250E+00_JPRB,1.5825E+00_JPRB,4.2060E+00_JPRB/)
1506KAO( :, 5, 7, 8) = (/&
1507&2.3263E-02_JPRB,3.8390E-01_JPRB,6.7021E-01_JPRB,9.1556E-01_JPRB,1.1251E+00_JPRB,1.2988E+00_JPRB,&
1508&1.4532E+00_JPRB,1.6007E+00_JPRB,3.9900E+00_JPRB/)
1509KAO( :, 1, 8, 8) = (/&
1510&2.4476E-02_JPRB,2.8592E-01_JPRB,5.0420E-01_JPRB,6.9822E-01_JPRB,8.8452E-01_JPRB,1.0702E+00_JPRB,&
1511&1.2531E+00_JPRB,1.4283E+00_JPRB,4.5096E+00_JPRB/)
1512KAO( :, 2, 8, 8) = (/&
1513&2.2902E-02_JPRB,3.0083E-01_JPRB,5.2768E-01_JPRB,7.2503E-01_JPRB,9.0657E-01_JPRB,1.0833E+00_JPRB,&
1514&1.2584E+00_JPRB,1.4254E+00_JPRB,4.2037E+00_JPRB/)
1515KAO( :, 3, 8, 8) = (/&
1516&2.1570E-02_JPRB,3.1592E-01_JPRB,5.5240E-01_JPRB,7.5563E-01_JPRB,9.3505E-01_JPRB,1.1044E+00_JPRB,&
1517&1.2718E+00_JPRB,1.4312E+00_JPRB,3.9432E+00_JPRB/)
1518KAO( :, 4, 8, 8) = (/&
1519&2.0460E-02_JPRB,3.3184E-01_JPRB,5.7760E-01_JPRB,7.8855E-01_JPRB,9.6959E-01_JPRB,1.1343E+00_JPRB,&
1520&1.2935E+00_JPRB,1.4455E+00_JPRB,3.7209E+00_JPRB/)
1521KAO( :, 5, 8, 8) = (/&
1522&1.9571E-02_JPRB,3.4825E-01_JPRB,6.0453E-01_JPRB,8.2286E-01_JPRB,1.0085E+00_JPRB,1.1703E+00_JPRB,&
1523&1.3222E+00_JPRB,1.4674E+00_JPRB,3.5292E+00_JPRB/)
1524KAO( :, 1, 9, 8) = (/&
1525&2.0914E-02_JPRB,2.4921E-01_JPRB,4.3781E-01_JPRB,6.1146E-01_JPRB,7.8268E-01_JPRB,9.5318E-01_JPRB,&
1526&1.1204E+00_JPRB,1.2813E+00_JPRB,3.9890E+00_JPRB/)
1527KAO( :, 2, 9, 8) = (/&
1528&1.9500E-02_JPRB,2.6300E-01_JPRB,4.5963E-01_JPRB,6.3281E-01_JPRB,7.9816E-01_JPRB,9.6251E-01_JPRB,&
1529&1.1241E+00_JPRB,1.2781E+00_JPRB,3.7129E+00_JPRB/)
1530KAO( :, 3, 9, 8) = (/&
1531&1.8305E-02_JPRB,2.7783E-01_JPRB,4.8302E-01_JPRB,6.5998E-01_JPRB,8.2260E-01_JPRB,9.8070E-01_JPRB,&
1532&1.1371E+00_JPRB,1.2855E+00_JPRB,3.4817E+00_JPRB/)
1533KAO( :, 4, 9, 8) = (/&
1534&1.7310E-02_JPRB,2.9315E-01_JPRB,5.0848E-01_JPRB,6.9210E-01_JPRB,8.5443E-01_JPRB,1.0078E+00_JPRB,&
1535&1.1591E+00_JPRB,1.3024E+00_JPRB,3.2848E+00_JPRB/)
1536KAO( :, 5, 9, 8) = (/&
1537&1.6510E-02_JPRB,3.0981E-01_JPRB,5.3550E-01_JPRB,7.2742E-01_JPRB,8.9223E-01_JPRB,1.0429E+00_JPRB,&
1538&1.1888E+00_JPRB,1.3273E+00_JPRB,3.1158E+00_JPRB/)
1539KAO( :, 1,10, 8) = (/&
1540&1.7793E-02_JPRB,2.1412E-01_JPRB,3.7675E-01_JPRB,5.3142E-01_JPRB,6.8591E-01_JPRB,8.3908E-01_JPRB,&
1541&9.8911E-01_JPRB,1.1340E+00_JPRB,3.5109E+00_JPRB/)
1542KAO( :, 2,10, 8) = (/&
1543&1.6546E-02_JPRB,2.2684E-01_JPRB,3.9518E-01_JPRB,5.4826E-01_JPRB,6.9777E-01_JPRB,8.4666E-01_JPRB,&
1544&9.9261E-01_JPRB,1.1322E+00_JPRB,3.2650E+00_JPRB/)
1545KAO( :, 3,10, 8) = (/&
1546&1.5496E-02_JPRB,2.4055E-01_JPRB,4.1757E-01_JPRB,5.7218E-01_JPRB,7.1874E-01_JPRB,8.6407E-01_JPRB,&
1547&1.0067E+00_JPRB,1.1422E+00_JPRB,3.0604E+00_JPRB/)
1548KAO( :, 4,10, 8) = (/&
1549&1.4625E-02_JPRB,2.5576E-01_JPRB,4.4224E-01_JPRB,6.0209E-01_JPRB,7.4840E-01_JPRB,8.9005E-01_JPRB,&
1550&1.0298E+00_JPRB,1.1620E+00_JPRB,2.8873E+00_JPRB/)
1551KAO( :, 5,10, 8) = (/&
1552&1.3927E-02_JPRB,2.7189E-01_JPRB,4.6913E-01_JPRB,6.3661E-01_JPRB,7.8430E-01_JPRB,9.2340E-01_JPRB,&
1553&1.0602E+00_JPRB,1.1893E+00_JPRB,2.7412E+00_JPRB/)
1554KAO( :, 1,11, 8) = (/&
1555&1.4634E-02_JPRB,1.8646E-01_JPRB,3.2761E-01_JPRB,4.6309E-01_JPRB,5.9849E-01_JPRB,7.3245E-01_JPRB,&
1556&8.6367E-01_JPRB,9.9041E-01_JPRB,2.9771E+00_JPRB/)
1557KAO( :, 2,11, 8) = (/&
1558&1.3624E-02_JPRB,1.9847E-01_JPRB,3.4526E-01_JPRB,4.8008E-01_JPRB,6.1254E-01_JPRB,7.4424E-01_JPRB,&
1559&8.7321E-01_JPRB,9.9642E-01_JPRB,2.7768E+00_JPRB/)
1560KAO( :, 3,11, 8) = (/&
1561&1.2781E-02_JPRB,2.1218E-01_JPRB,3.6739E-01_JPRB,5.0421E-01_JPRB,6.3507E-01_JPRB,7.6517E-01_JPRB,&
1562&8.9263E-01_JPRB,1.0135E+00_JPRB,2.6101E+00_JPRB/)
1563KAO( :, 4,11, 8) = (/&
1564&1.2094E-02_JPRB,2.2714E-01_JPRB,3.9240E-01_JPRB,5.3424E-01_JPRB,6.6566E-01_JPRB,7.9378E-01_JPRB,&
1565&9.1970E-01_JPRB,1.0385E+00_JPRB,2.4710E+00_JPRB/)
1566KAO( :, 5,11, 8) = (/&
1567&1.1565E-02_JPRB,2.4340E-01_JPRB,4.1903E-01_JPRB,5.6803E-01_JPRB,7.0132E-01_JPRB,8.2803E-01_JPRB,&
1568&9.5252E-01_JPRB,1.0696E+00_JPRB,2.3570E+00_JPRB/)
1569KAO( :, 1,12, 8) = (/&
1570&1.2066E-02_JPRB,1.6101E-01_JPRB,2.8340E-01_JPRB,4.0165E-01_JPRB,5.1974E-01_JPRB,6.3658E-01_JPRB,&
1571&7.5093E-01_JPRB,8.6137E-01_JPRB,2.5621E+00_JPRB/)
1572KAO( :, 2,12, 8) = (/&
1573&1.1251E-02_JPRB,1.7279E-01_JPRB,3.0073E-01_JPRB,4.1913E-01_JPRB,5.3610E-01_JPRB,6.5212E-01_JPRB,&
1574&7.6558E-01_JPRB,8.7414E-01_JPRB,2.3949E+00_JPRB/)
1575KAO( :, 3,12, 8) = (/&
1576&1.0577E-02_JPRB,1.8625E-01_JPRB,3.2218E-01_JPRB,4.4327E-01_JPRB,5.5974E-01_JPRB,6.7543E-01_JPRB,&
1577&7.8860E-01_JPRB,8.9593E-01_JPRB,2.2565E+00_JPRB/)
1578KAO( :, 4,12, 8) = (/&
1579&1.0040E-02_JPRB,2.0090E-01_JPRB,3.4668E-01_JPRB,4.7237E-01_JPRB,5.8984E-01_JPRB,7.0511E-01_JPRB,&
1580&8.1812E-01_JPRB,9.2463E-01_JPRB,2.1449E+00_JPRB/)
1581KAO( :, 5,12, 8) = (/&
1582&9.6497E-03_JPRB,2.1689E-01_JPRB,3.7279E-01_JPRB,5.0486E-01_JPRB,6.2430E-01_JPRB,7.3876E-01_JPRB,&
1583&8.5101E-01_JPRB,9.5619E-01_JPRB,2.0655E+00_JPRB/)
1584KAO( :, 1,13, 8) = (/&
1585&9.9585E-03_JPRB,1.3861E-01_JPRB,2.4453E-01_JPRB,3.4735E-01_JPRB,4.5003E-01_JPRB,5.5145E-01_JPRB,&
1586&6.5075E-01_JPRB,7.4674E-01_JPRB,2.2898E+00_JPRB/)
1587KAO( :, 2,13, 8) = (/&
1588&9.2992E-03_JPRB,1.5005E-01_JPRB,2.6138E-01_JPRB,3.6503E-01_JPRB,4.6776E-01_JPRB,5.6948E-01_JPRB,&
1589&6.6893E-01_JPRB,7.6408E-01_JPRB,2.1410E+00_JPRB/)
1590KAO( :, 3,13, 8) = (/&
1591&8.7626E-03_JPRB,1.6301E-01_JPRB,2.8187E-01_JPRB,3.8870E-01_JPRB,4.9199E-01_JPRB,5.9459E-01_JPRB,&
1592&6.9480E-01_JPRB,7.8975E-01_JPRB,2.0213E+00_JPRB/)
1593KAO( :, 4,13, 8) = (/&
1594&8.3523E-03_JPRB,1.7715E-01_JPRB,3.0539E-01_JPRB,4.1632E-01_JPRB,5.2068E-01_JPRB,6.2370E-01_JPRB,&
1595&7.2425E-01_JPRB,8.1879E-01_JPRB,1.9340E+00_JPRB/)
1596KAO( :, 5,13, 8) = (/&
1597&8.0561E-03_JPRB,1.9260E-01_JPRB,3.3012E-01_JPRB,4.4598E-01_JPRB,5.5239E-01_JPRB,6.5539E-01_JPRB,&
1598&7.5612E-01_JPRB,8.5015E-01_JPRB,1.8746E+00_JPRB/)
1599
1600
1601!     -----------------------------------------------------------------
1602RETURN
1603END SUBROUTINE RRTM_KGB15_A1
Note: See TracBrowser for help on using the repository browser.