/[MITgcm]/MITgcm/pkg/fizhi/h2o-tran3.h
ViewVC logotype

Contents of /MITgcm/pkg/fizhi/h2o-tran3.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph

Revision 1.1 - (show annotations) (download)
Tue Jul 13 21:25:53 2004 UTC (19 years, 9 months ago) by molod
Branch: MAIN
CVS Tags: checkpoint58l_post, checkpoint57t_post, checkpoint57o_post, checkpoint58e_post, checkpoint57v_post, checkpoint58u_post, checkpoint58w_post, checkpoint57m_post, checkpoint55c_post, checkpoint54e_post, checkpoint57s_post, checkpoint57k_post, checkpoint55d_pre, checkpoint57d_post, checkpoint57g_post, checkpoint57b_post, checkpoint57c_pre, checkpoint58r_post, checkpoint55j_post, checkpoint56b_post, checkpoint57i_post, checkpoint57y_post, checkpoint57e_post, checkpoint55h_post, checkpoint58n_post, checkpoint58x_post, checkpoint57g_pre, checkpoint55b_post, checkpoint58t_post, checkpoint58h_post, checkpoint54d_post, checkpoint56c_post, checkpoint57y_pre, checkpoint55, checkpoint57f_pre, checkpoint57a_post, checkpoint58q_post, checkpoint54f_post, checkpoint55g_post, checkpoint58j_post, checkpoint59e, checkpoint59d, checkpoint59g, checkpoint59f, checkpoint59a, checkpoint55f_post, checkpoint59c, checkpoint59b, checkpoint59h, checkpoint57r_post, checkpoint59, checkpoint58, checkpoint57a_pre, checkpoint55i_post, checkpoint57, checkpoint56, eckpoint57e_pre, checkpoint57h_done, checkpoint58f_post, checkpoint57x_post, checkpoint57n_post, checkpoint58d_post, checkpoint58c_post, checkpoint57w_post, checkpoint57p_post, checkpint57u_post, checkpoint57f_post, checkpoint58a_post, checkpoint58i_post, checkpoint57q_post, checkpoint58g_post, checkpoint58o_post, checkpoint57z_post, checkpoint57c_post, checkpoint58y_post, checkpoint55e_post, checkpoint58k_post, checkpoint58v_post, checkpoint55a_post, checkpoint54c_post, checkpoint58s_post, checkpoint58p_post, checkpoint57j_post, checkpoint58b_post, checkpoint57h_pre, checkpoint58m_post, checkpoint57l_post, checkpoint57h_post, checkpoint56a_post, checkpoint55d_post
File MIME type: text/plain 
Rename transfer coefficient data files to .h files
1 data ((h11(ip,iw,1),iw=1,31),ip= 1, 1)/
2 & 0.6160E-04, 0.9815E-04, 0.1474E-03, 0.2092E-03, 0.2823E-03,
3 & 0.3662E-03, 0.4615E-03, 0.5710E-03, 0.6998E-03, 0.8554E-03,
4 & 0.1049E-02, 0.1295E-02, 0.1612E-02, 0.2021E-02, 0.2548E-02,
5 & 0.3230E-02, 0.4123E-02, 0.5306E-02, 0.6887E-02, 0.9021E-02,
6 & 0.1193E-01, 0.1590E-01, 0.2135E-01, 0.2885E-01, 0.3914E-01,
7 & 0.5317E-01, 0.7223E-01, 0.9800E-01, 0.1326E+00, 0.1783E+00,
8 & 0.2373E+00/
9 data ((h12(ip,iw,1),iw=1,31),ip= 1, 1)/
10 & -0.2021E-06, -0.3628E-06, -0.5891E-06, -0.8735E-06, -0.1204E-05,
11 & -0.1579E-05, -0.2002E-05, -0.2494E-05, -0.3093E-05, -0.3852E-05,
12 & -0.4835E-05, -0.6082E-05, -0.7591E-05, -0.9332E-05, -0.1128E-04,
13 & -0.1347E-04, -0.1596E-04, -0.1890E-04, -0.2241E-04, -0.2672E-04,
14 & -0.3208E-04, -0.3884E-04, -0.4747E-04, -0.5854E-04, -0.7272E-04,
15 & -0.9092E-04, -0.1146E-03, -0.1458E-03, -0.1877E-03, -0.2435E-03,
16 & -0.3159E-03/
17 data ((h13(ip,iw,1),iw=1,31),ip= 1, 1)/
18 & 0.5907E-09, 0.8541E-09, 0.1095E-08, 0.1272E-08, 0.1297E-08,
19 & 0.1105E-08, 0.6788E-09, -0.5585E-10, -0.1147E-08, -0.2746E-08,
20 & -0.5001E-08, -0.7715E-08, -0.1037E-07, -0.1227E-07, -0.1287E-07,
21 & -0.1175E-07, -0.8517E-08, -0.2920E-08, 0.4786E-08, 0.1407E-07,
22 & 0.2476E-07, 0.3781E-07, 0.5633E-07, 0.8578E-07, 0.1322E-06,
23 & 0.2013E-06, 0.3006E-06, 0.4409E-06, 0.6343E-06, 0.8896E-06,
24 & 0.1216E-05/
25 data ((h11(ip,iw,1),iw=1,31),ip= 2, 2)/
26 & 0.6166E-04, 0.9828E-04, 0.1477E-03, 0.2097E-03, 0.2833E-03,
27 & 0.3680E-03, 0.4648E-03, 0.5768E-03, 0.7101E-03, 0.8736E-03,
28 & 0.1080E-02, 0.1348E-02, 0.1700E-02, 0.2162E-02, 0.2767E-02,
29 & 0.3563E-02, 0.4621E-02, 0.6039E-02, 0.7953E-02, 0.1056E-01,
30 & 0.1412E-01, 0.1901E-01, 0.2574E-01, 0.3498E-01, 0.4763E-01,
31 & 0.6484E-01, 0.8815E-01, 0.1196E+00, 0.1614E+00, 0.2157E+00,
32 & 0.2844E+00/
33 data ((h12(ip,iw,1),iw=1,31),ip= 2, 2)/
34 & -0.2017E-06, -0.3620E-06, -0.5878E-06, -0.8713E-06, -0.1201E-05,
35 & -0.1572E-05, -0.1991E-05, -0.2476E-05, -0.3063E-05, -0.3808E-05,
36 & -0.4776E-05, -0.6011E-05, -0.7516E-05, -0.9272E-05, -0.1127E-04,
37 & -0.1355E-04, -0.1620E-04, -0.1936E-04, -0.2321E-04, -0.2797E-04,
38 & -0.3399E-04, -0.4171E-04, -0.5172E-04, -0.6471E-04, -0.8150E-04,
39 & -0.1034E-03, -0.1321E-03, -0.1705E-03, -0.2217E-03, -0.2889E-03,
40 & -0.3726E-03/
41 data ((h13(ip,iw,1),iw=1,31),ip= 2, 2)/
42 & 0.5894E-09, 0.8519E-09, 0.1092E-08, 0.1267E-08, 0.1289E-08,
43 & 0.1093E-08, 0.6601E-09, -0.7831E-10, -0.1167E-08, -0.2732E-08,
44 & -0.4864E-08, -0.7334E-08, -0.9581E-08, -0.1097E-07, -0.1094E-07,
45 & -0.8999E-08, -0.4669E-08, 0.2391E-08, 0.1215E-07, 0.2424E-07,
46 & 0.3877E-07, 0.5711E-07, 0.8295E-07, 0.1218E-06, 0.1793E-06,
47 & 0.2621E-06, 0.3812E-06, 0.5508E-06, 0.7824E-06, 0.1085E-05,
48 & 0.1462E-05/
49 data ((h11(ip,iw,1),iw=1,31),ip= 3, 3)/
50 & 0.6175E-04, 0.9849E-04, 0.1481E-03, 0.2106E-03, 0.2849E-03,
51 & 0.3708E-03, 0.4698E-03, 0.5857E-03, 0.7257E-03, 0.9006E-03,
52 & 0.1126E-02, 0.1425E-02, 0.1823E-02, 0.2353E-02, 0.3059E-02,
53 & 0.4002E-02, 0.5270E-02, 0.6984E-02, 0.9316E-02, 0.1251E-01,
54 & 0.1689E-01, 0.2292E-01, 0.3123E-01, 0.4262E-01, 0.5814E-01,
55 & 0.7921E-01, 0.1077E+00, 0.1458E+00, 0.1957E+00, 0.2595E+00,
56 & 0.3380E+00/
57 data ((h12(ip,iw,1),iw=1,31),ip= 3, 3)/
58 & -0.2011E-06, -0.3609E-06, -0.5859E-06, -0.8680E-06, -0.1195E-05,
59 & -0.1563E-05, -0.1975E-05, -0.2450E-05, -0.3024E-05, -0.3755E-05,
60 & -0.4711E-05, -0.5941E-05, -0.7455E-05, -0.9248E-05, -0.1132E-04,
61 & -0.1373E-04, -0.1659E-04, -0.2004E-04, -0.2431E-04, -0.2966E-04,
62 & -0.3653E-04, -0.4549E-04, -0.5724E-04, -0.7259E-04, -0.9265E-04,
63 & -0.1191E-03, -0.1543E-03, -0.2013E-03, -0.2633E-03, -0.3421E-03,
64 & -0.4350E-03/
65 data ((h13(ip,iw,1),iw=1,31),ip= 3, 3)/
66 & 0.5872E-09, 0.8484E-09, 0.1087E-08, 0.1259E-08, 0.1279E-08,
67 & 0.1077E-08, 0.6413E-09, -0.9334E-10, -0.1161E-08, -0.2644E-08,
68 & -0.4588E-08, -0.6709E-08, -0.8474E-08, -0.9263E-08, -0.8489E-08,
69 & -0.5553E-08, 0.1203E-09, 0.9035E-08, 0.2135E-07, 0.3689E-07,
70 & 0.5610E-07, 0.8097E-07, 0.1155E-06, 0.1649E-06, 0.2350E-06,
71 & 0.3353E-06, 0.4806E-06, 0.6858E-06, 0.9617E-06, 0.1315E-05,
72 & 0.1741E-05/
73 data ((h11(ip,iw,1),iw=1,31),ip= 4, 4)/
74 & 0.6189E-04, 0.9882E-04, 0.1488E-03, 0.2119E-03, 0.2873E-03,
75 & 0.3752E-03, 0.4776E-03, 0.5993E-03, 0.7490E-03, 0.9403E-03,
76 & 0.1192E-02, 0.1531E-02, 0.1990E-02, 0.2610E-02, 0.3446E-02,
77 & 0.4576E-02, 0.6109E-02, 0.8196E-02, 0.1105E-01, 0.1498E-01,
78 & 0.2039E-01, 0.2785E-01, 0.3809E-01, 0.5209E-01, 0.7112E-01,
79 & 0.9688E-01, 0.1315E+00, 0.1773E+00, 0.2363E+00, 0.3100E+00,
80 & 0.3976E+00/
81 data ((h12(ip,iw,1),iw=1,31),ip= 4, 4)/
82 & -0.2001E-06, -0.3592E-06, -0.5829E-06, -0.8631E-06, -0.1187E-05,
83 & -0.1549E-05, -0.1953E-05, -0.2415E-05, -0.2975E-05, -0.3694E-05,
84 & -0.4645E-05, -0.5882E-05, -0.7425E-05, -0.9279E-05, -0.1147E-04,
85 & -0.1406E-04, -0.1717E-04, -0.2100E-04, -0.2580E-04, -0.3191E-04,
86 & -0.3989E-04, -0.5042E-04, -0.6432E-04, -0.8261E-04, -0.1068E-03,
87 & -0.1389E-03, -0.1820E-03, -0.2391E-03, -0.3127E-03, -0.4021E-03,
88 & -0.5002E-03/
89 data ((h13(ip,iw,1),iw=1,31),ip= 4, 4)/
90 & 0.5838E-09, 0.8426E-09, 0.1081E-08, 0.1249E-08, 0.1267E-08,
91 & 0.1062E-08, 0.6313E-09, -0.8241E-10, -0.1094E-08, -0.2436E-08,
92 & -0.4100E-08, -0.5786E-08, -0.6992E-08, -0.7083E-08, -0.5405E-08,
93 & -0.1259E-08, 0.6099E-08, 0.1732E-07, 0.3276E-07, 0.5256E-07,
94 & 0.7756E-07, 0.1103E-06, 0.1547E-06, 0.2159E-06, 0.3016E-06,
95 & 0.4251E-06, 0.6033E-06, 0.8499E-06, 0.1175E-05, 0.1579E-05,
96 & 0.2044E-05/
97 data ((h11(ip,iw,1),iw=1,31),ip= 5, 5)/
98 & 0.6211E-04, 0.9932E-04, 0.1499E-03, 0.2140E-03, 0.2911E-03,
99 & 0.3820E-03, 0.4895E-03, 0.6196E-03, 0.7834E-03, 0.9973E-03,
100 & 0.1285E-02, 0.1678E-02, 0.2216E-02, 0.2951E-02, 0.3953E-02,
101 & 0.5319E-02, 0.7186E-02, 0.9743E-02, 0.1326E-01, 0.1811E-01,
102 & 0.2479E-01, 0.3400E-01, 0.4662E-01, 0.6379E-01, 0.8708E-01,
103 & 0.1185E+00, 0.1603E+00, 0.2147E+00, 0.2835E+00, 0.3667E+00,
104 & 0.4620E+00/
105 data ((h12(ip,iw,1),iw=1,31),ip= 5, 5)/
106 & -0.1987E-06, -0.3565E-06, -0.5784E-06, -0.8557E-06, -0.1175E-05,
107 & -0.1530E-05, -0.1923E-05, -0.2372E-05, -0.2919E-05, -0.3631E-05,
108 & -0.4587E-05, -0.5848E-05, -0.7442E-05, -0.9391E-05, -0.1173E-04,
109 & -0.1455E-04, -0.1801E-04, -0.2232E-04, -0.2779E-04, -0.3489E-04,
110 & -0.4428E-04, -0.5678E-04, -0.7333E-04, -0.9530E-04, -0.1246E-03,
111 & -0.1639E-03, -0.2164E-03, -0.2848E-03, -0.3697E-03, -0.4665E-03,
112 & -0.5646E-03/
113 data ((h13(ip,iw,1),iw=1,31),ip= 5, 5)/
114 & 0.5785E-09, 0.8338E-09, 0.1071E-08, 0.1239E-08, 0.1256E-08,
115 & 0.1057E-08, 0.6480E-09, -0.1793E-10, -0.9278E-09, -0.2051E-08,
116 & -0.3337E-08, -0.4514E-08, -0.5067E-08, -0.4328E-08, -0.1545E-08,
117 & 0.4100E-08, 0.1354E-07, 0.2762E-07, 0.4690E-07, 0.7190E-07,
118 & 0.1040E-06, 0.1459E-06, 0.2014E-06, 0.2764E-06, 0.3824E-06,
119 & 0.5359E-06, 0.7532E-06, 0.1047E-05, 0.1424E-05, 0.1873E-05,
120 & 0.2356E-05/
121 data ((h11(ip,iw,1),iw=1,31),ip= 6, 6)/
122 & 0.6246E-04, 0.1001E-03, 0.1515E-03, 0.2171E-03, 0.2970E-03,
123 & 0.3924E-03, 0.5072E-03, 0.6495E-03, 0.8329E-03, 0.1078E-02,
124 & 0.1413E-02, 0.1876E-02, 0.2516E-02, 0.3399E-02, 0.4612E-02,
125 & 0.6276E-02, 0.8562E-02, 0.1171E-01, 0.1605E-01, 0.2205E-01,
126 & 0.3032E-01, 0.4167E-01, 0.5717E-01, 0.7821E-01, 0.1067E+00,
127 & 0.1447E+00, 0.1948E+00, 0.2586E+00, 0.3372E+00, 0.4290E+00,
128 & 0.5295E+00/
129 data ((h12(ip,iw,1),iw=1,31),ip= 6, 6)/
130 & -0.1964E-06, -0.3526E-06, -0.5717E-06, -0.8451E-06, -0.1158E-05,
131 & -0.1504E-05, -0.1886E-05, -0.2322E-05, -0.2861E-05, -0.3576E-05,
132 & -0.4552E-05, -0.5856E-05, -0.7529E-05, -0.9609E-05, -0.1216E-04,
133 & -0.1528E-04, -0.1916E-04, -0.2408E-04, -0.3043E-04, -0.3880E-04,
134 & -0.4997E-04, -0.6488E-04, -0.8474E-04, -0.1113E-03, -0.1471E-03,
135 & -0.1950E-03, -0.2583E-03, -0.3384E-03, -0.4326E-03, -0.5319E-03,
136 & -0.6244E-03/
137 data ((h13(ip,iw,1),iw=1,31),ip= 6, 6)/
138 & 0.5713E-09, 0.8263E-09, 0.1060E-08, 0.1226E-08, 0.1252E-08,
139 & 0.1076E-08, 0.7149E-09, 0.1379E-09, -0.6043E-09, -0.1417E-08,
140 & -0.2241E-08, -0.2830E-08, -0.2627E-08, -0.8950E-09, 0.3231E-08,
141 & 0.1075E-07, 0.2278E-07, 0.4037E-07, 0.6439E-07, 0.9576E-07,
142 & 0.1363E-06, 0.1886E-06, 0.2567E-06, 0.3494E-06, 0.4821E-06,
143 & 0.6719E-06, 0.9343E-06, 0.1280E-05, 0.1705E-05, 0.2184E-05,
144 & 0.2651E-05/
145 data ((h11(ip,iw,1),iw=1,31),ip= 7, 7)/
146 & 0.6299E-04, 0.1013E-03, 0.1541E-03, 0.2220E-03, 0.3058E-03,
147 & 0.4078E-03, 0.5334E-03, 0.6928E-03, 0.9032E-03, 0.1190E-02,
148 & 0.1587E-02, 0.2140E-02, 0.2912E-02, 0.3982E-02, 0.5460E-02,
149 & 0.7500E-02, 0.1031E-01, 0.1420E-01, 0.1958E-01, 0.2700E-01,
150 & 0.3721E-01, 0.5118E-01, 0.7019E-01, 0.9593E-01, 0.1305E+00,
151 & 0.1763E+00, 0.2354E+00, 0.3091E+00, 0.3969E+00, 0.4952E+00,
152 & 0.5978E+00/
153 data ((h12(ip,iw,1),iw=1,31),ip= 7, 7)/
154 & -0.1932E-06, -0.3467E-06, -0.5623E-06, -0.8306E-06, -0.1136E-05,
155 & -0.1472E-05, -0.1842E-05, -0.2269E-05, -0.2807E-05, -0.3539E-05,
156 & -0.4553E-05, -0.5925E-05, -0.7710E-05, -0.9968E-05, -0.1278E-04,
157 & -0.1629E-04, -0.2073E-04, -0.2644E-04, -0.3392E-04, -0.4390E-04,
158 & -0.5727E-04, -0.7516E-04, -0.9916E-04, -0.1315E-03, -0.1752E-03,
159 & -0.2333E-03, -0.3082E-03, -0.3988E-03, -0.4982E-03, -0.5947E-03,
160 & -0.6764E-03/
161 data ((h13(ip,iw,1),iw=1,31),ip= 7, 7)/
162 & 0.5612E-09, 0.8116E-09, 0.1048E-08, 0.1222E-08, 0.1270E-08,
163 & 0.1141E-08, 0.8732E-09, 0.4336E-09, -0.6548E-10, -0.4774E-09,
164 & -0.7556E-09, -0.6577E-09, 0.4377E-09, 0.3359E-08, 0.9159E-08,
165 & 0.1901E-07, 0.3422E-07, 0.5616E-07, 0.8598E-07, 0.1251E-06,
166 & 0.1752E-06, 0.2392E-06, 0.3228E-06, 0.4389E-06, 0.6049E-06,
167 & 0.8370E-06, 0.1150E-05, 0.1547E-05, 0.2012E-05, 0.2493E-05,
168 & 0.2913E-05/
169 data ((h11(ip,iw,1),iw=1,31),ip= 8, 8)/
170 & 0.6378E-04, 0.1032E-03, 0.1579E-03, 0.2293E-03, 0.3190E-03,
171 & 0.4305E-03, 0.5712E-03, 0.7541E-03, 0.1001E-02, 0.1342E-02,
172 & 0.1819E-02, 0.2489E-02, 0.3427E-02, 0.4734E-02, 0.6548E-02,
173 & 0.9059E-02, 0.1254E-01, 0.1735E-01, 0.2401E-01, 0.3318E-01,
174 & 0.4577E-01, 0.6292E-01, 0.8620E-01, 0.1176E+00, 0.1594E+00,
175 & 0.2139E+00, 0.2827E+00, 0.3660E+00, 0.4614E+00, 0.5634E+00,
176 & 0.6649E+00/
177 data ((h12(ip,iw,1),iw=1,31),ip= 8, 8)/
178 & -0.1885E-06, -0.3385E-06, -0.5493E-06, -0.8114E-06, -0.1109E-05,
179 & -0.1436E-05, -0.1796E-05, -0.2219E-05, -0.2770E-05, -0.3535E-05,
180 & -0.4609E-05, -0.6077E-05, -0.8016E-05, -0.1051E-04, -0.1367E-04,
181 & -0.1768E-04, -0.2283E-04, -0.2955E-04, -0.3849E-04, -0.5046E-04,
182 & -0.6653E-04, -0.8813E-04, -0.1173E-03, -0.1569E-03, -0.2100E-03,
183 & -0.2794E-03, -0.3656E-03, -0.4637E-03, -0.5629E-03, -0.6512E-03,
184 & -0.7167E-03/
185 data ((h13(ip,iw,1),iw=1,31),ip= 8, 8)/
186 & 0.5477E-09, 0.8000E-09, 0.1039E-08, 0.1234E-08, 0.1331E-08,
187 & 0.1295E-08, 0.1160E-08, 0.9178E-09, 0.7535E-09, 0.8301E-09,
188 & 0.1184E-08, 0.2082E-08, 0.4253E-08, 0.8646E-08, 0.1650E-07,
189 & 0.2920E-07, 0.4834E-07, 0.7564E-07, 0.1125E-06, 0.1606E-06,
190 & 0.2216E-06, 0.2992E-06, 0.4031E-06, 0.5493E-06, 0.7549E-06,
191 & 0.1035E-05, 0.1400E-05, 0.1843E-05, 0.2327E-05, 0.2774E-05,
192 & 0.3143E-05/
193 data ((h11(ip,iw,1),iw=1,31),ip= 9, 9)/
194 & 0.6495E-04, 0.1059E-03, 0.1635E-03, 0.2400E-03, 0.3381E-03,
195 & 0.4631E-03, 0.6246E-03, 0.8394E-03, 0.1134E-02, 0.1546E-02,
196 & 0.2126E-02, 0.2944E-02, 0.4093E-02, 0.5699E-02, 0.7934E-02,
197 & 0.1104E-01, 0.1535E-01, 0.2131E-01, 0.2956E-01, 0.4089E-01,
198 & 0.5636E-01, 0.7739E-01, 0.1058E+00, 0.1439E+00, 0.1939E+00,
199 & 0.2578E+00, 0.3364E+00, 0.4283E+00, 0.5290E+00, 0.6314E+00,
200 & 0.7292E+00/
201 data ((h12(ip,iw,1),iw=1,31),ip= 9, 9)/
202 & -0.1822E-06, -0.3274E-06, -0.5325E-06, -0.7881E-06, -0.1079E-05,
203 & -0.1398E-05, -0.1754E-05, -0.2184E-05, -0.2763E-05, -0.3581E-05,
204 & -0.4739E-05, -0.6341E-05, -0.8484E-05, -0.1128E-04, -0.1490E-04,
205 & -0.1955E-04, -0.2561E-04, -0.3364E-04, -0.4438E-04, -0.5881E-04,
206 & -0.7822E-04, -0.1045E-03, -0.1401E-03, -0.1884E-03, -0.2523E-03,
207 & -0.3335E-03, -0.4289E-03, -0.5296E-03, -0.6231E-03, -0.6980E-03,
208 & -0.7406E-03/
209 data ((h13(ip,iw,1),iw=1,31),ip= 9, 9)/
210 & 0.5334E-09, 0.7859E-09, 0.1043E-08, 0.1279E-08, 0.1460E-08,
211 & 0.1560E-08, 0.1618E-08, 0.1657E-08, 0.1912E-08, 0.2569E-08,
212 & 0.3654E-08, 0.5509E-08, 0.8964E-08, 0.1518E-07, 0.2560E-07,
213 & 0.4178E-07, 0.6574E-07, 0.9958E-07, 0.1449E-06, 0.2031E-06,
214 & 0.2766E-06, 0.3718E-06, 0.5022E-06, 0.6849E-06, 0.9360E-06,
215 & 0.1268E-05, 0.1683E-05, 0.2157E-05, 0.2625E-05, 0.3020E-05,
216 & 0.3364E-05/
217 data ((h11(ip,iw,1),iw=1,31),ip=10,10)/
218 & 0.6661E-04, 0.1098E-03, 0.1716E-03, 0.2554E-03, 0.3653E-03,
219 & 0.5088E-03, 0.6986E-03, 0.9557E-03, 0.1313E-02, 0.1816E-02,
220 & 0.2527E-02, 0.3532E-02, 0.4947E-02, 0.6929E-02, 0.9694E-02,
221 & 0.1354E-01, 0.1888E-01, 0.2628E-01, 0.3647E-01, 0.5043E-01,
222 & 0.6941E-01, 0.9514E-01, 0.1297E+00, 0.1755E+00, 0.2347E+00,
223 & 0.3084E+00, 0.3962E+00, 0.4947E+00, 0.5974E+00, 0.6973E+00,
224 & 0.7898E+00/
225 data ((h12(ip,iw,1),iw=1,31),ip=10,10)/
226 & -0.1742E-06, -0.3134E-06, -0.5121E-06, -0.7619E-06, -0.1048E-05,
227 & -0.1364E-05, -0.1725E-05, -0.2177E-05, -0.2801E-05, -0.3694E-05,
228 & -0.4969E-05, -0.6748E-05, -0.9161E-05, -0.1236E-04, -0.1655E-04,
229 & -0.2203E-04, -0.2927E-04, -0.3894E-04, -0.5192E-04, -0.6936E-04,
230 & -0.9294E-04, -0.1250E-03, -0.1686E-03, -0.2271E-03, -0.3027E-03,
231 & -0.3944E-03, -0.4951E-03, -0.5928E-03, -0.6755E-03, -0.7309E-03,
232 & -0.7417E-03/
233 data ((h13(ip,iw,1),iw=1,31),ip=10,10)/
234 & 0.5179E-09, 0.7789E-09, 0.1071E-08, 0.1382E-08, 0.1690E-08,
235 & 0.1979E-08, 0.2297E-08, 0.2704E-08, 0.3466E-08, 0.4794E-08,
236 & 0.6746E-08, 0.9739E-08, 0.1481E-07, 0.2331E-07, 0.3679E-07,
237 & 0.5726E-07, 0.8716E-07, 0.1289E-06, 0.1837E-06, 0.2534E-06,
238 & 0.3424E-06, 0.4609E-06, 0.6245E-06, 0.8495E-06, 0.1151E-05,
239 & 0.1536E-05, 0.1991E-05, 0.2468E-05, 0.2891E-05, 0.3245E-05,
240 & 0.3580E-05/
241 data ((h11(ip,iw,1),iw=1,31),ip=11,11)/
242 & 0.6888E-04, 0.1151E-03, 0.1828E-03, 0.2766E-03, 0.4028E-03,
243 & 0.5713E-03, 0.7987E-03, 0.1111E-02, 0.1548E-02, 0.2167E-02,
244 & 0.3044E-02, 0.4285E-02, 0.6035E-02, 0.8490E-02, 0.1192E-01,
245 & 0.1670E-01, 0.2333E-01, 0.3249E-01, 0.4506E-01, 0.6220E-01,
246 & 0.8546E-01, 0.1168E+00, 0.1587E+00, 0.2131E+00, 0.2820E+00,
247 & 0.3653E+00, 0.4609E+00, 0.5630E+00, 0.6645E+00, 0.7599E+00,
248 & 0.8458E+00/
249 data ((h12(ip,iw,1),iw=1,31),ip=11,11)/
250 & -0.1647E-06, -0.2974E-06, -0.4900E-06, -0.7358E-06, -0.1022E-05,
251 & -0.1344E-05, -0.1721E-05, -0.2212E-05, -0.2901E-05, -0.3896E-05,
252 & -0.5327E-05, -0.7342E-05, -0.1011E-04, -0.1382E-04, -0.1875E-04,
253 & -0.2530E-04, -0.3403E-04, -0.4573E-04, -0.6145E-04, -0.8264E-04,
254 & -0.1114E-03, -0.1507E-03, -0.2039E-03, -0.2737E-03, -0.3607E-03,
255 & -0.4599E-03, -0.5604E-03, -0.6497E-03, -0.7161E-03, -0.7443E-03,
256 & -0.7133E-03/
257 data ((h13(ip,iw,1),iw=1,31),ip=11,11)/
258 & 0.5073E-09, 0.7906E-09, 0.1134E-08, 0.1560E-08, 0.2046E-08,
259 & 0.2589E-08, 0.3254E-08, 0.4107E-08, 0.5481E-08, 0.7602E-08,
260 & 0.1059E-07, 0.1501E-07, 0.2210E-07, 0.3334E-07, 0.5055E-07,
261 & 0.7629E-07, 0.1134E-06, 0.1642E-06, 0.2298E-06, 0.3133E-06,
262 & 0.4225E-06, 0.5709E-06, 0.7739E-06, 0.1047E-05, 0.1401E-05,
263 & 0.1833E-05, 0.2308E-05, 0.2753E-05, 0.3125E-05, 0.3467E-05,
264 & 0.3748E-05/
265 data ((h11(ip,iw,1),iw=1,31),ip=12,12)/
266 & 0.7179E-04, 0.1221E-03, 0.1975E-03, 0.3049E-03, 0.4529E-03,
267 & 0.6547E-03, 0.9312E-03, 0.1315E-02, 0.1855E-02, 0.2620E-02,
268 & 0.3705E-02, 0.5243E-02, 0.7414E-02, 0.1046E-01, 0.1472E-01,
269 & 0.2065E-01, 0.2888E-01, 0.4019E-01, 0.5566E-01, 0.7668E-01,
270 & 0.1051E+00, 0.1432E+00, 0.1932E+00, 0.2571E+00, 0.3358E+00,
271 & 0.4278E+00, 0.5285E+00, 0.6310E+00, 0.7289E+00, 0.8184E+00,
272 & 0.8954E+00/
273 data ((h12(ip,iw,1),iw=1,31),ip=12,12)/
274 & -0.1548E-06, -0.2808E-06, -0.4683E-06, -0.7142E-06, -0.1008E-05,
275 & -0.1347E-05, -0.1758E-05, -0.2306E-05, -0.3083E-05, -0.4214E-05,
276 & -0.5851E-05, -0.8175E-05, -0.1140E-04, -0.1577E-04, -0.2166E-04,
277 & -0.2955E-04, -0.4014E-04, -0.5434E-04, -0.7343E-04, -0.9931E-04,
278 & -0.1346E-03, -0.1826E-03, -0.2467E-03, -0.3283E-03, -0.4246E-03,
279 & -0.5264E-03, -0.6211E-03, -0.6970E-03, -0.7402E-03, -0.7316E-03,
280 & -0.6486E-03/
281 data ((h13(ip,iw,1),iw=1,31),ip=12,12)/
282 & 0.5078E-09, 0.8244E-09, 0.1255E-08, 0.1826E-08, 0.2550E-08,
283 & 0.3438E-08, 0.4532E-08, 0.5949E-08, 0.8041E-08, 0.1110E-07,
284 & 0.1534E-07, 0.2157E-07, 0.3116E-07, 0.4570E-07, 0.6747E-07,
285 & 0.9961E-07, 0.1451E-06, 0.2061E-06, 0.2843E-06, 0.3855E-06,
286 & 0.5213E-06, 0.7060E-06, 0.9544E-06, 0.1280E-05, 0.1684E-05,
287 & 0.2148E-05, 0.2609E-05, 0.3002E-05, 0.3349E-05, 0.3670E-05,
288 & 0.3780E-05/
289 data ((h11(ip,iw,1),iw=1,31),ip=13,13)/
290 & 0.7529E-04, 0.1306E-03, 0.2160E-03, 0.3410E-03, 0.5175E-03,
291 & 0.7626E-03, 0.1103E-02, 0.1577E-02, 0.2246E-02, 0.3196E-02,
292 & 0.4544E-02, 0.6455E-02, 0.9152E-02, 0.1294E-01, 0.1823E-01,
293 & 0.2560E-01, 0.3577E-01, 0.4971E-01, 0.6870E-01, 0.9443E-01,
294 & 0.1290E+00, 0.1748E+00, 0.2340E+00, 0.3078E+00, 0.3956E+00,
295 & 0.4942E+00, 0.5969E+00, 0.6970E+00, 0.7896E+00, 0.8714E+00,
296 & 0.9364E+00/
297 data ((h12(ip,iw,1),iw=1,31),ip=13,13)/
298 & -0.1461E-06, -0.2663E-06, -0.4512E-06, -0.7027E-06, -0.1014E-05,
299 & -0.1387E-05, -0.1851E-05, -0.2478E-05, -0.3373E-05, -0.4682E-05,
300 & -0.6588E-05, -0.9311E-05, -0.1311E-04, -0.1834E-04, -0.2544E-04,
301 & -0.3502E-04, -0.4789E-04, -0.6515E-04, -0.8846E-04, -0.1202E-03,
302 & -0.1635E-03, -0.2217E-03, -0.2975E-03, -0.3897E-03, -0.4913E-03,
303 & -0.5902E-03, -0.6740E-03, -0.7302E-03, -0.7415E-03, -0.6858E-03,
304 & -0.5447E-03/
305 data ((h13(ip,iw,1),iw=1,31),ip=13,13)/
306 & 0.5236E-09, 0.8873E-09, 0.1426E-08, 0.2193E-08, 0.3230E-08,
307 & 0.4555E-08, 0.6200E-08, 0.8298E-08, 0.1126E-07, 0.1544E-07,
308 & 0.2130E-07, 0.2978E-07, 0.4239E-07, 0.6096E-07, 0.8829E-07,
309 & 0.1280E-06, 0.1830E-06, 0.2555E-06, 0.3493E-06, 0.4740E-06,
310 & 0.6431E-06, 0.8701E-06, 0.1169E-05, 0.1547E-05, 0.1992E-05,
311 & 0.2460E-05, 0.2877E-05, 0.3230E-05, 0.3569E-05, 0.3782E-05,
312 & 0.3591E-05/
313 data ((h11(ip,iw,1),iw=1,31),ip=14,14)/
314 & 0.7911E-04, 0.1403E-03, 0.2378E-03, 0.3847E-03, 0.5973E-03,
315 & 0.8978E-03, 0.1319E-02, 0.1909E-02, 0.2741E-02, 0.3923E-02,
316 & 0.5600E-02, 0.7977E-02, 0.1133E-01, 0.1604E-01, 0.2262E-01,
317 & 0.3174E-01, 0.4429E-01, 0.6143E-01, 0.8469E-01, 0.1161E+00,
318 & 0.1579E+00, 0.2124E+00, 0.2813E+00, 0.3647E+00, 0.4603E+00,
319 & 0.5625E+00, 0.6641E+00, 0.7596E+00, 0.8456E+00, 0.9170E+00,
320 & 0.9670E+00/
321 data ((h12(ip,iw,1),iw=1,31),ip=14,14)/
322 & -0.1402E-06, -0.2569E-06, -0.4428E-06, -0.7076E-06, -0.1051E-05,
323 & -0.1478E-05, -0.2019E-05, -0.2752E-05, -0.3802E-05, -0.5343E-05,
324 & -0.7594E-05, -0.1082E-04, -0.1536E-04, -0.2166E-04, -0.3028E-04,
325 & -0.4195E-04, -0.5761E-04, -0.7867E-04, -0.1072E-03, -0.1462E-03,
326 & -0.1990E-03, -0.2687E-03, -0.3559E-03, -0.4558E-03, -0.5572E-03,
327 & -0.6476E-03, -0.7150E-03, -0.7439E-03, -0.7133E-03, -0.6015E-03,
328 & -0.4089E-03/
329 data ((h13(ip,iw,1),iw=1,31),ip=14,14)/
330 & 0.5531E-09, 0.9757E-09, 0.1644E-08, 0.2650E-08, 0.4074E-08,
331 & 0.5957E-08, 0.8314E-08, 0.1128E-07, 0.1528E-07, 0.2087E-07,
332 & 0.2874E-07, 0.4002E-07, 0.5631E-07, 0.7981E-07, 0.1139E-06,
333 & 0.1621E-06, 0.2275E-06, 0.3136E-06, 0.4280E-06, 0.5829E-06,
334 & 0.7917E-06, 0.1067E-05, 0.1419E-05, 0.1844E-05, 0.2310E-05,
335 & 0.2747E-05, 0.3113E-05, 0.3455E-05, 0.3739E-05, 0.3715E-05,
336 & 0.3125E-05/
337 data ((h11(ip,iw,1),iw=1,31),ip=15,15)/
338 & 0.8292E-04, 0.1503E-03, 0.2614E-03, 0.4345E-03, 0.6915E-03,
339 & 0.1061E-02, 0.1584E-02, 0.2320E-02, 0.3359E-02, 0.4831E-02,
340 & 0.6920E-02, 0.9877E-02, 0.1405E-01, 0.1990E-01, 0.2805E-01,
341 & 0.3933E-01, 0.5477E-01, 0.7579E-01, 0.1042E+00, 0.1423E+00,
342 & 0.1924E+00, 0.2564E+00, 0.3351E+00, 0.4271E+00, 0.5280E+00,
343 & 0.6306E+00, 0.7286E+00, 0.8182E+00, 0.8952E+00, 0.9530E+00,
344 & 0.9864E+00/
345 data ((h12(ip,iw,1),iw=1,31),ip=15,15)/
346 & -0.1378E-06, -0.2542E-06, -0.4461E-06, -0.7333E-06, -0.1125E-05,
347 & -0.1630E-05, -0.2281E-05, -0.3159E-05, -0.4410E-05, -0.6246E-05,
348 & -0.8933E-05, -0.1280E-04, -0.1826E-04, -0.2589E-04, -0.3639E-04,
349 & -0.5059E-04, -0.6970E-04, -0.9552E-04, -0.1307E-03, -0.1784E-03,
350 & -0.2422E-03, -0.3237E-03, -0.4203E-03, -0.5227E-03, -0.6184E-03,
351 & -0.6953E-03, -0.7395E-03, -0.7315E-03, -0.6487E-03, -0.4799E-03,
352 & -0.2625E-03/
353 data ((h13(ip,iw,1),iw=1,31),ip=15,15)/
354 & 0.5891E-09, 0.1074E-08, 0.1885E-08, 0.3167E-08, 0.5051E-08,
355 & 0.7631E-08, 0.1092E-07, 0.1500E-07, 0.2032E-07, 0.2769E-07,
356 & 0.3810E-07, 0.5279E-07, 0.7361E-07, 0.1032E-06, 0.1450E-06,
357 & 0.2026E-06, 0.2798E-06, 0.3832E-06, 0.5242E-06, 0.7159E-06,
358 & 0.9706E-06, 0.1299E-05, 0.1701E-05, 0.2159E-05, 0.2612E-05,
359 & 0.2998E-05, 0.3341E-05, 0.3661E-05, 0.3775E-05, 0.3393E-05,
360 & 0.2384E-05/
361 data ((h11(ip,iw,1),iw=1,31),ip=16,16)/
362 & 0.8637E-04, 0.1598E-03, 0.2853E-03, 0.4876E-03, 0.7970E-03,
363 & 0.1251E-02, 0.1901E-02, 0.2820E-02, 0.4118E-02, 0.5955E-02,
364 & 0.8557E-02, 0.1224E-01, 0.1742E-01, 0.2467E-01, 0.3476E-01,
365 & 0.4864E-01, 0.6759E-01, 0.9332E-01, 0.1280E+00, 0.1738E+00,
366 & 0.2330E+00, 0.3069E+00, 0.3949E+00, 0.4935E+00, 0.5964E+00,
367 & 0.6965E+00, 0.7893E+00, 0.8713E+00, 0.9363E+00, 0.9780E+00,
368 & 0.9961E+00/
369 data ((h12(ip,iw,1),iw=1,31),ip=16,16)/
370 & -0.1383E-06, -0.2577E-06, -0.4608E-06, -0.7793E-06, -0.1237E-05,
371 & -0.1850E-05, -0.2652E-05, -0.3728E-05, -0.5244E-05, -0.7451E-05,
372 & -0.1067E-04, -0.1532E-04, -0.2193E-04, -0.3119E-04, -0.4395E-04,
373 & -0.6126E-04, -0.8466E-04, -0.1164E-03, -0.1596E-03, -0.2177E-03,
374 & -0.2933E-03, -0.3855E-03, -0.4874E-03, -0.5870E-03, -0.6718E-03,
375 & -0.7290E-03, -0.7411E-03, -0.6859E-03, -0.5450E-03, -0.3353E-03,
376 & -0.1363E-03/
377 data ((h13(ip,iw,1),iw=1,31),ip=16,16)/
378 & 0.6217E-09, 0.1165E-08, 0.2116E-08, 0.3685E-08, 0.6101E-08,
379 & 0.9523E-08, 0.1400E-07, 0.1959E-07, 0.2668E-07, 0.3629E-07,
380 & 0.4982E-07, 0.6876E-07, 0.9523E-07, 0.1321E-06, 0.1825E-06,
381 & 0.2505E-06, 0.3420E-06, 0.4677E-06, 0.6416E-06, 0.8760E-06,
382 & 0.1183E-05, 0.1565E-05, 0.2010E-05, 0.2472E-05, 0.2882E-05,
383 & 0.3229E-05, 0.3564E-05, 0.3777E-05, 0.3589E-05, 0.2786E-05,
384 & 0.1487E-05/
385 data ((h11(ip,iw,1),iw=1,31),ip=17,17)/
386 & 0.8925E-04, 0.1682E-03, 0.3074E-03, 0.5403E-03, 0.9085E-03,
387 & 0.1463E-02, 0.2268E-02, 0.3416E-02, 0.5040E-02, 0.7333E-02,
388 & 0.1057E-01, 0.1515E-01, 0.2157E-01, 0.3055E-01, 0.4297E-01,
389 & 0.6001E-01, 0.8323E-01, 0.1146E+00, 0.1565E+00, 0.2111E+00,
390 & 0.2801E+00, 0.3636E+00, 0.4594E+00, 0.5618E+00, 0.6636E+00,
391 & 0.7592E+00, 0.8454E+00, 0.9169E+00, 0.9669E+00, 0.9923E+00,
392 & 0.9995E+00/
393 data ((h12(ip,iw,1),iw=1,31),ip=17,17)/
394 & -0.1405E-06, -0.2649E-06, -0.4829E-06, -0.8398E-06, -0.1379E-05,
395 & -0.2132E-05, -0.3138E-05, -0.4487E-05, -0.6353E-05, -0.9026E-05,
396 & -0.1290E-04, -0.1851E-04, -0.2650E-04, -0.3772E-04, -0.5319E-04,
397 & -0.7431E-04, -0.1031E-03, -0.1422E-03, -0.1951E-03, -0.2648E-03,
398 & -0.3519E-03, -0.4518E-03, -0.5537E-03, -0.6449E-03, -0.7133E-03,
399 & -0.7432E-03, -0.7133E-03, -0.6018E-03, -0.4092E-03, -0.1951E-03,
400 & -0.5345E-04/
401 data ((h13(ip,iw,1),iw=1,31),ip=17,17)/
402 & 0.6457E-09, 0.1235E-08, 0.2303E-08, 0.4149E-08, 0.7120E-08,
403 & 0.1152E-07, 0.1749E-07, 0.2508E-07, 0.3462E-07, 0.4718E-07,
404 & 0.6452E-07, 0.8874E-07, 0.1222E-06, 0.1675E-06, 0.2276E-06,
405 & 0.3076E-06, 0.4174E-06, 0.5714E-06, 0.7837E-06, 0.1067E-05,
406 & 0.1428E-05, 0.1859E-05, 0.2327E-05, 0.2760E-05, 0.3122E-05,
407 & 0.3458E-05, 0.3739E-05, 0.3715E-05, 0.3126E-05, 0.1942E-05,
408 & 0.6977E-06/
409 data ((h11(ip,iw,1),iw=1,31),ip=18,18)/
410 & 0.9151E-04, 0.1750E-03, 0.3265E-03, 0.5891E-03, 0.1020E-02,
411 & 0.1688E-02, 0.2679E-02, 0.4109E-02, 0.6138E-02, 0.9002E-02,
412 & 0.1304E-01, 0.1871E-01, 0.2667E-01, 0.3773E-01, 0.5299E-01,
413 & 0.7386E-01, 0.1022E+00, 0.1403E+00, 0.1905E+00, 0.2546E+00,
414 & 0.3335E+00, 0.4258E+00, 0.5269E+00, 0.6297E+00, 0.7280E+00,
415 & 0.8178E+00, 0.8950E+00, 0.9529E+00, 0.9864E+00, 0.9983E+00,
416 & 0.1000E+01/
417 data ((h12(ip,iw,1),iw=1,31),ip=18,18)/
418 & -0.1431E-06, -0.2731E-06, -0.5072E-06, -0.9057E-06, -0.1537E-05,
419 & -0.2460E-05, -0.3733E-05, -0.5449E-05, -0.7786E-05, -0.1106E-04,
420 & -0.1574E-04, -0.2249E-04, -0.3212E-04, -0.4564E-04, -0.6438E-04,
421 & -0.9019E-04, -0.1256E-03, -0.1737E-03, -0.2378E-03, -0.3196E-03,
422 & -0.4163E-03, -0.5191E-03, -0.6154E-03, -0.6931E-03, -0.7384E-03,
423 & -0.7313E-03, -0.6492E-03, -0.4805E-03, -0.2629E-03, -0.8897E-04,
424 & -0.1432E-04/
425 data ((h13(ip,iw,1),iw=1,31),ip=18,18)/
426 & 0.6607E-09, 0.1282E-08, 0.2441E-08, 0.4522E-08, 0.8027E-08,
427 & 0.1348E-07, 0.2122E-07, 0.3139E-07, 0.4435E-07, 0.6095E-07,
428 & 0.8319E-07, 0.1139E-06, 0.1557E-06, 0.2107E-06, 0.2819E-06,
429 & 0.3773E-06, 0.5107E-06, 0.6982E-06, 0.9542E-06, 0.1290E-05,
430 & 0.1703E-05, 0.2170E-05, 0.2628E-05, 0.3013E-05, 0.3352E-05,
431 & 0.3669E-05, 0.3780E-05, 0.3397E-05, 0.2386E-05, 0.1062E-05,
432 & 0.2216E-06/
433 data ((h11(ip,iw,1),iw=1,31),ip=19,19)/
434 & 0.9320E-04, 0.1803E-03, 0.3422E-03, 0.6317E-03, 0.1124E-02,
435 & 0.1915E-02, 0.3121E-02, 0.4890E-02, 0.7421E-02, 0.1100E-01,
436 & 0.1602E-01, 0.2306E-01, 0.3288E-01, 0.4647E-01, 0.6515E-01,
437 & 0.9066E-01, 0.1252E+00, 0.1710E+00, 0.2304E+00, 0.3045E+00,
438 & 0.3928E+00, 0.4918E+00, 0.5951E+00, 0.6956E+00, 0.7887E+00,
439 & 0.8709E+00, 0.9361E+00, 0.9780E+00, 0.9961E+00, 0.9999E+00,
440 & 0.1000E+01/
441 data ((h12(ip,iw,1),iw=1,31),ip=19,19)/
442 & -0.1454E-06, -0.2805E-06, -0.5296E-06, -0.9685E-06, -0.1695E-05,
443 & -0.2812E-05, -0.4412E-05, -0.6606E-05, -0.9573E-05, -0.1363E-04,
444 & -0.1932E-04, -0.2743E-04, -0.3897E-04, -0.5520E-04, -0.7787E-04,
445 & -0.1094E-03, -0.1529E-03, -0.2117E-03, -0.2880E-03, -0.3809E-03,
446 & -0.4834E-03, -0.5836E-03, -0.6692E-03, -0.7275E-03, -0.7408E-03,
447 & -0.6865E-03, -0.5459E-03, -0.3360E-03, -0.1365E-03, -0.2935E-04,
448 & -0.2173E-05/
449 data ((h13(ip,iw,1),iw=1,31),ip=19,19)/
450 & 0.6693E-09, 0.1312E-08, 0.2538E-08, 0.4802E-08, 0.8778E-08,
451 & 0.1528E-07, 0.2501E-07, 0.3836E-07, 0.5578E-07, 0.7806E-07,
452 & 0.1069E-06, 0.1456E-06, 0.1970E-06, 0.2631E-06, 0.3485E-06,
453 & 0.4642E-06, 0.6268E-06, 0.8526E-06, 0.1157E-05, 0.1545E-05,
454 & 0.2002E-05, 0.2478E-05, 0.2897E-05, 0.3245E-05, 0.3578E-05,
455 & 0.3789E-05, 0.3598E-05, 0.2792E-05, 0.1489E-05, 0.4160E-06,
456 & 0.3843E-07/
457 data ((h11(ip,iw,1),iw=1,31),ip=20,20)/
458 & 0.9443E-04, 0.1843E-03, 0.3545E-03, 0.6669E-03, 0.1217E-02,
459 & 0.2133E-02, 0.3577E-02, 0.5742E-02, 0.8880E-02, 0.1333E-01,
460 & 0.1958E-01, 0.2830E-01, 0.4039E-01, 0.5705E-01, 0.7988E-01,
461 & 0.1110E+00, 0.1526E+00, 0.2072E+00, 0.2764E+00, 0.3604E+00,
462 & 0.4567E+00, 0.5597E+00, 0.6620E+00, 0.7581E+00, 0.8447E+00,
463 & 0.9165E+00, 0.9668E+00, 0.9923E+00, 0.9995E+00, 0.1000E+01,
464 & 0.1000E+01/
465 data ((h12(ip,iw,1),iw=1,31),ip=20,20)/
466 & -0.1472E-06, -0.2866E-06, -0.5485E-06, -0.1024E-05, -0.1842E-05,
467 & -0.3160E-05, -0.5136E-05, -0.7922E-05, -0.1171E-04, -0.1682E-04,
468 & -0.2381E-04, -0.3355E-04, -0.4729E-04, -0.6673E-04, -0.9417E-04,
469 & -0.1327E-03, -0.1858E-03, -0.2564E-03, -0.3449E-03, -0.4463E-03,
470 & -0.5495E-03, -0.6420E-03, -0.7116E-03, -0.7427E-03, -0.7139E-03,
471 & -0.6031E-03, -0.4104E-03, -0.1957E-03, -0.5358E-04, -0.6176E-05,
472 & -0.1347E-06/
473 data ((h13(ip,iw,1),iw=1,31),ip=20,20)/
474 & 0.6750E-09, 0.1332E-08, 0.2602E-08, 0.5003E-08, 0.9367E-08,
475 & 0.1684E-07, 0.2863E-07, 0.4566E-07, 0.6865E-07, 0.9861E-07,
476 & 0.1368E-06, 0.1856E-06, 0.2479E-06, 0.3274E-06, 0.4315E-06,
477 & 0.5739E-06, 0.7710E-06, 0.1040E-05, 0.1394E-05, 0.1829E-05,
478 & 0.2309E-05, 0.2759E-05, 0.3131E-05, 0.3472E-05, 0.3755E-05,
479 & 0.3730E-05, 0.3138E-05, 0.1948E-05, 0.6994E-06, 0.1022E-06,
480 & 0.2459E-08/
481 data ((h11(ip,iw,1),iw=1,31),ip=21,21)/
482 & 0.9530E-04, 0.1872E-03, 0.3638E-03, 0.6949E-03, 0.1295E-02,
483 & 0.2330E-02, 0.4022E-02, 0.6633E-02, 0.1049E-01, 0.1601E-01,
484 & 0.2378E-01, 0.3456E-01, 0.4941E-01, 0.6980E-01, 0.9765E-01,
485 & 0.1353E+00, 0.1852E+00, 0.2494E+00, 0.3287E+00, 0.4216E+00,
486 & 0.5234E+00, 0.6272E+00, 0.7261E+00, 0.8166E+00, 0.8943E+00,
487 & 0.9526E+00, 0.9863E+00, 0.9983E+00, 0.1000E+01, 0.1000E+01,
488 & 0.1000E+01/
489 data ((h12(ip,iw,1),iw=1,31),ip=21,21)/
490 & -0.1487E-06, -0.2912E-06, -0.5636E-06, -0.1069E-05, -0.1969E-05,
491 & -0.3483E-05, -0.5858E-05, -0.9334E-05, -0.1416E-04, -0.2067E-04,
492 & -0.2936E-04, -0.4113E-04, -0.5750E-04, -0.8072E-04, -0.1139E-03,
493 & -0.1606E-03, -0.2246E-03, -0.3076E-03, -0.4067E-03, -0.5121E-03,
494 & -0.6110E-03, -0.6909E-03, -0.7378E-03, -0.7321E-03, -0.6509E-03,
495 & -0.4825E-03, -0.2641E-03, -0.8936E-04, -0.1436E-04, -0.5966E-06,
496 & 0.0000E+00/
497 data ((h13(ip,iw,1),iw=1,31),ip=21,21)/
498 & 0.6777E-09, 0.1344E-08, 0.2643E-08, 0.5138E-08, 0.9798E-08,
499 & 0.1809E-07, 0.3185E-07, 0.5285E-07, 0.8249E-07, 0.1222E-06,
500 & 0.1730E-06, 0.2351E-06, 0.3111E-06, 0.4078E-06, 0.5366E-06,
501 & 0.7117E-06, 0.9495E-06, 0.1266E-05, 0.1667E-05, 0.2132E-05,
502 & 0.2600E-05, 0.3001E-05, 0.3354E-05, 0.3679E-05, 0.3796E-05,
503 & 0.3414E-05, 0.2399E-05, 0.1067E-05, 0.2222E-06, 0.1075E-07,
504 & 0.0000E+00/
505 data ((h11(ip,iw,1),iw=1,31),ip=22,22)/
506 & 0.9589E-04, 0.1893E-03, 0.3706E-03, 0.7162E-03, 0.1357E-02,
507 & 0.2500E-02, 0.4434E-02, 0.7523E-02, 0.1220E-01, 0.1900E-01,
508 & 0.2860E-01, 0.4190E-01, 0.6015E-01, 0.8508E-01, 0.1189E+00,
509 & 0.1643E+00, 0.2233E+00, 0.2976E+00, 0.3865E+00, 0.4865E+00,
510 & 0.5909E+00, 0.6925E+00, 0.7866E+00, 0.8696E+00, 0.9355E+00,
511 & 0.9778E+00, 0.9961E+00, 0.9999E+00, 0.1000E+01, 0.1000E+01,
512 & 0.1000E+01/
513 data ((h12(ip,iw,1),iw=1,31),ip=22,22)/
514 & -0.1496E-06, -0.2947E-06, -0.5749E-06, -0.1105E-05, -0.2074E-05,
515 & -0.3763E-05, -0.6531E-05, -0.1076E-04, -0.1682E-04, -0.2509E-04,
516 & -0.3605E-04, -0.5049E-04, -0.7012E-04, -0.9787E-04, -0.1378E-03,
517 & -0.1939E-03, -0.2695E-03, -0.3641E-03, -0.4703E-03, -0.5750E-03,
518 & -0.6648E-03, -0.7264E-03, -0.7419E-03, -0.6889E-03, -0.5488E-03,
519 & -0.3382E-03, -0.1375E-03, -0.2951E-04, -0.2174E-05, 0.0000E+00,
520 & 0.0000E+00/
521 data ((h13(ip,iw,1),iw=1,31),ip=22,22)/
522 & 0.6798E-09, 0.1350E-08, 0.2667E-08, 0.5226E-08, 0.1010E-07,
523 & 0.1903E-07, 0.3455E-07, 0.5951E-07, 0.9658E-07, 0.1479E-06,
524 & 0.2146E-06, 0.2951E-06, 0.3903E-06, 0.5101E-06, 0.6693E-06,
525 & 0.8830E-06, 0.1168E-05, 0.1532E-05, 0.1968E-05, 0.2435E-05,
526 & 0.2859E-05, 0.3222E-05, 0.3572E-05, 0.3797E-05, 0.3615E-05,
527 & 0.2811E-05, 0.1500E-05, 0.4185E-06, 0.3850E-07, 0.0000E+00,
528 & 0.0000E+00/
529 data ((h11(ip,iw,1),iw=1,31),ip=23,23)/
530 & 0.9629E-04, 0.1907E-03, 0.3755E-03, 0.7321E-03, 0.1406E-02,
531 & 0.2639E-02, 0.4796E-02, 0.8368E-02, 0.1394E-01, 0.2221E-01,
532 & 0.3400E-01, 0.5037E-01, 0.7279E-01, 0.1033E+00, 0.1442E+00,
533 & 0.1983E+00, 0.2673E+00, 0.3516E+00, 0.4489E+00, 0.5533E+00,
534 & 0.6572E+00, 0.7547E+00, 0.8425E+00, 0.9153E+00, 0.9663E+00,
535 & 0.9922E+00, 0.9995E+00, 0.1000E+01, 0.1000E+01, 0.1000E+01,
536 & 0.1000E+01/
537 data ((h12(ip,iw,1),iw=1,31),ip=23,23)/
538 & -0.1503E-06, -0.2971E-06, -0.5832E-06, -0.1131E-05, -0.2154E-05,
539 & -0.3992E-05, -0.7122E-05, -0.1211E-04, -0.1954E-04, -0.2995E-04,
540 & -0.4380E-04, -0.6183E-04, -0.8577E-04, -0.1191E-03, -0.1668E-03,
541 & -0.2333E-03, -0.3203E-03, -0.4237E-03, -0.5324E-03, -0.6318E-03,
542 & -0.7075E-03, -0.7429E-03, -0.7168E-03, -0.6071E-03, -0.4139E-03,
543 & -0.1976E-03, -0.5410E-04, -0.6215E-05, -0.1343E-06, 0.0000E+00,
544 & 0.0000E+00/
545 data ((h13(ip,iw,1),iw=1,31),ip=23,23)/
546 & 0.6809E-09, 0.1356E-08, 0.2683E-08, 0.5287E-08, 0.1030E-07,
547 & 0.1971E-07, 0.3665E-07, 0.6528E-07, 0.1100E-06, 0.1744E-06,
548 & 0.2599E-06, 0.3650E-06, 0.4887E-06, 0.6398E-06, 0.8358E-06,
549 & 0.1095E-05, 0.1429E-05, 0.1836E-05, 0.2286E-05, 0.2716E-05,
550 & 0.3088E-05, 0.3444E-05, 0.3748E-05, 0.3740E-05, 0.3157E-05,
551 & 0.1966E-05, 0.7064E-06, 0.1030E-06, 0.2456E-08, 0.0000E+00,
552 & 0.0000E+00/
553 data ((h11(ip,iw,1),iw=1,31),ip=24,24)/
554 & 0.9655E-04, 0.1917E-03, 0.3789E-03, 0.7436E-03, 0.1442E-02,
555 & 0.2748E-02, 0.5100E-02, 0.9128E-02, 0.1563E-01, 0.2553E-01,
556 & 0.3987E-01, 0.5994E-01, 0.8746E-01, 0.1246E+00, 0.1739E+00,
557 & 0.2376E+00, 0.3170E+00, 0.4107E+00, 0.5141E+00, 0.6198E+00,
558 & 0.7208E+00, 0.8130E+00, 0.8923E+00, 0.9517E+00, 0.9860E+00,
559 & 0.9983E+00, 0.1000E+01, 0.1000E+01, 0.1000E+01, 0.1000E+01,
560 & 0.1000E+01/
561 data ((h12(ip,iw,1),iw=1,31),ip=24,24)/
562 & -0.1508E-06, -0.2989E-06, -0.5892E-06, -0.1151E-05, -0.2216E-05,
563 & -0.4175E-05, -0.7619E-05, -0.1333E-04, -0.2217E-04, -0.3497E-04,
564 & -0.5238E-04, -0.7513E-04, -0.1049E-03, -0.1455E-03, -0.2021E-03,
565 & -0.2790E-03, -0.3757E-03, -0.4839E-03, -0.5902E-03, -0.6794E-03,
566 & -0.7344E-03, -0.7341E-03, -0.6557E-03, -0.4874E-03, -0.2674E-03,
567 & -0.9059E-04, -0.1455E-04, -0.5986E-06, 0.0000E+00, 0.0000E+00,
568 & 0.0000E+00/
569 data ((h13(ip,iw,1),iw=1,31),ip=24,24)/
570 & 0.6812E-09, 0.1356E-08, 0.2693E-08, 0.5328E-08, 0.1045E-07,
571 & 0.2021E-07, 0.3826E-07, 0.6994E-07, 0.1218E-06, 0.1997E-06,
572 & 0.3069E-06, 0.4428E-06, 0.6064E-06, 0.8015E-06, 0.1043E-05,
573 & 0.1351E-05, 0.1733E-05, 0.2168E-05, 0.2598E-05, 0.2968E-05,
574 & 0.3316E-05, 0.3662E-05, 0.3801E-05, 0.3433E-05, 0.2422E-05,
575 & 0.1081E-05, 0.2256E-06, 0.1082E-07, 0.0000E+00, 0.0000E+00,
576 & 0.0000E+00/
577 data ((h11(ip,iw,1),iw=1,31),ip=25,25)/
578 & 0.9672E-04, 0.1923E-03, 0.3813E-03, 0.7518E-03, 0.1469E-02,
579 & 0.2832E-02, 0.5343E-02, 0.9779E-02, 0.1719E-01, 0.2882E-01,
580 & 0.4606E-01, 0.7051E-01, 0.1042E+00, 0.1493E+00, 0.2081E+00,
581 & 0.2824E+00, 0.3720E+00, 0.4736E+00, 0.5803E+00, 0.6844E+00,
582 & 0.7810E+00, 0.8663E+00, 0.9339E+00, 0.9772E+00, 0.9960E+00,
583 & 0.9999E+00, 0.1000E+01, 0.1000E+01, 0.1000E+01, 0.1000E+01,
584 & 0.1000E+01/
585 data ((h12(ip,iw,1),iw=1,31),ip=25,25)/
586 & -0.1511E-06, -0.3001E-06, -0.5934E-06, -0.1166E-05, -0.2263E-05,
587 & -0.4319E-05, -0.8028E-05, -0.1438E-04, -0.2460E-04, -0.3991E-04,
588 & -0.6138E-04, -0.9005E-04, -0.1278E-03, -0.1778E-03, -0.2447E-03,
589 & -0.3313E-03, -0.4342E-03, -0.5424E-03, -0.6416E-03, -0.7146E-03,
590 & -0.7399E-03, -0.6932E-03, -0.5551E-03, -0.3432E-03, -0.1398E-03,
591 & -0.3010E-04, -0.2229E-05, 0.0000E+00, 0.0000E+00, 0.0000E+00,
592 & 0.0000E+00/
593 data ((h13(ip,iw,1),iw=1,31),ip=25,25)/
594 & 0.6815E-09, 0.1358E-08, 0.2698E-08, 0.5355E-08, 0.1054E-07,
595 & 0.2056E-07, 0.3942E-07, 0.7349E-07, 0.1315E-06, 0.2226E-06,
596 & 0.3537E-06, 0.5266E-06, 0.7407E-06, 0.9958E-06, 0.1296E-05,
597 & 0.1657E-05, 0.2077E-05, 0.2512E-05, 0.2893E-05, 0.3216E-05,
598 & 0.3562E-05, 0.3811E-05, 0.3644E-05, 0.2841E-05, 0.1524E-05,
599 & 0.4276E-06, 0.3960E-07, 0.0000E+00, 0.0000E+00, 0.0000E+00,
600 & 0.0000E+00/
601 data ((h11(ip,iw,1),iw=1,31),ip=26,26)/
602 & 0.9682E-04, 0.1928E-03, 0.3829E-03, 0.7576E-03, 0.1489E-02,
603 & 0.2894E-02, 0.5533E-02, 0.1031E-01, 0.1856E-01, 0.3195E-01,
604 & 0.5237E-01, 0.8187E-01, 0.1227E+00, 0.1771E+00, 0.2468E+00,
605 & 0.3321E+00, 0.4312E+00, 0.5384E+00, 0.6455E+00, 0.7463E+00,
606 & 0.8372E+00, 0.9126E+00, 0.9652E+00, 0.9919E+00, 0.9994E+00,
607 & 0.1000E+01, 0.1000E+01, 0.1000E+01, 0.1000E+01, 0.1000E+01,
608 & 0.1000E+01/
609 data ((h12(ip,iw,1),iw=1,31),ip=26,26)/
610 & -0.1513E-06, -0.3009E-06, -0.5966E-06, -0.1176E-05, -0.2299E-05,
611 & -0.4430E-05, -0.8352E-05, -0.1526E-04, -0.2674E-04, -0.4454E-04,
612 & -0.7042E-04, -0.1062E-03, -0.1540E-03, -0.2163E-03, -0.2951E-03,
613 & -0.3899E-03, -0.4948E-03, -0.5983E-03, -0.6846E-03, -0.7332E-03,
614 & -0.7182E-03, -0.6142E-03, -0.4209E-03, -0.2014E-03, -0.5530E-04,
615 & -0.6418E-05, -0.1439E-06, 0.0000E+00, 0.0000E+00, 0.0000E+00,
616 & 0.0000E+00/
617 data ((h13(ip,iw,1),iw=1,31),ip=26,26)/
618 & 0.6817E-09, 0.1359E-08, 0.2702E-08, 0.5374E-08, 0.1061E-07,
619 & 0.2079E-07, 0.4022E-07, 0.7610E-07, 0.1392E-06, 0.2428E-06,
620 & 0.3992E-06, 0.6149E-06, 0.8893E-06, 0.1220E-05, 0.1599E-05,
621 & 0.2015E-05, 0.2453E-05, 0.2853E-05, 0.3173E-05, 0.3488E-05,
622 & 0.3792E-05, 0.3800E-05, 0.3210E-05, 0.2002E-05, 0.7234E-06,
623 & 0.1068E-06, 0.2646E-08, 0.0000E+00, 0.0000E+00, 0.0000E+00,
624 & 0.0000E+00/
625 data ((h21(ip,iw,1),iw=1,31),ip= 1, 1)/
626 & 0.3920E-05, 0.7617E-05, 0.1455E-04, 0.2706E-04, 0.4855E-04,
627 & 0.8315E-04, 0.1349E-03, 0.2063E-03, 0.2984E-03, 0.4109E-03,
628 & 0.5422E-03, 0.6896E-03, 0.8537E-03, 0.1041E-02, 0.1262E-02,
629 & 0.1534E-02, 0.1870E-02, 0.2286E-02, 0.2803E-02, 0.3444E-02,
630 & 0.4242E-02, 0.5244E-02, 0.6511E-02, 0.8138E-02, 0.1027E-01,
631 & 0.1312E-01, 0.1697E-01, 0.2222E-01, 0.2941E-01, 0.3923E-01,
632 & 0.5258E-01/
633 data ((h22(ip,iw,1),iw=1,31),ip= 1, 1)/
634 & -0.5622E-07, -0.1071E-06, -0.1983E-06, -0.3533E-06, -0.5991E-06,
635 & -0.9592E-06, -0.1444E-05, -0.2049E-05, -0.2764E-05, -0.3577E-05,
636 & -0.4469E-05, -0.5467E-05, -0.6654E-05, -0.8137E-05, -0.1002E-04,
637 & -0.1237E-04, -0.1528E-04, -0.1884E-04, -0.2310E-04, -0.2809E-04,
638 & -0.3396E-04, -0.4098E-04, -0.4960E-04, -0.6058E-04, -0.7506E-04,
639 & -0.9451E-04, -0.1207E-03, -0.1558E-03, -0.2026E-03, -0.2648E-03,
640 & -0.3468E-03/
641 data ((h23(ip,iw,1),iw=1,31),ip= 1, 1)/
642 & -0.2195E-09, -0.4031E-09, -0.7043E-09, -0.1153E-08, -0.1737E-08,
643 & -0.2395E-08, -0.3020E-08, -0.3549E-08, -0.4034E-08, -0.4421E-08,
644 & -0.4736E-08, -0.5681E-08, -0.8289E-08, -0.1287E-07, -0.1873E-07,
645 & -0.2523E-07, -0.3223E-07, -0.3902E-07, -0.4409E-07, -0.4699E-07,
646 & -0.4782E-07, -0.4705E-07, -0.4657E-07, -0.4885E-07, -0.5550E-07,
647 & -0.6619E-07, -0.7656E-07, -0.8027E-07, -0.7261E-07, -0.4983E-07,
648 & -0.1101E-07/
649 data ((h21(ip,iw,1),iw=1,31),ip= 2, 2)/
650 & 0.3920E-05, 0.7617E-05, 0.1455E-04, 0.2706E-04, 0.4856E-04,
651 & 0.8318E-04, 0.1349E-03, 0.2065E-03, 0.2986E-03, 0.4114E-03,
652 & 0.5431E-03, 0.6912E-03, 0.8566E-03, 0.1046E-02, 0.1272E-02,
653 & 0.1552E-02, 0.1902E-02, 0.2342E-02, 0.2899E-02, 0.3605E-02,
654 & 0.4501E-02, 0.5648E-02, 0.7129E-02, 0.9063E-02, 0.1163E-01,
655 & 0.1509E-01, 0.1980E-01, 0.2626E-01, 0.3510E-01, 0.4717E-01,
656 & 0.6351E-01/
657 data ((h22(ip,iw,1),iw=1,31),ip= 2, 2)/
658 & -0.5622E-07, -0.1071E-06, -0.1983E-06, -0.3534E-06, -0.5992E-06,
659 & -0.9594E-06, -0.1445E-05, -0.2050E-05, -0.2766E-05, -0.3580E-05,
660 & -0.4476E-05, -0.5479E-05, -0.6677E-05, -0.8179E-05, -0.1009E-04,
661 & -0.1251E-04, -0.1553E-04, -0.1928E-04, -0.2384E-04, -0.2930E-04,
662 & -0.3588E-04, -0.4393E-04, -0.5403E-04, -0.6714E-04, -0.8458E-04,
663 & -0.1082E-03, -0.1400E-03, -0.1829E-03, -0.2401E-03, -0.3157E-03,
664 & -0.4147E-03/
665 data ((h23(ip,iw,1),iw=1,31),ip= 2, 2)/
666 & -0.2195E-09, -0.4032E-09, -0.7046E-09, -0.1153E-08, -0.1738E-08,
667 & -0.2395E-08, -0.3021E-08, -0.3550E-08, -0.4035E-08, -0.4423E-08,
668 & -0.4740E-08, -0.5692E-08, -0.8314E-08, -0.1292E-07, -0.1882E-07,
669 & -0.2536E-07, -0.3242E-07, -0.3927E-07, -0.4449E-07, -0.4767E-07,
670 & -0.4889E-07, -0.4857E-07, -0.4860E-07, -0.5132E-07, -0.5847E-07,
671 & -0.6968E-07, -0.8037E-07, -0.8400E-07, -0.7521E-07, -0.4830E-07,
672 & -0.7562E-09/
673 data ((h21(ip,iw,1),iw=1,31),ip= 3, 3)/
674 & 0.3920E-05, 0.7617E-05, 0.1455E-04, 0.2707E-04, 0.4858E-04,
675 & 0.8322E-04, 0.1350E-03, 0.2066E-03, 0.2990E-03, 0.4122E-03,
676 & 0.5444E-03, 0.6937E-03, 0.8611E-03, 0.1054E-02, 0.1287E-02,
677 & 0.1579E-02, 0.1949E-02, 0.2424E-02, 0.3037E-02, 0.3829E-02,
678 & 0.4854E-02, 0.6190E-02, 0.7942E-02, 0.1026E-01, 0.1338E-01,
679 & 0.1761E-01, 0.2340E-01, 0.3134E-01, 0.4223E-01, 0.5703E-01,
680 & 0.7694E-01/
681 data ((h22(ip,iw,1),iw=1,31),ip= 3, 3)/
682 & -0.5622E-07, -0.1071E-06, -0.1983E-06, -0.3535E-06, -0.5994E-06,
683 & -0.9599E-06, -0.1446E-05, -0.2052E-05, -0.2769E-05, -0.3586E-05,
684 & -0.4487E-05, -0.5499E-05, -0.6712E-05, -0.8244E-05, -0.1021E-04,
685 & -0.1272E-04, -0.1591E-04, -0.1992E-04, -0.2489E-04, -0.3097E-04,
686 & -0.3845E-04, -0.4782E-04, -0.5982E-04, -0.7558E-04, -0.9674E-04,
687 & -0.1254E-03, -0.1644E-03, -0.2167E-03, -0.2863E-03, -0.3777E-03,
688 & -0.4959E-03/
689 data ((h23(ip,iw,1),iw=1,31),ip= 3, 3)/
690 & -0.2196E-09, -0.4033E-09, -0.7048E-09, -0.1154E-08, -0.1739E-08,
691 & -0.2396E-08, -0.3022E-08, -0.3551E-08, -0.4036E-08, -0.4425E-08,
692 & -0.4746E-08, -0.5710E-08, -0.8354E-08, -0.1300E-07, -0.1894E-07,
693 & -0.2554E-07, -0.3265E-07, -0.3958E-07, -0.4502E-07, -0.4859E-07,
694 & -0.5030E-07, -0.5053E-07, -0.5104E-07, -0.5427E-07, -0.6204E-07,
695 & -0.7388E-07, -0.8477E-07, -0.8760E-07, -0.7545E-07, -0.4099E-07,
696 & 0.2046E-07/
697 data ((h21(ip,iw,1),iw=1,31),ip= 4, 4)/
698 & 0.3919E-05, 0.7618E-05, 0.1455E-04, 0.2708E-04, 0.4860E-04,
699 & 0.8327E-04, 0.1352E-03, 0.2070E-03, 0.2997E-03, 0.4134E-03,
700 & 0.5466E-03, 0.6976E-03, 0.8682E-03, 0.1067E-02, 0.1310E-02,
701 & 0.1619E-02, 0.2020E-02, 0.2543E-02, 0.3232E-02, 0.4136E-02,
702 & 0.5328E-02, 0.6906E-02, 0.9004E-02, 0.1182E-01, 0.1562E-01,
703 & 0.2081E-01, 0.2794E-01, 0.3773E-01, 0.5111E-01, 0.6919E-01,
704 & 0.9329E-01/
705 data ((h22(ip,iw,1),iw=1,31),ip= 4, 4)/
706 & -0.5623E-07, -0.1071E-06, -0.1984E-06, -0.3536E-06, -0.5997E-06,
707 & -0.9606E-06, -0.1447E-05, -0.2055E-05, -0.2775E-05, -0.3596E-05,
708 & -0.4504E-05, -0.5529E-05, -0.6768E-05, -0.8345E-05, -0.1039E-04,
709 & -0.1304E-04, -0.1645E-04, -0.2082E-04, -0.2633E-04, -0.3322E-04,
710 & -0.4187E-04, -0.5292E-04, -0.6730E-04, -0.8640E-04, -0.1122E-03,
711 & -0.1472E-03, -0.1948E-03, -0.2585E-03, -0.3428E-03, -0.4523E-03,
712 & -0.5915E-03/
713 data ((h23(ip,iw,1),iw=1,31),ip= 4, 4)/
714 & -0.2196E-09, -0.4034E-09, -0.7050E-09, -0.1154E-08, -0.1740E-08,
715 & -0.2398E-08, -0.3024E-08, -0.3552E-08, -0.4037E-08, -0.4428E-08,
716 & -0.4756E-08, -0.5741E-08, -0.8418E-08, -0.1310E-07, -0.1910E-07,
717 & -0.2575E-07, -0.3293E-07, -0.3998E-07, -0.4572E-07, -0.4980E-07,
718 & -0.5211E-07, -0.5287E-07, -0.5390E-07, -0.5782E-07, -0.6650E-07,
719 & -0.7892E-07, -0.8940E-07, -0.8980E-07, -0.7119E-07, -0.2452E-07,
720 & 0.5823E-07/
721 data ((h21(ip,iw,1),iw=1,31),ip= 5, 5)/
722 & 0.3919E-05, 0.7618E-05, 0.1455E-04, 0.2709E-04, 0.4863E-04,
723 & 0.8337E-04, 0.1354E-03, 0.2075E-03, 0.3007E-03, 0.4152E-03,
724 & 0.5500E-03, 0.7038E-03, 0.8793E-03, 0.1086E-02, 0.1345E-02,
725 & 0.1680E-02, 0.2123E-02, 0.2712E-02, 0.3500E-02, 0.4552E-02,
726 & 0.5958E-02, 0.7844E-02, 0.1038E-01, 0.1381E-01, 0.1847E-01,
727 & 0.2487E-01, 0.3366E-01, 0.4572E-01, 0.6209E-01, 0.8406E-01,
728 & 0.1130E+00/
729 data ((h22(ip,iw,1),iw=1,31),ip= 5, 5)/
730 & -0.5623E-07, -0.1071E-06, -0.1985E-06, -0.3538E-06, -0.6002E-06,
731 & -0.9618E-06, -0.1450E-05, -0.2059E-05, -0.2783E-05, -0.3611E-05,
732 & -0.4531E-05, -0.5577E-05, -0.6855E-05, -0.8499E-05, -0.1066E-04,
733 & -0.1351E-04, -0.1723E-04, -0.2207E-04, -0.2829E-04, -0.3621E-04,
734 & -0.4636E-04, -0.5954E-04, -0.7690E-04, -0.1002E-03, -0.1317E-03,
735 & -0.1746E-03, -0.2326E-03, -0.3099E-03, -0.4111E-03, -0.5407E-03,
736 & -0.7020E-03/
737 data ((h23(ip,iw,1),iw=1,31),ip= 5, 5)/
738 & -0.2197E-09, -0.4037E-09, -0.7054E-09, -0.1155E-08, -0.1741E-08,
739 & -0.2401E-08, -0.3027E-08, -0.3553E-08, -0.4039E-08, -0.4431E-08,
740 & -0.4775E-08, -0.5784E-08, -0.8506E-08, -0.1326E-07, -0.1931E-07,
741 & -0.2600E-07, -0.3324E-07, -0.4048E-07, -0.4666E-07, -0.5137E-07,
742 & -0.5428E-07, -0.5558E-07, -0.5730E-07, -0.6228E-07, -0.7197E-07,
743 & -0.8455E-07, -0.9347E-07, -0.8867E-07, -0.5945E-07, 0.5512E-08,
744 & 0.1209E-06/
745 data ((h21(ip,iw,1),iw=1,31),ip= 6, 6)/
746 & 0.3919E-05, 0.7619E-05, 0.1456E-04, 0.2710E-04, 0.4868E-04,
747 & 0.8351E-04, 0.1357E-03, 0.2082E-03, 0.3022E-03, 0.4181E-03,
748 & 0.5554E-03, 0.7134E-03, 0.8963E-03, 0.1117E-02, 0.1397E-02,
749 & 0.1770E-02, 0.2270E-02, 0.2947E-02, 0.3865E-02, 0.5107E-02,
750 & 0.6787E-02, 0.9062E-02, 0.1215E-01, 0.1634E-01, 0.2209E-01,
751 & 0.2999E-01, 0.4083E-01, 0.5563E-01, 0.7559E-01, 0.1021E+00,
752 & 0.1364E+00/
753 data ((h22(ip,iw,1),iw=1,31),ip= 6, 6)/
754 & -0.5624E-07, -0.1072E-06, -0.1986E-06, -0.3541E-06, -0.6010E-06,
755 & -0.9636E-06, -0.1453E-05, -0.2067E-05, -0.2796E-05, -0.3634E-05,
756 & -0.4572E-05, -0.5652E-05, -0.6987E-05, -0.8733E-05, -0.1107E-04,
757 & -0.1418E-04, -0.1832E-04, -0.2378E-04, -0.3092E-04, -0.4017E-04,
758 & -0.5221E-04, -0.6806E-04, -0.8916E-04, -0.1176E-03, -0.1562E-03,
759 & -0.2087E-03, -0.2793E-03, -0.3724E-03, -0.4928E-03, -0.6440E-03,
760 & -0.8270E-03/
761 data ((h23(ip,iw,1),iw=1,31),ip= 6, 6)/
762 & -0.2198E-09, -0.4040E-09, -0.7061E-09, -0.1156E-08, -0.1744E-08,
763 & -0.2405E-08, -0.3032E-08, -0.3556E-08, -0.4040E-08, -0.4444E-08,
764 & -0.4800E-08, -0.5848E-08, -0.8640E-08, -0.1346E-07, -0.1957E-07,
765 & -0.2627E-07, -0.3357E-07, -0.4114E-07, -0.4793E-07, -0.5330E-07,
766 & -0.5676E-07, -0.5873E-07, -0.6152E-07, -0.6783E-07, -0.7834E-07,
767 & -0.9023E-07, -0.9530E-07, -0.8162E-07, -0.3634E-07, 0.5638E-07,
768 & 0.2189E-06/
769 data ((h21(ip,iw,1),iw=1,31),ip= 7, 7)/
770 & 0.3919E-05, 0.7620E-05, 0.1457E-04, 0.2713E-04, 0.4877E-04,
771 & 0.8374E-04, 0.1363E-03, 0.2095E-03, 0.3047E-03, 0.4227E-03,
772 & 0.5637E-03, 0.7282E-03, 0.9224E-03, 0.1162E-02, 0.1475E-02,
773 & 0.1898E-02, 0.2475E-02, 0.3267E-02, 0.4354E-02, 0.5839E-02,
774 & 0.7866E-02, 0.1063E-01, 0.1440E-01, 0.1957E-01, 0.2666E-01,
775 & 0.3641E-01, 0.4975E-01, 0.6784E-01, 0.9201E-01, 0.1236E+00,
776 & 0.1639E+00/
777 data ((h22(ip,iw,1),iw=1,31),ip= 7, 7)/
778 & -0.5626E-07, -0.1072E-06, -0.1987E-06, -0.3545E-06, -0.6022E-06,
779 & -0.9665E-06, -0.1460E-05, -0.2078E-05, -0.2817E-05, -0.3671E-05,
780 & -0.4637E-05, -0.5767E-05, -0.7188E-05, -0.9080E-05, -0.1165E-04,
781 & -0.1513E-04, -0.1981E-04, -0.2609E-04, -0.3441E-04, -0.4534E-04,
782 & -0.5978E-04, -0.7897E-04, -0.1047E-03, -0.1396E-03, -0.1870E-03,
783 & -0.2510E-03, -0.3363E-03, -0.4475E-03, -0.5888E-03, -0.7621E-03,
784 & -0.9647E-03/
785 data ((h23(ip,iw,1),iw=1,31),ip= 7, 7)/
786 & -0.2200E-09, -0.4045E-09, -0.7071E-09, -0.1159E-08, -0.1748E-08,
787 & -0.2411E-08, -0.3040E-08, -0.3561E-08, -0.4046E-08, -0.4455E-08,
788 & -0.4839E-08, -0.5941E-08, -0.8815E-08, -0.1371E-07, -0.1983E-07,
789 & -0.2652E-07, -0.3400E-07, -0.4207E-07, -0.4955E-07, -0.5554E-07,
790 & -0.5966E-07, -0.6261E-07, -0.6688E-07, -0.7454E-07, -0.8521E-07,
791 & -0.9470E-07, -0.9275E-07, -0.6525E-07, 0.3686E-08, 0.1371E-06,
792 & 0.3623E-06/
793 data ((h21(ip,iw,1),iw=1,31),ip= 8, 8)/
794 & 0.3919E-05, 0.7622E-05, 0.1458E-04, 0.2717E-04, 0.4890E-04,
795 & 0.8410E-04, 0.1372E-03, 0.2114E-03, 0.3085E-03, 0.4298E-03,
796 & 0.5765E-03, 0.7508E-03, 0.9618E-03, 0.1229E-02, 0.1586E-02,
797 & 0.2077E-02, 0.2757E-02, 0.3697E-02, 0.5000E-02, 0.6794E-02,
798 & 0.9260E-02, 0.1264E-01, 0.1728E-01, 0.2365E-01, 0.3242E-01,
799 & 0.4444E-01, 0.6080E-01, 0.8278E-01, 0.1118E+00, 0.1491E+00,
800 & 0.1956E+00/
801 data ((h22(ip,iw,1),iw=1,31),ip= 8, 8)/
802 & -0.5628E-07, -0.1073E-06, -0.1990E-06, -0.3553E-06, -0.6042E-06,
803 & -0.9710E-06, -0.1469E-05, -0.2096E-05, -0.2849E-05, -0.3728E-05,
804 & -0.4738E-05, -0.5942E-05, -0.7490E-05, -0.9586E-05, -0.1247E-04,
805 & -0.1644E-04, -0.2184E-04, -0.2916E-04, -0.3898E-04, -0.5205E-04,
806 & -0.6948E-04, -0.9285E-04, -0.1244E-03, -0.1672E-03, -0.2251E-03,
807 & -0.3028E-03, -0.4051E-03, -0.5365E-03, -0.6998E-03, -0.8940E-03,
808 & -0.1112E-02/
809 data ((h23(ip,iw,1),iw=1,31),ip= 8, 8)/
810 & -0.2204E-09, -0.4052E-09, -0.7088E-09, -0.1162E-08, -0.1755E-08,
811 & -0.2422E-08, -0.3053E-08, -0.3572E-08, -0.4052E-08, -0.4474E-08,
812 & -0.4898E-08, -0.6082E-08, -0.9046E-08, -0.1400E-07, -0.2009E-07,
813 & -0.2683E-07, -0.3463E-07, -0.4334E-07, -0.5153E-07, -0.5811E-07,
814 & -0.6305E-07, -0.6749E-07, -0.7346E-07, -0.8208E-07, -0.9173E-07,
815 & -0.9603E-07, -0.8264E-07, -0.3505E-07, 0.6878E-07, 0.2586E-06,
816 & 0.5530E-06/
817 data ((h21(ip,iw,1),iw=1,31),ip= 9, 9)/
818 & 0.3919E-05, 0.7625E-05, 0.1459E-04, 0.2723E-04, 0.4910E-04,
819 & 0.8465E-04, 0.1385E-03, 0.2143E-03, 0.3143E-03, 0.4407E-03,
820 & 0.5960E-03, 0.7850E-03, 0.1020E-02, 0.1326E-02, 0.1744E-02,
821 & 0.2324E-02, 0.3135E-02, 0.4267E-02, 0.5845E-02, 0.8031E-02,
822 & 0.1105E-01, 0.1520E-01, 0.2093E-01, 0.2880E-01, 0.3962E-01,
823 & 0.5440E-01, 0.7435E-01, 0.1009E+00, 0.1353E+00, 0.1787E+00,
824 & 0.2317E+00/
825 data ((h22(ip,iw,1),iw=1,31),ip= 9, 9)/
826 & -0.5630E-07, -0.1074E-06, -0.1994E-06, -0.3564E-06, -0.6072E-06,
827 & -0.9779E-06, -0.1484E-05, -0.2124E-05, -0.2900E-05, -0.3817E-05,
828 & -0.4891E-05, -0.6205E-05, -0.7931E-05, -0.1031E-04, -0.1362E-04,
829 & -0.1821E-04, -0.2454E-04, -0.3320E-04, -0.4493E-04, -0.6068E-04,
830 & -0.8186E-04, -0.1104E-03, -0.1491E-03, -0.2016E-03, -0.2722E-03,
831 & -0.3658E-03, -0.4873E-03, -0.6404E-03, -0.8253E-03, -0.1037E-02,
832 & -0.1267E-02/
833 data ((h23(ip,iw,1),iw=1,31),ip= 9, 9)/
834 & -0.2207E-09, -0.4061E-09, -0.7117E-09, -0.1169E-08, -0.1767E-08,
835 & -0.2439E-08, -0.3074E-08, -0.3588E-08, -0.4062E-08, -0.4510E-08,
836 & -0.4983E-08, -0.6261E-08, -0.9324E-08, -0.1430E-07, -0.2036E-07,
837 & -0.2725E-07, -0.3561E-07, -0.4505E-07, -0.5384E-07, -0.6111E-07,
838 & -0.6731E-07, -0.7355E-07, -0.8112E-07, -0.8978E-07, -0.9616E-07,
839 & -0.9157E-07, -0.6114E-07, 0.1622E-07, 0.1694E-06, 0.4277E-06,
840 & 0.7751E-06/
841 data ((h21(ip,iw,1),iw=1,31),ip=10,10)/
842 & 0.3919E-05, 0.7629E-05, 0.1462E-04, 0.2733E-04, 0.4940E-04,
843 & 0.8549E-04, 0.1406E-03, 0.2188E-03, 0.3232E-03, 0.4572E-03,
844 & 0.6253E-03, 0.8354E-03, 0.1105E-02, 0.1464E-02, 0.1960E-02,
845 & 0.2657E-02, 0.3637E-02, 0.5014E-02, 0.6942E-02, 0.9622E-02,
846 & 0.1333E-01, 0.1846E-01, 0.2553E-01, 0.3526E-01, 0.4859E-01,
847 & 0.6667E-01, 0.9084E-01, 0.1225E+00, 0.1629E+00, 0.2127E+00,
848 & 0.2721E+00/
849 data ((h22(ip,iw,1),iw=1,31),ip=10,10)/
850 & -0.5636E-07, -0.1076E-06, -0.2000E-06, -0.3582E-06, -0.6119E-06,
851 & -0.9888E-06, -0.1507E-05, -0.2168E-05, -0.2978E-05, -0.3952E-05,
852 & -0.5122E-05, -0.6592E-05, -0.8565E-05, -0.1132E-04, -0.1518E-04,
853 & -0.2060E-04, -0.2811E-04, -0.3848E-04, -0.5261E-04, -0.7173E-04,
854 & -0.9758E-04, -0.1326E-03, -0.1801E-03, -0.2442E-03, -0.3296E-03,
855 & -0.4415E-03, -0.5840E-03, -0.7591E-03, -0.9636E-03, -0.1189E-02,
856 & -0.1427E-02/
857 data ((h23(ip,iw,1),iw=1,31),ip=10,10)/
858 & -0.2214E-09, -0.4080E-09, -0.7156E-09, -0.1178E-08, -0.1784E-08,
859 & -0.2466E-08, -0.3105E-08, -0.3617E-08, -0.4087E-08, -0.4563E-08,
860 & -0.5110E-08, -0.6492E-08, -0.9643E-08, -0.1461E-07, -0.2069E-07,
861 & -0.2796E-07, -0.3702E-07, -0.4717E-07, -0.5662E-07, -0.6484E-07,
862 & -0.7271E-07, -0.8079E-07, -0.8928E-07, -0.9634E-07, -0.9625E-07,
863 & -0.7776E-07, -0.2242E-07, 0.9745E-07, 0.3152E-06, 0.6388E-06,
864 & 0.9992E-06/
865 data ((h21(ip,iw,1),iw=1,31),ip=11,11)/
866 & 0.3919E-05, 0.7639E-05, 0.1466E-04, 0.2748E-04, 0.4986E-04,
867 & 0.8675E-04, 0.1437E-03, 0.2255E-03, 0.3365E-03, 0.4816E-03,
868 & 0.6682E-03, 0.9082E-03, 0.1224E-02, 0.1653E-02, 0.2253E-02,
869 & 0.3099E-02, 0.4296E-02, 0.5984E-02, 0.8352E-02, 0.1165E-01,
870 & 0.1623E-01, 0.2257E-01, 0.3132E-01, 0.4333E-01, 0.5968E-01,
871 & 0.8166E-01, 0.1107E+00, 0.1481E+00, 0.1947E+00, 0.2509E+00,
872 & 0.3170E+00/
873 data ((h22(ip,iw,1),iw=1,31),ip=11,11)/
874 & -0.5645E-07, -0.1079E-06, -0.2009E-06, -0.3610E-06, -0.6190E-06,
875 & -0.1005E-05, -0.1541E-05, -0.2235E-05, -0.3096E-05, -0.4155E-05,
876 & -0.5463E-05, -0.7150E-05, -0.9453E-05, -0.1269E-04, -0.1728E-04,
877 & -0.2375E-04, -0.3279E-04, -0.4531E-04, -0.6246E-04, -0.8579E-04,
878 & -0.1175E-03, -0.1604E-03, -0.2186E-03, -0.2964E-03, -0.3990E-03,
879 & -0.5311E-03, -0.6957E-03, -0.8916E-03, -0.1112E-02, -0.1346E-02,
880 & -0.1590E-02/
881 data ((h23(ip,iw,1),iw=1,31),ip=11,11)/
882 & -0.2225E-09, -0.4104E-09, -0.7217E-09, -0.1192E-08, -0.1811E-08,
883 & -0.2509E-08, -0.3155E-08, -0.3668E-08, -0.4138E-08, -0.4650E-08,
884 & -0.5296E-08, -0.6785E-08, -0.9991E-08, -0.1494E-07, -0.2122E-07,
885 & -0.2911E-07, -0.3895E-07, -0.4979E-07, -0.6002E-07, -0.6964E-07,
886 & -0.7935E-07, -0.8887E-07, -0.9699E-07, -0.9967E-07, -0.8883E-07,
887 & -0.4988E-07, 0.4156E-07, 0.2197E-06, 0.5081E-06, 0.8667E-06,
888 & 0.1212E-05/
889 data ((h21(ip,iw,1),iw=1,31),ip=12,12)/
890 & 0.3920E-05, 0.7649E-05, 0.1472E-04, 0.2768E-04, 0.5051E-04,
891 & 0.8856E-04, 0.1481E-03, 0.2352E-03, 0.3557E-03, 0.5169E-03,
892 & 0.7295E-03, 0.1010E-02, 0.1388E-02, 0.1909E-02, 0.2640E-02,
893 & 0.3678E-02, 0.5151E-02, 0.7231E-02, 0.1015E-01, 0.1423E-01,
894 & 0.1990E-01, 0.2775E-01, 0.3856E-01, 0.5333E-01, 0.7328E-01,
895 & 0.9980E-01, 0.1343E+00, 0.1778E+00, 0.2308E+00, 0.2936E+00,
896 & 0.3667E+00/
897 data ((h22(ip,iw,1),iw=1,31),ip=12,12)/
898 & -0.5658E-07, -0.1083E-06, -0.2023E-06, -0.3650E-06, -0.6295E-06,
899 & -0.1030E-05, -0.1593E-05, -0.2334E-05, -0.3273E-05, -0.4455E-05,
900 & -0.5955E-05, -0.7935E-05, -0.1067E-04, -0.1455E-04, -0.2007E-04,
901 & -0.2788E-04, -0.3885E-04, -0.5409E-04, -0.7503E-04, -0.1036E-03,
902 & -0.1425E-03, -0.1951E-03, -0.2660E-03, -0.3598E-03, -0.4817E-03,
903 & -0.6355E-03, -0.8218E-03, -0.1035E-02, -0.1267E-02, -0.1508E-02,
904 & -0.1755E-02/
905 data ((h23(ip,iw,1),iw=1,31),ip=12,12)/
906 & -0.2241E-09, -0.4142E-09, -0.7312E-09, -0.1214E-08, -0.1854E-08,
907 & -0.2578E-08, -0.3250E-08, -0.3765E-08, -0.4238E-08, -0.4809E-08,
908 & -0.5553E-08, -0.7132E-08, -0.1035E-07, -0.1538E-07, -0.2211E-07,
909 & -0.3079E-07, -0.4142E-07, -0.5303E-07, -0.6437E-07, -0.7566E-07,
910 & -0.8703E-07, -0.9700E-07, -0.1025E-06, -0.9718E-07, -0.6973E-07,
911 & -0.5265E-09, 0.1413E-06, 0.3895E-06, 0.7321E-06, 0.1085E-05,
912 & 0.1449E-05/
913 data ((h21(ip,iw,1),iw=1,31),ip=13,13)/
914 & 0.3920E-05, 0.7668E-05, 0.1480E-04, 0.2798E-04, 0.5143E-04,
915 & 0.9106E-04, 0.1542E-03, 0.2488E-03, 0.3827E-03, 0.5661E-03,
916 & 0.8143E-03, 0.1150E-02, 0.1608E-02, 0.2246E-02, 0.3147E-02,
917 & 0.4428E-02, 0.6248E-02, 0.8823E-02, 0.1244E-01, 0.1750E-01,
918 & 0.2452E-01, 0.3424E-01, 0.4756E-01, 0.6564E-01, 0.8981E-01,
919 & 0.1215E+00, 0.1619E+00, 0.2118E+00, 0.2713E+00, 0.3409E+00,
920 & 0.4215E+00/
921 data ((h22(ip,iw,1),iw=1,31),ip=13,13)/
922 & -0.5677E-07, -0.1090E-06, -0.2043E-06, -0.3709E-06, -0.6448E-06,
923 & -0.1066E-05, -0.1669E-05, -0.2480E-05, -0.3532E-05, -0.4887E-05,
924 & -0.6650E-05, -0.9017E-05, -0.1232E-04, -0.1701E-04, -0.2372E-04,
925 & -0.3325E-04, -0.4664E-04, -0.6528E-04, -0.9095E-04, -0.1260E-03,
926 & -0.1737E-03, -0.2381E-03, -0.3238E-03, -0.4359E-03, -0.5789E-03,
927 & -0.7549E-03, -0.9607E-03, -0.1188E-02, -0.1427E-02, -0.1674E-02,
928 & -0.1914E-02/
929 data ((h23(ip,iw,1),iw=1,31),ip=13,13)/
930 & -0.2262E-09, -0.4191E-09, -0.7441E-09, -0.1244E-08, -0.1916E-08,
931 & -0.2687E-08, -0.3407E-08, -0.3947E-08, -0.4432E-08, -0.5059E-08,
932 & -0.5896E-08, -0.7538E-08, -0.1079E-07, -0.1606E-07, -0.2346E-07,
933 & -0.3305E-07, -0.4459E-07, -0.5720E-07, -0.6999E-07, -0.8300E-07,
934 & -0.9536E-07, -0.1039E-06, -0.1036E-06, -0.8526E-07, -0.3316E-07,
935 & 0.7909E-07, 0.2865E-06, 0.6013E-06, 0.9580E-06, 0.1303E-05,
936 & 0.1792E-05/
937 data ((h21(ip,iw,1),iw=1,31),ip=14,14)/
938 & 0.3923E-05, 0.7691E-05, 0.1491E-04, 0.2836E-04, 0.5261E-04,
939 & 0.9432E-04, 0.1623E-03, 0.2667E-03, 0.4187E-03, 0.6323E-03,
940 & 0.9278E-03, 0.1334E-02, 0.1897E-02, 0.2685E-02, 0.3800E-02,
941 & 0.5388E-02, 0.7646E-02, 0.1084E-01, 0.1533E-01, 0.2160E-01,
942 & 0.3031E-01, 0.4231E-01, 0.5866E-01, 0.8064E-01, 0.1097E+00,
943 & 0.1471E+00, 0.1938E+00, 0.2501E+00, 0.3163E+00, 0.3932E+00,
944 & 0.4810E+00/
945 data ((h22(ip,iw,1),iw=1,31),ip=14,14)/
946 & -0.5703E-07, -0.1098E-06, -0.2071E-06, -0.3788E-06, -0.6657E-06,
947 & -0.1116E-05, -0.1776E-05, -0.2687E-05, -0.3898E-05, -0.5493E-05,
948 & -0.7607E-05, -0.1048E-04, -0.1450E-04, -0.2024E-04, -0.2845E-04,
949 & -0.4014E-04, -0.5658E-04, -0.7947E-04, -0.1110E-03, -0.1541E-03,
950 & -0.2125E-03, -0.2907E-03, -0.3936E-03, -0.5261E-03, -0.6912E-03,
951 & -0.8880E-03, -0.1109E-02, -0.1346E-02, -0.1591E-02, -0.1837E-02,
952 & -0.2054E-02/
953 data ((h23(ip,iw,1),iw=1,31),ip=14,14)/
954 & -0.2288E-09, -0.4265E-09, -0.7627E-09, -0.1289E-08, -0.2011E-08,
955 & -0.2861E-08, -0.3673E-08, -0.4288E-08, -0.4812E-08, -0.5475E-08,
956 & -0.6365E-08, -0.8052E-08, -0.1142E-07, -0.1711E-07, -0.2533E-07,
957 & -0.3597E-07, -0.4862E-07, -0.6259E-07, -0.7708E-07, -0.9150E-07,
958 & -0.1035E-06, -0.1079E-06, -0.9742E-07, -0.5928E-07, 0.2892E-07,
959 & 0.1998E-06, 0.4789E-06, 0.8298E-06, 0.1172E-05, 0.1583E-05,
960 & 0.2329E-05/
961 data ((h21(ip,iw,1),iw=1,31),ip=15,15)/
962 & 0.3928E-05, 0.7724E-05, 0.1504E-04, 0.2883E-04, 0.5403E-04,
963 & 0.9826E-04, 0.1722E-03, 0.2891E-03, 0.4644E-03, 0.7172E-03,
964 & 0.1074E-02, 0.1572E-02, 0.2267E-02, 0.3245E-02, 0.4632E-02,
965 & 0.6606E-02, 0.9411E-02, 0.1338E-01, 0.1896E-01, 0.2674E-01,
966 & 0.3751E-01, 0.5227E-01, 0.7222E-01, 0.9875E-01, 0.1332E+00,
967 & 0.1768E+00, 0.2299E+00, 0.2927E+00, 0.3660E+00, 0.4504E+00,
968 & 0.5444E+00/
969 data ((h22(ip,iw,1),iw=1,31),ip=15,15)/
970 & -0.5736E-07, -0.1109E-06, -0.2106E-06, -0.3890E-06, -0.6928E-06,
971 & -0.1181E-05, -0.1917E-05, -0.2965E-05, -0.4396E-05, -0.6315E-05,
972 & -0.8891E-05, -0.1242E-04, -0.1736E-04, -0.2442E-04, -0.3454E-04,
973 & -0.4892E-04, -0.6916E-04, -0.9735E-04, -0.1362E-03, -0.1891E-03,
974 & -0.2602E-03, -0.3545E-03, -0.4768E-03, -0.6310E-03, -0.8179E-03,
975 & -0.1032E-02, -0.1265E-02, -0.1508E-02, -0.1757E-02, -0.1989E-02,
976 & -0.2159E-02/
977 data ((h23(ip,iw,1),iw=1,31),ip=15,15)/
978 & -0.2321E-09, -0.4350E-09, -0.7861E-09, -0.1347E-08, -0.2144E-08,
979 & -0.3120E-08, -0.4107E-08, -0.4892E-08, -0.5511E-08, -0.6164E-08,
980 & -0.7054E-08, -0.8811E-08, -0.1240E-07, -0.1862E-07, -0.2773E-07,
981 & -0.3957E-07, -0.5371E-07, -0.6939E-07, -0.8564E-07, -0.1006E-06,
982 & -0.1100E-06, -0.1066E-06, -0.8018E-07, -0.1228E-07, 0.1263E-06,
983 & 0.3678E-06, 0.7022E-06, 0.1049E-05, 0.1411E-05, 0.2015E-05,
984 & 0.3099E-05/
985 data ((h21(ip,iw,1),iw=1,31),ip=16,16)/
986 & 0.2064E-05, 0.4104E-05, 0.8141E-05, 0.1607E-04, 0.3145E-04,
987 & 0.6080E-04, 0.1153E-03, 0.2129E-03, 0.3802E-03, 0.6538E-03,
988 & 0.1078E-02, 0.1699E-02, 0.2576E-02, 0.3805E-02, 0.5540E-02,
989 & 0.8004E-02, 0.1149E-01, 0.1640E-01, 0.2329E-01, 0.3290E-01,
990 & 0.4622E-01, 0.6441E-01, 0.8888E-01, 0.1210E+00, 0.1622E+00,
991 & 0.2132E+00, 0.2745E+00, 0.3470E+00, 0.4317E+00, 0.5286E+00,
992 & 0.6335E+00/
993 data ((h22(ip,iw,1),iw=1,31),ip=16,16)/
994 & -0.3122E-07, -0.6175E-07, -0.1214E-06, -0.2361E-06, -0.4518E-06,
995 & -0.8438E-06, -0.1524E-05, -0.2643E-05, -0.4380E-05, -0.6922E-05,
996 & -0.1042E-04, -0.1504E-04, -0.2125E-04, -0.2987E-04, -0.4200E-04,
997 & -0.5923E-04, -0.8383E-04, -0.1186E-03, -0.1670E-03, -0.2328E-03,
998 & -0.3204E-03, -0.4347E-03, -0.5802E-03, -0.7595E-03, -0.9703E-03,
999 & -0.1205E-02, -0.1457E-02, -0.1720E-02, -0.1980E-02, -0.2191E-02,
1000 & -0.2290E-02/
1001 data ((h23(ip,iw,1),iw=1,31),ip=16,16)/
1002 & -0.1376E-09, -0.2699E-09, -0.5220E-09, -0.9897E-09, -0.1819E-08,
1003 & -0.3186E-08, -0.5224E-08, -0.7896E-08, -0.1090E-07, -0.1349E-07,
1004 & -0.1443E-07, -0.1374E-07, -0.1386E-07, -0.1673E-07, -0.2237E-07,
1005 & -0.3248E-07, -0.5050E-07, -0.7743E-07, -0.1097E-06, -0.1369E-06,
1006 & -0.1463E-06, -0.1268E-06, -0.6424E-07, 0.5941E-07, 0.2742E-06,
1007 & 0.5924E-06, 0.9445E-06, 0.1286E-05, 0.1819E-05, 0.2867E-05,
1008 & 0.4527E-05/
1009 data ((h21(ip,iw,1),iw=1,31),ip=17,17)/
1010 & 0.2452E-05, 0.4881E-05, 0.9693E-05, 0.1918E-04, 0.3768E-04,
1011 & 0.7322E-04, 0.1399E-03, 0.2607E-03, 0.4694E-03, 0.8102E-03,
1012 & 0.1334E-02, 0.2098E-02, 0.3180E-02, 0.4710E-02, 0.6879E-02,
1013 & 0.9952E-02, 0.1429E-01, 0.2038E-01, 0.2894E-01, 0.4085E-01,
1014 & 0.5722E-01, 0.7939E-01, 0.1088E+00, 0.1468E+00, 0.1945E+00,
1015 & 0.2524E+00, 0.3210E+00, 0.4017E+00, 0.4948E+00, 0.5978E+00,
1016 & 0.7040E+00/
1017 data ((h22(ip,iw,1),iw=1,31),ip=17,17)/
1018 & -0.3547E-07, -0.7029E-07, -0.1386E-06, -0.2709E-06, -0.5218E-06,
1019 & -0.9840E-06, -0.1799E-05, -0.3156E-05, -0.5272E-05, -0.8357E-05,
1020 & -0.1260E-04, -0.1827E-04, -0.2598E-04, -0.3667E-04, -0.5169E-04,
1021 & -0.7312E-04, -0.1037E-03, -0.1467E-03, -0.2060E-03, -0.2857E-03,
1022 & -0.3907E-03, -0.5257E-03, -0.6940E-03, -0.8954E-03, -0.1124E-02,
1023 & -0.1371E-02, -0.1632E-02, -0.1897E-02, -0.2131E-02, -0.2275E-02,
1024 & -0.2265E-02/
1025 data ((h23(ip,iw,1),iw=1,31),ip=17,17)/
1026 & -0.1482E-09, -0.2910E-09, -0.5667E-09, -0.1081E-08, -0.2005E-08,
1027 & -0.3554E-08, -0.5902E-08, -0.8925E-08, -0.1209E-07, -0.1448E-07,
1028 & -0.1536E-07, -0.1565E-07, -0.1763E-07, -0.2088E-07, -0.2564E-07,
1029 & -0.3635E-07, -0.5791E-07, -0.8907E-07, -0.1213E-06, -0.1418E-06,
1030 & -0.1397E-06, -0.1000E-06, -0.4427E-08, 0.1713E-06, 0.4536E-06,
1031 & 0.8086E-06, 0.1153E-05, 0.1588E-05, 0.2437E-05, 0.3905E-05,
1032 & 0.5874E-05/
1033 data ((h21(ip,iw,1),iw=1,31),ip=18,18)/
1034 & 0.2878E-05, 0.5733E-05, 0.1140E-04, 0.2258E-04, 0.4446E-04,
1035 & 0.8668E-04, 0.1664E-03, 0.3120E-03, 0.5656E-03, 0.9812E-03,
1036 & 0.1621E-02, 0.2559E-02, 0.3902E-02, 0.5812E-02, 0.8522E-02,
1037 & 0.1235E-01, 0.1773E-01, 0.2530E-01, 0.3590E-01, 0.5058E-01,
1038 & 0.7059E-01, 0.9736E-01, 0.1323E+00, 0.1767E+00, 0.2312E+00,
1039 & 0.2962E+00, 0.3728E+00, 0.4619E+00, 0.5623E+00, 0.6685E+00,
1040 & 0.7716E+00/
1041 data ((h22(ip,iw,1),iw=1,31),ip=18,18)/
1042 & -0.4064E-07, -0.8066E-07, -0.1593E-06, -0.3124E-06, -0.6049E-06,
1043 & -0.1148E-05, -0.2118E-05, -0.3751E-05, -0.6314E-05, -0.1006E-04,
1044 & -0.1526E-04, -0.2232E-04, -0.3196E-04, -0.4525E-04, -0.6394E-04,
1045 & -0.9058E-04, -0.1284E-03, -0.1812E-03, -0.2533E-03, -0.3493E-03,
1046 & -0.4740E-03, -0.6315E-03, -0.8228E-03, -0.1044E-02, -0.1286E-02,
1047 & -0.1544E-02, -0.1810E-02, -0.2061E-02, -0.2243E-02, -0.2291E-02,
1048 & -0.2152E-02/
1049 data ((h23(ip,iw,1),iw=1,31),ip=18,18)/
1050 & -0.1630E-09, -0.3213E-09, -0.6266E-09, -0.1201E-08, -0.2248E-08,
1051 & -0.4030E-08, -0.6770E-08, -0.1033E-07, -0.1392E-07, -0.1640E-07,
1052 & -0.1768E-07, -0.1932E-07, -0.2229E-07, -0.2508E-07, -0.2940E-07,
1053 & -0.4200E-07, -0.6717E-07, -0.1002E-06, -0.1286E-06, -0.1402E-06,
1054 & -0.1216E-06, -0.5487E-07, 0.8418E-07, 0.3246E-06, 0.6610E-06,
1055 & 0.1013E-05, 0.1394E-05, 0.2073E-05, 0.3337E-05, 0.5175E-05,
1056 & 0.7255E-05/
1057 data ((h21(ip,iw,1),iw=1,31),ip=19,19)/
1058 & 0.3282E-05, 0.6539E-05, 0.1300E-04, 0.2578E-04, 0.5085E-04,
1059 & 0.9936E-04, 0.1914E-03, 0.3608E-03, 0.6586E-03, 0.1153E-02,
1060 & 0.1924E-02, 0.3074E-02, 0.4742E-02, 0.7126E-02, 0.1051E-01,
1061 & 0.1526E-01, 0.2195E-01, 0.3133E-01, 0.4441E-01, 0.6238E-01,
1062 & 0.8664E-01, 0.1186E+00, 0.1597E+00, 0.2108E+00, 0.2723E+00,
1063 & 0.3450E+00, 0.4300E+00, 0.5272E+00, 0.6324E+00, 0.7378E+00,
1064 & 0.8330E+00/
1065 data ((h22(ip,iw,1),iw=1,31),ip=19,19)/
1066 & -0.4629E-07, -0.9195E-07, -0.1819E-06, -0.3572E-06, -0.6936E-06,
1067 & -0.1323E-05, -0.2456E-05, -0.4385E-05, -0.7453E-05, -0.1200E-04,
1068 & -0.1843E-04, -0.2731E-04, -0.3943E-04, -0.5606E-04, -0.7936E-04,
1069 & -0.1123E-03, -0.1588E-03, -0.2231E-03, -0.3101E-03, -0.4247E-03,
1070 & -0.5713E-03, -0.7522E-03, -0.9651E-03, -0.1202E-02, -0.1456E-02,
1071 & -0.1721E-02, -0.1983E-02, -0.2196E-02, -0.2296E-02, -0.2224E-02,
1072 & -0.1952E-02/
1073 data ((h23(ip,iw,1),iw=1,31),ip=19,19)/
1074 & -0.1827E-09, -0.3607E-09, -0.7057E-09, -0.1359E-08, -0.2552E-08,
1075 & -0.4615E-08, -0.7854E-08, -0.1218E-07, -0.1670E-07, -0.2008E-07,
1076 & -0.2241E-07, -0.2516E-07, -0.2796E-07, -0.3015E-07, -0.3506E-07,
1077 & -0.4958E-07, -0.7627E-07, -0.1070E-06, -0.1289E-06, -0.1286E-06,
1078 & -0.8843E-07, 0.1492E-07, 0.2118E-06, 0.5155E-06, 0.8665E-06,
1079 & 0.1220E-05, 0.1765E-05, 0.2825E-05, 0.4498E-05, 0.6563E-05,
1080 & 0.8422E-05/
1081 data ((h21(ip,iw,1),iw=1,31),ip=20,20)/
1082 & 0.3608E-05, 0.7189E-05, 0.1430E-04, 0.2837E-04, 0.5601E-04,
1083 & 0.1097E-03, 0.2120E-03, 0.4017E-03, 0.7396E-03, 0.1311E-02,
1084 & 0.2226E-02, 0.3624E-02, 0.5685E-02, 0.8652E-02, 0.1286E-01,
1085 & 0.1878E-01, 0.2709E-01, 0.3868E-01, 0.5471E-01, 0.7654E-01,
1086 & 0.1057E+00, 0.1435E+00, 0.1912E+00, 0.2492E+00, 0.3181E+00,
1087 & 0.3990E+00, 0.4926E+00, 0.5960E+00, 0.7027E+00, 0.8027E+00,
1088 & 0.8852E+00/
1089 data ((h22(ip,iw,1),iw=1,31),ip=20,20)/
1090 & -0.5164E-07, -0.1026E-06, -0.2031E-06, -0.3994E-06, -0.7771E-06,
1091 & -0.1488E-05, -0.2776E-05, -0.5001E-05, -0.8610E-05, -0.1411E-04,
1092 & -0.2209E-04, -0.3328E-04, -0.4860E-04, -0.6954E-04, -0.9861E-04,
1093 & -0.1393E-03, -0.1961E-03, -0.2738E-03, -0.3778E-03, -0.5132E-03,
1094 & -0.6831E-03, -0.8868E-03, -0.1118E-02, -0.1368E-02, -0.1632E-02,
1095 & -0.1899E-02, -0.2136E-02, -0.2282E-02, -0.2273E-02, -0.2067E-02,
1096 & -0.1679E-02/
1097 data ((h23(ip,iw,1),iw=1,31),ip=20,20)/
1098 & -0.2058E-09, -0.4066E-09, -0.7967E-09, -0.1539E-08, -0.2904E-08,
1099 & -0.5293E-08, -0.9116E-08, -0.1447E-07, -0.2058E-07, -0.2608E-07,
1100 & -0.3053E-07, -0.3418E-07, -0.3619E-07, -0.3766E-07, -0.4313E-07,
1101 & -0.5817E-07, -0.8299E-07, -0.1072E-06, -0.1195E-06, -0.1031E-06,
1102 & -0.3275E-07, 0.1215E-06, 0.3835E-06, 0.7220E-06, 0.1062E-05,
1103 & 0.1504E-05, 0.2367E-05, 0.3854E-05, 0.5842E-05, 0.7875E-05,
1104 & 0.9082E-05/
1105 data ((h21(ip,iw,1),iw=1,31),ip=21,21)/
1106 & 0.3827E-05, 0.7626E-05, 0.1518E-04, 0.3013E-04, 0.5955E-04,
1107 & 0.1169E-03, 0.2268E-03, 0.4325E-03, 0.8046E-03, 0.1449E-02,
1108 & 0.2512E-02, 0.4185E-02, 0.6707E-02, 0.1038E-01, 0.1561E-01,
1109 & 0.2298E-01, 0.3328E-01, 0.4754E-01, 0.6708E-01, 0.9340E-01,
1110 & 0.1280E+00, 0.1722E+00, 0.2267E+00, 0.2918E+00, 0.3688E+00,
1111 & 0.4584E+00, 0.5594E+00, 0.6662E+00, 0.7700E+00, 0.8597E+00,
1112 & 0.9266E+00/
1113 data ((h22(ip,iw,1),iw=1,31),ip=21,21)/
1114 & -0.5584E-07, -0.1110E-06, -0.2198E-06, -0.4329E-06, -0.8444E-06,
1115 & -0.1623E-05, -0.3049E-05, -0.5551E-05, -0.9714E-05, -0.1627E-04,
1116 & -0.2609E-04, -0.4015E-04, -0.5955E-04, -0.8603E-04, -0.1223E-03,
1117 & -0.1724E-03, -0.2413E-03, -0.3346E-03, -0.4578E-03, -0.6155E-03,
1118 & -0.8087E-03, -0.1033E-02, -0.1279E-02, -0.1540E-02, -0.1811E-02,
1119 & -0.2065E-02, -0.2251E-02, -0.2301E-02, -0.2163E-02, -0.1828E-02,
1120 & -0.1365E-02/
1121 data ((h23(ip,iw,1),iw=1,31),ip=21,21)/
1122 & -0.2274E-09, -0.4498E-09, -0.8814E-09, -0.1708E-08, -0.3247E-08,
1123 & -0.5972E-08, -0.1045E-07, -0.1707E-07, -0.2545E-07, -0.3440E-07,
1124 & -0.4259E-07, -0.4822E-07, -0.5004E-07, -0.5061E-07, -0.5485E-07,
1125 & -0.6687E-07, -0.8483E-07, -0.9896E-07, -0.9646E-07, -0.5557E-07,
1126 & 0.5765E-07, 0.2752E-06, 0.5870E-06, 0.9188E-06, 0.1291E-05,
1127 & 0.1971E-05, 0.3251E-05, 0.5115E-05, 0.7221E-05, 0.8825E-05,
1128 & 0.9032E-05/
1129 data ((h21(ip,iw,1),iw=1,31),ip=22,22)/
1130 & 0.3938E-05, 0.7849E-05, 0.1563E-04, 0.3105E-04, 0.6149E-04,
1131 & 0.1210E-03, 0.2361E-03, 0.4537E-03, 0.8543E-03, 0.1565E-02,
1132 & 0.2774E-02, 0.4739E-02, 0.7781E-02, 0.1229E-01, 0.1877E-01,
1133 & 0.2791E-01, 0.4064E-01, 0.5812E-01, 0.8180E-01, 0.1132E+00,
1134 & 0.1539E+00, 0.2047E+00, 0.2662E+00, 0.3391E+00, 0.4247E+00,
1135 & 0.5226E+00, 0.6287E+00, 0.7351E+00, 0.8311E+00, 0.9066E+00,
1136 & 0.9569E+00/
1137 data ((h22(ip,iw,1),iw=1,31),ip=22,22)/
1138 & -0.5833E-07, -0.1160E-06, -0.2300E-06, -0.4540E-06, -0.8885E-06,
1139 & -0.1718E-05, -0.3256E-05, -0.6010E-05, -0.1072E-04, -0.1838E-04,
1140 & -0.3026E-04, -0.4772E-04, -0.7223E-04, -0.1057E-03, -0.1512E-03,
1141 & -0.2128E-03, -0.2961E-03, -0.4070E-03, -0.5514E-03, -0.7320E-03,
1142 & -0.9467E-03, -0.1187E-02, -0.1446E-02, -0.1717E-02, -0.1985E-02,
1143 & -0.2203E-02, -0.2307E-02, -0.2237E-02, -0.1965E-02, -0.1532E-02,
1144 & -0.1044E-02/
1145 data ((h23(ip,iw,1),iw=1,31),ip=22,22)/
1146 & -0.2426E-09, -0.4805E-09, -0.9447E-09, -0.1841E-08, -0.3519E-08,
1147 & -0.6565E-08, -0.1172E-07, -0.1979E-07, -0.3095E-07, -0.4443E-07,
1148 & -0.5821E-07, -0.6868E-07, -0.7282E-07, -0.7208E-07, -0.7176E-07,
1149 & -0.7562E-07, -0.8110E-07, -0.7934E-07, -0.5365E-07, 0.2483E-07,
1150 & 0.1959E-06, 0.4731E-06, 0.7954E-06, 0.1123E-05, 0.1652E-05,
1151 & 0.2711E-05, 0.4402E-05, 0.6498E-05, 0.8392E-05, 0.9154E-05,
1152 & 0.8261E-05/
1153 data ((h21(ip,iw,1),iw=1,31),ip=23,23)/
1154 & 0.3973E-05, 0.7921E-05, 0.1578E-04, 0.3139E-04, 0.6229E-04,
1155 & 0.1231E-03, 0.2414E-03, 0.4680E-03, 0.8923E-03, 0.1663E-02,
1156 & 0.3011E-02, 0.5268E-02, 0.8869E-02, 0.1434E-01, 0.2230E-01,
1157 & 0.3359E-01, 0.4924E-01, 0.7057E-01, 0.9908E-01, 0.1363E+00,
1158 & 0.1834E+00, 0.2411E+00, 0.3100E+00, 0.3913E+00, 0.4856E+00,
1159 & 0.5901E+00, 0.6981E+00, 0.7994E+00, 0.8832E+00, 0.9424E+00,
1160 & 0.9773E+00/
1161 data ((h22(ip,iw,1),iw=1,31),ip=23,23)/
1162 & -0.5929E-07, -0.1180E-06, -0.2344E-06, -0.4638E-06, -0.9118E-06,
1163 & -0.1775E-05, -0.3401E-05, -0.6375E-05, -0.1160E-04, -0.2039E-04,
1164 & -0.3444E-04, -0.5575E-04, -0.8641E-04, -0.1287E-03, -0.1856E-03,
1165 & -0.2615E-03, -0.3618E-03, -0.4928E-03, -0.6594E-03, -0.8621E-03,
1166 & -0.1095E-02, -0.1349E-02, -0.1618E-02, -0.1894E-02, -0.2140E-02,
1167 & -0.2293E-02, -0.2290E-02, -0.2085E-02, -0.1696E-02, -0.1212E-02,
1168 & -0.7506E-03/
1169 data ((h23(ip,iw,1),iw=1,31),ip=23,23)/
1170 & -0.2496E-09, -0.4954E-09, -0.9780E-09, -0.1915E-08, -0.3697E-08,
1171 & -0.6991E-08, -0.1279E-07, -0.2231E-07, -0.3653E-07, -0.5541E-07,
1172 & -0.7688E-07, -0.9614E-07, -0.1069E-06, -0.1065E-06, -0.9866E-07,
1173 & -0.8740E-07, -0.7192E-07, -0.4304E-07, 0.1982E-07, 0.1525E-06,
1174 & 0.3873E-06, 0.6947E-06, 0.1000E-05, 0.1409E-05, 0.2253E-05,
1175 & 0.3739E-05, 0.5744E-05, 0.7812E-05, 0.9067E-05, 0.8746E-05,
1176 & 0.6940E-05/
1177 data ((h21(ip,iw,1),iw=1,31),ip=24,24)/
1178 & 0.3978E-05, 0.7933E-05, 0.1581E-04, 0.3149E-04, 0.6260E-04,
1179 & 0.1240E-03, 0.2445E-03, 0.4777E-03, 0.9213E-03, 0.1743E-02,
1180 & 0.3217E-02, 0.5756E-02, 0.9929E-02, 0.1644E-01, 0.2612E-01,
1181 & 0.3995E-01, 0.5910E-01, 0.8497E-01, 0.1190E+00, 0.1626E+00,
1182 & 0.2165E+00, 0.2813E+00, 0.3583E+00, 0.4485E+00, 0.5505E+00,
1183 & 0.6590E+00, 0.7646E+00, 0.8562E+00, 0.9245E+00, 0.9676E+00,
1184 & 0.9897E+00/
1185 data ((h22(ip,iw,1),iw=1,31),ip=24,24)/
1186 & -0.5950E-07, -0.1185E-06, -0.2358E-06, -0.4678E-06, -0.9235E-06,
1187 & -0.1810E-05, -0.3503E-05, -0.6664E-05, -0.1236E-04, -0.2223E-04,
1188 & -0.3849E-04, -0.6396E-04, -0.1017E-03, -0.1545E-03, -0.2257E-03,
1189 & -0.3192E-03, -0.4399E-03, -0.5933E-03, -0.7824E-03, -0.1005E-02,
1190 & -0.1251E-02, -0.1516E-02, -0.1794E-02, -0.2060E-02, -0.2257E-02,
1191 & -0.2318E-02, -0.2186E-02, -0.1853E-02, -0.1386E-02, -0.9021E-03,
1192 & -0.5050E-03/
1193 data ((h23(ip,iw,1),iw=1,31),ip=24,24)/
1194 & -0.2515E-09, -0.5001E-09, -0.9904E-09, -0.1951E-08, -0.3800E-08,
1195 & -0.7288E-08, -0.1362E-07, -0.2452E-07, -0.4184E-07, -0.6663E-07,
1196 & -0.9770E-07, -0.1299E-06, -0.1533E-06, -0.1584E-06, -0.1425E-06,
1197 & -0.1093E-06, -0.5972E-07, 0.1426E-07, 0.1347E-06, 0.3364E-06,
1198 & 0.6209E-06, 0.9169E-06, 0.1243E-05, 0.1883E-05, 0.3145E-05,
1199 & 0.5011E-05, 0.7136E-05, 0.8785E-05, 0.9048E-05, 0.7686E-05,
1200 & 0.5368E-05/
1201 data ((h21(ip,iw,1),iw=1,31),ip=25,25)/
1202 & 0.3978E-05, 0.7934E-05, 0.1582E-04, 0.3153E-04, 0.6275E-04,
1203 & 0.1246E-03, 0.2466E-03, 0.4847E-03, 0.9432E-03, 0.1808E-02,
1204 & 0.3392E-02, 0.6189E-02, 0.1092E-01, 0.1852E-01, 0.3009E-01,
1205 & 0.4683E-01, 0.7008E-01, 0.1012E+00, 0.1416E+00, 0.1920E+00,
1206 & 0.2531E+00, 0.3258E+00, 0.4115E+00, 0.5102E+00, 0.6180E+00,
1207 & 0.7267E+00, 0.8252E+00, 0.9030E+00, 0.9550E+00, 0.9838E+00,
1208 & 0.9965E+00/
1209 data ((h22(ip,iw,1),iw=1,31),ip=25,25)/
1210 & -0.5953E-07, -0.1187E-06, -0.2363E-06, -0.4697E-06, -0.9304E-06,
1211 & -0.1833E-05, -0.3578E-05, -0.6889E-05, -0.1299E-04, -0.2384E-04,
1212 & -0.4227E-04, -0.7201E-04, -0.1174E-03, -0.1825E-03, -0.2710E-03,
1213 & -0.3861E-03, -0.5313E-03, -0.7095E-03, -0.9203E-03, -0.1158E-02,
1214 & -0.1417E-02, -0.1691E-02, -0.1968E-02, -0.2200E-02, -0.2320E-02,
1215 & -0.2263E-02, -0.1998E-02, -0.1563E-02, -0.1068E-02, -0.6300E-03,
1216 & -0.3174E-03/
1217 data ((h23(ip,iw,1),iw=1,31),ip=25,25)/
1218 & -0.2520E-09, -0.5016E-09, -0.9963E-09, -0.1971E-08, -0.3867E-08,
1219 & -0.7500E-08, -0.1427E-07, -0.2634E-07, -0.4656E-07, -0.7753E-07,
1220 & -0.1196E-06, -0.1683E-06, -0.2113E-06, -0.2309E-06, -0.2119E-06,
1221 & -0.1518E-06, -0.5200E-07, 0.9274E-07, 0.2973E-06, 0.5714E-06,
1222 & 0.8687E-06, 0.1152E-05, 0.1621E-05, 0.2634E-05, 0.4310E-05,
1223 & 0.6418E-05, 0.8347E-05, 0.9162E-05, 0.8319E-05, 0.6209E-05,
1224 & 0.3844E-05/
1225 data ((h21(ip,iw,1),iw=1,31),ip=26,26)/
1226 & 0.3976E-05, 0.7932E-05, 0.1582E-04, 0.3154E-04, 0.6284E-04,
1227 & 0.1250E-03, 0.2479E-03, 0.4896E-03, 0.9592E-03, 0.1857E-02,
1228 & 0.3532E-02, 0.6558E-02, 0.1181E-01, 0.2048E-01, 0.3402E-01,
1229 & 0.5399E-01, 0.8188E-01, 0.1190E+00, 0.1664E+00, 0.2243E+00,
1230 & 0.2933E+00, 0.3747E+00, 0.4695E+00, 0.5755E+00, 0.6858E+00,
1231 & 0.7903E+00, 0.8773E+00, 0.9391E+00, 0.9758E+00, 0.9934E+00,
1232 & 0.9996E+00/
1233 data ((h22(ip,iw,1),iw=1,31),ip=26,26)/
1234 & -0.5954E-07, -0.1187E-06, -0.2366E-06, -0.4709E-06, -0.9349E-06,
1235 & -0.1849E-05, -0.3632E-05, -0.7058E-05, -0.1350E-04, -0.2521E-04,
1236 & -0.4564E-04, -0.7958E-04, -0.1329E-03, -0.2114E-03, -0.3200E-03,
1237 & -0.4611E-03, -0.6353E-03, -0.8409E-03, -0.1072E-02, -0.1324E-02,
1238 & -0.1592E-02, -0.1871E-02, -0.2127E-02, -0.2297E-02, -0.2312E-02,
1239 & -0.2123E-02, -0.1738E-02, -0.1247E-02, -0.7744E-03, -0.4117E-03,
1240 & -0.1850E-03/
1241 data ((h23(ip,iw,1),iw=1,31),ip=26,26)/
1242 & -0.2522E-09, -0.5025E-09, -0.9997E-09, -0.1983E-08, -0.3912E-08,
1243 & -0.7650E-08, -0.1474E-07, -0.2777E-07, -0.5055E-07, -0.8745E-07,
1244 & -0.1414E-06, -0.2095E-06, -0.2790E-06, -0.3241E-06, -0.3135E-06,
1245 & -0.2269E-06, -0.5896E-07, 0.1875E-06, 0.4996E-06, 0.8299E-06,
1246 & 0.1115E-05, 0.1467E-05, 0.2236E-05, 0.3672E-05, 0.5668E-05,
1247 & 0.7772E-05, 0.9094E-05, 0.8827E-05, 0.7041E-05, 0.4638E-05,
1248 & 0.2539E-05/
1249 data ((h81(ip,iw,1),iw=1,31),ip= 1, 1)/
1250 & 0.1342E-04, 0.2640E-04, 0.5137E-04, 0.9829E-04, 0.1832E-03,
1251 & 0.3284E-03, 0.5585E-03, 0.8907E-03, 0.1327E-02, 0.1856E-02,
1252 & 0.2461E-02, 0.3138E-02, 0.3898E-02, 0.4766E-02, 0.5783E-02,
1253 & 0.7007E-02, 0.8521E-02, 0.1041E-01, 0.1278E-01, 0.1570E-01,
1254 & 0.1928E-01, 0.2361E-01, 0.2884E-01, 0.3520E-01, 0.4305E-01,
1255 & 0.5286E-01, 0.6531E-01, 0.8127E-01, 0.1019E+00, 0.1287E+00,
1256 & 0.1632E+00/
1257 data ((h82(ip,iw,1),iw=1,31),ip= 1, 1)/
1258 & -0.5685E-08, -0.1331E-07, -0.3249E-07, -0.8137E-07, -0.2048E-06,
1259 & -0.4973E-06, -0.1118E-05, -0.2246E-05, -0.3982E-05, -0.6290E-05,
1260 & -0.9040E-05, -0.1215E-04, -0.1567E-04, -0.1970E-04, -0.2449E-04,
1261 & -0.3046E-04, -0.3798E-04, -0.4725E-04, -0.5831E-04, -0.7123E-04,
1262 & -0.8605E-04, -0.1028E-03, -0.1212E-03, -0.1413E-03, -0.1635E-03,
1263 & -0.1884E-03, -0.2160E-03, -0.2461E-03, -0.2778E-03, -0.3098E-03,
1264 & -0.3411E-03/
1265 data ((h83(ip,iw,1),iw=1,31),ip= 1, 1)/
1266 & 0.2169E-10, 0.5237E-10, 0.1296E-09, 0.3204E-09, 0.7665E-09,
1267 & 0.1691E-08, 0.3222E-08, 0.5110E-08, 0.6779E-08, 0.7681E-08,
1268 & 0.7378E-08, 0.5836E-08, 0.3191E-08, -0.1491E-08, -0.1022E-07,
1269 & -0.2359E-07, -0.3957E-07, -0.5553E-07, -0.6927E-07, -0.7849E-07,
1270 & -0.8139E-07, -0.7853E-07, -0.7368E-07, -0.7220E-07, -0.7780E-07,
1271 & -0.9091E-07, -0.1038E-06, -0.9929E-07, -0.5422E-07, 0.5379E-07,
1272 & 0.2350E-06/
1273 data ((h81(ip,iw,1),iw=1,31),ip= 2, 2)/
1274 & 0.1342E-04, 0.2640E-04, 0.5137E-04, 0.9829E-04, 0.1832E-03,
1275 & 0.3284E-03, 0.5586E-03, 0.8908E-03, 0.1327E-02, 0.1856E-02,
1276 & 0.2462E-02, 0.3140E-02, 0.3902E-02, 0.4774E-02, 0.5797E-02,
1277 & 0.7033E-02, 0.8570E-02, 0.1050E-01, 0.1294E-01, 0.1599E-01,
1278 & 0.1979E-01, 0.2448E-01, 0.3024E-01, 0.3738E-01, 0.4633E-01,
1279 & 0.5766E-01, 0.7218E-01, 0.9096E-01, 0.1154E+00, 0.1471E+00,
1280 & 0.1880E+00/
1281 data ((h82(ip,iw,1),iw=1,31),ip= 2, 2)/
1282 & -0.5684E-08, -0.1331E-07, -0.3248E-07, -0.8133E-07, -0.2047E-06,
1283 & -0.4971E-06, -0.1117E-05, -0.2245E-05, -0.3981E-05, -0.6287E-05,
1284 & -0.9035E-05, -0.1215E-04, -0.1565E-04, -0.1967E-04, -0.2444E-04,
1285 & -0.3036E-04, -0.3780E-04, -0.4694E-04, -0.5779E-04, -0.7042E-04,
1286 & -0.8491E-04, -0.1013E-03, -0.1196E-03, -0.1399E-03, -0.1625E-03,
1287 & -0.1879E-03, -0.2163E-03, -0.2474E-03, -0.2803E-03, -0.3140E-03,
1288 & -0.3478E-03/
1289 data ((h83(ip,iw,1),iw=1,31),ip= 2, 2)/
1290 & 0.2168E-10, 0.5242E-10, 0.1295E-09, 0.3201E-09, 0.7662E-09,
1291 & 0.1690E-08, 0.3220E-08, 0.5106E-08, 0.6776E-08, 0.7673E-08,
1292 & 0.7362E-08, 0.5808E-08, 0.3138E-08, -0.1595E-08, -0.1041E-07,
1293 & -0.2390E-07, -0.4010E-07, -0.5636E-07, -0.7045E-07, -0.7972E-07,
1294 & -0.8178E-07, -0.7677E-07, -0.6876E-07, -0.6381E-07, -0.6583E-07,
1295 & -0.7486E-07, -0.8229E-07, -0.7017E-07, -0.1497E-07, 0.1051E-06,
1296 & 0.2990E-06/
1297 data ((h81(ip,iw,1),iw=1,31),ip= 3, 3)/
1298 & 0.1342E-04, 0.2640E-04, 0.5137E-04, 0.9830E-04, 0.1832E-03,
1299 & 0.3285E-03, 0.5587E-03, 0.8911E-03, 0.1328E-02, 0.1857E-02,
1300 & 0.2465E-02, 0.3144E-02, 0.3909E-02, 0.4787E-02, 0.5820E-02,
1301 & 0.7075E-02, 0.8646E-02, 0.1064E-01, 0.1319E-01, 0.1643E-01,
1302 & 0.2053E-01, 0.2569E-01, 0.3215E-01, 0.4028E-01, 0.5059E-01,
1303 & 0.6380E-01, 0.8088E-01, 0.1031E+00, 0.1321E+00, 0.1698E+00,
1304 & 0.2179E+00/
1305 data ((h82(ip,iw,1),iw=1,31),ip= 3, 3)/
1306 & -0.5682E-08, -0.1330E-07, -0.3247E-07, -0.8129E-07, -0.2046E-06,
1307 & -0.4968E-06, -0.1117E-05, -0.2244E-05, -0.3978E-05, -0.6283E-05,
1308 & -0.9027E-05, -0.1213E-04, -0.1563E-04, -0.1963E-04, -0.2436E-04,
1309 & -0.3021E-04, -0.3754E-04, -0.4649E-04, -0.5709E-04, -0.6940E-04,
1310 & -0.8359E-04, -0.9986E-04, -0.1182E-03, -0.1388E-03, -0.1620E-03,
1311 & -0.1882E-03, -0.2175E-03, -0.2498E-03, -0.2843E-03, -0.3203E-03,
1312 & -0.3573E-03/
1313 data ((h83(ip,iw,1),iw=1,31),ip= 3, 3)/
1314 & 0.2167E-10, 0.5238E-10, 0.1294E-09, 0.3198E-09, 0.7656E-09,
1315 & 0.1688E-08, 0.3217E-08, 0.5104E-08, 0.6767E-08, 0.7661E-08,
1316 & 0.7337E-08, 0.5764E-08, 0.3051E-08, -0.1752E-08, -0.1068E-07,
1317 & -0.2436E-07, -0.4081E-07, -0.5740E-07, -0.7165E-07, -0.8046E-07,
1318 & -0.8082E-07, -0.7289E-07, -0.6141E-07, -0.5294E-07, -0.5134E-07,
1319 & -0.5552E-07, -0.5609E-07, -0.3464E-07, 0.3275E-07, 0.1669E-06,
1320 & 0.3745E-06/
1321 data ((h81(ip,iw,1),iw=1,31),ip= 4, 4)/
1322 & 0.1342E-04, 0.2640E-04, 0.5138E-04, 0.9830E-04, 0.1832E-03,
1323 & 0.3286E-03, 0.5589E-03, 0.8915E-03, 0.1329E-02, 0.1859E-02,
1324 & 0.2468E-02, 0.3150E-02, 0.3920E-02, 0.4806E-02, 0.5855E-02,
1325 & 0.7140E-02, 0.8763E-02, 0.1085E-01, 0.1356E-01, 0.1707E-01,
1326 & 0.2158E-01, 0.2736E-01, 0.3471E-01, 0.4407E-01, 0.5608E-01,
1327 & 0.7161E-01, 0.9184E-01, 0.1183E+00, 0.1528E+00, 0.1973E+00,
1328 & 0.2537E+00/
1329 data ((h82(ip,iw,1),iw=1,31),ip= 4, 4)/
1330 & -0.5680E-08, -0.1329E-07, -0.3243E-07, -0.8121E-07, -0.2044E-06,
1331 & -0.4963E-06, -0.1115E-05, -0.2242E-05, -0.3974E-05, -0.6276E-05,
1332 & -0.9015E-05, -0.1211E-04, -0.1559E-04, -0.1956E-04, -0.2423E-04,
1333 & -0.2999E-04, -0.3716E-04, -0.4588E-04, -0.5618E-04, -0.6818E-04,
1334 & -0.8218E-04, -0.9847E-04, -0.1171E-03, -0.1382E-03, -0.1621E-03,
1335 & -0.1892E-03, -0.2197E-03, -0.2535E-03, -0.2902E-03, -0.3293E-03,
1336 & -0.3700E-03/
1337 data ((h83(ip,iw,1),iw=1,31),ip= 4, 4)/
1338 & 0.2166E-10, 0.5229E-10, 0.1294E-09, 0.3193E-09, 0.7644E-09,
1339 & 0.1686E-08, 0.3213E-08, 0.5092E-08, 0.6753E-08, 0.7640E-08,
1340 & 0.7302E-08, 0.5696E-08, 0.2917E-08, -0.1984E-08, -0.1108E-07,
1341 & -0.2497E-07, -0.4171E-07, -0.5849E-07, -0.7254E-07, -0.8017E-07,
1342 & -0.7802E-07, -0.6662E-07, -0.5153E-07, -0.3961E-07, -0.3387E-07,
1343 & -0.3219E-07, -0.2426E-07, 0.8700E-08, 0.9027E-07, 0.2400E-06,
1344 & 0.4623E-06/
1345 data ((h81(ip,iw,1),iw=1,31),ip= 5, 5)/
1346 & 0.1342E-04, 0.2640E-04, 0.5138E-04, 0.9832E-04, 0.1833E-03,
1347 & 0.3287E-03, 0.5591E-03, 0.8922E-03, 0.1330E-02, 0.1862E-02,
1348 & 0.2473E-02, 0.3159E-02, 0.3937E-02, 0.4837E-02, 0.5911E-02,
1349 & 0.7240E-02, 0.8943E-02, 0.1117E-01, 0.1411E-01, 0.1798E-01,
1350 & 0.2304E-01, 0.2961E-01, 0.3807E-01, 0.4896E-01, 0.6308E-01,
1351 & 0.8148E-01, 0.1056E+00, 0.1371E+00, 0.1780E+00, 0.2303E+00,
1352 & 0.2958E+00/
1353 data ((h82(ip,iw,1),iw=1,31),ip= 5, 5)/
1354 & -0.5675E-08, -0.1328E-07, -0.3239E-07, -0.8110E-07, -0.2040E-06,
1355 & -0.4954E-06, -0.1114E-05, -0.2238E-05, -0.3968E-05, -0.6265E-05,
1356 & -0.8996E-05, -0.1208E-04, -0.1553E-04, -0.1945E-04, -0.2404E-04,
1357 & -0.2966E-04, -0.3663E-04, -0.4508E-04, -0.5508E-04, -0.6686E-04,
1358 & -0.8082E-04, -0.9732E-04, -0.1165E-03, -0.1382E-03, -0.1630E-03,
1359 & -0.1913E-03, -0.2234E-03, -0.2593E-03, -0.2989E-03, -0.3417E-03,
1360 & -0.3857E-03/
1361 data ((h83(ip,iw,1),iw=1,31),ip= 5, 5)/
1362 & 0.2163E-10, 0.5209E-10, 0.1291E-09, 0.3186E-09, 0.7626E-09,
1363 & 0.1682E-08, 0.3203E-08, 0.5078E-08, 0.6730E-08, 0.7606E-08,
1364 & 0.7246E-08, 0.5592E-08, 0.2735E-08, -0.2325E-08, -0.1162E-07,
1365 & -0.2576E-07, -0.4268E-07, -0.5938E-07, -0.7262E-07, -0.7827E-07,
1366 & -0.7297E-07, -0.5786E-07, -0.3930E-07, -0.2373E-07, -0.1295E-07,
1367 & -0.3728E-08, 0.1465E-07, 0.6114E-07, 0.1590E-06, 0.3257E-06,
1368 & 0.5622E-06/
1369 data ((h81(ip,iw,1),iw=1,31),ip= 6, 6)/
1370 & 0.1342E-04, 0.2640E-04, 0.5139E-04, 0.9834E-04, 0.1833E-03,
1371 & 0.3288E-03, 0.5596E-03, 0.8932E-03, 0.1332E-02, 0.1866E-02,
1372 & 0.2481E-02, 0.3174E-02, 0.3963E-02, 0.4885E-02, 0.5997E-02,
1373 & 0.7394E-02, 0.9215E-02, 0.1164E-01, 0.1489E-01, 0.1924E-01,
1374 & 0.2501E-01, 0.3258E-01, 0.4243E-01, 0.5523E-01, 0.7195E-01,
1375 & 0.9387E-01, 0.1226E+00, 0.1601E+00, 0.2084E+00, 0.2695E+00,
1376 & 0.3446E+00/
1377 data ((h82(ip,iw,1),iw=1,31),ip= 6, 6)/
1378 & -0.5671E-08, -0.1326E-07, -0.3234E-07, -0.8091E-07, -0.2035E-06,
1379 & -0.4941E-06, -0.1111E-05, -0.2232E-05, -0.3958E-05, -0.6247E-05,
1380 & -0.8966E-05, -0.1202E-04, -0.1544E-04, -0.1929E-04, -0.2377E-04,
1381 & -0.2921E-04, -0.3593E-04, -0.4409E-04, -0.5385E-04, -0.6555E-04,
1382 & -0.7965E-04, -0.9656E-04, -0.1163E-03, -0.1390E-03, -0.1649E-03,
1383 & -0.1947E-03, -0.2288E-03, -0.2675E-03, -0.3109E-03, -0.3575E-03,
1384 & -0.4039E-03/
1385 data ((h83(ip,iw,1),iw=1,31),ip= 6, 6)/
1386 & 0.2155E-10, 0.5188E-10, 0.1288E-09, 0.3175E-09, 0.7599E-09,
1387 & 0.1675E-08, 0.3190E-08, 0.5059E-08, 0.6699E-08, 0.7551E-08,
1388 & 0.7154E-08, 0.5435E-08, 0.2452E-08, -0.2802E-08, -0.1235E-07,
1389 & -0.2668E-07, -0.4353E-07, -0.5962E-07, -0.7134E-07, -0.7435E-07,
1390 & -0.6551E-07, -0.4676E-07, -0.2475E-07, -0.4876E-08, 0.1235E-07,
1391 & 0.3092E-07, 0.6192E-07, 0.1243E-06, 0.2400E-06, 0.4247E-06,
1392 & 0.6755E-06/
1393 data ((h81(ip,iw,1),iw=1,31),ip= 7, 7)/
1394 & 0.1342E-04, 0.2640E-04, 0.5139E-04, 0.9837E-04, 0.1834E-03,
1395 & 0.3291E-03, 0.5603E-03, 0.8949E-03, 0.1336E-02, 0.1873E-02,
1396 & 0.2494E-02, 0.3198E-02, 0.4005E-02, 0.4960E-02, 0.6130E-02,
1397 & 0.7628E-02, 0.9618E-02, 0.1232E-01, 0.1599E-01, 0.2097E-01,
1398 & 0.2764E-01, 0.3646E-01, 0.4803E-01, 0.6319E-01, 0.8312E-01,
1399 & 0.1093E+00, 0.1436E+00, 0.1881E+00, 0.2448E+00, 0.3153E+00,
1400 & 0.4001E+00/
1401 data ((h82(ip,iw,1),iw=1,31),ip= 7, 7)/
1402 & -0.5665E-08, -0.1322E-07, -0.3224E-07, -0.8063E-07, -0.2027E-06,
1403 & -0.4921E-06, -0.1106E-05, -0.2223E-05, -0.3942E-05, -0.6220E-05,
1404 & -0.8920E-05, -0.1194E-04, -0.1530E-04, -0.1905E-04, -0.2337E-04,
1405 & -0.2860E-04, -0.3505E-04, -0.4296E-04, -0.5259E-04, -0.6439E-04,
1406 & -0.7884E-04, -0.9635E-04, -0.1170E-03, -0.1407E-03, -0.1681E-03,
1407 & -0.1998E-03, -0.2366E-03, -0.2790E-03, -0.3265E-03, -0.3763E-03,
1408 & -0.4235E-03/
1409 data ((h83(ip,iw,1),iw=1,31),ip= 7, 7)/
1410 & 0.2157E-10, 0.5178E-10, 0.1283E-09, 0.3162E-09, 0.7558E-09,
1411 & 0.1665E-08, 0.3169E-08, 0.5027E-08, 0.6645E-08, 0.7472E-08,
1412 & 0.7017E-08, 0.5212E-08, 0.2059E-08, -0.3443E-08, -0.1321E-07,
1413 & -0.2754E-07, -0.4389E-07, -0.5869E-07, -0.6825E-07, -0.6819E-07,
1414 & -0.5570E-07, -0.3343E-07, -0.7592E-08, 0.1778E-07, 0.4322E-07,
1415 & 0.7330E-07, 0.1190E-06, 0.1993E-06, 0.3348E-06, 0.5376E-06,
1416 & 0.8030E-06/
1417 data ((h81(ip,iw,1),iw=1,31),ip= 8, 8)/
1418 & 0.1342E-04, 0.2641E-04, 0.5141E-04, 0.9842E-04, 0.1836E-03,
1419 & 0.3295E-03, 0.5614E-03, 0.8975E-03, 0.1341E-02, 0.1884E-02,
1420 & 0.2514E-02, 0.3234E-02, 0.4071E-02, 0.5075E-02, 0.6332E-02,
1421 & 0.7976E-02, 0.1021E-01, 0.1328E-01, 0.1751E-01, 0.2329E-01,
1422 & 0.3109E-01, 0.4146E-01, 0.5517E-01, 0.7325E-01, 0.9710E-01,
1423 & 0.1284E+00, 0.1693E+00, 0.2217E+00, 0.2876E+00, 0.3679E+00,
1424 & 0.4616E+00/
1425 data ((h82(ip,iw,1),iw=1,31),ip= 8, 8)/
1426 & -0.5652E-08, -0.1318E-07, -0.3210E-07, -0.8018E-07, -0.2014E-06,
1427 & -0.4888E-06, -0.1099E-05, -0.2210E-05, -0.3918E-05, -0.6179E-05,
1428 & -0.8849E-05, -0.1182E-04, -0.1509E-04, -0.1871E-04, -0.2284E-04,
1429 & -0.2782E-04, -0.3403E-04, -0.4177E-04, -0.5145E-04, -0.6354E-04,
1430 & -0.7853E-04, -0.9681E-04, -0.1185E-03, -0.1437E-03, -0.1729E-03,
1431 & -0.2072E-03, -0.2475E-03, -0.2942E-03, -0.3457E-03, -0.3973E-03,
1432 & -0.4434E-03/
1433 data ((h83(ip,iw,1),iw=1,31),ip= 8, 8)/
1434 & 0.2153E-10, 0.5151E-10, 0.1273E-09, 0.3136E-09, 0.7488E-09,
1435 & 0.1649E-08, 0.3142E-08, 0.4980E-08, 0.6559E-08, 0.7346E-08,
1436 & 0.6813E-08, 0.4884E-08, 0.1533E-08, -0.4209E-08, -0.1409E-07,
1437 & -0.2801E-07, -0.4320E-07, -0.5614E-07, -0.6312E-07, -0.5976E-07,
1438 & -0.4369E-07, -0.1775E-07, 0.1280E-07, 0.4534E-07, 0.8106E-07,
1439 & 0.1246E-06, 0.1874E-06, 0.2873E-06, 0.4433E-06, 0.6651E-06,
1440 & 0.9477E-06/
1441 data ((h81(ip,iw,1),iw=1,31),ip= 9, 9)/
1442 & 0.1342E-04, 0.2641E-04, 0.5143E-04, 0.9849E-04, 0.1838E-03,
1443 & 0.3302E-03, 0.5631E-03, 0.9016E-03, 0.1350E-02, 0.1901E-02,
1444 & 0.2546E-02, 0.3292E-02, 0.4171E-02, 0.5250E-02, 0.6634E-02,
1445 & 0.8486E-02, 0.1104E-01, 0.1460E-01, 0.1955E-01, 0.2635E-01,
1446 & 0.3555E-01, 0.4786E-01, 0.6421E-01, 0.8588E-01, 0.1145E+00,
1447 & 0.1519E+00, 0.2003E+00, 0.2615E+00, 0.3372E+00, 0.4269E+00,
1448 & 0.5281E+00/
1449 data ((h82(ip,iw,1),iw=1,31),ip= 9, 9)/
1450 & -0.5629E-08, -0.1310E-07, -0.3186E-07, -0.7948E-07, -0.1995E-06,
1451 & -0.4837E-06, -0.1088E-05, -0.2188E-05, -0.3880E-05, -0.6115E-05,
1452 & -0.8743E-05, -0.1165E-04, -0.1480E-04, -0.1824E-04, -0.2216E-04,
1453 & -0.2691E-04, -0.3293E-04, -0.4067E-04, -0.5057E-04, -0.6314E-04,
1454 & -0.7885E-04, -0.9813E-04, -0.1212E-03, -0.1482E-03, -0.1799E-03,
1455 & -0.2175E-03, -0.2622E-03, -0.3135E-03, -0.3678E-03, -0.4193E-03,
1456 & -0.4627E-03/
1457 data ((h83(ip,iw,1),iw=1,31),ip= 9, 9)/
1458 & 0.2121E-10, 0.5076E-10, 0.1257E-09, 0.3091E-09, 0.7379E-09,
1459 & 0.1623E-08, 0.3097E-08, 0.4904E-08, 0.6453E-08, 0.7168E-08,
1460 & 0.6534E-08, 0.4458E-08, 0.8932E-09, -0.5026E-08, -0.1469E-07,
1461 & -0.2765E-07, -0.4103E-07, -0.5169E-07, -0.5585E-07, -0.4913E-07,
1462 & -0.2954E-07, 0.6372E-09, 0.3738E-07, 0.7896E-07, 0.1272E-06,
1463 & 0.1867E-06, 0.2682E-06, 0.3895E-06, 0.5672E-06, 0.8091E-06,
1464 & 0.1114E-05/
1465 data ((h81(ip,iw,1),iw=1,31),ip=10,10)/
1466 & 0.1343E-04, 0.2642E-04, 0.5147E-04, 0.9861E-04, 0.1842E-03,
1467 & 0.3312E-03, 0.5658E-03, 0.9080E-03, 0.1364E-02, 0.1928E-02,
1468 & 0.2595E-02, 0.3379E-02, 0.4325E-02, 0.5513E-02, 0.7077E-02,
1469 & 0.9215E-02, 0.1220E-01, 0.1640E-01, 0.2226E-01, 0.3032E-01,
1470 & 0.4127E-01, 0.5598E-01, 0.7559E-01, 0.1016E+00, 0.1359E+00,
1471 & 0.1804E+00, 0.2372E+00, 0.3081E+00, 0.3935E+00, 0.4916E+00,
1472 & 0.5975E+00/
1473 data ((h82(ip,iw,1),iw=1,31),ip=10,10)/
1474 & -0.5597E-08, -0.1300E-07, -0.3148E-07, -0.7838E-07, -0.1964E-06,
1475 & -0.4759E-06, -0.1071E-05, -0.2155E-05, -0.3822E-05, -0.6019E-05,
1476 & -0.8586E-05, -0.1139E-04, -0.1439E-04, -0.1764E-04, -0.2134E-04,
1477 & -0.2591E-04, -0.3188E-04, -0.3978E-04, -0.5011E-04, -0.6334E-04,
1478 & -0.7998E-04, -0.1006E-03, -0.1253E-03, -0.1547E-03, -0.1895E-03,
1479 & -0.2315E-03, -0.2811E-03, -0.3363E-03, -0.3917E-03, -0.4413E-03,
1480 & -0.4809E-03/
1481 data ((h83(ip,iw,1),iw=1,31),ip=10,10)/
1482 & 0.2109E-10, 0.5017E-10, 0.1235E-09, 0.3021E-09, 0.7217E-09,
1483 & 0.1585E-08, 0.3028E-08, 0.4796E-08, 0.6285E-08, 0.6910E-08,
1484 & 0.6178E-08, 0.3945E-08, 0.2436E-09, -0.5632E-08, -0.1464E-07,
1485 & -0.2596E-07, -0.3707E-07, -0.4527E-07, -0.4651E-07, -0.3644E-07,
1486 & -0.1296E-07, 0.2250E-07, 0.6722E-07, 0.1202E-06, 0.1831E-06,
1487 & 0.2605E-06, 0.3627E-06, 0.5062E-06, 0.7064E-06, 0.9725E-06,
1488 & 0.1304E-05/
1489 data ((h81(ip,iw,1),iw=1,31),ip=11,11)/
1490 & 0.1343E-04, 0.2644E-04, 0.5152E-04, 0.9878E-04, 0.1847E-03,
1491 & 0.3328E-03, 0.5701E-03, 0.9179E-03, 0.1385E-02, 0.1969E-02,
1492 & 0.2671E-02, 0.3513E-02, 0.4554E-02, 0.5900E-02, 0.7713E-02,
1493 & 0.1023E-01, 0.1379E-01, 0.1879E-01, 0.2578E-01, 0.3542E-01,
1494 & 0.4854E-01, 0.6622E-01, 0.8983E-01, 0.1211E+00, 0.1619E+00,
1495 & 0.2145E+00, 0.2807E+00, 0.3614E+00, 0.4559E+00, 0.5603E+00,
1496 & 0.6675E+00/
1497 data ((h82(ip,iw,1),iw=1,31),ip=11,11)/
1498 & -0.5538E-08, -0.1280E-07, -0.3089E-07, -0.7667E-07, -0.1917E-06,
1499 & -0.4642E-06, -0.1045E-05, -0.2106E-05, -0.3736E-05, -0.5878E-05,
1500 & -0.8363E-05, -0.1104E-04, -0.1387E-04, -0.1692E-04, -0.2044E-04,
1501 & -0.2493E-04, -0.3101E-04, -0.3926E-04, -0.5020E-04, -0.6429E-04,
1502 & -0.8213E-04, -0.1044E-03, -0.1314E-03, -0.1637E-03, -0.2027E-03,
1503 & -0.2498E-03, -0.3042E-03, -0.3617E-03, -0.4163E-03, -0.4625E-03,
1504 & -0.4969E-03/
1505 data ((h83(ip,iw,1),iw=1,31),ip=11,11)/
1506 & 0.2067E-10, 0.4903E-10, 0.1200E-09, 0.2917E-09, 0.6965E-09,
1507 & 0.1532E-08, 0.2925E-08, 0.4632E-08, 0.6054E-08, 0.6590E-08,
1508 & 0.5746E-08, 0.3436E-08, -0.2251E-09, -0.5703E-08, -0.1344E-07,
1509 & -0.2256E-07, -0.3120E-07, -0.3690E-07, -0.3520E-07, -0.2164E-07,
1510 & 0.6510E-08, 0.4895E-07, 0.1037E-06, 0.1702E-06, 0.2502E-06,
1511 & 0.3472E-06, 0.4710E-06, 0.6379E-06, 0.8633E-06, 0.1159E-05,
1512 & 0.1514E-05/
1513 data ((h81(ip,iw,1),iw=1,31),ip=12,12)/
1514 & 0.1344E-04, 0.2647E-04, 0.5161E-04, 0.9906E-04, 0.1856E-03,
1515 & 0.3353E-03, 0.5765E-03, 0.9331E-03, 0.1417E-02, 0.2032E-02,
1516 & 0.2785E-02, 0.3712E-02, 0.4892E-02, 0.6456E-02, 0.8604E-02,
1517 & 0.1162E-01, 0.1590E-01, 0.2192E-01, 0.3033E-01, 0.4193E-01,
1518 & 0.5774E-01, 0.7906E-01, 0.1075E+00, 0.1449E+00, 0.1934E+00,
1519 & 0.2549E+00, 0.3309E+00, 0.4213E+00, 0.5232E+00, 0.6308E+00,
1520 & 0.7348E+00/
1521 data ((h82(ip,iw,1),iw=1,31),ip=12,12)/
1522 & -0.5476E-08, -0.1257E-07, -0.3008E-07, -0.7418E-07, -0.1848E-06,
1523 & -0.4468E-06, -0.1006E-05, -0.2032E-05, -0.3611E-05, -0.5679E-05,
1524 & -0.8058E-05, -0.1059E-04, -0.1324E-04, -0.1612E-04, -0.1956E-04,
1525 & -0.2411E-04, -0.3046E-04, -0.3925E-04, -0.5098E-04, -0.6619E-04,
1526 & -0.8562E-04, -0.1100E-03, -0.1399E-03, -0.1761E-03, -0.2202E-03,
1527 & -0.2726E-03, -0.3306E-03, -0.3885E-03, -0.4404E-03, -0.4820E-03,
1528 & -0.5082E-03/
1529 data ((h83(ip,iw,1),iw=1,31),ip=12,12)/
1530 & 0.2041E-10, 0.4771E-10, 0.1149E-09, 0.2782E-09, 0.6614E-09,
1531 & 0.1451E-08, 0.2778E-08, 0.4401E-08, 0.5736E-08, 0.6189E-08,
1532 & 0.5315E-08, 0.3087E-08, -0.2518E-09, -0.4806E-08, -0.1071E-07,
1533 & -0.1731E-07, -0.2346E-07, -0.2659E-07, -0.2184E-07, -0.4261E-08,
1534 & 0.2975E-07, 0.8112E-07, 0.1484E-06, 0.2308E-06, 0.3296E-06,
1535 & 0.4475E-06, 0.5942E-06, 0.7859E-06, 0.1041E-05, 0.1369E-05,
1536 & 0.1726E-05/
1537 data ((h81(ip,iw,1),iw=1,31),ip=13,13)/
1538 & 0.1345E-04, 0.2650E-04, 0.5173E-04, 0.9947E-04, 0.1868E-03,
1539 & 0.3389E-03, 0.5861E-03, 0.9559E-03, 0.1466E-02, 0.2125E-02,
1540 & 0.2955E-02, 0.4004E-02, 0.5376E-02, 0.7235E-02, 0.9824E-02,
1541 & 0.1348E-01, 0.1866E-01, 0.2596E-01, 0.3613E-01, 0.5016E-01,
1542 & 0.6929E-01, 0.9504E-01, 0.1292E+00, 0.1738E+00, 0.2309E+00,
1543 & 0.3021E+00, 0.3880E+00, 0.4868E+00, 0.5936E+00, 0.7003E+00,
1544 & 0.7964E+00/
1545 data ((h82(ip,iw,1),iw=1,31),ip=13,13)/
1546 & -0.5362E-08, -0.1223E-07, -0.2895E-07, -0.7071E-07, -0.1748E-06,
1547 & -0.4219E-06, -0.9516E-06, -0.1928E-05, -0.3436E-05, -0.5409E-05,
1548 & -0.7666E-05, -0.1005E-04, -0.1254E-04, -0.1533E-04, -0.1880E-04,
1549 & -0.2358E-04, -0.3038E-04, -0.3988E-04, -0.5264E-04, -0.6934E-04,
1550 & -0.9083E-04, -0.1179E-03, -0.1515E-03, -0.1927E-03, -0.2424E-03,
1551 & -0.2994E-03, -0.3591E-03, -0.4155E-03, -0.4634E-03, -0.4982E-03,
1552 & -0.5096E-03/
1553 data ((h83(ip,iw,1),iw=1,31),ip=13,13)/
1554 & 0.1976E-10, 0.4551E-10, 0.1086E-09, 0.2601E-09, 0.6126E-09,
1555 & 0.1345E-08, 0.2583E-08, 0.4112E-08, 0.5365E-08, 0.5796E-08,
1556 & 0.5031E-08, 0.3182E-08, 0.5970E-09, -0.2547E-08, -0.6172E-08,
1557 & -0.1017E-07, -0.1388E-07, -0.1430E-07, -0.6118E-08, 0.1624E-07,
1558 & 0.5791E-07, 0.1205E-06, 0.2025E-06, 0.3032E-06, 0.4225E-06,
1559 & 0.5619E-06, 0.7322E-06, 0.9528E-06, 0.1243E-05, 0.1592E-05,
1560 & 0.1904E-05/
1561 data ((h81(ip,iw,1),iw=1,31),ip=14,14)/
1562 & 0.1346E-04, 0.2655E-04, 0.5192E-04, 0.1001E-03, 0.1887E-03,
1563 & 0.3442E-03, 0.6001E-03, 0.9892E-03, 0.1536E-02, 0.2262E-02,
1564 & 0.3200E-02, 0.4420E-02, 0.6053E-02, 0.8300E-02, 0.1146E-01,
1565 & 0.1592E-01, 0.2224E-01, 0.3112E-01, 0.4348E-01, 0.6051E-01,
1566 & 0.8369E-01, 0.1147E+00, 0.1556E+00, 0.2084E+00, 0.2749E+00,
1567 & 0.3561E+00, 0.4511E+00, 0.5562E+00, 0.6644E+00, 0.7655E+00,
1568 & 0.8499E+00/
1569 data ((h82(ip,iw,1),iw=1,31),ip=14,14)/
1570 & -0.5210E-08, -0.1172E-07, -0.2731E-07, -0.6598E-07, -0.1615E-06,
1571 & -0.3880E-06, -0.8769E-06, -0.1787E-05, -0.3204E-05, -0.5066E-05,
1572 & -0.7197E-05, -0.9451E-05, -0.1185E-04, -0.1465E-04, -0.1831E-04,
1573 & -0.2346E-04, -0.3088E-04, -0.4132E-04, -0.5545E-04, -0.7410E-04,
1574 & -0.9820E-04, -0.1288E-03, -0.1670E-03, -0.2140E-03, -0.2692E-03,
1575 & -0.3293E-03, -0.3886E-03, -0.4417E-03, -0.4840E-03, -0.5073E-03,
1576 & -0.4944E-03/
1577 data ((h83(ip,iw,1),iw=1,31),ip=14,14)/
1578 & 0.1880E-10, 0.4271E-10, 0.9966E-10, 0.2352E-09, 0.5497E-09,
1579 & 0.1205E-08, 0.2334E-08, 0.3765E-08, 0.4993E-08, 0.5532E-08,
1580 & 0.5148E-08, 0.4055E-08, 0.2650E-08, 0.1326E-08, 0.2019E-09,
1581 & -0.1124E-08, -0.2234E-08, 0.2827E-09, 0.1247E-07, 0.4102E-07,
1582 & 0.9228E-07, 0.1682E-06, 0.2676E-06, 0.3885E-06, 0.5286E-06,
1583 & 0.6904E-06, 0.8871E-06, 0.1142E-05, 0.1466E-05, 0.1800E-05,
1584 & 0.2004E-05/
1585 data ((h81(ip,iw,1),iw=1,31),ip=15,15)/
1586 & 0.1348E-04, 0.2663E-04, 0.5216E-04, 0.1009E-03, 0.1912E-03,
1587 & 0.3515E-03, 0.6196E-03, 0.1036E-02, 0.1637E-02, 0.2456E-02,
1588 & 0.3544E-02, 0.4996E-02, 0.6973E-02, 0.9722E-02, 0.1360E-01,
1589 & 0.1908E-01, 0.2681E-01, 0.3766E-01, 0.5272E-01, 0.7343E-01,
1590 & 0.1015E+00, 0.1388E+00, 0.1874E+00, 0.2492E+00, 0.3257E+00,
1591 & 0.4165E+00, 0.5191E+00, 0.6275E+00, 0.7324E+00, 0.8235E+00,
1592 & 0.8939E+00/
1593 data ((h82(ip,iw,1),iw=1,31),ip=15,15)/
1594 & -0.5045E-08, -0.1113E-07, -0.2540E-07, -0.6008E-07, -0.1449E-06,
1595 & -0.3457E-06, -0.7826E-06, -0.1609E-05, -0.2920E-05, -0.4665E-05,
1596 & -0.6691E-05, -0.8868E-05, -0.1127E-04, -0.1422E-04, -0.1820E-04,
1597 & -0.2389E-04, -0.3213E-04, -0.4380E-04, -0.5975E-04, -0.8092E-04,
1598 & -0.1083E-03, -0.1433E-03, -0.1873E-03, -0.2402E-03, -0.2997E-03,
1599 & -0.3607E-03, -0.4178E-03, -0.4662E-03, -0.4994E-03, -0.5028E-03,
1600 & -0.4563E-03/
1601 data ((h83(ip,iw,1),iw=1,31),ip=15,15)/
1602 & 0.1804E-10, 0.3983E-10, 0.9045E-10, 0.2080E-09, 0.4786E-09,
1603 & 0.1046E-08, 0.2052E-08, 0.3413E-08, 0.4704E-08, 0.5565E-08,
1604 & 0.5887E-08, 0.5981E-08, 0.6202E-08, 0.6998E-08, 0.8493E-08,
1605 & 0.1002E-07, 0.1184E-07, 0.1780E-07, 0.3483E-07, 0.7122E-07,
1606 & 0.1341E-06, 0.2259E-06, 0.3446E-06, 0.4866E-06, 0.6486E-06,
1607 & 0.8343E-06, 0.1063E-05, 0.1356E-05, 0.1690E-05, 0.1951E-05,
1608 & 0.2005E-05/
1609 data ((h81(ip,iw,1),iw=1,31),ip=16,16)/
1610 & 0.1351E-04, 0.2672E-04, 0.5247E-04, 0.1019E-03, 0.1944E-03,
1611 & 0.3609E-03, 0.6451E-03, 0.1098E-02, 0.1772E-02, 0.2718E-02,
1612 & 0.4009E-02, 0.5767E-02, 0.8190E-02, 0.1158E-01, 0.1636E-01,
1613 & 0.2311E-01, 0.3260E-01, 0.4586E-01, 0.6425E-01, 0.8940E-01,
1614 & 0.1232E+00, 0.1678E+00, 0.2251E+00, 0.2967E+00, 0.3831E+00,
1615 & 0.4825E+00, 0.5901E+00, 0.6976E+00, 0.7946E+00, 0.8725E+00,
1616 & 0.9285E+00/
1617 data ((h82(ip,iw,1),iw=1,31),ip=16,16)/
1618 & -0.4850E-08, -0.1045E-07, -0.2334E-07, -0.5367E-07, -0.1265E-06,
1619 & -0.2980E-06, -0.6750E-06, -0.1406E-05, -0.2601E-05, -0.4239E-05,
1620 & -0.6201E-05, -0.8389E-05, -0.1091E-04, -0.1413E-04, -0.1859E-04,
1621 & -0.2500E-04, -0.3432E-04, -0.4761E-04, -0.6595E-04, -0.9030E-04,
1622 & -0.1219E-03, -0.1624E-03, -0.2126E-03, -0.2708E-03, -0.3327E-03,
1623 & -0.3926E-03, -0.4458E-03, -0.4871E-03, -0.5045E-03, -0.4777E-03,
1624 & -0.3954E-03/
1625 data ((h83(ip,iw,1),iw=1,31),ip=16,16)/
1626 & 0.1717E-10, 0.3723E-10, 0.8093E-10, 0.1817E-09, 0.4100E-09,
1627 & 0.8932E-09, 0.1791E-08, 0.3126E-08, 0.4634E-08, 0.6095E-08,
1628 & 0.7497E-08, 0.9170E-08, 0.1136E-07, 0.1453E-07, 0.1892E-07,
1629 & 0.2369E-07, 0.2909E-07, 0.3922E-07, 0.6232E-07, 0.1083E-06,
1630 & 0.1847E-06, 0.2943E-06, 0.4336E-06, 0.5970E-06, 0.7815E-06,
1631 & 0.9959E-06, 0.1263E-05, 0.1583E-05, 0.1880E-05, 0.2009E-05,
1632 & 0.1914E-05/
1633 data ((h81(ip,iw,1),iw=1,31),ip=17,17)/
1634 & 0.1353E-04, 0.2681E-04, 0.5283E-04, 0.1031E-03, 0.1981E-03,
1635 & 0.3721E-03, 0.6761E-03, 0.1176E-02, 0.1943E-02, 0.3055E-02,
1636 & 0.4612E-02, 0.6766E-02, 0.9760E-02, 0.1396E-01, 0.1986E-01,
1637 & 0.2818E-01, 0.3984E-01, 0.5609E-01, 0.7850E-01, 0.1090E+00,
1638 & 0.1495E+00, 0.2023E+00, 0.2691E+00, 0.3508E+00, 0.4465E+00,
1639 & 0.5524E+00, 0.6613E+00, 0.7633E+00, 0.8485E+00, 0.9119E+00,
1640 & 0.9543E+00/
1641 data ((h82(ip,iw,1),iw=1,31),ip=17,17)/
1642 & -0.4673E-08, -0.9862E-08, -0.2135E-07, -0.4753E-07, -0.1087E-06,
1643 & -0.2512E-06, -0.5671E-06, -0.1199E-05, -0.2281E-05, -0.3842E-05,
1644 & -0.5804E-05, -0.8110E-05, -0.1088E-04, -0.1452E-04, -0.1961E-04,
1645 & -0.2696E-04, -0.3768E-04, -0.5311E-04, -0.7444E-04, -0.1028E-03,
1646 & -0.1397E-03, -0.1865E-03, -0.2427E-03, -0.3047E-03, -0.3667E-03,
1647 & -0.4237E-03, -0.4712E-03, -0.5003E-03, -0.4921E-03, -0.4286E-03,
1648 & -0.3188E-03/
1649 data ((h83(ip,iw,1),iw=1,31),ip=17,17)/
1650 & 0.1653E-10, 0.3436E-10, 0.7431E-10, 0.1605E-09, 0.3548E-09,
1651 & 0.7723E-09, 0.1595E-08, 0.2966E-08, 0.4849E-08, 0.7169E-08,
1652 & 0.1003E-07, 0.1366E-07, 0.1825E-07, 0.2419E-07, 0.3186E-07,
1653 & 0.4068E-07, 0.5064E-07, 0.6618E-07, 0.9684E-07, 0.1536E-06,
1654 & 0.2450E-06, 0.3730E-06, 0.5328E-06, 0.7184E-06, 0.9291E-06,
1655 & 0.1180E-05, 0.1484E-05, 0.1798E-05, 0.1992E-05, 0.1968E-05,
1656 & 0.1736E-05/
1657 data ((h81(ip,iw,1),iw=1,31),ip=18,18)/
1658 & 0.1356E-04, 0.2691E-04, 0.5318E-04, 0.1043E-03, 0.2020E-03,
1659 & 0.3841E-03, 0.7100E-03, 0.1263E-02, 0.2144E-02, 0.3464E-02,
1660 & 0.5359E-02, 0.8019E-02, 0.1174E-01, 0.1694E-01, 0.2426E-01,
1661 & 0.3451E-01, 0.4883E-01, 0.6870E-01, 0.9593E-01, 0.1326E+00,
1662 & 0.1809E+00, 0.2428E+00, 0.3196E+00, 0.4112E+00, 0.5147E+00,
1663 & 0.6239E+00, 0.7297E+00, 0.8217E+00, 0.8928E+00, 0.9421E+00,
1664 & 0.9726E+00/
1665 data ((h82(ip,iw,1),iw=1,31),ip=18,18)/
1666 & -0.4532E-08, -0.9395E-08, -0.1978E-07, -0.4272E-07, -0.9442E-07,
1667 & -0.2124E-06, -0.4747E-06, -0.1017E-05, -0.2003E-05, -0.3524E-05,
1668 & -0.5567E-05, -0.8108E-05, -0.1127E-04, -0.1547E-04, -0.2138E-04,
1669 & -0.2996E-04, -0.4251E-04, -0.6059E-04, -0.8563E-04, -0.1190E-03,
1670 & -0.1623E-03, -0.2156E-03, -0.2767E-03, -0.3403E-03, -0.4006E-03,
1671 & -0.4530E-03, -0.4912E-03, -0.4995E-03, -0.4563E-03, -0.3592E-03,
1672 & -0.2383E-03/
1673 data ((h83(ip,iw,1),iw=1,31),ip=18,18)/
1674 & 0.1593E-10, 0.3276E-10, 0.6896E-10, 0.1476E-09, 0.3190E-09,
1675 & 0.6944E-09, 0.1474E-08, 0.2935E-08, 0.5300E-08, 0.8697E-08,
1676 & 0.1336E-07, 0.1946E-07, 0.2707E-07, 0.3637E-07, 0.4800E-07,
1677 & 0.6187E-07, 0.7806E-07, 0.1008E-06, 0.1404E-06, 0.2089E-06,
1678 & 0.3153E-06, 0.4613E-06, 0.6416E-06, 0.8506E-06, 0.1095E-05,
1679 & 0.1387E-05, 0.1708E-05, 0.1956E-05, 0.2003E-05, 0.1836E-05,
1680 & 0.1483E-05/
1681 data ((h81(ip,iw,1),iw=1,31),ip=19,19)/
1682 & 0.1358E-04, 0.2700E-04, 0.5350E-04, 0.1054E-03, 0.2057E-03,
1683 & 0.3955E-03, 0.7434E-03, 0.1353E-02, 0.2361E-02, 0.3928E-02,
1684 & 0.6237E-02, 0.9531E-02, 0.1416E-01, 0.2063E-01, 0.2968E-01,
1685 & 0.4233E-01, 0.5990E-01, 0.8412E-01, 0.1170E+00, 0.1608E+00,
1686 & 0.2177E+00, 0.2894E+00, 0.3764E+00, 0.4768E+00, 0.5855E+00,
1687 & 0.6941E+00, 0.7921E+00, 0.8710E+00, 0.9276E+00, 0.9641E+00,
1688 & 0.9846E+00/
1689 data ((h82(ip,iw,1),iw=1,31),ip=19,19)/
1690 & -0.4448E-08, -0.9085E-08, -0.1877E-07, -0.3946E-07, -0.8472E-07,
1691 & -0.1852E-06, -0.4074E-06, -0.8791E-06, -0.1789E-05, -0.3314E-05,
1692 & -0.5521E-05, -0.8425E-05, -0.1215E-04, -0.1711E-04, -0.2407E-04,
1693 & -0.3421E-04, -0.4905E-04, -0.7032E-04, -0.9985E-04, -0.1394E-03,
1694 & -0.1897E-03, -0.2491E-03, -0.3132E-03, -0.3763E-03, -0.4332E-03,
1695 & -0.4786E-03, -0.5005E-03, -0.4775E-03, -0.3970E-03, -0.2794E-03,
1696 & -0.1652E-03/
1697 data ((h83(ip,iw,1),iw=1,31),ip=19,19)/
1698 & 0.1566E-10, 0.3219E-10, 0.6635E-10, 0.1400E-09, 0.2999E-09,
1699 & 0.6513E-09, 0.1406E-08, 0.2953E-08, 0.5789E-08, 0.1037E-07,
1700 & 0.1709E-07, 0.2623E-07, 0.3777E-07, 0.5159E-07, 0.6823E-07,
1701 & 0.8864E-07, 0.1134E-06, 0.1461E-06, 0.1960E-06, 0.2761E-06,
1702 & 0.3962E-06, 0.5583E-06, 0.7580E-06, 0.9957E-06, 0.1282E-05,
1703 & 0.1607E-05, 0.1898E-05, 0.2020E-05, 0.1919E-05, 0.1623E-05,
1704 & 0.1171E-05/
1705 data ((h81(ip,iw,1),iw=1,31),ip=20,20)/
1706 & 0.1360E-04, 0.2707E-04, 0.5375E-04, 0.1063E-03, 0.2087E-03,
1707 & 0.4052E-03, 0.7731E-03, 0.1437E-02, 0.2575E-02, 0.4414E-02,
1708 & 0.7212E-02, 0.1128E-01, 0.1704E-01, 0.2509E-01, 0.3631E-01,
1709 & 0.5188E-01, 0.7338E-01, 0.1028E+00, 0.1422E+00, 0.1940E+00,
1710 & 0.2603E+00, 0.3422E+00, 0.4387E+00, 0.5459E+00, 0.6563E+00,
1711 & 0.7597E+00, 0.8461E+00, 0.9105E+00, 0.9536E+00, 0.9791E+00,
1712 & 0.9920E+00/
1713 data ((h82(ip,iw,1),iw=1,31),ip=20,20)/
1714 & -0.4403E-08, -0.8896E-08, -0.1818E-07, -0.3751E-07, -0.7880E-07,
1715 & -0.1683E-06, -0.3640E-06, -0.7852E-06, -0.1640E-05, -0.3191E-05,
1716 & -0.5634E-05, -0.9046E-05, -0.1355E-04, -0.1953E-04, -0.2786E-04,
1717 & -0.3995E-04, -0.5752E-04, -0.8256E-04, -0.1174E-03, -0.1638E-03,
1718 & -0.2211E-03, -0.2854E-03, -0.3507E-03, -0.4116E-03, -0.4633E-03,
1719 & -0.4966E-03, -0.4921E-03, -0.4309E-03, -0.3215E-03, -0.2016E-03,
1720 & -0.1061E-03/
1721 data ((h83(ip,iw,1),iw=1,31),ip=20,20)/
1722 & 0.1551E-10, 0.3147E-10, 0.6419E-10, 0.1356E-09, 0.2860E-09,
1723 & 0.6178E-09, 0.1353E-08, 0.2934E-08, 0.6095E-08, 0.1174E-07,
1724 & 0.2067E-07, 0.3346E-07, 0.5014E-07, 0.7024E-07, 0.9377E-07,
1725 & 0.1226E-06, 0.1592E-06, 0.2056E-06, 0.2678E-06, 0.3584E-06,
1726 & 0.4892E-06, 0.6651E-06, 0.8859E-06, 0.1160E-05, 0.1488E-05,
1727 & 0.1814E-05, 0.2010E-05, 0.1984E-05, 0.1748E-05, 0.1338E-05,
1728 & 0.8445E-06/
1729 data ((h81(ip,iw,1),iw=1,31),ip=21,21)/
1730 & 0.1361E-04, 0.2711E-04, 0.5393E-04, 0.1070E-03, 0.2110E-03,
1731 & 0.4129E-03, 0.7973E-03, 0.1508E-02, 0.2769E-02, 0.4886E-02,
1732 & 0.8229E-02, 0.1322E-01, 0.2037E-01, 0.3038E-01, 0.4427E-01,
1733 & 0.6342E-01, 0.8963E-01, 0.1250E+00, 0.1720E+00, 0.2327E+00,
1734 & 0.3089E+00, 0.4007E+00, 0.5052E+00, 0.6163E+00, 0.7241E+00,
1735 & 0.8179E+00, 0.8905E+00, 0.9408E+00, 0.9720E+00, 0.9887E+00,
1736 & 0.9961E+00/
1737 data ((h82(ip,iw,1),iw=1,31),ip=21,21)/
1738 & -0.4379E-08, -0.8801E-08, -0.1782E-07, -0.3642E-07, -0.7536E-07,
1739 & -0.1581E-06, -0.3366E-06, -0.7227E-06, -0.1532E-05, -0.3106E-05,
1740 & -0.5810E-05, -0.9862E-05, -0.1540E-04, -0.2279E-04, -0.3292E-04,
1741 & -0.4738E-04, -0.6817E-04, -0.9765E-04, -0.1384E-03, -0.1918E-03,
1742 & -0.2551E-03, -0.3226E-03, -0.3876E-03, -0.4452E-03, -0.4883E-03,
1743 & -0.5005E-03, -0.4598E-03, -0.3633E-03, -0.2416E-03, -0.1349E-03,
1744 & -0.6278E-04/
1745 data ((h83(ip,iw,1),iw=1,31),ip=21,21)/
1746 & 0.1542E-10, 0.3111E-10, 0.6345E-10, 0.1310E-09, 0.2742E-09,
1747 & 0.5902E-09, 0.1289E-08, 0.2826E-08, 0.6103E-08, 0.1250E-07,
1748 & 0.2355E-07, 0.4041E-07, 0.6347E-07, 0.9217E-07, 0.1256E-06,
1749 & 0.1658E-06, 0.2175E-06, 0.2824E-06, 0.3607E-06, 0.4614E-06,
1750 & 0.6004E-06, 0.7880E-06, 0.1034E-05, 0.1349E-05, 0.1698E-05,
1751 & 0.1965E-05, 0.2021E-05, 0.1857E-05, 0.1500E-05, 0.1015E-05,
1752 & 0.5467E-06/
1753 data ((h81(ip,iw,1),iw=1,31),ip=22,22)/
1754 & 0.1362E-04, 0.2714E-04, 0.5405E-04, 0.1074E-03, 0.2127E-03,
1755 & 0.4187E-03, 0.8159E-03, 0.1565E-02, 0.2933E-02, 0.5314E-02,
1756 & 0.9222E-02, 0.1525E-01, 0.2406E-01, 0.3649E-01, 0.5367E-01,
1757 & 0.7717E-01, 0.1090E+00, 0.1514E+00, 0.2067E+00, 0.2770E+00,
1758 & 0.3633E+00, 0.4640E+00, 0.5742E+00, 0.6853E+00, 0.7859E+00,
1759 & 0.8670E+00, 0.9253E+00, 0.9629E+00, 0.9842E+00, 0.9942E+00,
1760 & 0.9983E+00/
1761 data ((h82(ip,iw,1),iw=1,31),ip=22,22)/
1762 & -0.4366E-08, -0.8749E-08, -0.1761E-07, -0.3578E-07, -0.7322E-07,
1763 & -0.1517E-06, -0.3189E-06, -0.6785E-06, -0.1446E-05, -0.3014E-05,
1764 & -0.5933E-05, -0.1069E-04, -0.1755E-04, -0.2683E-04, -0.3936E-04,
1765 & -0.5675E-04, -0.8137E-04, -0.1160E-03, -0.1630E-03, -0.2223E-03,
1766 & -0.2899E-03, -0.3589E-03, -0.4230E-03, -0.4755E-03, -0.5031E-03,
1767 & -0.4834E-03, -0.4036E-03, -0.2849E-03, -0.1687E-03, -0.8356E-04,
1768 & -0.3388E-04/
1769 data ((h83(ip,iw,1),iw=1,31),ip=22,22)/
1770 & 0.1536E-10, 0.3086E-10, 0.6248E-10, 0.1288E-09, 0.2664E-09,
1771 & 0.5637E-09, 0.1222E-08, 0.2680E-08, 0.5899E-08, 0.1262E-07,
1772 & 0.2527E-07, 0.4621E-07, 0.7678E-07, 0.1165E-06, 0.1640E-06,
1773 & 0.2199E-06, 0.2904E-06, 0.3783E-06, 0.4787E-06, 0.5925E-06,
1774 & 0.7377E-06, 0.9389E-06, 0.1216E-05, 0.1560E-05, 0.1879E-05,
1775 & 0.2025E-05, 0.1940E-05, 0.1650E-05, 0.1194E-05, 0.6981E-06,
1776 & 0.3103E-06/
1777 data ((h81(ip,iw,1),iw=1,31),ip=23,23)/
1778 & 0.1362E-04, 0.2716E-04, 0.5413E-04, 0.1077E-03, 0.2139E-03,
1779 & 0.4228E-03, 0.8295E-03, 0.1609E-02, 0.3063E-02, 0.5676E-02,
1780 & 0.1013E-01, 0.1726E-01, 0.2799E-01, 0.4332E-01, 0.6452E-01,
1781 & 0.9328E-01, 0.1317E+00, 0.1820E+00, 0.2467E+00, 0.3270E+00,
1782 & 0.4228E+00, 0.5308E+00, 0.6434E+00, 0.7499E+00, 0.8395E+00,
1783 & 0.9065E+00, 0.9515E+00, 0.9782E+00, 0.9916E+00, 0.9973E+00,
1784 & 0.9993E+00/
1785 data ((h82(ip,iw,1),iw=1,31),ip=23,23)/
1786 & -0.4359E-08, -0.8720E-08, -0.1749E-07, -0.3527E-07, -0.7175E-07,
1787 & -0.1473E-06, -0.3062E-06, -0.6451E-06, -0.1372E-05, -0.2902E-05,
1788 & -0.5936E-05, -0.1133E-04, -0.1971E-04, -0.3143E-04, -0.4715E-04,
1789 & -0.6833E-04, -0.9759E-04, -0.1379E-03, -0.1907E-03, -0.2542E-03,
1790 & -0.3239E-03, -0.3935E-03, -0.4559E-03, -0.4991E-03, -0.5009E-03,
1791 & -0.4414E-03, -0.3306E-03, -0.2077E-03, -0.1093E-03, -0.4754E-04,
1792 & -0.1642E-04/
1793 data ((h83(ip,iw,1),iw=1,31),ip=23,23)/
1794 & 0.1531E-10, 0.3070E-10, 0.6184E-10, 0.1257E-09, 0.2578E-09,
1795 & 0.5451E-09, 0.1159E-08, 0.2526E-08, 0.5585E-08, 0.1225E-07,
1796 & 0.2576E-07, 0.5017E-07, 0.8855E-07, 0.1417E-06, 0.2078E-06,
1797 & 0.2858E-06, 0.3802E-06, 0.4946E-06, 0.6226E-06, 0.7572E-06,
1798 & 0.9137E-06, 0.1133E-05, 0.1438E-05, 0.1772E-05, 0.1994E-05,
1799 & 0.1994E-05, 0.1779E-05, 0.1375E-05, 0.8711E-06, 0.4273E-06,
1800 & 0.1539E-06/
1801 data ((h81(ip,iw,1),iw=1,31),ip=24,24)/
1802 & 0.1362E-04, 0.2717E-04, 0.5417E-04, 0.1079E-03, 0.2146E-03,
1803 & 0.4256E-03, 0.8393E-03, 0.1641E-02, 0.3163E-02, 0.5968E-02,
1804 & 0.1092E-01, 0.1915E-01, 0.3195E-01, 0.5066E-01, 0.7669E-01,
1805 & 0.1117E+00, 0.1578E+00, 0.2173E+00, 0.2919E+00, 0.3824E+00,
1806 & 0.4867E+00, 0.5992E+00, 0.7100E+00, 0.8076E+00, 0.8838E+00,
1807 & 0.9370E+00, 0.9702E+00, 0.9880E+00, 0.9959E+00, 0.9988E+00,
1808 & 0.9998E+00/
1809 data ((h82(ip,iw,1),iw=1,31),ip=24,24)/
1810 & -0.4354E-08, -0.8703E-08, -0.1742E-07, -0.3499E-07, -0.7074E-07,
1811 & -0.1441E-06, -0.2971E-06, -0.6195E-06, -0.1309E-05, -0.2780E-05,
1812 & -0.5823E-05, -0.1165E-04, -0.2152E-04, -0.3616E-04, -0.5604E-04,
1813 & -0.8230E-04, -0.1173E-03, -0.1635E-03, -0.2211E-03, -0.2868E-03,
1814 & -0.3567E-03, -0.4260E-03, -0.4844E-03, -0.5097E-03, -0.4750E-03,
1815 & -0.3779E-03, -0.2522E-03, -0.1409E-03, -0.6540E-04, -0.2449E-04,
1816 & -0.6948E-05/
1817 data ((h83(ip,iw,1),iw=1,31),ip=24,24)/
1818 & 0.1529E-10, 0.3060E-10, 0.6142E-10, 0.1241E-09, 0.2535E-09,
1819 & 0.5259E-09, 0.1107E-08, 0.2383E-08, 0.5243E-08, 0.1161E-07,
1820 & 0.2523E-07, 0.5188E-07, 0.9757E-07, 0.1657E-06, 0.2553E-06,
1821 & 0.3629E-06, 0.4878E-06, 0.6323E-06, 0.7923E-06, 0.9575E-06,
1822 & 0.1139E-05, 0.1381E-05, 0.1687E-05, 0.1952E-05, 0.2029E-05,
1823 & 0.1890E-05, 0.1552E-05, 0.1062E-05, 0.5728E-06, 0.2280E-06,
1824 & 0.6762E-07/
1825 data ((h81(ip,iw,1),iw=1,31),ip=25,25)/
1826 & 0.1363E-04, 0.2718E-04, 0.5420E-04, 0.1080E-03, 0.2151E-03,
1827 & 0.4275E-03, 0.8461E-03, 0.1664E-02, 0.3237E-02, 0.6195E-02,
1828 & 0.1156E-01, 0.2080E-01, 0.3573E-01, 0.5818E-01, 0.8981E-01,
1829 & 0.1323E+00, 0.1874E+00, 0.2570E+00, 0.3423E+00, 0.4425E+00,
1830 & 0.5534E+00, 0.6669E+00, 0.7714E+00, 0.8568E+00, 0.9191E+00,
1831 & 0.9597E+00, 0.9828E+00, 0.9938E+00, 0.9981E+00, 0.9996E+00,
1832 & 0.1000E+01/
1833 data ((h82(ip,iw,1),iw=1,31),ip=25,25)/
1834 & -0.4352E-08, -0.8693E-08, -0.1738E-07, -0.3483E-07, -0.7006E-07,
1835 & -0.1423E-06, -0.2905E-06, -0.6008E-06, -0.1258E-05, -0.2663E-05,
1836 & -0.5638E-05, -0.1165E-04, -0.2270E-04, -0.4044E-04, -0.6554E-04,
1837 & -0.9855E-04, -0.1407E-03, -0.1928E-03, -0.2534E-03, -0.3197E-03,
1838 & -0.3890E-03, -0.4563E-03, -0.5040E-03, -0.4998E-03, -0.4249E-03,
1839 & -0.3025E-03, -0.1794E-03, -0.8860E-04, -0.3575E-04, -0.1122E-04,
1840 & -0.2506E-05/
1841 data ((h83(ip,iw,1),iw=1,31),ip=25,25)/
1842 & 0.1527E-10, 0.3053E-10, 0.6115E-10, 0.1230E-09, 0.2492E-09,
1843 & 0.5149E-09, 0.1068E-08, 0.2268E-08, 0.4932E-08, 0.1089E-07,
1844 & 0.2408E-07, 0.5156E-07, 0.1028E-06, 0.1859E-06, 0.3028E-06,
1845 & 0.4476E-06, 0.6124E-06, 0.7932E-06, 0.9879E-06, 0.1194E-05,
1846 & 0.1417E-05, 0.1673E-05, 0.1929E-05, 0.2064E-05, 0.1997E-05,
1847 & 0.1725E-05, 0.1267E-05, 0.7464E-06, 0.3312E-06, 0.1066E-06,
1848 & 0.2718E-07/
1849 data ((h81(ip,iw,1),iw=1,31),ip=26,26)/
1850 & 0.1363E-04, 0.2719E-04, 0.5422E-04, 0.1081E-03, 0.2154E-03,
1851 & 0.4287E-03, 0.8506E-03, 0.1680E-02, 0.3291E-02, 0.6364E-02,
1852 & 0.1206E-01, 0.2218E-01, 0.3912E-01, 0.6544E-01, 0.1033E+00,
1853 & 0.1544E+00, 0.2198E+00, 0.3008E+00, 0.3970E+00, 0.5060E+00,
1854 & 0.6209E+00, 0.7311E+00, 0.8254E+00, 0.8972E+00, 0.9462E+00,
1855 & 0.9757E+00, 0.9907E+00, 0.9970E+00, 0.9992E+00, 0.9999E+00,
1856 & 0.1000E+01/
1857 data ((h82(ip,iw,1),iw=1,31),ip=26,26)/
1858 & -0.4351E-08, -0.8688E-08, -0.1736E-07, -0.3473E-07, -0.6966E-07,
1859 & -0.1405E-06, -0.2857E-06, -0.5867E-06, -0.1218E-05, -0.2563E-05,
1860 & -0.5435E-05, -0.1144E-04, -0.2321E-04, -0.4379E-04, -0.7487E-04,
1861 & -0.1163E-03, -0.1670E-03, -0.2250E-03, -0.2876E-03, -0.3535E-03,
1862 & -0.4215E-03, -0.4826E-03, -0.5082E-03, -0.4649E-03, -0.3564E-03,
1863 & -0.2264E-03, -0.1188E-03, -0.5128E-04, -0.1758E-04, -0.4431E-05,
1864 & -0.7275E-06/
1865 data ((h83(ip,iw,1),iw=1,31),ip=26,26)/
1866 & 0.1525E-10, 0.3048E-10, 0.6097E-10, 0.1223E-09, 0.2466E-09,
1867 & 0.5021E-09, 0.1032E-08, 0.2195E-08, 0.4688E-08, 0.1027E-07,
1868 & 0.2279E-07, 0.4999E-07, 0.1046E-06, 0.2009E-06, 0.3460E-06,
1869 & 0.5335E-06, 0.7478E-06, 0.9767E-06, 0.1216E-05, 0.1469E-05,
1870 & 0.1735E-05, 0.1977E-05, 0.2121E-05, 0.2103E-05, 0.1902E-05,
1871 & 0.1495E-05, 0.9541E-06, 0.4681E-06, 0.1672E-06, 0.4496E-07,
1872 & 0.9859E-08/
  ViewVC Help
Powered by ViewVC 1.1.22