C $Header: /u/gcmpack/MITgcm/pkg/fizhi/h2o-tran3.h,v 1.2 2007/10/08 23:42:14 jmc Exp $
C $Name: $
data ((h11(ip,iw,1),iw=1,31),ip= 1, 1)/
& 0.6160E-04, 0.9815E-04, 0.1474E-03, 0.2092E-03, 0.2823E-03,
& 0.3662E-03, 0.4615E-03, 0.5710E-03, 0.6998E-03, 0.8554E-03,
& 0.1049E-02, 0.1295E-02, 0.1612E-02, 0.2021E-02, 0.2548E-02,
& 0.3230E-02, 0.4123E-02, 0.5306E-02, 0.6887E-02, 0.9021E-02,
& 0.1193E-01, 0.1590E-01, 0.2135E-01, 0.2885E-01, 0.3914E-01,
& 0.5317E-01, 0.7223E-01, 0.9800E-01, 0.1326E+00, 0.1783E+00,
& 0.2373E+00/
data ((h12(ip,iw,1),iw=1,31),ip= 1, 1)/
& -0.2021E-06, -0.3628E-06, -0.5891E-06, -0.8735E-06, -0.1204E-05,
& -0.1579E-05, -0.2002E-05, -0.2494E-05, -0.3093E-05, -0.3852E-05,
& -0.4835E-05, -0.6082E-05, -0.7591E-05, -0.9332E-05, -0.1128E-04,
& -0.1347E-04, -0.1596E-04, -0.1890E-04, -0.2241E-04, -0.2672E-04,
& -0.3208E-04, -0.3884E-04, -0.4747E-04, -0.5854E-04, -0.7272E-04,
& -0.9092E-04, -0.1146E-03, -0.1458E-03, -0.1877E-03, -0.2435E-03,
& -0.3159E-03/
data ((h13(ip,iw,1),iw=1,31),ip= 1, 1)/
& 0.5907E-09, 0.8541E-09, 0.1095E-08, 0.1272E-08, 0.1297E-08,
& 0.1105E-08, 0.6788E-09, -0.5585E-10, -0.1147E-08, -0.2746E-08,
& -0.5001E-08, -0.7715E-08, -0.1037E-07, -0.1227E-07, -0.1287E-07,
& -0.1175E-07, -0.8517E-08, -0.2920E-08, 0.4786E-08, 0.1407E-07,
& 0.2476E-07, 0.3781E-07, 0.5633E-07, 0.8578E-07, 0.1322E-06,
& 0.2013E-06, 0.3006E-06, 0.4409E-06, 0.6343E-06, 0.8896E-06,
& 0.1216E-05/
data ((h11(ip,iw,1),iw=1,31),ip= 2, 2)/
& 0.6166E-04, 0.9828E-04, 0.1477E-03, 0.2097E-03, 0.2833E-03,
& 0.3680E-03, 0.4648E-03, 0.5768E-03, 0.7101E-03, 0.8736E-03,
& 0.1080E-02, 0.1348E-02, 0.1700E-02, 0.2162E-02, 0.2767E-02,
& 0.3563E-02, 0.4621E-02, 0.6039E-02, 0.7953E-02, 0.1056E-01,
& 0.1412E-01, 0.1901E-01, 0.2574E-01, 0.3498E-01, 0.4763E-01,
& 0.6484E-01, 0.8815E-01, 0.1196E+00, 0.1614E+00, 0.2157E+00,
& 0.2844E+00/
data ((h12(ip,iw,1),iw=1,31),ip= 2, 2)/
& -0.2017E-06, -0.3620E-06, -0.5878E-06, -0.8713E-06, -0.1201E-05,
& -0.1572E-05, -0.1991E-05, -0.2476E-05, -0.3063E-05, -0.3808E-05,
& -0.4776E-05, -0.6011E-05, -0.7516E-05, -0.9272E-05, -0.1127E-04,
& -0.1355E-04, -0.1620E-04, -0.1936E-04, -0.2321E-04, -0.2797E-04,
& -0.3399E-04, -0.4171E-04, -0.5172E-04, -0.6471E-04, -0.8150E-04,
& -0.1034E-03, -0.1321E-03, -0.1705E-03, -0.2217E-03, -0.2889E-03,
& -0.3726E-03/
data ((h13(ip,iw,1),iw=1,31),ip= 2, 2)/
& 0.5894E-09, 0.8519E-09, 0.1092E-08, 0.1267E-08, 0.1289E-08,
& 0.1093E-08, 0.6601E-09, -0.7831E-10, -0.1167E-08, -0.2732E-08,
& -0.4864E-08, -0.7334E-08, -0.9581E-08, -0.1097E-07, -0.1094E-07,
& -0.8999E-08, -0.4669E-08, 0.2391E-08, 0.1215E-07, 0.2424E-07,
& 0.3877E-07, 0.5711E-07, 0.8295E-07, 0.1218E-06, 0.1793E-06,
& 0.2621E-06, 0.3812E-06, 0.5508E-06, 0.7824E-06, 0.1085E-05,
& 0.1462E-05/
data ((h11(ip,iw,1),iw=1,31),ip= 3, 3)/
& 0.6175E-04, 0.9849E-04, 0.1481E-03, 0.2106E-03, 0.2849E-03,
& 0.3708E-03, 0.4698E-03, 0.5857E-03, 0.7257E-03, 0.9006E-03,
& 0.1126E-02, 0.1425E-02, 0.1823E-02, 0.2353E-02, 0.3059E-02,
& 0.4002E-02, 0.5270E-02, 0.6984E-02, 0.9316E-02, 0.1251E-01,
& 0.1689E-01, 0.2292E-01, 0.3123E-01, 0.4262E-01, 0.5814E-01,
& 0.7921E-01, 0.1077E+00, 0.1458E+00, 0.1957E+00, 0.2595E+00,
& 0.3380E+00/
data ((h12(ip,iw,1),iw=1,31),ip= 3, 3)/
& -0.2011E-06, -0.3609E-06, -0.5859E-06, -0.8680E-06, -0.1195E-05,
& -0.1563E-05, -0.1975E-05, -0.2450E-05, -0.3024E-05, -0.3755E-05,
& -0.4711E-05, -0.5941E-05, -0.7455E-05, -0.9248E-05, -0.1132E-04,
& -0.1373E-04, -0.1659E-04, -0.2004E-04, -0.2431E-04, -0.2966E-04,
& -0.3653E-04, -0.4549E-04, -0.5724E-04, -0.7259E-04, -0.9265E-04,
& -0.1191E-03, -0.1543E-03, -0.2013E-03, -0.2633E-03, -0.3421E-03,
& -0.4350E-03/
data ((h13(ip,iw,1),iw=1,31),ip= 3, 3)/
& 0.5872E-09, 0.8484E-09, 0.1087E-08, 0.1259E-08, 0.1279E-08,
& 0.1077E-08, 0.6413E-09, -0.9334E-10, -0.1161E-08, -0.2644E-08,
& -0.4588E-08, -0.6709E-08, -0.8474E-08, -0.9263E-08, -0.8489E-08,
& -0.5553E-08, 0.1203E-09, 0.9035E-08, 0.2135E-07, 0.3689E-07,
& 0.5610E-07, 0.8097E-07, 0.1155E-06, 0.1649E-06, 0.2350E-06,
& 0.3353E-06, 0.4806E-06, 0.6858E-06, 0.9617E-06, 0.1315E-05,
& 0.1741E-05/
data ((h11(ip,iw,1),iw=1,31),ip= 4, 4)/
& 0.6189E-04, 0.9882E-04, 0.1488E-03, 0.2119E-03, 0.2873E-03,
& 0.3752E-03, 0.4776E-03, 0.5993E-03, 0.7490E-03, 0.9403E-03,
& 0.1192E-02, 0.1531E-02, 0.1990E-02, 0.2610E-02, 0.3446E-02,
& 0.4576E-02, 0.6109E-02, 0.8196E-02, 0.1105E-01, 0.1498E-01,
& 0.2039E-01, 0.2785E-01, 0.3809E-01, 0.5209E-01, 0.7112E-01,
& 0.9688E-01, 0.1315E+00, 0.1773E+00, 0.2363E+00, 0.3100E+00,
& 0.3976E+00/
data ((h12(ip,iw,1),iw=1,31),ip= 4, 4)/
& -0.2001E-06, -0.3592E-06, -0.5829E-06, -0.8631E-06, -0.1187E-05,
& -0.1549E-05, -0.1953E-05, -0.2415E-05, -0.2975E-05, -0.3694E-05,
& -0.4645E-05, -0.5882E-05, -0.7425E-05, -0.9279E-05, -0.1147E-04,
& -0.1406E-04, -0.1717E-04, -0.2100E-04, -0.2580E-04, -0.3191E-04,
& -0.3989E-04, -0.5042E-04, -0.6432E-04, -0.8261E-04, -0.1068E-03,
& -0.1389E-03, -0.1820E-03, -0.2391E-03, -0.3127E-03, -0.4021E-03,
& -0.5002E-03/
data ((h13(ip,iw,1),iw=1,31),ip= 4, 4)/
& 0.5838E-09, 0.8426E-09, 0.1081E-08, 0.1249E-08, 0.1267E-08,
& 0.1062E-08, 0.6313E-09, -0.8241E-10, -0.1094E-08, -0.2436E-08,
& -0.4100E-08, -0.5786E-08, -0.6992E-08, -0.7083E-08, -0.5405E-08,
& -0.1259E-08, 0.6099E-08, 0.1732E-07, 0.3276E-07, 0.5256E-07,
& 0.7756E-07, 0.1103E-06, 0.1547E-06, 0.2159E-06, 0.3016E-06,
& 0.4251E-06, 0.6033E-06, 0.8499E-06, 0.1175E-05, 0.1579E-05,
& 0.2044E-05/
data ((h11(ip,iw,1),iw=1,31),ip= 5, 5)/
& 0.6211E-04, 0.9932E-04, 0.1499E-03, 0.2140E-03, 0.2911E-03,
& 0.3820E-03, 0.4895E-03, 0.6196E-03, 0.7834E-03, 0.9973E-03,
& 0.1285E-02, 0.1678E-02, 0.2216E-02, 0.2951E-02, 0.3953E-02,
& 0.5319E-02, 0.7186E-02, 0.9743E-02, 0.1326E-01, 0.1811E-01,
& 0.2479E-01, 0.3400E-01, 0.4662E-01, 0.6379E-01, 0.8708E-01,
& 0.1185E+00, 0.1603E+00, 0.2147E+00, 0.2835E+00, 0.3667E+00,
& 0.4620E+00/
data ((h12(ip,iw,1),iw=1,31),ip= 5, 5)/
& -0.1987E-06, -0.3565E-06, -0.5784E-06, -0.8557E-06, -0.1175E-05,
& -0.1530E-05, -0.1923E-05, -0.2372E-05, -0.2919E-05, -0.3631E-05,
& -0.4587E-05, -0.5848E-05, -0.7442E-05, -0.9391E-05, -0.1173E-04,
& -0.1455E-04, -0.1801E-04, -0.2232E-04, -0.2779E-04, -0.3489E-04,
& -0.4428E-04, -0.5678E-04, -0.7333E-04, -0.9530E-04, -0.1246E-03,
& -0.1639E-03, -0.2164E-03, -0.2848E-03, -0.3697E-03, -0.4665E-03,
& -0.5646E-03/
data ((h13(ip,iw,1),iw=1,31),ip= 5, 5)/
& 0.5785E-09, 0.8338E-09, 0.1071E-08, 0.1239E-08, 0.1256E-08,
& 0.1057E-08, 0.6480E-09, -0.1793E-10, -0.9278E-09, -0.2051E-08,
& -0.3337E-08, -0.4514E-08, -0.5067E-08, -0.4328E-08, -0.1545E-08,
& 0.4100E-08, 0.1354E-07, 0.2762E-07, 0.4690E-07, 0.7190E-07,
& 0.1040E-06, 0.1459E-06, 0.2014E-06, 0.2764E-06, 0.3824E-06,
& 0.5359E-06, 0.7532E-06, 0.1047E-05, 0.1424E-05, 0.1873E-05,
& 0.2356E-05/
data ((h11(ip,iw,1),iw=1,31),ip= 6, 6)/
& 0.6246E-04, 0.1001E-03, 0.1515E-03, 0.2171E-03, 0.2970E-03,
& 0.3924E-03, 0.5072E-03, 0.6495E-03, 0.8329E-03, 0.1078E-02,
& 0.1413E-02, 0.1876E-02, 0.2516E-02, 0.3399E-02, 0.4612E-02,
& 0.6276E-02, 0.8562E-02, 0.1171E-01, 0.1605E-01, 0.2205E-01,
& 0.3032E-01, 0.4167E-01, 0.5717E-01, 0.7821E-01, 0.1067E+00,
& 0.1447E+00, 0.1948E+00, 0.2586E+00, 0.3372E+00, 0.4290E+00,
& 0.5295E+00/
data ((h12(ip,iw,1),iw=1,31),ip= 6, 6)/
& -0.1964E-06, -0.3526E-06, -0.5717E-06, -0.8451E-06, -0.1158E-05,
& -0.1504E-05, -0.1886E-05, -0.2322E-05, -0.2861E-05, -0.3576E-05,
& -0.4552E-05, -0.5856E-05, -0.7529E-05, -0.9609E-05, -0.1216E-04,
& -0.1528E-04, -0.1916E-04, -0.2408E-04, -0.3043E-04, -0.3880E-04,
& -0.4997E-04, -0.6488E-04, -0.8474E-04, -0.1113E-03, -0.1471E-03,
& -0.1950E-03, -0.2583E-03, -0.3384E-03, -0.4326E-03, -0.5319E-03,
& -0.6244E-03/
data ((h13(ip,iw,1),iw=1,31),ip= 6, 6)/
& 0.5713E-09, 0.8263E-09, 0.1060E-08, 0.1226E-08, 0.1252E-08,
& 0.1076E-08, 0.7149E-09, 0.1379E-09, -0.6043E-09, -0.1417E-08,
& -0.2241E-08, -0.2830E-08, -0.2627E-08, -0.8950E-09, 0.3231E-08,
& 0.1075E-07, 0.2278E-07, 0.4037E-07, 0.6439E-07, 0.9576E-07,
& 0.1363E-06, 0.1886E-06, 0.2567E-06, 0.3494E-06, 0.4821E-06,
& 0.6719E-06, 0.9343E-06, 0.1280E-05, 0.1705E-05, 0.2184E-05,
& 0.2651E-05/
data ((h11(ip,iw,1),iw=1,31),ip= 7, 7)/
& 0.6299E-04, 0.1013E-03, 0.1541E-03, 0.2220E-03, 0.3058E-03,
& 0.4078E-03, 0.5334E-03, 0.6928E-03, 0.9032E-03, 0.1190E-02,
& 0.1587E-02, 0.2140E-02, 0.2912E-02, 0.3982E-02, 0.5460E-02,
& 0.7500E-02, 0.1031E-01, 0.1420E-01, 0.1958E-01, 0.2700E-01,
& 0.3721E-01, 0.5118E-01, 0.7019E-01, 0.9593E-01, 0.1305E+00,
& 0.1763E+00, 0.2354E+00, 0.3091E+00, 0.3969E+00, 0.4952E+00,
& 0.5978E+00/
data ((h12(ip,iw,1),iw=1,31),ip= 7, 7)/
& -0.1932E-06, -0.3467E-06, -0.5623E-06, -0.8306E-06, -0.1136E-05,
& -0.1472E-05, -0.1842E-05, -0.2269E-05, -0.2807E-05, -0.3539E-05,
& -0.4553E-05, -0.5925E-05, -0.7710E-05, -0.9968E-05, -0.1278E-04,
& -0.1629E-04, -0.2073E-04, -0.2644E-04, -0.3392E-04, -0.4390E-04,
& -0.5727E-04, -0.7516E-04, -0.9916E-04, -0.1315E-03, -0.1752E-03,
& -0.2333E-03, -0.3082E-03, -0.3988E-03, -0.4982E-03, -0.5947E-03,
& -0.6764E-03/
data ((h13(ip,iw,1),iw=1,31),ip= 7, 7)/
& 0.5612E-09, 0.8116E-09, 0.1048E-08, 0.1222E-08, 0.1270E-08,
& 0.1141E-08, 0.8732E-09, 0.4336E-09, -0.6548E-10, -0.4774E-09,
& -0.7556E-09, -0.6577E-09, 0.4377E-09, 0.3359E-08, 0.9159E-08,
& 0.1901E-07, 0.3422E-07, 0.5616E-07, 0.8598E-07, 0.1251E-06,
& 0.1752E-06, 0.2392E-06, 0.3228E-06, 0.4389E-06, 0.6049E-06,
& 0.8370E-06, 0.1150E-05, 0.1547E-05, 0.2012E-05, 0.2493E-05,
& 0.2913E-05/
data ((h11(ip,iw,1),iw=1,31),ip= 8, 8)/
& 0.6378E-04, 0.1032E-03, 0.1579E-03, 0.2293E-03, 0.3190E-03,
& 0.4305E-03, 0.5712E-03, 0.7541E-03, 0.1001E-02, 0.1342E-02,
& 0.1819E-02, 0.2489E-02, 0.3427E-02, 0.4734E-02, 0.6548E-02,
& 0.9059E-02, 0.1254E-01, 0.1735E-01, 0.2401E-01, 0.3318E-01,
& 0.4577E-01, 0.6292E-01, 0.8620E-01, 0.1176E+00, 0.1594E+00,
& 0.2139E+00, 0.2827E+00, 0.3660E+00, 0.4614E+00, 0.5634E+00,
& 0.6649E+00/
data ((h12(ip,iw,1),iw=1,31),ip= 8, 8)/
& -0.1885E-06, -0.3385E-06, -0.5493E-06, -0.8114E-06, -0.1109E-05,
& -0.1436E-05, -0.1796E-05, -0.2219E-05, -0.2770E-05, -0.3535E-05,
& -0.4609E-05, -0.6077E-05, -0.8016E-05, -0.1051E-04, -0.1367E-04,
& -0.1768E-04, -0.2283E-04, -0.2955E-04, -0.3849E-04, -0.5046E-04,
& -0.6653E-04, -0.8813E-04, -0.1173E-03, -0.1569E-03, -0.2100E-03,
& -0.2794E-03, -0.3656E-03, -0.4637E-03, -0.5629E-03, -0.6512E-03,
& -0.7167E-03/
data ((h13(ip,iw,1),iw=1,31),ip= 8, 8)/
& 0.5477E-09, 0.8000E-09, 0.1039E-08, 0.1234E-08, 0.1331E-08,
& 0.1295E-08, 0.1160E-08, 0.9178E-09, 0.7535E-09, 0.8301E-09,
& 0.1184E-08, 0.2082E-08, 0.4253E-08, 0.8646E-08, 0.1650E-07,
& 0.2920E-07, 0.4834E-07, 0.7564E-07, 0.1125E-06, 0.1606E-06,
& 0.2216E-06, 0.2992E-06, 0.4031E-06, 0.5493E-06, 0.7549E-06,
& 0.1035E-05, 0.1400E-05, 0.1843E-05, 0.2327E-05, 0.2774E-05,
& 0.3143E-05/
data ((h11(ip,iw,1),iw=1,31),ip= 9, 9)/
& 0.6495E-04, 0.1059E-03, 0.1635E-03, 0.2400E-03, 0.3381E-03,
& 0.4631E-03, 0.6246E-03, 0.8394E-03, 0.1134E-02, 0.1546E-02,
& 0.2126E-02, 0.2944E-02, 0.4093E-02, 0.5699E-02, 0.7934E-02,
& 0.1104E-01, 0.1535E-01, 0.2131E-01, 0.2956E-01, 0.4089E-01,
& 0.5636E-01, 0.7739E-01, 0.1058E+00, 0.1439E+00, 0.1939E+00,
& 0.2578E+00, 0.3364E+00, 0.4283E+00, 0.5290E+00, 0.6314E+00,
& 0.7292E+00/
data ((h12(ip,iw,1),iw=1,31),ip= 9, 9)/
& -0.1822E-06, -0.3274E-06, -0.5325E-06, -0.7881E-06, -0.1079E-05,
& -0.1398E-05, -0.1754E-05, -0.2184E-05, -0.2763E-05, -0.3581E-05,
& -0.4739E-05, -0.6341E-05, -0.8484E-05, -0.1128E-04, -0.1490E-04,
& -0.1955E-04, -0.2561E-04, -0.3364E-04, -0.4438E-04, -0.5881E-04,
& -0.7822E-04, -0.1045E-03, -0.1401E-03, -0.1884E-03, -0.2523E-03,
& -0.3335E-03, -0.4289E-03, -0.5296E-03, -0.6231E-03, -0.6980E-03,
& -0.7406E-03/
data ((h13(ip,iw,1),iw=1,31),ip= 9, 9)/
& 0.5334E-09, 0.7859E-09, 0.1043E-08, 0.1279E-08, 0.1460E-08,
& 0.1560E-08, 0.1618E-08, 0.1657E-08, 0.1912E-08, 0.2569E-08,
& 0.3654E-08, 0.5509E-08, 0.8964E-08, 0.1518E-07, 0.2560E-07,
& 0.4178E-07, 0.6574E-07, 0.9958E-07, 0.1449E-06, 0.2031E-06,
& 0.2766E-06, 0.3718E-06, 0.5022E-06, 0.6849E-06, 0.9360E-06,
& 0.1268E-05, 0.1683E-05, 0.2157E-05, 0.2625E-05, 0.3020E-05,
& 0.3364E-05/
data ((h11(ip,iw,1),iw=1,31),ip=10,10)/
& 0.6661E-04, 0.1098E-03, 0.1716E-03, 0.2554E-03, 0.3653E-03,
& 0.5088E-03, 0.6986E-03, 0.9557E-03, 0.1313E-02, 0.1816E-02,
& 0.2527E-02, 0.3532E-02, 0.4947E-02, 0.6929E-02, 0.9694E-02,
& 0.1354E-01, 0.1888E-01, 0.2628E-01, 0.3647E-01, 0.5043E-01,
& 0.6941E-01, 0.9514E-01, 0.1297E+00, 0.1755E+00, 0.2347E+00,
& 0.3084E+00, 0.3962E+00, 0.4947E+00, 0.5974E+00, 0.6973E+00,
& 0.7898E+00/
data ((h12(ip,iw,1),iw=1,31),ip=10,10)/
& -0.1742E-06, -0.3134E-06, -0.5121E-06, -0.7619E-06, -0.1048E-05,
& -0.1364E-05, -0.1725E-05, -0.2177E-05, -0.2801E-05, -0.3694E-05,
& -0.4969E-05, -0.6748E-05, -0.9161E-05, -0.1236E-04, -0.1655E-04,
& -0.2203E-04, -0.2927E-04, -0.3894E-04, -0.5192E-04, -0.6936E-04,
& -0.9294E-04, -0.1250E-03, -0.1686E-03, -0.2271E-03, -0.3027E-03,
& -0.3944E-03, -0.4951E-03, -0.5928E-03, -0.6755E-03, -0.7309E-03,
& -0.7417E-03/
data ((h13(ip,iw,1),iw=1,31),ip=10,10)/
& 0.5179E-09, 0.7789E-09, 0.1071E-08, 0.1382E-08, 0.1690E-08,
& 0.1979E-08, 0.2297E-08, 0.2704E-08, 0.3466E-08, 0.4794E-08,
& 0.6746E-08, 0.9739E-08, 0.1481E-07, 0.2331E-07, 0.3679E-07,
& 0.5726E-07, 0.8716E-07, 0.1289E-06, 0.1837E-06, 0.2534E-06,
& 0.3424E-06, 0.4609E-06, 0.6245E-06, 0.8495E-06, 0.1151E-05,
& 0.1536E-05, 0.1991E-05, 0.2468E-05, 0.2891E-05, 0.3245E-05,
& 0.3580E-05/
data ((h11(ip,iw,1),iw=1,31),ip=11,11)/
& 0.6888E-04, 0.1151E-03, 0.1828E-03, 0.2766E-03, 0.4028E-03,
& 0.5713E-03, 0.7987E-03, 0.1111E-02, 0.1548E-02, 0.2167E-02,
& 0.3044E-02, 0.4285E-02, 0.6035E-02, 0.8490E-02, 0.1192E-01,
& 0.1670E-01, 0.2333E-01, 0.3249E-01, 0.4506E-01, 0.6220E-01,
& 0.8546E-01, 0.1168E+00, 0.1587E+00, 0.2131E+00, 0.2820E+00,
& 0.3653E+00, 0.4609E+00, 0.5630E+00, 0.6645E+00, 0.7599E+00,
& 0.8458E+00/
data ((h12(ip,iw,1),iw=1,31),ip=11,11)/
& -0.1647E-06, -0.2974E-06, -0.4900E-06, -0.7358E-06, -0.1022E-05,
& -0.1344E-05, -0.1721E-05, -0.2212E-05, -0.2901E-05, -0.3896E-05,
& -0.5327E-05, -0.7342E-05, -0.1011E-04, -0.1382E-04, -0.1875E-04,
& -0.2530E-04, -0.3403E-04, -0.4573E-04, -0.6145E-04, -0.8264E-04,
& -0.1114E-03, -0.1507E-03, -0.2039E-03, -0.2737E-03, -0.3607E-03,
& -0.4599E-03, -0.5604E-03, -0.6497E-03, -0.7161E-03, -0.7443E-03,
& -0.7133E-03/
data ((h13(ip,iw,1),iw=1,31),ip=11,11)/
& 0.5073E-09, 0.7906E-09, 0.1134E-08, 0.1560E-08, 0.2046E-08,
& 0.2589E-08, 0.3254E-08, 0.4107E-08, 0.5481E-08, 0.7602E-08,
& 0.1059E-07, 0.1501E-07, 0.2210E-07, 0.3334E-07, 0.5055E-07,
& 0.7629E-07, 0.1134E-06, 0.1642E-06, 0.2298E-06, 0.3133E-06,
& 0.4225E-06, 0.5709E-06, 0.7739E-06, 0.1047E-05, 0.1401E-05,
& 0.1833E-05, 0.2308E-05, 0.2753E-05, 0.3125E-05, 0.3467E-05,
& 0.3748E-05/
data ((h11(ip,iw,1),iw=1,31),ip=12,12)/
& 0.7179E-04, 0.1221E-03, 0.1975E-03, 0.3049E-03, 0.4529E-03,
& 0.6547E-03, 0.9312E-03, 0.1315E-02, 0.1855E-02, 0.2620E-02,
& 0.3705E-02, 0.5243E-02, 0.7414E-02, 0.1046E-01, 0.1472E-01,
& 0.2065E-01, 0.2888E-01, 0.4019E-01, 0.5566E-01, 0.7668E-01,
& 0.1051E+00, 0.1432E+00, 0.1932E+00, 0.2571E+00, 0.3358E+00,
& 0.4278E+00, 0.5285E+00, 0.6310E+00, 0.7289E+00, 0.8184E+00,
& 0.8954E+00/
data ((h12(ip,iw,1),iw=1,31),ip=12,12)/
& -0.1548E-06, -0.2808E-06, -0.4683E-06, -0.7142E-06, -0.1008E-05,
& -0.1347E-05, -0.1758E-05, -0.2306E-05, -0.3083E-05, -0.4214E-05,
& -0.5851E-05, -0.8175E-05, -0.1140E-04, -0.1577E-04, -0.2166E-04,
& -0.2955E-04, -0.4014E-04, -0.5434E-04, -0.7343E-04, -0.9931E-04,
& -0.1346E-03, -0.1826E-03, -0.2467E-03, -0.3283E-03, -0.4246E-03,
& -0.5264E-03, -0.6211E-03, -0.6970E-03, -0.7402E-03, -0.7316E-03,
& -0.6486E-03/
data ((h13(ip,iw,1),iw=1,31),ip=12,12)/
& 0.5078E-09, 0.8244E-09, 0.1255E-08, 0.1826E-08, 0.2550E-08,
& 0.3438E-08, 0.4532E-08, 0.5949E-08, 0.8041E-08, 0.1110E-07,
& 0.1534E-07, 0.2157E-07, 0.3116E-07, 0.4570E-07, 0.6747E-07,
& 0.9961E-07, 0.1451E-06, 0.2061E-06, 0.2843E-06, 0.3855E-06,
& 0.5213E-06, 0.7060E-06, 0.9544E-06, 0.1280E-05, 0.1684E-05,
& 0.2148E-05, 0.2609E-05, 0.3002E-05, 0.3349E-05, 0.3670E-05,
& 0.3780E-05/
data ((h11(ip,iw,1),iw=1,31),ip=13,13)/
& 0.7529E-04, 0.1306E-03, 0.2160E-03, 0.3410E-03, 0.5175E-03,
& 0.7626E-03, 0.1103E-02, 0.1577E-02, 0.2246E-02, 0.3196E-02,
& 0.4544E-02, 0.6455E-02, 0.9152E-02, 0.1294E-01, 0.1823E-01,
& 0.2560E-01, 0.3577E-01, 0.4971E-01, 0.6870E-01, 0.9443E-01,
& 0.1290E+00, 0.1748E+00, 0.2340E+00, 0.3078E+00, 0.3956E+00,
& 0.4942E+00, 0.5969E+00, 0.6970E+00, 0.7896E+00, 0.8714E+00,
& 0.9364E+00/
data ((h12(ip,iw,1),iw=1,31),ip=13,13)/
& -0.1461E-06, -0.2663E-06, -0.4512E-06, -0.7027E-06, -0.1014E-05,
& -0.1387E-05, -0.1851E-05, -0.2478E-05, -0.3373E-05, -0.4682E-05,
& -0.6588E-05, -0.9311E-05, -0.1311E-04, -0.1834E-04, -0.2544E-04,
& -0.3502E-04, -0.4789E-04, -0.6515E-04, -0.8846E-04, -0.1202E-03,
& -0.1635E-03, -0.2217E-03, -0.2975E-03, -0.3897E-03, -0.4913E-03,
& -0.5902E-03, -0.6740E-03, -0.7302E-03, -0.7415E-03, -0.6858E-03,
& -0.5447E-03/
data ((h13(ip,iw,1),iw=1,31),ip=13,13)/
& 0.5236E-09, 0.8873E-09, 0.1426E-08, 0.2193E-08, 0.3230E-08,
& 0.4555E-08, 0.6200E-08, 0.8298E-08, 0.1126E-07, 0.1544E-07,
& 0.2130E-07, 0.2978E-07, 0.4239E-07, 0.6096E-07, 0.8829E-07,
& 0.1280E-06, 0.1830E-06, 0.2555E-06, 0.3493E-06, 0.4740E-06,
& 0.6431E-06, 0.8701E-06, 0.1169E-05, 0.1547E-05, 0.1992E-05,
& 0.2460E-05, 0.2877E-05, 0.3230E-05, 0.3569E-05, 0.3782E-05,
& 0.3591E-05/
data ((h11(ip,iw,1),iw=1,31),ip=14,14)/
& 0.7911E-04, 0.1403E-03, 0.2378E-03, 0.3847E-03, 0.5973E-03,
& 0.8978E-03, 0.1319E-02, 0.1909E-02, 0.2741E-02, 0.3923E-02,
& 0.5600E-02, 0.7977E-02, 0.1133E-01, 0.1604E-01, 0.2262E-01,
& 0.3174E-01, 0.4429E-01, 0.6143E-01, 0.8469E-01, 0.1161E+00,
& 0.1579E+00, 0.2124E+00, 0.2813E+00, 0.3647E+00, 0.4603E+00,
& 0.5625E+00, 0.6641E+00, 0.7596E+00, 0.8456E+00, 0.9170E+00,
& 0.9670E+00/
data ((h12(ip,iw,1),iw=1,31),ip=14,14)/
& -0.1402E-06, -0.2569E-06, -0.4428E-06, -0.7076E-06, -0.1051E-05,
& -0.1478E-05, -0.2019E-05, -0.2752E-05, -0.3802E-05, -0.5343E-05,
& -0.7594E-05, -0.1082E-04, -0.1536E-04, -0.2166E-04, -0.3028E-04,
& -0.4195E-04, -0.5761E-04, -0.7867E-04, -0.1072E-03, -0.1462E-03,
& -0.1990E-03, -0.2687E-03, -0.3559E-03, -0.4558E-03, -0.5572E-03,
& -0.6476E-03, -0.7150E-03, -0.7439E-03, -0.7133E-03, -0.6015E-03,
& -0.4089E-03/
data ((h13(ip,iw,1),iw=1,31),ip=14,14)/
& 0.5531E-09, 0.9757E-09, 0.1644E-08, 0.2650E-08, 0.4074E-08,
& 0.5957E-08, 0.8314E-08, 0.1128E-07, 0.1528E-07, 0.2087E-07,
& 0.2874E-07, 0.4002E-07, 0.5631E-07, 0.7981E-07, 0.1139E-06,
& 0.1621E-06, 0.2275E-06, 0.3136E-06, 0.4280E-06, 0.5829E-06,
& 0.7917E-06, 0.1067E-05, 0.1419E-05, 0.1844E-05, 0.2310E-05,
& 0.2747E-05, 0.3113E-05, 0.3455E-05, 0.3739E-05, 0.3715E-05,
& 0.3125E-05/
data ((h11(ip,iw,1),iw=1,31),ip=15,15)/
& 0.8292E-04, 0.1503E-03, 0.2614E-03, 0.4345E-03, 0.6915E-03,
& 0.1061E-02, 0.1584E-02, 0.2320E-02, 0.3359E-02, 0.4831E-02,
& 0.6920E-02, 0.9877E-02, 0.1405E-01, 0.1990E-01, 0.2805E-01,
& 0.3933E-01, 0.5477E-01, 0.7579E-01, 0.1042E+00, 0.1423E+00,
& 0.1924E+00, 0.2564E+00, 0.3351E+00, 0.4271E+00, 0.5280E+00,
& 0.6306E+00, 0.7286E+00, 0.8182E+00, 0.8952E+00, 0.9530E+00,
& 0.9864E+00/
data ((h12(ip,iw,1),iw=1,31),ip=15,15)/
& -0.1378E-06, -0.2542E-06, -0.4461E-06, -0.7333E-06, -0.1125E-05,
& -0.1630E-05, -0.2281E-05, -0.3159E-05, -0.4410E-05, -0.6246E-05,
& -0.8933E-05, -0.1280E-04, -0.1826E-04, -0.2589E-04, -0.3639E-04,
& -0.5059E-04, -0.6970E-04, -0.9552E-04, -0.1307E-03, -0.1784E-03,
& -0.2422E-03, -0.3237E-03, -0.4203E-03, -0.5227E-03, -0.6184E-03,
& -0.6953E-03, -0.7395E-03, -0.7315E-03, -0.6487E-03, -0.4799E-03,
& -0.2625E-03/
data ((h13(ip,iw,1),iw=1,31),ip=15,15)/
& 0.5891E-09, 0.1074E-08, 0.1885E-08, 0.3167E-08, 0.5051E-08,
& 0.7631E-08, 0.1092E-07, 0.1500E-07, 0.2032E-07, 0.2769E-07,
& 0.3810E-07, 0.5279E-07, 0.7361E-07, 0.1032E-06, 0.1450E-06,
& 0.2026E-06, 0.2798E-06, 0.3832E-06, 0.5242E-06, 0.7159E-06,
& 0.9706E-06, 0.1299E-05, 0.1701E-05, 0.2159E-05, 0.2612E-05,
& 0.2998E-05, 0.3341E-05, 0.3661E-05, 0.3775E-05, 0.3393E-05,
& 0.2384E-05/
data ((h11(ip,iw,1),iw=1,31),ip=16,16)/
& 0.8637E-04, 0.1598E-03, 0.2853E-03, 0.4876E-03, 0.7970E-03,
& 0.1251E-02, 0.1901E-02, 0.2820E-02, 0.4118E-02, 0.5955E-02,
& 0.8557E-02, 0.1224E-01, 0.1742E-01, 0.2467E-01, 0.3476E-01,
& 0.4864E-01, 0.6759E-01, 0.9332E-01, 0.1280E+00, 0.1738E+00,
& 0.2330E+00, 0.3069E+00, 0.3949E+00, 0.4935E+00, 0.5964E+00,
& 0.6965E+00, 0.7893E+00, 0.8713E+00, 0.9363E+00, 0.9780E+00,
& 0.9961E+00/
data ((h12(ip,iw,1),iw=1,31),ip=16,16)/
& -0.1383E-06, -0.2577E-06, -0.4608E-06, -0.7793E-06, -0.1237E-05,
& -0.1850E-05, -0.2652E-05, -0.3728E-05, -0.5244E-05, -0.7451E-05,
& -0.1067E-04, -0.1532E-04, -0.2193E-04, -0.3119E-04, -0.4395E-04,
& -0.6126E-04, -0.8466E-04, -0.1164E-03, -0.1596E-03, -0.2177E-03,
& -0.2933E-03, -0.3855E-03, -0.4874E-03, -0.5870E-03, -0.6718E-03,
& -0.7290E-03, -0.7411E-03, -0.6859E-03, -0.5450E-03, -0.3353E-03,
& -0.1363E-03/
data ((h13(ip,iw,1),iw=1,31),ip=16,16)/
& 0.6217E-09, 0.1165E-08, 0.2116E-08, 0.3685E-08, 0.6101E-08,
& 0.9523E-08, 0.1400E-07, 0.1959E-07, 0.2668E-07, 0.3629E-07,
& 0.4982E-07, 0.6876E-07, 0.9523E-07, 0.1321E-06, 0.1825E-06,
& 0.2505E-06, 0.3420E-06, 0.4677E-06, 0.6416E-06, 0.8760E-06,
& 0.1183E-05, 0.1565E-05, 0.2010E-05, 0.2472E-05, 0.2882E-05,
& 0.3229E-05, 0.3564E-05, 0.3777E-05, 0.3589E-05, 0.2786E-05,
& 0.1487E-05/
data ((h11(ip,iw,1),iw=1,31),ip=17,17)/
& 0.8925E-04, 0.1682E-03, 0.3074E-03, 0.5403E-03, 0.9085E-03,
& 0.1463E-02, 0.2268E-02, 0.3416E-02, 0.5040E-02, 0.7333E-02,
& 0.1057E-01, 0.1515E-01, 0.2157E-01, 0.3055E-01, 0.4297E-01,
& 0.6001E-01, 0.8323E-01, 0.1146E+00, 0.1565E+00, 0.2111E+00,
& 0.2801E+00, 0.3636E+00, 0.4594E+00, 0.5618E+00, 0.6636E+00,
& 0.7592E+00, 0.8454E+00, 0.9169E+00, 0.9669E+00, 0.9923E+00,
& 0.9995E+00/
data ((h12(ip,iw,1),iw=1,31),ip=17,17)/
& -0.1405E-06, -0.2649E-06, -0.4829E-06, -0.8398E-06, -0.1379E-05,
& -0.2132E-05, -0.3138E-05, -0.4487E-05, -0.6353E-05, -0.9026E-05,
& -0.1290E-04, -0.1851E-04, -0.2650E-04, -0.3772E-04, -0.5319E-04,
& -0.7431E-04, -0.1031E-03, -0.1422E-03, -0.1951E-03, -0.2648E-03,
& -0.3519E-03, -0.4518E-03, -0.5537E-03, -0.6449E-03, -0.7133E-03,
& -0.7432E-03, -0.7133E-03, -0.6018E-03, -0.4092E-03, -0.1951E-03,
& -0.5345E-04/
data ((h13(ip,iw,1),iw=1,31),ip=17,17)/
& 0.6457E-09, 0.1235E-08, 0.2303E-08, 0.4149E-08, 0.7120E-08,
& 0.1152E-07, 0.1749E-07, 0.2508E-07, 0.3462E-07, 0.4718E-07,
& 0.6452E-07, 0.8874E-07, 0.1222E-06, 0.1675E-06, 0.2276E-06,
& 0.3076E-06, 0.4174E-06, 0.5714E-06, 0.7837E-06, 0.1067E-05,
& 0.1428E-05, 0.1859E-05, 0.2327E-05, 0.2760E-05, 0.3122E-05,
& 0.3458E-05, 0.3739E-05, 0.3715E-05, 0.3126E-05, 0.1942E-05,
& 0.6977E-06/
data ((h11(ip,iw,1),iw=1,31),ip=18,18)/
& 0.9151E-04, 0.1750E-03, 0.3265E-03, 0.5891E-03, 0.1020E-02,
& 0.1688E-02, 0.2679E-02, 0.4109E-02, 0.6138E-02, 0.9002E-02,
& 0.1304E-01, 0.1871E-01, 0.2667E-01, 0.3773E-01, 0.5299E-01,
& 0.7386E-01, 0.1022E+00, 0.1403E+00, 0.1905E+00, 0.2546E+00,
& 0.3335E+00, 0.4258E+00, 0.5269E+00, 0.6297E+00, 0.7280E+00,
& 0.8178E+00, 0.8950E+00, 0.9529E+00, 0.9864E+00, 0.9983E+00,
& 0.1000E+01/
data ((h12(ip,iw,1),iw=1,31),ip=18,18)/
& -0.1431E-06, -0.2731E-06, -0.5072E-06, -0.9057E-06, -0.1537E-05,
& -0.2460E-05, -0.3733E-05, -0.5449E-05, -0.7786E-05, -0.1106E-04,
& -0.1574E-04, -0.2249E-04, -0.3212E-04, -0.4564E-04, -0.6438E-04,
& -0.9019E-04, -0.1256E-03, -0.1737E-03, -0.2378E-03, -0.3196E-03,
& -0.4163E-03, -0.5191E-03, -0.6154E-03, -0.6931E-03, -0.7384E-03,
& -0.7313E-03, -0.6492E-03, -0.4805E-03, -0.2629E-03, -0.8897E-04,
& -0.1432E-04/
data ((h13(ip,iw,1),iw=1,31),ip=18,18)/
& 0.6607E-09, 0.1282E-08, 0.2441E-08, 0.4522E-08, 0.8027E-08,
& 0.1348E-07, 0.2122E-07, 0.3139E-07, 0.4435E-07, 0.6095E-07,
& 0.8319E-07, 0.1139E-06, 0.1557E-06, 0.2107E-06, 0.2819E-06,
& 0.3773E-06, 0.5107E-06, 0.6982E-06, 0.9542E-06, 0.1290E-05,
& 0.1703E-05, 0.2170E-05, 0.2628E-05, 0.3013E-05, 0.3352E-05,
& 0.3669E-05, 0.3780E-05, 0.3397E-05, 0.2386E-05, 0.1062E-05,
& 0.2216E-06/
data ((h11(ip,iw,1),iw=1,31),ip=19,19)/
& 0.9320E-04, 0.1803E-03, 0.3422E-03, 0.6317E-03, 0.1124E-02,
& 0.1915E-02, 0.3121E-02, 0.4890E-02, 0.7421E-02, 0.1100E-01,
& 0.1602E-01, 0.2306E-01, 0.3288E-01, 0.4647E-01, 0.6515E-01,
& 0.9066E-01, 0.1252E+00, 0.1710E+00, 0.2304E+00, 0.3045E+00,
& 0.3928E+00, 0.4918E+00, 0.5951E+00, 0.6956E+00, 0.7887E+00,
& 0.8709E+00, 0.9361E+00, 0.9780E+00, 0.9961E+00, 0.9999E+00,
& 0.1000E+01/
data ((h12(ip,iw,1),iw=1,31),ip=19,19)/
& -0.1454E-06, -0.2805E-06, -0.5296E-06, -0.9685E-06, -0.1695E-05,
& -0.2812E-05, -0.4412E-05, -0.6606E-05, -0.9573E-05, -0.1363E-04,
& -0.1932E-04, -0.2743E-04, -0.3897E-04, -0.5520E-04, -0.7787E-04,
& -0.1094E-03, -0.1529E-03, -0.2117E-03, -0.2880E-03, -0.3809E-03,
& -0.4834E-03, -0.5836E-03, -0.6692E-03, -0.7275E-03, -0.7408E-03,
& -0.6865E-03, -0.5459E-03, -0.3360E-03, -0.1365E-03, -0.2935E-04,
& -0.2173E-05/
data ((h13(ip,iw,1),iw=1,31),ip=19,19)/
& 0.6693E-09, 0.1312E-08, 0.2538E-08, 0.4802E-08, 0.8778E-08,
& 0.1528E-07, 0.2501E-07, 0.3836E-07, 0.5578E-07, 0.7806E-07,
& 0.1069E-06, 0.1456E-06, 0.1970E-06, 0.2631E-06, 0.3485E-06,
& 0.4642E-06, 0.6268E-06, 0.8526E-06, 0.1157E-05, 0.1545E-05,
& 0.2002E-05, 0.2478E-05, 0.2897E-05, 0.3245E-05, 0.3578E-05,
& 0.3789E-05, 0.3598E-05, 0.2792E-05, 0.1489E-05, 0.4160E-06,
& 0.3843E-07/
data ((h11(ip,iw,1),iw=1,31),ip=20,20)/
& 0.9443E-04, 0.1843E-03, 0.3545E-03, 0.6669E-03, 0.1217E-02,
& 0.2133E-02, 0.3577E-02, 0.5742E-02, 0.8880E-02, 0.1333E-01,
& 0.1958E-01, 0.2830E-01, 0.4039E-01, 0.5705E-01, 0.7988E-01,
& 0.1110E+00, 0.1526E+00, 0.2072E+00, 0.2764E+00, 0.3604E+00,
& 0.4567E+00, 0.5597E+00, 0.6620E+00, 0.7581E+00, 0.8447E+00,
& 0.9165E+00, 0.9668E+00, 0.9923E+00, 0.9995E+00, 0.1000E+01,
& 0.1000E+01/
data ((h12(ip,iw,1),iw=1,31),ip=20,20)/
& -0.1472E-06, -0.2866E-06, -0.5485E-06, -0.1024E-05, -0.1842E-05,
& -0.3160E-05, -0.5136E-05, -0.7922E-05, -0.1171E-04, -0.1682E-04,
& -0.2381E-04, -0.3355E-04, -0.4729E-04, -0.6673E-04, -0.9417E-04,
& -0.1327E-03, -0.1858E-03, -0.2564E-03, -0.3449E-03, -0.4463E-03,
& -0.5495E-03, -0.6420E-03, -0.7116E-03, -0.7427E-03, -0.7139E-03,
& -0.6031E-03, -0.4104E-03, -0.1957E-03, -0.5358E-04, -0.6176E-05,
& -0.1347E-06/
data ((h13(ip,iw,1),iw=1,31),ip=20,20)/
& 0.6750E-09, 0.1332E-08, 0.2602E-08, 0.5003E-08, 0.9367E-08,
& 0.1684E-07, 0.2863E-07, 0.4566E-07, 0.6865E-07, 0.9861E-07,
& 0.1368E-06, 0.1856E-06, 0.2479E-06, 0.3274E-06, 0.4315E-06,
& 0.5739E-06, 0.7710E-06, 0.1040E-05, 0.1394E-05, 0.1829E-05,
& 0.2309E-05, 0.2759E-05, 0.3131E-05, 0.3472E-05, 0.3755E-05,
& 0.3730E-05, 0.3138E-05, 0.1948E-05, 0.6994E-06, 0.1022E-06,
& 0.2459E-08/
data ((h11(ip,iw,1),iw=1,31),ip=21,21)/
& 0.9530E-04, 0.1872E-03, 0.3638E-03, 0.6949E-03, 0.1295E-02,
& 0.2330E-02, 0.4022E-02, 0.6633E-02, 0.1049E-01, 0.1601E-01,
& 0.2378E-01, 0.3456E-01, 0.4941E-01, 0.6980E-01, 0.9765E-01,
& 0.1353E+00, 0.1852E+00, 0.2494E+00, 0.3287E+00, 0.4216E+00,
& 0.5234E+00, 0.6272E+00, 0.7261E+00, 0.8166E+00, 0.8943E+00,
& 0.9526E+00, 0.9863E+00, 0.9983E+00, 0.1000E+01, 0.1000E+01,
& 0.1000E+01/
data ((h12(ip,iw,1),iw=1,31),ip=21,21)/
& -0.1487E-06, -0.2912E-06, -0.5636E-06, -0.1069E-05, -0.1969E-05,
& -0.3483E-05, -0.5858E-05, -0.9334E-05, -0.1416E-04, -0.2067E-04,
& -0.2936E-04, -0.4113E-04, -0.5750E-04, -0.8072E-04, -0.1139E-03,
& -0.1606E-03, -0.2246E-03, -0.3076E-03, -0.4067E-03, -0.5121E-03,
& -0.6110E-03, -0.6909E-03, -0.7378E-03, -0.7321E-03, -0.6509E-03,
& -0.4825E-03, -0.2641E-03, -0.8936E-04, -0.1436E-04, -0.5966E-06,
& 0.0000E+00/
data ((h13(ip,iw,1),iw=1,31),ip=21,21)/
& 0.6777E-09, 0.1344E-08, 0.2643E-08, 0.5138E-08, 0.9798E-08,
& 0.1809E-07, 0.3185E-07, 0.5285E-07, 0.8249E-07, 0.1222E-06,
& 0.1730E-06, 0.2351E-06, 0.3111E-06, 0.4078E-06, 0.5366E-06,
& 0.7117E-06, 0.9495E-06, 0.1266E-05, 0.1667E-05, 0.2132E-05,
& 0.2600E-05, 0.3001E-05, 0.3354E-05, 0.3679E-05, 0.3796E-05,
& 0.3414E-05, 0.2399E-05, 0.1067E-05, 0.2222E-06, 0.1075E-07,
& 0.0000E+00/
data ((h11(ip,iw,1),iw=1,31),ip=22,22)/
& 0.9589E-04, 0.1893E-03, 0.3706E-03, 0.7162E-03, 0.1357E-02,
& 0.2500E-02, 0.4434E-02, 0.7523E-02, 0.1220E-01, 0.1900E-01,
& 0.2860E-01, 0.4190E-01, 0.6015E-01, 0.8508E-01, 0.1189E+00,
& 0.1643E+00, 0.2233E+00, 0.2976E+00, 0.3865E+00, 0.4865E+00,
& 0.5909E+00, 0.6925E+00, 0.7866E+00, 0.8696E+00, 0.9355E+00,
& 0.9778E+00, 0.9961E+00, 0.9999E+00, 0.1000E+01, 0.1000E+01,
& 0.1000E+01/
data ((h12(ip,iw,1),iw=1,31),ip=22,22)/
& -0.1496E-06, -0.2947E-06, -0.5749E-06, -0.1105E-05, -0.2074E-05,
& -0.3763E-05, -0.6531E-05, -0.1076E-04, -0.1682E-04, -0.2509E-04,
& -0.3605E-04, -0.5049E-04, -0.7012E-04, -0.9787E-04, -0.1378E-03,
& -0.1939E-03, -0.2695E-03, -0.3641E-03, -0.4703E-03, -0.5750E-03,
& -0.6648E-03, -0.7264E-03, -0.7419E-03, -0.6889E-03, -0.5488E-03,
& -0.3382E-03, -0.1375E-03, -0.2951E-04, -0.2174E-05, 0.0000E+00,
& 0.0000E+00/
data ((h13(ip,iw,1),iw=1,31),ip=22,22)/
& 0.6798E-09, 0.1350E-08, 0.2667E-08, 0.5226E-08, 0.1010E-07,
& 0.1903E-07, 0.3455E-07, 0.5951E-07, 0.9658E-07, 0.1479E-06,
& 0.2146E-06, 0.2951E-06, 0.3903E-06, 0.5101E-06, 0.6693E-06,
& 0.8830E-06, 0.1168E-05, 0.1532E-05, 0.1968E-05, 0.2435E-05,
& 0.2859E-05, 0.3222E-05, 0.3572E-05, 0.3797E-05, 0.3615E-05,
& 0.2811E-05, 0.1500E-05, 0.4185E-06, 0.3850E-07, 0.0000E+00,
& 0.0000E+00/
data ((h11(ip,iw,1),iw=1,31),ip=23,23)/
& 0.9629E-04, 0.1907E-03, 0.3755E-03, 0.7321E-03, 0.1406E-02,
& 0.2639E-02, 0.4796E-02, 0.8368E-02, 0.1394E-01, 0.2221E-01,
& 0.3400E-01, 0.5037E-01, 0.7279E-01, 0.1033E+00, 0.1442E+00,
& 0.1983E+00, 0.2673E+00, 0.3516E+00, 0.4489E+00, 0.5533E+00,
& 0.6572E+00, 0.7547E+00, 0.8425E+00, 0.9153E+00, 0.9663E+00,
& 0.9922E+00, 0.9995E+00, 0.1000E+01, 0.1000E+01, 0.1000E+01,
& 0.1000E+01/
data ((h12(ip,iw,1),iw=1,31),ip=23,23)/
& -0.1503E-06, -0.2971E-06, -0.5832E-06, -0.1131E-05, -0.2154E-05,
& -0.3992E-05, -0.7122E-05, -0.1211E-04, -0.1954E-04, -0.2995E-04,
& -0.4380E-04, -0.6183E-04, -0.8577E-04, -0.1191E-03, -0.1668E-03,
& -0.2333E-03, -0.3203E-03, -0.4237E-03, -0.5324E-03, -0.6318E-03,
& -0.7075E-03, -0.7429E-03, -0.7168E-03, -0.6071E-03, -0.4139E-03,
& -0.1976E-03, -0.5410E-04, -0.6215E-05, -0.1343E-06, 0.0000E+00,
& 0.0000E+00/
data ((h13(ip,iw,1),iw=1,31),ip=23,23)/
& 0.6809E-09, 0.1356E-08, 0.2683E-08, 0.5287E-08, 0.1030E-07,
& 0.1971E-07, 0.3665E-07, 0.6528E-07, 0.1100E-06, 0.1744E-06,
& 0.2599E-06, 0.3650E-06, 0.4887E-06, 0.6398E-06, 0.8358E-06,
& 0.1095E-05, 0.1429E-05, 0.1836E-05, 0.2286E-05, 0.2716E-05,
& 0.3088E-05, 0.3444E-05, 0.3748E-05, 0.3740E-05, 0.3157E-05,
& 0.1966E-05, 0.7064E-06, 0.1030E-06, 0.2456E-08, 0.0000E+00,
& 0.0000E+00/
data ((h11(ip,iw,1),iw=1,31),ip=24,24)/
& 0.9655E-04, 0.1917E-03, 0.3789E-03, 0.7436E-03, 0.1442E-02,
& 0.2748E-02, 0.5100E-02, 0.9128E-02, 0.1563E-01, 0.2553E-01,
& 0.3987E-01, 0.5994E-01, 0.8746E-01, 0.1246E+00, 0.1739E+00,
& 0.2376E+00, 0.3170E+00, 0.4107E+00, 0.5141E+00, 0.6198E+00,
& 0.7208E+00, 0.8130E+00, 0.8923E+00, 0.9517E+00, 0.9860E+00,
& 0.9983E+00, 0.1000E+01, 0.1000E+01, 0.1000E+01, 0.1000E+01,
& 0.1000E+01/
data ((h12(ip,iw,1),iw=1,31),ip=24,24)/
& -0.1508E-06, -0.2989E-06, -0.5892E-06, -0.1151E-05, -0.2216E-05,
& -0.4175E-05, -0.7619E-05, -0.1333E-04, -0.2217E-04, -0.3497E-04,
& -0.5238E-04, -0.7513E-04, -0.1049E-03, -0.1455E-03, -0.2021E-03,
& -0.2790E-03, -0.3757E-03, -0.4839E-03, -0.5902E-03, -0.6794E-03,
& -0.7344E-03, -0.7341E-03, -0.6557E-03, -0.4874E-03, -0.2674E-03,
& -0.9059E-04, -0.1455E-04, -0.5986E-06, 0.0000E+00, 0.0000E+00,
& 0.0000E+00/
data ((h13(ip,iw,1),iw=1,31),ip=24,24)/
& 0.6812E-09, 0.1356E-08, 0.2693E-08, 0.5328E-08, 0.1045E-07,
& 0.2021E-07, 0.3826E-07, 0.6994E-07, 0.1218E-06, 0.1997E-06,
& 0.3069E-06, 0.4428E-06, 0.6064E-06, 0.8015E-06, 0.1043E-05,
& 0.1351E-05, 0.1733E-05, 0.2168E-05, 0.2598E-05, 0.2968E-05,
& 0.3316E-05, 0.3662E-05, 0.3801E-05, 0.3433E-05, 0.2422E-05,
& 0.1081E-05, 0.2256E-06, 0.1082E-07, 0.0000E+00, 0.0000E+00,
& 0.0000E+00/
data ((h11(ip,iw,1),iw=1,31),ip=25,25)/
& 0.9672E-04, 0.1923E-03, 0.3813E-03, 0.7518E-03, 0.1469E-02,
& 0.2832E-02, 0.5343E-02, 0.9779E-02, 0.1719E-01, 0.2882E-01,
& 0.4606E-01, 0.7051E-01, 0.1042E+00, 0.1493E+00, 0.2081E+00,
& 0.2824E+00, 0.3720E+00, 0.4736E+00, 0.5803E+00, 0.6844E+00,
& 0.7810E+00, 0.8663E+00, 0.9339E+00, 0.9772E+00, 0.9960E+00,
& 0.9999E+00, 0.1000E+01, 0.1000E+01, 0.1000E+01, 0.1000E+01,
& 0.1000E+01/
data ((h12(ip,iw,1),iw=1,31),ip=25,25)/
& -0.1511E-06, -0.3001E-06, -0.5934E-06, -0.1166E-05, -0.2263E-05,
& -0.4319E-05, -0.8028E-05, -0.1438E-04, -0.2460E-04, -0.3991E-04,
& -0.6138E-04, -0.9005E-04, -0.1278E-03, -0.1778E-03, -0.2447E-03,
& -0.3313E-03, -0.4342E-03, -0.5424E-03, -0.6416E-03, -0.7146E-03,
& -0.7399E-03, -0.6932E-03, -0.5551E-03, -0.3432E-03, -0.1398E-03,
& -0.3010E-04, -0.2229E-05, 0.0000E+00, 0.0000E+00, 0.0000E+00,
& 0.0000E+00/
data ((h13(ip,iw,1),iw=1,31),ip=25,25)/
& 0.6815E-09, 0.1358E-08, 0.2698E-08, 0.5355E-08, 0.1054E-07,
& 0.2056E-07, 0.3942E-07, 0.7349E-07, 0.1315E-06, 0.2226E-06,
& 0.3537E-06, 0.5266E-06, 0.7407E-06, 0.9958E-06, 0.1296E-05,
& 0.1657E-05, 0.2077E-05, 0.2512E-05, 0.2893E-05, 0.3216E-05,
& 0.3562E-05, 0.3811E-05, 0.3644E-05, 0.2841E-05, 0.1524E-05,
& 0.4276E-06, 0.3960E-07, 0.0000E+00, 0.0000E+00, 0.0000E+00,
& 0.0000E+00/
data ((h11(ip,iw,1),iw=1,31),ip=26,26)/
& 0.9682E-04, 0.1928E-03, 0.3829E-03, 0.7576E-03, 0.1489E-02,
& 0.2894E-02, 0.5533E-02, 0.1031E-01, 0.1856E-01, 0.3195E-01,
& 0.5237E-01, 0.8187E-01, 0.1227E+00, 0.1771E+00, 0.2468E+00,
& 0.3321E+00, 0.4312E+00, 0.5384E+00, 0.6455E+00, 0.7463E+00,
& 0.8372E+00, 0.9126E+00, 0.9652E+00, 0.9919E+00, 0.9994E+00,
& 0.1000E+01, 0.1000E+01, 0.1000E+01, 0.1000E+01, 0.1000E+01,
& 0.1000E+01/
data ((h12(ip,iw,1),iw=1,31),ip=26,26)/
& -0.1513E-06, -0.3009E-06, -0.5966E-06, -0.1176E-05, -0.2299E-05,
& -0.4430E-05, -0.8352E-05, -0.1526E-04, -0.2674E-04, -0.4454E-04,
& -0.7042E-04, -0.1062E-03, -0.1540E-03, -0.2163E-03, -0.2951E-03,
& -0.3899E-03, -0.4948E-03, -0.5983E-03, -0.6846E-03, -0.7332E-03,
& -0.7182E-03, -0.6142E-03, -0.4209E-03, -0.2014E-03, -0.5530E-04,
& -0.6418E-05, -0.1439E-06, 0.0000E+00, 0.0000E+00, 0.0000E+00,
& 0.0000E+00/
data ((h13(ip,iw,1),iw=1,31),ip=26,26)/
& 0.6817E-09, 0.1359E-08, 0.2702E-08, 0.5374E-08, 0.1061E-07,
& 0.2079E-07, 0.4022E-07, 0.7610E-07, 0.1392E-06, 0.2428E-06,
& 0.3992E-06, 0.6149E-06, 0.8893E-06, 0.1220E-05, 0.1599E-05,
& 0.2015E-05, 0.2453E-05, 0.2853E-05, 0.3173E-05, 0.3488E-05,
& 0.3792E-05, 0.3800E-05, 0.3210E-05, 0.2002E-05, 0.7234E-06,
& 0.1068E-06, 0.2646E-08, 0.0000E+00, 0.0000E+00, 0.0000E+00,
& 0.0000E+00/
data ((h21(ip,iw,1),iw=1,31),ip= 1, 1)/
& 0.3920E-05, 0.7617E-05, 0.1455E-04, 0.2706E-04, 0.4855E-04,
& 0.8315E-04, 0.1349E-03, 0.2063E-03, 0.2984E-03, 0.4109E-03,
& 0.5422E-03, 0.6896E-03, 0.8537E-03, 0.1041E-02, 0.1262E-02,
& 0.1534E-02, 0.1870E-02, 0.2286E-02, 0.2803E-02, 0.3444E-02,
& 0.4242E-02, 0.5244E-02, 0.6511E-02, 0.8138E-02, 0.1027E-01,
& 0.1312E-01, 0.1697E-01, 0.2222E-01, 0.2941E-01, 0.3923E-01,
& 0.5258E-01/
data ((h22(ip,iw,1),iw=1,31),ip= 1, 1)/
& -0.5622E-07, -0.1071E-06, -0.1983E-06, -0.3533E-06, -0.5991E-06,
& -0.9592E-06, -0.1444E-05, -0.2049E-05, -0.2764E-05, -0.3577E-05,
& -0.4469E-05, -0.5467E-05, -0.6654E-05, -0.8137E-05, -0.1002E-04,
& -0.1237E-04, -0.1528E-04, -0.1884E-04, -0.2310E-04, -0.2809E-04,
& -0.3396E-04, -0.4098E-04, -0.4960E-04, -0.6058E-04, -0.7506E-04,
& -0.9451E-04, -0.1207E-03, -0.1558E-03, -0.2026E-03, -0.2648E-03,
& -0.3468E-03/
data ((h23(ip,iw,1),iw=1,31),ip= 1, 1)/
& -0.2195E-09, -0.4031E-09, -0.7043E-09, -0.1153E-08, -0.1737E-08,
& -0.2395E-08, -0.3020E-08, -0.3549E-08, -0.4034E-08, -0.4421E-08,
& -0.4736E-08, -0.5681E-08, -0.8289E-08, -0.1287E-07, -0.1873E-07,
& -0.2523E-07, -0.3223E-07, -0.3902E-07, -0.4409E-07, -0.4699E-07,
& -0.4782E-07, -0.4705E-07, -0.4657E-07, -0.4885E-07, -0.5550E-07,
& -0.6619E-07, -0.7656E-07, -0.8027E-07, -0.7261E-07, -0.4983E-07,
& -0.1101E-07/
data ((h21(ip,iw,1),iw=1,31),ip= 2, 2)/
& 0.3920E-05, 0.7617E-05, 0.1455E-04, 0.2706E-04, 0.4856E-04,
& 0.8318E-04, 0.1349E-03, 0.2065E-03, 0.2986E-03, 0.4114E-03,
& 0.5431E-03, 0.6912E-03, 0.8566E-03, 0.1046E-02, 0.1272E-02,
& 0.1552E-02, 0.1902E-02, 0.2342E-02, 0.2899E-02, 0.3605E-02,
& 0.4501E-02, 0.5648E-02, 0.7129E-02, 0.9063E-02, 0.1163E-01,
& 0.1509E-01, 0.1980E-01, 0.2626E-01, 0.3510E-01, 0.4717E-01,
& 0.6351E-01/
data ((h22(ip,iw,1),iw=1,31),ip= 2, 2)/
& -0.5622E-07, -0.1071E-06, -0.1983E-06, -0.3534E-06, -0.5992E-06,
& -0.9594E-06, -0.1445E-05, -0.2050E-05, -0.2766E-05, -0.3580E-05,
& -0.4476E-05, -0.5479E-05, -0.6677E-05, -0.8179E-05, -0.1009E-04,
& -0.1251E-04, -0.1553E-04, -0.1928E-04, -0.2384E-04, -0.2930E-04,
& -0.3588E-04, -0.4393E-04, -0.5403E-04, -0.6714E-04, -0.8458E-04,
& -0.1082E-03, -0.1400E-03, -0.1829E-03, -0.2401E-03, -0.3157E-03,
& -0.4147E-03/
data ((h23(ip,iw,1),iw=1,31),ip= 2, 2)/
& -0.2195E-09, -0.4032E-09, -0.7046E-09, -0.1153E-08, -0.1738E-08,
& -0.2395E-08, -0.3021E-08, -0.3550E-08, -0.4035E-08, -0.4423E-08,
& -0.4740E-08, -0.5692E-08, -0.8314E-08, -0.1292E-07, -0.1882E-07,
& -0.2536E-07, -0.3242E-07, -0.3927E-07, -0.4449E-07, -0.4767E-07,
& -0.4889E-07, -0.4857E-07, -0.4860E-07, -0.5132E-07, -0.5847E-07,
& -0.6968E-07, -0.8037E-07, -0.8400E-07, -0.7521E-07, -0.4830E-07,
& -0.7562E-09/
data ((h21(ip,iw,1),iw=1,31),ip= 3, 3)/
& 0.3920E-05, 0.7617E-05, 0.1455E-04, 0.2707E-04, 0.4858E-04,
& 0.8322E-04, 0.1350E-03, 0.2066E-03, 0.2990E-03, 0.4122E-03,
& 0.5444E-03, 0.6937E-03, 0.8611E-03, 0.1054E-02, 0.1287E-02,
& 0.1579E-02, 0.1949E-02, 0.2424E-02, 0.3037E-02, 0.3829E-02,
& 0.4854E-02, 0.6190E-02, 0.7942E-02, 0.1026E-01, 0.1338E-01,
& 0.1761E-01, 0.2340E-01, 0.3134E-01, 0.4223E-01, 0.5703E-01,
& 0.7694E-01/
data ((h22(ip,iw,1),iw=1,31),ip= 3, 3)/
& -0.5622E-07, -0.1071E-06, -0.1983E-06, -0.3535E-06, -0.5994E-06,
& -0.9599E-06, -0.1446E-05, -0.2052E-05, -0.2769E-05, -0.3586E-05,
& -0.4487E-05, -0.5499E-05, -0.6712E-05, -0.8244E-05, -0.1021E-04,
& -0.1272E-04, -0.1591E-04, -0.1992E-04, -0.2489E-04, -0.3097E-04,
& -0.3845E-04, -0.4782E-04, -0.5982E-04, -0.7558E-04, -0.9674E-04,
& -0.1254E-03, -0.1644E-03, -0.2167E-03, -0.2863E-03, -0.3777E-03,
& -0.4959E-03/
data ((h23(ip,iw,1),iw=1,31),ip= 3, 3)/
& -0.2196E-09, -0.4033E-09, -0.7048E-09, -0.1154E-08, -0.1739E-08,
& -0.2396E-08, -0.3022E-08, -0.3551E-08, -0.4036E-08, -0.4425E-08,
& -0.4746E-08, -0.5710E-08, -0.8354E-08, -0.1300E-07, -0.1894E-07,
& -0.2554E-07, -0.3265E-07, -0.3958E-07, -0.4502E-07, -0.4859E-07,
& -0.5030E-07, -0.5053E-07, -0.5104E-07, -0.5427E-07, -0.6204E-07,
& -0.7388E-07, -0.8477E-07, -0.8760E-07, -0.7545E-07, -0.4099E-07,
& 0.2046E-07/
data ((h21(ip,iw,1),iw=1,31),ip= 4, 4)/
& 0.3919E-05, 0.7618E-05, 0.1455E-04, 0.2708E-04, 0.4860E-04,
& 0.8327E-04, 0.1352E-03, 0.2070E-03, 0.2997E-03, 0.4134E-03,
& 0.5466E-03, 0.6976E-03, 0.8682E-03, 0.1067E-02, 0.1310E-02,
& 0.1619E-02, 0.2020E-02, 0.2543E-02, 0.3232E-02, 0.4136E-02,
& 0.5328E-02, 0.6906E-02, 0.9004E-02, 0.1182E-01, 0.1562E-01,
& 0.2081E-01, 0.2794E-01, 0.3773E-01, 0.5111E-01, 0.6919E-01,
& 0.9329E-01/
data ((h22(ip,iw,1),iw=1,31),ip= 4, 4)/
& -0.5623E-07, -0.1071E-06, -0.1984E-06, -0.3536E-06, -0.5997E-06,
& -0.9606E-06, -0.1447E-05, -0.2055E-05, -0.2775E-05, -0.3596E-05,
& -0.4504E-05, -0.5529E-05, -0.6768E-05, -0.8345E-05, -0.1039E-04,
& -0.1304E-04, -0.1645E-04, -0.2082E-04, -0.2633E-04, -0.3322E-04,
& -0.4187E-04, -0.5292E-04, -0.6730E-04, -0.8640E-04, -0.1122E-03,
& -0.1472E-03, -0.1948E-03, -0.2585E-03, -0.3428E-03, -0.4523E-03,
& -0.5915E-03/
data ((h23(ip,iw,1),iw=1,31),ip= 4, 4)/
& -0.2196E-09, -0.4034E-09, -0.7050E-09, -0.1154E-08, -0.1740E-08,
& -0.2398E-08, -0.3024E-08, -0.3552E-08, -0.4037E-08, -0.4428E-08,
& -0.4756E-08, -0.5741E-08, -0.8418E-08, -0.1310E-07, -0.1910E-07,
& -0.2575E-07, -0.3293E-07, -0.3998E-07, -0.4572E-07, -0.4980E-07,
& -0.5211E-07, -0.5287E-07, -0.5390E-07, -0.5782E-07, -0.6650E-07,
& -0.7892E-07, -0.8940E-07, -0.8980E-07, -0.7119E-07, -0.2452E-07,
& 0.5823E-07/
data ((h21(ip,iw,1),iw=1,31),ip= 5, 5)/
& 0.3919E-05, 0.7618E-05, 0.1455E-04, 0.2709E-04, 0.4863E-04,
& 0.8337E-04, 0.1354E-03, 0.2075E-03, 0.3007E-03, 0.4152E-03,
& 0.5500E-03, 0.7038E-03, 0.8793E-03, 0.1086E-02, 0.1345E-02,
& 0.1680E-02, 0.2123E-02, 0.2712E-02, 0.3500E-02, 0.4552E-02,
& 0.5958E-02, 0.7844E-02, 0.1038E-01, 0.1381E-01, 0.1847E-01,
& 0.2487E-01, 0.3366E-01, 0.4572E-01, 0.6209E-01, 0.8406E-01,
& 0.1130E+00/
data ((h22(ip,iw,1),iw=1,31),ip= 5, 5)/
& -0.5623E-07, -0.1071E-06, -0.1985E-06, -0.3538E-06, -0.6002E-06,
& -0.9618E-06, -0.1450E-05, -0.2059E-05, -0.2783E-05, -0.3611E-05,
& -0.4531E-05, -0.5577E-05, -0.6855E-05, -0.8499E-05, -0.1066E-04,
& -0.1351E-04, -0.1723E-04, -0.2207E-04, -0.2829E-04, -0.3621E-04,
& -0.4636E-04, -0.5954E-04, -0.7690E-04, -0.1002E-03, -0.1317E-03,
& -0.1746E-03, -0.2326E-03, -0.3099E-03, -0.4111E-03, -0.5407E-03,
& -0.7020E-03/
data ((h23(ip,iw,1),iw=1,31),ip= 5, 5)/
& -0.2197E-09, -0.4037E-09, -0.7054E-09, -0.1155E-08, -0.1741E-08,
& -0.2401E-08, -0.3027E-08, -0.3553E-08, -0.4039E-08, -0.4431E-08,
& -0.4775E-08, -0.5784E-08, -0.8506E-08, -0.1326E-07, -0.1931E-07,
& -0.2600E-07, -0.3324E-07, -0.4048E-07, -0.4666E-07, -0.5137E-07,
& -0.5428E-07, -0.5558E-07, -0.5730E-07, -0.6228E-07, -0.7197E-07,
& -0.8455E-07, -0.9347E-07, -0.8867E-07, -0.5945E-07, 0.5512E-08,
& 0.1209E-06/
data ((h21(ip,iw,1),iw=1,31),ip= 6, 6)/
& 0.3919E-05, 0.7619E-05, 0.1456E-04, 0.2710E-04, 0.4868E-04,
& 0.8351E-04, 0.1357E-03, 0.2082E-03, 0.3022E-03, 0.4181E-03,
& 0.5554E-03, 0.7134E-03, 0.8963E-03, 0.1117E-02, 0.1397E-02,
& 0.1770E-02, 0.2270E-02, 0.2947E-02, 0.3865E-02, 0.5107E-02,
& 0.6787E-02, 0.9062E-02, 0.1215E-01, 0.1634E-01, 0.2209E-01,
& 0.2999E-01, 0.4083E-01, 0.5563E-01, 0.7559E-01, 0.1021E+00,
& 0.1364E+00/
data ((h22(ip,iw,1),iw=1,31),ip= 6, 6)/
& -0.5624E-07, -0.1072E-06, -0.1986E-06, -0.3541E-06, -0.6010E-06,
& -0.9636E-06, -0.1453E-05, -0.2067E-05, -0.2796E-05, -0.3634E-05,
& -0.4572E-05, -0.5652E-05, -0.6987E-05, -0.8733E-05, -0.1107E-04,
& -0.1418E-04, -0.1832E-04, -0.2378E-04, -0.3092E-04, -0.4017E-04,
& -0.5221E-04, -0.6806E-04, -0.8916E-04, -0.1176E-03, -0.1562E-03,
& -0.2087E-03, -0.2793E-03, -0.3724E-03, -0.4928E-03, -0.6440E-03,
& -0.8270E-03/
data ((h23(ip,iw,1),iw=1,31),ip= 6, 6)/
& -0.2198E-09, -0.4040E-09, -0.7061E-09, -0.1156E-08, -0.1744E-08,
& -0.2405E-08, -0.3032E-08, -0.3556E-08, -0.4040E-08, -0.4444E-08,
& -0.4800E-08, -0.5848E-08, -0.8640E-08, -0.1346E-07, -0.1957E-07,
& -0.2627E-07, -0.3357E-07, -0.4114E-07, -0.4793E-07, -0.5330E-07,
& -0.5676E-07, -0.5873E-07, -0.6152E-07, -0.6783E-07, -0.7834E-07,
& -0.9023E-07, -0.9530E-07, -0.8162E-07, -0.3634E-07, 0.5638E-07,
& 0.2189E-06/
data ((h21(ip,iw,1),iw=1,31),ip= 7, 7)/
& 0.3919E-05, 0.7620E-05, 0.1457E-04, 0.2713E-04, 0.4877E-04,
& 0.8374E-04, 0.1363E-03, 0.2095E-03, 0.3047E-03, 0.4227E-03,
& 0.5637E-03, 0.7282E-03, 0.9224E-03, 0.1162E-02, 0.1475E-02,
& 0.1898E-02, 0.2475E-02, 0.3267E-02, 0.4354E-02, 0.5839E-02,
& 0.7866E-02, 0.1063E-01, 0.1440E-01, 0.1957E-01, 0.2666E-01,
& 0.3641E-01, 0.4975E-01, 0.6784E-01, 0.9201E-01, 0.1236E+00,
& 0.1639E+00/
data ((h22(ip,iw,1),iw=1,31),ip= 7, 7)/
& -0.5626E-07, -0.1072E-06, -0.1987E-06, -0.3545E-06, -0.6022E-06,
& -0.9665E-06, -0.1460E-05, -0.2078E-05, -0.2817E-05, -0.3671E-05,
& -0.4637E-05, -0.5767E-05, -0.7188E-05, -0.9080E-05, -0.1165E-04,
& -0.1513E-04, -0.1981E-04, -0.2609E-04, -0.3441E-04, -0.4534E-04,
& -0.5978E-04, -0.7897E-04, -0.1047E-03, -0.1396E-03, -0.1870E-03,
& -0.2510E-03, -0.3363E-03, -0.4475E-03, -0.5888E-03, -0.7621E-03,
& -0.9647E-03/
data ((h23(ip,iw,1),iw=1,31),ip= 7, 7)/
& -0.2200E-09, -0.4045E-09, -0.7071E-09, -0.1159E-08, -0.1748E-08,
& -0.2411E-08, -0.3040E-08, -0.3561E-08, -0.4046E-08, -0.4455E-08,
& -0.4839E-08, -0.5941E-08, -0.8815E-08, -0.1371E-07, -0.1983E-07,
& -0.2652E-07, -0.3400E-07, -0.4207E-07, -0.4955E-07, -0.5554E-07,
& -0.5966E-07, -0.6261E-07, -0.6688E-07, -0.7454E-07, -0.8521E-07,
& -0.9470E-07, -0.9275E-07, -0.6525E-07, 0.3686E-08, 0.1371E-06,
& 0.3623E-06/
data ((h21(ip,iw,1),iw=1,31),ip= 8, 8)/
& 0.3919E-05, 0.7622E-05, 0.1458E-04, 0.2717E-04, 0.4890E-04,
& 0.8410E-04, 0.1372E-03, 0.2114E-03, 0.3085E-03, 0.4298E-03,
& 0.5765E-03, 0.7508E-03, 0.9618E-03, 0.1229E-02, 0.1586E-02,
& 0.2077E-02, 0.2757E-02, 0.3697E-02, 0.5000E-02, 0.6794E-02,
& 0.9260E-02, 0.1264E-01, 0.1728E-01, 0.2365E-01, 0.3242E-01,
& 0.4444E-01, 0.6080E-01, 0.8278E-01, 0.1118E+00, 0.1491E+00,
& 0.1956E+00/
data ((h22(ip,iw,1),iw=1,31),ip= 8, 8)/
& -0.5628E-07, -0.1073E-06, -0.1990E-06, -0.3553E-06, -0.6042E-06,
& -0.9710E-06, -0.1469E-05, -0.2096E-05, -0.2849E-05, -0.3728E-05,
& -0.4738E-05, -0.5942E-05, -0.7490E-05, -0.9586E-05, -0.1247E-04,
& -0.1644E-04, -0.2184E-04, -0.2916E-04, -0.3898E-04, -0.5205E-04,
& -0.6948E-04, -0.9285E-04, -0.1244E-03, -0.1672E-03, -0.2251E-03,
& -0.3028E-03, -0.4051E-03, -0.5365E-03, -0.6998E-03, -0.8940E-03,
& -0.1112E-02/
data ((h23(ip,iw,1),iw=1,31),ip= 8, 8)/
& -0.2204E-09, -0.4052E-09, -0.7088E-09, -0.1162E-08, -0.1755E-08,
& -0.2422E-08, -0.3053E-08, -0.3572E-08, -0.4052E-08, -0.4474E-08,
& -0.4898E-08, -0.6082E-08, -0.9046E-08, -0.1400E-07, -0.2009E-07,
& -0.2683E-07, -0.3463E-07, -0.4334E-07, -0.5153E-07, -0.5811E-07,
& -0.6305E-07, -0.6749E-07, -0.7346E-07, -0.8208E-07, -0.9173E-07,
& -0.9603E-07, -0.8264E-07, -0.3505E-07, 0.6878E-07, 0.2586E-06,
& 0.5530E-06/
data ((h21(ip,iw,1),iw=1,31),ip= 9, 9)/
& 0.3919E-05, 0.7625E-05, 0.1459E-04, 0.2723E-04, 0.4910E-04,
& 0.8465E-04, 0.1385E-03, 0.2143E-03, 0.3143E-03, 0.4407E-03,
& 0.5960E-03, 0.7850E-03, 0.1020E-02, 0.1326E-02, 0.1744E-02,
& 0.2324E-02, 0.3135E-02, 0.4267E-02, 0.5845E-02, 0.8031E-02,
& 0.1105E-01, 0.1520E-01, 0.2093E-01, 0.2880E-01, 0.3962E-01,
& 0.5440E-01, 0.7435E-01, 0.1009E+00, 0.1353E+00, 0.1787E+00,
& 0.2317E+00/
data ((h22(ip,iw,1),iw=1,31),ip= 9, 9)/
& -0.5630E-07, -0.1074E-06, -0.1994E-06, -0.3564E-06, -0.6072E-06,
& -0.9779E-06, -0.1484E-05, -0.2124E-05, -0.2900E-05, -0.3817E-05,
& -0.4891E-05, -0.6205E-05, -0.7931E-05, -0.1031E-04, -0.1362E-04,
& -0.1821E-04, -0.2454E-04, -0.3320E-04, -0.4493E-04, -0.6068E-04,
& -0.8186E-04, -0.1104E-03, -0.1491E-03, -0.2016E-03, -0.2722E-03,
& -0.3658E-03, -0.4873E-03, -0.6404E-03, -0.8253E-03, -0.1037E-02,
& -0.1267E-02/
data ((h23(ip,iw,1),iw=1,31),ip= 9, 9)/
& -0.2207E-09, -0.4061E-09, -0.7117E-09, -0.1169E-08, -0.1767E-08,
& -0.2439E-08, -0.3074E-08, -0.3588E-08, -0.4062E-08, -0.4510E-08,
& -0.4983E-08, -0.6261E-08, -0.9324E-08, -0.1430E-07, -0.2036E-07,
& -0.2725E-07, -0.3561E-07, -0.4505E-07, -0.5384E-07, -0.6111E-07,
& -0.6731E-07, -0.7355E-07, -0.8112E-07, -0.8978E-07, -0.9616E-07,
& -0.9157E-07, -0.6114E-07, 0.1622E-07, 0.1694E-06, 0.4277E-06,
& 0.7751E-06/
data ((h21(ip,iw,1),iw=1,31),ip=10,10)/
& 0.3919E-05, 0.7629E-05, 0.1462E-04, 0.2733E-04, 0.4940E-04,
& 0.8549E-04, 0.1406E-03, 0.2188E-03, 0.3232E-03, 0.4572E-03,
& 0.6253E-03, 0.8354E-03, 0.1105E-02, 0.1464E-02, 0.1960E-02,
& 0.2657E-02, 0.3637E-02, 0.5014E-02, 0.6942E-02, 0.9622E-02,
& 0.1333E-01, 0.1846E-01, 0.2553E-01, 0.3526E-01, 0.4859E-01,
& 0.6667E-01, 0.9084E-01, 0.1225E+00, 0.1629E+00, 0.2127E+00,
& 0.2721E+00/
data ((h22(ip,iw,1),iw=1,31),ip=10,10)/
& -0.5636E-07, -0.1076E-06, -0.2000E-06, -0.3582E-06, -0.6119E-06,
& -0.9888E-06, -0.1507E-05, -0.2168E-05, -0.2978E-05, -0.3952E-05,
& -0.5122E-05, -0.6592E-05, -0.8565E-05, -0.1132E-04, -0.1518E-04,
& -0.2060E-04, -0.2811E-04, -0.3848E-04, -0.5261E-04, -0.7173E-04,
& -0.9758E-04, -0.1326E-03, -0.1801E-03, -0.2442E-03, -0.3296E-03,
& -0.4415E-03, -0.5840E-03, -0.7591E-03, -0.9636E-03, -0.1189E-02,
& -0.1427E-02/
data ((h23(ip,iw,1),iw=1,31),ip=10,10)/
& -0.2214E-09, -0.4080E-09, -0.7156E-09, -0.1178E-08, -0.1784E-08,
& -0.2466E-08, -0.3105E-08, -0.3617E-08, -0.4087E-08, -0.4563E-08,
& -0.5110E-08, -0.6492E-08, -0.9643E-08, -0.1461E-07, -0.2069E-07,
& -0.2796E-07, -0.3702E-07, -0.4717E-07, -0.5662E-07, -0.6484E-07,
& -0.7271E-07, -0.8079E-07, -0.8928E-07, -0.9634E-07, -0.9625E-07,
& -0.7776E-07, -0.2242E-07, 0.9745E-07, 0.3152E-06, 0.6388E-06,
& 0.9992E-06/
data ((h21(ip,iw,1),iw=1,31),ip=11,11)/
& 0.3919E-05, 0.7639E-05, 0.1466E-04, 0.2748E-04, 0.4986E-04,
& 0.8675E-04, 0.1437E-03, 0.2255E-03, 0.3365E-03, 0.4816E-03,
& 0.6682E-03, 0.9082E-03, 0.1224E-02, 0.1653E-02, 0.2253E-02,
& 0.3099E-02, 0.4296E-02, 0.5984E-02, 0.8352E-02, 0.1165E-01,
& 0.1623E-01, 0.2257E-01, 0.3132E-01, 0.4333E-01, 0.5968E-01,
& 0.8166E-01, 0.1107E+00, 0.1481E+00, 0.1947E+00, 0.2509E+00,
& 0.3170E+00/
data ((h22(ip,iw,1),iw=1,31),ip=11,11)/
& -0.5645E-07, -0.1079E-06, -0.2009E-06, -0.3610E-06, -0.6190E-06,
& -0.1005E-05, -0.1541E-05, -0.2235E-05, -0.3096E-05, -0.4155E-05,
& -0.5463E-05, -0.7150E-05, -0.9453E-05, -0.1269E-04, -0.1728E-04,
& -0.2375E-04, -0.3279E-04, -0.4531E-04, -0.6246E-04, -0.8579E-04,
& -0.1175E-03, -0.1604E-03, -0.2186E-03, -0.2964E-03, -0.3990E-03,
& -0.5311E-03, -0.6957E-03, -0.8916E-03, -0.1112E-02, -0.1346E-02,
& -0.1590E-02/
data ((h23(ip,iw,1),iw=1,31),ip=11,11)/
& -0.2225E-09, -0.4104E-09, -0.7217E-09, -0.1192E-08, -0.1811E-08,
& -0.2509E-08, -0.3155E-08, -0.3668E-08, -0.4138E-08, -0.4650E-08,
& -0.5296E-08, -0.6785E-08, -0.9991E-08, -0.1494E-07, -0.2122E-07,
& -0.2911E-07, -0.3895E-07, -0.4979E-07, -0.6002E-07, -0.6964E-07,
& -0.7935E-07, -0.8887E-07, -0.9699E-07, -0.9967E-07, -0.8883E-07,
& -0.4988E-07, 0.4156E-07, 0.2197E-06, 0.5081E-06, 0.8667E-06,
& 0.1212E-05/
data ((h21(ip,iw,1),iw=1,31),ip=12,12)/
& 0.3920E-05, 0.7649E-05, 0.1472E-04, 0.2768E-04, 0.5051E-04,
& 0.8856E-04, 0.1481E-03, 0.2352E-03, 0.3557E-03, 0.5169E-03,
& 0.7295E-03, 0.1010E-02, 0.1388E-02, 0.1909E-02, 0.2640E-02,
& 0.3678E-02, 0.5151E-02, 0.7231E-02, 0.1015E-01, 0.1423E-01,
& 0.1990E-01, 0.2775E-01, 0.3856E-01, 0.5333E-01, 0.7328E-01,
& 0.9980E-01, 0.1343E+00, 0.1778E+00, 0.2308E+00, 0.2936E+00,
& 0.3667E+00/
data ((h22(ip,iw,1),iw=1,31),ip=12,12)/
& -0.5658E-07, -0.1083E-06, -0.2023E-06, -0.3650E-06, -0.6295E-06,
& -0.1030E-05, -0.1593E-05, -0.2334E-05, -0.3273E-05, -0.4455E-05,
& -0.5955E-05, -0.7935E-05, -0.1067E-04, -0.1455E-04, -0.2007E-04,
& -0.2788E-04, -0.3885E-04, -0.5409E-04, -0.7503E-04, -0.1036E-03,
& -0.1425E-03, -0.1951E-03, -0.2660E-03, -0.3598E-03, -0.4817E-03,
& -0.6355E-03, -0.8218E-03, -0.1035E-02, -0.1267E-02, -0.1508E-02,
& -0.1755E-02/
data ((h23(ip,iw,1),iw=1,31),ip=12,12)/
& -0.2241E-09, -0.4142E-09, -0.7312E-09, -0.1214E-08, -0.1854E-08,
& -0.2578E-08, -0.3250E-08, -0.3765E-08, -0.4238E-08, -0.4809E-08,
& -0.5553E-08, -0.7132E-08, -0.1035E-07, -0.1538E-07, -0.2211E-07,
& -0.3079E-07, -0.4142E-07, -0.5303E-07, -0.6437E-07, -0.7566E-07,
& -0.8703E-07, -0.9700E-07, -0.1025E-06, -0.9718E-07, -0.6973E-07,
& -0.5265E-09, 0.1413E-06, 0.3895E-06, 0.7321E-06, 0.1085E-05,
& 0.1449E-05/
data ((h21(ip,iw,1),iw=1,31),ip=13,13)/
& 0.3920E-05, 0.7668E-05, 0.1480E-04, 0.2798E-04, 0.5143E-04,
& 0.9106E-04, 0.1542E-03, 0.2488E-03, 0.3827E-03, 0.5661E-03,
& 0.8143E-03, 0.1150E-02, 0.1608E-02, 0.2246E-02, 0.3147E-02,
& 0.4428E-02, 0.6248E-02, 0.8823E-02, 0.1244E-01, 0.1750E-01,
& 0.2452E-01, 0.3424E-01, 0.4756E-01, 0.6564E-01, 0.8981E-01,
& 0.1215E+00, 0.1619E+00, 0.2118E+00, 0.2713E+00, 0.3409E+00,
& 0.4215E+00/
data ((h22(ip,iw,1),iw=1,31),ip=13,13)/
& -0.5677E-07, -0.1090E-06, -0.2043E-06, -0.3709E-06, -0.6448E-06,
& -0.1066E-05, -0.1669E-05, -0.2480E-05, -0.3532E-05, -0.4887E-05,
& -0.6650E-05, -0.9017E-05, -0.1232E-04, -0.1701E-04, -0.2372E-04,
& -0.3325E-04, -0.4664E-04, -0.6528E-04, -0.9095E-04, -0.1260E-03,
& -0.1737E-03, -0.2381E-03, -0.3238E-03, -0.4359E-03, -0.5789E-03,
& -0.7549E-03, -0.9607E-03, -0.1188E-02, -0.1427E-02, -0.1674E-02,
& -0.1914E-02/
data ((h23(ip,iw,1),iw=1,31),ip=13,13)/
& -0.2262E-09, -0.4191E-09, -0.7441E-09, -0.1244E-08, -0.1916E-08,
& -0.2687E-08, -0.3407E-08, -0.3947E-08, -0.4432E-08, -0.5059E-08,
& -0.5896E-08, -0.7538E-08, -0.1079E-07, -0.1606E-07, -0.2346E-07,
& -0.3305E-07, -0.4459E-07, -0.5720E-07, -0.6999E-07, -0.8300E-07,
& -0.9536E-07, -0.1039E-06, -0.1036E-06, -0.8526E-07, -0.3316E-07,
& 0.7909E-07, 0.2865E-06, 0.6013E-06, 0.9580E-06, 0.1303E-05,
& 0.1792E-05/
data ((h21(ip,iw,1),iw=1,31),ip=14,14)/
& 0.3923E-05, 0.7691E-05, 0.1491E-04, 0.2836E-04, 0.5261E-04,
& 0.9432E-04, 0.1623E-03, 0.2667E-03, 0.4187E-03, 0.6323E-03,
& 0.9278E-03, 0.1334E-02, 0.1897E-02, 0.2685E-02, 0.3800E-02,
& 0.5388E-02, 0.7646E-02, 0.1084E-01, 0.1533E-01, 0.2160E-01,
& 0.3031E-01, 0.4231E-01, 0.5866E-01, 0.8064E-01, 0.1097E+00,
& 0.1471E+00, 0.1938E+00, 0.2501E+00, 0.3163E+00, 0.3932E+00,
& 0.4810E+00/
data ((h22(ip,iw,1),iw=1,31),ip=14,14)/
& -0.5703E-07, -0.1098E-06, -0.2071E-06, -0.3788E-06, -0.6657E-06,
& -0.1116E-05, -0.1776E-05, -0.2687E-05, -0.3898E-05, -0.5493E-05,
& -0.7607E-05, -0.1048E-04, -0.1450E-04, -0.2024E-04, -0.2845E-04,
& -0.4014E-04, -0.5658E-04, -0.7947E-04, -0.1110E-03, -0.1541E-03,
& -0.2125E-03, -0.2907E-03, -0.3936E-03, -0.5261E-03, -0.6912E-03,
& -0.8880E-03, -0.1109E-02, -0.1346E-02, -0.1591E-02, -0.1837E-02,
& -0.2054E-02/
data ((h23(ip,iw,1),iw=1,31),ip=14,14)/
& -0.2288E-09, -0.4265E-09, -0.7627E-09, -0.1289E-08, -0.2011E-08,
& -0.2861E-08, -0.3673E-08, -0.4288E-08, -0.4812E-08, -0.5475E-08,
& -0.6365E-08, -0.8052E-08, -0.1142E-07, -0.1711E-07, -0.2533E-07,
& -0.3597E-07, -0.4862E-07, -0.6259E-07, -0.7708E-07, -0.9150E-07,
& -0.1035E-06, -0.1079E-06, -0.9742E-07, -0.5928E-07, 0.2892E-07,
& 0.1998E-06, 0.4789E-06, 0.8298E-06, 0.1172E-05, 0.1583E-05,
& 0.2329E-05/
data ((h21(ip,iw,1),iw=1,31),ip=15,15)/
& 0.3928E-05, 0.7724E-05, 0.1504E-04, 0.2883E-04, 0.5403E-04,
& 0.9826E-04, 0.1722E-03, 0.2891E-03, 0.4644E-03, 0.7172E-03,
& 0.1074E-02, 0.1572E-02, 0.2267E-02, 0.3245E-02, 0.4632E-02,
& 0.6606E-02, 0.9411E-02, 0.1338E-01, 0.1896E-01, 0.2674E-01,
& 0.3751E-01, 0.5227E-01, 0.7222E-01, 0.9875E-01, 0.1332E+00,
& 0.1768E+00, 0.2299E+00, 0.2927E+00, 0.3660E+00, 0.4504E+00,
& 0.5444E+00/
data ((h22(ip,iw,1),iw=1,31),ip=15,15)/
& -0.5736E-07, -0.1109E-06, -0.2106E-06, -0.3890E-06, -0.6928E-06,
& -0.1181E-05, -0.1917E-05, -0.2965E-05, -0.4396E-05, -0.6315E-05,
& -0.8891E-05, -0.1242E-04, -0.1736E-04, -0.2442E-04, -0.3454E-04,
& -0.4892E-04, -0.6916E-04, -0.9735E-04, -0.1362E-03, -0.1891E-03,
& -0.2602E-03, -0.3545E-03, -0.4768E-03, -0.6310E-03, -0.8179E-03,
& -0.1032E-02, -0.1265E-02, -0.1508E-02, -0.1757E-02, -0.1989E-02,
& -0.2159E-02/
data ((h23(ip,iw,1),iw=1,31),ip=15,15)/
& -0.2321E-09, -0.4350E-09, -0.7861E-09, -0.1347E-08, -0.2144E-08,
& -0.3120E-08, -0.4107E-08, -0.4892E-08, -0.5511E-08, -0.6164E-08,
& -0.7054E-08, -0.8811E-08, -0.1240E-07, -0.1862E-07, -0.2773E-07,
& -0.3957E-07, -0.5371E-07, -0.6939E-07, -0.8564E-07, -0.1006E-06,
& -0.1100E-06, -0.1066E-06, -0.8018E-07, -0.1228E-07, 0.1263E-06,
& 0.3678E-06, 0.7022E-06, 0.1049E-05, 0.1411E-05, 0.2015E-05,
& 0.3099E-05/
data ((h21(ip,iw,1),iw=1,31),ip=16,16)/
& 0.2064E-05, 0.4104E-05, 0.8141E-05, 0.1607E-04, 0.3145E-04,
& 0.6080E-04, 0.1153E-03, 0.2129E-03, 0.3802E-03, 0.6538E-03,
& 0.1078E-02, 0.1699E-02, 0.2576E-02, 0.3805E-02, 0.5540E-02,
& 0.8004E-02, 0.1149E-01, 0.1640E-01, 0.2329E-01, 0.3290E-01,
& 0.4622E-01, 0.6441E-01, 0.8888E-01, 0.1210E+00, 0.1622E+00,
& 0.2132E+00, 0.2745E+00, 0.3470E+00, 0.4317E+00, 0.5286E+00,
& 0.6335E+00/
data ((h22(ip,iw,1),iw=1,31),ip=16,16)/
& -0.3122E-07, -0.6175E-07, -0.1214E-06, -0.2361E-06, -0.4518E-06,
& -0.8438E-06, -0.1524E-05, -0.2643E-05, -0.4380E-05, -0.6922E-05,
& -0.1042E-04, -0.1504E-04, -0.2125E-04, -0.2987E-04, -0.4200E-04,
& -0.5923E-04, -0.8383E-04, -0.1186E-03, -0.1670E-03, -0.2328E-03,
& -0.3204E-03, -0.4347E-03, -0.5802E-03, -0.7595E-03, -0.9703E-03,
& -0.1205E-02, -0.1457E-02, -0.1720E-02, -0.1980E-02, -0.2191E-02,
& -0.2290E-02/
data ((h23(ip,iw,1),iw=1,31),ip=16,16)/
& -0.1376E-09, -0.2699E-09, -0.5220E-09, -0.9897E-09, -0.1819E-08,
& -0.3186E-08, -0.5224E-08, -0.7896E-08, -0.1090E-07, -0.1349E-07,
& -0.1443E-07, -0.1374E-07, -0.1386E-07, -0.1673E-07, -0.2237E-07,
& -0.3248E-07, -0.5050E-07, -0.7743E-07, -0.1097E-06, -0.1369E-06,
& -0.1463E-06, -0.1268E-06, -0.6424E-07, 0.5941E-07, 0.2742E-06,
& 0.5924E-06, 0.9445E-06, 0.1286E-05, 0.1819E-05, 0.2867E-05,
& 0.4527E-05/
data ((h21(ip,iw,1),iw=1,31),ip=17,17)/
& 0.2452E-05, 0.4881E-05, 0.9693E-05, 0.1918E-04, 0.3768E-04,
& 0.7322E-04, 0.1399E-03, 0.2607E-03, 0.4694E-03, 0.8102E-03,
& 0.1334E-02, 0.2098E-02, 0.3180E-02, 0.4710E-02, 0.6879E-02,
& 0.9952E-02, 0.1429E-01, 0.2038E-01, 0.2894E-01, 0.4085E-01,
& 0.5722E-01, 0.7939E-01, 0.1088E+00, 0.1468E+00, 0.1945E+00,
& 0.2524E+00, 0.3210E+00, 0.4017E+00, 0.4948E+00, 0.5978E+00,
& 0.7040E+00/
data ((h22(ip,iw,1),iw=1,31),ip=17,17)/
& -0.3547E-07, -0.7029E-07, -0.1386E-06, -0.2709E-06, -0.5218E-06,
& -0.9840E-06, -0.1799E-05, -0.3156E-05, -0.5272E-05, -0.8357E-05,
& -0.1260E-04, -0.1827E-04, -0.2598E-04, -0.3667E-04, -0.5169E-04,
& -0.7312E-04, -0.1037E-03, -0.1467E-03, -0.2060E-03, -0.2857E-03,
& -0.3907E-03, -0.5257E-03, -0.6940E-03, -0.8954E-03, -0.1124E-02,
& -0.1371E-02, -0.1632E-02, -0.1897E-02, -0.2131E-02, -0.2275E-02,
& -0.2265E-02/
data ((h23(ip,iw,1),iw=1,31),ip=17,17)/
& -0.1482E-09, -0.2910E-09, -0.5667E-09, -0.1081E-08, -0.2005E-08,
& -0.3554E-08, -0.5902E-08, -0.8925E-08, -0.1209E-07, -0.1448E-07,
& -0.1536E-07, -0.1565E-07, -0.1763E-07, -0.2088E-07, -0.2564E-07,
& -0.3635E-07, -0.5791E-07, -0.8907E-07, -0.1213E-06, -0.1418E-06,
& -0.1397E-06, -0.1000E-06, -0.4427E-08, 0.1713E-06, 0.4536E-06,
& 0.8086E-06, 0.1153E-05, 0.1588E-05, 0.2437E-05, 0.3905E-05,
& 0.5874E-05/
data ((h21(ip,iw,1),iw=1,31),ip=18,18)/
& 0.2878E-05, 0.5733E-05, 0.1140E-04, 0.2258E-04, 0.4446E-04,
& 0.8668E-04, 0.1664E-03, 0.3120E-03, 0.5656E-03, 0.9812E-03,
& 0.1621E-02, 0.2559E-02, 0.3902E-02, 0.5812E-02, 0.8522E-02,
& 0.1235E-01, 0.1773E-01, 0.2530E-01, 0.3590E-01, 0.5058E-01,
& 0.7059E-01, 0.9736E-01, 0.1323E+00, 0.1767E+00, 0.2312E+00,
& 0.2962E+00, 0.3728E+00, 0.4619E+00, 0.5623E+00, 0.6685E+00,
& 0.7716E+00/
data ((h22(ip,iw,1),iw=1,31),ip=18,18)/
& -0.4064E-07, -0.8066E-07, -0.1593E-06, -0.3124E-06, -0.6049E-06,
& -0.1148E-05, -0.2118E-05, -0.3751E-05, -0.6314E-05, -0.1006E-04,
& -0.1526E-04, -0.2232E-04, -0.3196E-04, -0.4525E-04, -0.6394E-04,
& -0.9058E-04, -0.1284E-03, -0.1812E-03, -0.2533E-03, -0.3493E-03,
& -0.4740E-03, -0.6315E-03, -0.8228E-03, -0.1044E-02, -0.1286E-02,
& -0.1544E-02, -0.1810E-02, -0.2061E-02, -0.2243E-02, -0.2291E-02,
& -0.2152E-02/
data ((h23(ip,iw,1),iw=1,31),ip=18,18)/
& -0.1630E-09, -0.3213E-09, -0.6266E-09, -0.1201E-08, -0.2248E-08,
& -0.4030E-08, -0.6770E-08, -0.1033E-07, -0.1392E-07, -0.1640E-07,
& -0.1768E-07, -0.1932E-07, -0.2229E-07, -0.2508E-07, -0.2940E-07,
& -0.4200E-07, -0.6717E-07, -0.1002E-06, -0.1286E-06, -0.1402E-06,
& -0.1216E-06, -0.5487E-07, 0.8418E-07, 0.3246E-06, 0.6610E-06,
& 0.1013E-05, 0.1394E-05, 0.2073E-05, 0.3337E-05, 0.5175E-05,
& 0.7255E-05/
data ((h21(ip,iw,1),iw=1,31),ip=19,19)/
& 0.3282E-05, 0.6539E-05, 0.1300E-04, 0.2578E-04, 0.5085E-04,
& 0.9936E-04, 0.1914E-03, 0.3608E-03, 0.6586E-03, 0.1153E-02,
& 0.1924E-02, 0.3074E-02, 0.4742E-02, 0.7126E-02, 0.1051E-01,
& 0.1526E-01, 0.2195E-01, 0.3133E-01, 0.4441E-01, 0.6238E-01,
& 0.8664E-01, 0.1186E+00, 0.1597E+00, 0.2108E+00, 0.2723E+00,
& 0.3450E+00, 0.4300E+00, 0.5272E+00, 0.6324E+00, 0.7378E+00,
& 0.8330E+00/
data ((h22(ip,iw,1),iw=1,31),ip=19,19)/
& -0.4629E-07, -0.9195E-07, -0.1819E-06, -0.3572E-06, -0.6936E-06,
& -0.1323E-05, -0.2456E-05, -0.4385E-05, -0.7453E-05, -0.1200E-04,
& -0.1843E-04, -0.2731E-04, -0.3943E-04, -0.5606E-04, -0.7936E-04,
& -0.1123E-03, -0.1588E-03, -0.2231E-03, -0.3101E-03, -0.4247E-03,
& -0.5713E-03, -0.7522E-03, -0.9651E-03, -0.1202E-02, -0.1456E-02,
& -0.1721E-02, -0.1983E-02, -0.2196E-02, -0.2296E-02, -0.2224E-02,
& -0.1952E-02/
data ((h23(ip,iw,1),iw=1,31),ip=19,19)/
& -0.1827E-09, -0.3607E-09, -0.7057E-09, -0.1359E-08, -0.2552E-08,
& -0.4615E-08, -0.7854E-08, -0.1218E-07, -0.1670E-07, -0.2008E-07,
& -0.2241E-07, -0.2516E-07, -0.2796E-07, -0.3015E-07, -0.3506E-07,
& -0.4958E-07, -0.7627E-07, -0.1070E-06, -0.1289E-06, -0.1286E-06,
& -0.8843E-07, 0.1492E-07, 0.2118E-06, 0.5155E-06, 0.8665E-06,
& 0.1220E-05, 0.1765E-05, 0.2825E-05, 0.4498E-05, 0.6563E-05,
& 0.8422E-05/
data ((h21(ip,iw,1),iw=1,31),ip=20,20)/
& 0.3608E-05, 0.7189E-05, 0.1430E-04, 0.2837E-04, 0.5601E-04,
& 0.1097E-03, 0.2120E-03, 0.4017E-03, 0.7396E-03, 0.1311E-02,
& 0.2226E-02, 0.3624E-02, 0.5685E-02, 0.8652E-02, 0.1286E-01,
& 0.1878E-01, 0.2709E-01, 0.3868E-01, 0.5471E-01, 0.7654E-01,
& 0.1057E+00, 0.1435E+00, 0.1912E+00, 0.2492E+00, 0.3181E+00,
& 0.3990E+00, 0.4926E+00, 0.5960E+00, 0.7027E+00, 0.8027E+00,
& 0.8852E+00/
data ((h22(ip,iw,1),iw=1,31),ip=20,20)/
& -0.5164E-07, -0.1026E-06, -0.2031E-06, -0.3994E-06, -0.7771E-06,
& -0.1488E-05, -0.2776E-05, -0.5001E-05, -0.8610E-05, -0.1411E-04,
& -0.2209E-04, -0.3328E-04, -0.4860E-04, -0.6954E-04, -0.9861E-04,
& -0.1393E-03, -0.1961E-03, -0.2738E-03, -0.3778E-03, -0.5132E-03,
& -0.6831E-03, -0.8868E-03, -0.1118E-02, -0.1368E-02, -0.1632E-02,
& -0.1899E-02, -0.2136E-02, -0.2282E-02, -0.2273E-02, -0.2067E-02,
& -0.1679E-02/
data ((h23(ip,iw,1),iw=1,31),ip=20,20)/
& -0.2058E-09, -0.4066E-09, -0.7967E-09, -0.1539E-08, -0.2904E-08,
& -0.5293E-08, -0.9116E-08, -0.1447E-07, -0.2058E-07, -0.2608E-07,
& -0.3053E-07, -0.3418E-07, -0.3619E-07, -0.3766E-07, -0.4313E-07,
& -0.5817E-07, -0.8299E-07, -0.1072E-06, -0.1195E-06, -0.1031E-06,
& -0.3275E-07, 0.1215E-06, 0.3835E-06, 0.7220E-06, 0.1062E-05,
& 0.1504E-05, 0.2367E-05, 0.3854E-05, 0.5842E-05, 0.7875E-05,
& 0.9082E-05/
data ((h21(ip,iw,1),iw=1,31),ip=21,21)/
& 0.3827E-05, 0.7626E-05, 0.1518E-04, 0.3013E-04, 0.5955E-04,
& 0.1169E-03, 0.2268E-03, 0.4325E-03, 0.8046E-03, 0.1449E-02,
& 0.2512E-02, 0.4185E-02, 0.6707E-02, 0.1038E-01, 0.1561E-01,
& 0.2298E-01, 0.3328E-01, 0.4754E-01, 0.6708E-01, 0.9340E-01,
& 0.1280E+00, 0.1722E+00, 0.2267E+00, 0.2918E+00, 0.3688E+00,
& 0.4584E+00, 0.5594E+00, 0.6662E+00, 0.7700E+00, 0.8597E+00,
& 0.9266E+00/
data ((h22(ip,iw,1),iw=1,31),ip=21,21)/
& -0.5584E-07, -0.1110E-06, -0.2198E-06, -0.4329E-06, -0.8444E-06,
& -0.1623E-05, -0.3049E-05, -0.5551E-05, -0.9714E-05, -0.1627E-04,
& -0.2609E-04, -0.4015E-04, -0.5955E-04, -0.8603E-04, -0.1223E-03,
& -0.1724E-03, -0.2413E-03, -0.3346E-03, -0.4578E-03, -0.6155E-03,
& -0.8087E-03, -0.1033E-02, -0.1279E-02, -0.1540E-02, -0.1811E-02,
& -0.2065E-02, -0.2251E-02, -0.2301E-02, -0.2163E-02, -0.1828E-02,
& -0.1365E-02/
data ((h23(ip,iw,1),iw=1,31),ip=21,21)/
& -0.2274E-09, -0.4498E-09, -0.8814E-09, -0.1708E-08, -0.3247E-08,
& -0.5972E-08, -0.1045E-07, -0.1707E-07, -0.2545E-07, -0.3440E-07,
& -0.4259E-07, -0.4822E-07, -0.5004E-07, -0.5061E-07, -0.5485E-07,
& -0.6687E-07, -0.8483E-07, -0.9896E-07, -0.9646E-07, -0.5557E-07,
& 0.5765E-07, 0.2752E-06, 0.5870E-06, 0.9188E-06, 0.1291E-05,
& 0.1971E-05, 0.3251E-05, 0.5115E-05, 0.7221E-05, 0.8825E-05,
& 0.9032E-05/
data ((h21(ip,iw,1),iw=1,31),ip=22,22)/
& 0.3938E-05, 0.7849E-05, 0.1563E-04, 0.3105E-04, 0.6149E-04,
& 0.1210E-03, 0.2361E-03, 0.4537E-03, 0.8543E-03, 0.1565E-02,
& 0.2774E-02, 0.4739E-02, 0.7781E-02, 0.1229E-01, 0.1877E-01,
& 0.2791E-01, 0.4064E-01, 0.5812E-01, 0.8180E-01, 0.1132E+00,
& 0.1539E+00, 0.2047E+00, 0.2662E+00, 0.3391E+00, 0.4247E+00,
& 0.5226E+00, 0.6287E+00, 0.7351E+00, 0.8311E+00, 0.9066E+00,
& 0.9569E+00/
data ((h22(ip,iw,1),iw=1,31),ip=22,22)/
& -0.5833E-07, -0.1160E-06, -0.2300E-06, -0.4540E-06, -0.8885E-06,
& -0.1718E-05, -0.3256E-05, -0.6010E-05, -0.1072E-04, -0.1838E-04,
& -0.3026E-04, -0.4772E-04, -0.7223E-04, -0.1057E-03, -0.1512E-03,
& -0.2128E-03, -0.2961E-03, -0.4070E-03, -0.5514E-03, -0.7320E-03,
& -0.9467E-03, -0.1187E-02, -0.1446E-02, -0.1717E-02, -0.1985E-02,
& -0.2203E-02, -0.2307E-02, -0.2237E-02, -0.1965E-02, -0.1532E-02,
& -0.1044E-02/
data ((h23(ip,iw,1),iw=1,31),ip=22,22)/
& -0.2426E-09, -0.4805E-09, -0.9447E-09, -0.1841E-08, -0.3519E-08,
& -0.6565E-08, -0.1172E-07, -0.1979E-07, -0.3095E-07, -0.4443E-07,
& -0.5821E-07, -0.6868E-07, -0.7282E-07, -0.7208E-07, -0.7176E-07,
& -0.7562E-07, -0.8110E-07, -0.7934E-07, -0.5365E-07, 0.2483E-07,
& 0.1959E-06, 0.4731E-06, 0.7954E-06, 0.1123E-05, 0.1652E-05,
& 0.2711E-05, 0.4402E-05, 0.6498E-05, 0.8392E-05, 0.9154E-05,
& 0.8261E-05/
data ((h21(ip,iw,1),iw=1,31),ip=23,23)/
& 0.3973E-05, 0.7921E-05, 0.1578E-04, 0.3139E-04, 0.6229E-04,
& 0.1231E-03, 0.2414E-03, 0.4680E-03, 0.8923E-03, 0.1663E-02,
& 0.3011E-02, 0.5268E-02, 0.8869E-02, 0.1434E-01, 0.2230E-01,
& 0.3359E-01, 0.4924E-01, 0.7057E-01, 0.9908E-01, 0.1363E+00,
& 0.1834E+00, 0.2411E+00, 0.3100E+00, 0.3913E+00, 0.4856E+00,
& 0.5901E+00, 0.6981E+00, 0.7994E+00, 0.8832E+00, 0.9424E+00,
& 0.9773E+00/
data ((h22(ip,iw,1),iw=1,31),ip=23,23)/
& -0.5929E-07, -0.1180E-06, -0.2344E-06, -0.4638E-06, -0.9118E-06,
& -0.1775E-05, -0.3401E-05, -0.6375E-05, -0.1160E-04, -0.2039E-04,
& -0.3444E-04, -0.5575E-04, -0.8641E-04, -0.1287E-03, -0.1856E-03,
& -0.2615E-03, -0.3618E-03, -0.4928E-03, -0.6594E-03, -0.8621E-03,
& -0.1095E-02, -0.1349E-02, -0.1618E-02, -0.1894E-02, -0.2140E-02,
& -0.2293E-02, -0.2290E-02, -0.2085E-02, -0.1696E-02, -0.1212E-02,
& -0.7506E-03/
data ((h23(ip,iw,1),iw=1,31),ip=23,23)/
& -0.2496E-09, -0.4954E-09, -0.9780E-09, -0.1915E-08, -0.3697E-08,
& -0.6991E-08, -0.1279E-07, -0.2231E-07, -0.3653E-07, -0.5541E-07,
& -0.7688E-07, -0.9614E-07, -0.1069E-06, -0.1065E-06, -0.9866E-07,
& -0.8740E-07, -0.7192E-07, -0.4304E-07, 0.1982E-07, 0.1525E-06,
& 0.3873E-06, 0.6947E-06, 0.1000E-05, 0.1409E-05, 0.2253E-05,
& 0.3739E-05, 0.5744E-05, 0.7812E-05, 0.9067E-05, 0.8746E-05,
& 0.6940E-05/
data ((h21(ip,iw,1),iw=1,31),ip=24,24)/
& 0.3978E-05, 0.7933E-05, 0.1581E-04, 0.3149E-04, 0.6260E-04,
& 0.1240E-03, 0.2445E-03, 0.4777E-03, 0.9213E-03, 0.1743E-02,
& 0.3217E-02, 0.5756E-02, 0.9929E-02, 0.1644E-01, 0.2612E-01,
& 0.3995E-01, 0.5910E-01, 0.8497E-01, 0.1190E+00, 0.1626E+00,
& 0.2165E+00, 0.2813E+00, 0.3583E+00, 0.4485E+00, 0.5505E+00,
& 0.6590E+00, 0.7646E+00, 0.8562E+00, 0.9245E+00, 0.9676E+00,
& 0.9897E+00/
data ((h22(ip,iw,1),iw=1,31),ip=24,24)/
& -0.5950E-07, -0.1185E-06, -0.2358E-06, -0.4678E-06, -0.9235E-06,
& -0.1810E-05, -0.3503E-05, -0.6664E-05, -0.1236E-04, -0.2223E-04,
& -0.3849E-04, -0.6396E-04, -0.1017E-03, -0.1545E-03, -0.2257E-03,
& -0.3192E-03, -0.4399E-03, -0.5933E-03, -0.7824E-03, -0.1005E-02,
& -0.1251E-02, -0.1516E-02, -0.1794E-02, -0.2060E-02, -0.2257E-02,
& -0.2318E-02, -0.2186E-02, -0.1853E-02, -0.1386E-02, -0.9021E-03,
& -0.5050E-03/
data ((h23(ip,iw,1),iw=1,31),ip=24,24)/
& -0.2515E-09, -0.5001E-09, -0.9904E-09, -0.1951E-08, -0.3800E-08,
& -0.7288E-08, -0.1362E-07, -0.2452E-07, -0.4184E-07, -0.6663E-07,
& -0.9770E-07, -0.1299E-06, -0.1533E-06, -0.1584E-06, -0.1425E-06,
& -0.1093E-06, -0.5972E-07, 0.1426E-07, 0.1347E-06, 0.3364E-06,
& 0.6209E-06, 0.9169E-06, 0.1243E-05, 0.1883E-05, 0.3145E-05,
& 0.5011E-05, 0.7136E-05, 0.8785E-05, 0.9048E-05, 0.7686E-05,
& 0.5368E-05/
data ((h21(ip,iw,1),iw=1,31),ip=25,25)/
& 0.3978E-05, 0.7934E-05, 0.1582E-04, 0.3153E-04, 0.6275E-04,
& 0.1246E-03, 0.2466E-03, 0.4847E-03, 0.9432E-03, 0.1808E-02,
& 0.3392E-02, 0.6189E-02, 0.1092E-01, 0.1852E-01, 0.3009E-01,
& 0.4683E-01, 0.7008E-01, 0.1012E+00, 0.1416E+00, 0.1920E+00,
& 0.2531E+00, 0.3258E+00, 0.4115E+00, 0.5102E+00, 0.6180E+00,
& 0.7267E+00, 0.8252E+00, 0.9030E+00, 0.9550E+00, 0.9838E+00,
& 0.9965E+00/
data ((h22(ip,iw,1),iw=1,31),ip=25,25)/
& -0.5953E-07, -0.1187E-06, -0.2363E-06, -0.4697E-06, -0.9304E-06,
& -0.1833E-05, -0.3578E-05, -0.6889E-05, -0.1299E-04, -0.2384E-04,
& -0.4227E-04, -0.7201E-04, -0.1174E-03, -0.1825E-03, -0.2710E-03,
& -0.3861E-03, -0.5313E-03, -0.7095E-03, -0.9203E-03, -0.1158E-02,
& -0.1417E-02, -0.1691E-02, -0.1968E-02, -0.2200E-02, -0.2320E-02,
& -0.2263E-02, -0.1998E-02, -0.1563E-02, -0.1068E-02, -0.6300E-03,
& -0.3174E-03/
data ((h23(ip,iw,1),iw=1,31),ip=25,25)/
& -0.2520E-09, -0.5016E-09, -0.9963E-09, -0.1971E-08, -0.3867E-08,
& -0.7500E-08, -0.1427E-07, -0.2634E-07, -0.4656E-07, -0.7753E-07,
& -0.1196E-06, -0.1683E-06, -0.2113E-06, -0.2309E-06, -0.2119E-06,
& -0.1518E-06, -0.5200E-07, 0.9274E-07, 0.2973E-06, 0.5714E-06,
& 0.8687E-06, 0.1152E-05, 0.1621E-05, 0.2634E-05, 0.4310E-05,
& 0.6418E-05, 0.8347E-05, 0.9162E-05, 0.8319E-05, 0.6209E-05,
& 0.3844E-05/
data ((h21(ip,iw,1),iw=1,31),ip=26,26)/
& 0.3976E-05, 0.7932E-05, 0.1582E-04, 0.3154E-04, 0.6284E-04,
& 0.1250E-03, 0.2479E-03, 0.4896E-03, 0.9592E-03, 0.1857E-02,
& 0.3532E-02, 0.6558E-02, 0.1181E-01, 0.2048E-01, 0.3402E-01,
& 0.5399E-01, 0.8188E-01, 0.1190E+00, 0.1664E+00, 0.2243E+00,
& 0.2933E+00, 0.3747E+00, 0.4695E+00, 0.5755E+00, 0.6858E+00,
& 0.7903E+00, 0.8773E+00, 0.9391E+00, 0.9758E+00, 0.9934E+00,
& 0.9996E+00/
data ((h22(ip,iw,1),iw=1,31),ip=26,26)/
& -0.5954E-07, -0.1187E-06, -0.2366E-06, -0.4709E-06, -0.9349E-06,
& -0.1849E-05, -0.3632E-05, -0.7058E-05, -0.1350E-04, -0.2521E-04,
& -0.4564E-04, -0.7958E-04, -0.1329E-03, -0.2114E-03, -0.3200E-03,
& -0.4611E-03, -0.6353E-03, -0.8409E-03, -0.1072E-02, -0.1324E-02,
& -0.1592E-02, -0.1871E-02, -0.2127E-02, -0.2297E-02, -0.2312E-02,
& -0.2123E-02, -0.1738E-02, -0.1247E-02, -0.7744E-03, -0.4117E-03,
& -0.1850E-03/
data ((h23(ip,iw,1),iw=1,31),ip=26,26)/
& -0.2522E-09, -0.5025E-09, -0.9997E-09, -0.1983E-08, -0.3912E-08,
& -0.7650E-08, -0.1474E-07, -0.2777E-07, -0.5055E-07, -0.8745E-07,
& -0.1414E-06, -0.2095E-06, -0.2790E-06, -0.3241E-06, -0.3135E-06,
& -0.2269E-06, -0.5896E-07, 0.1875E-06, 0.4996E-06, 0.8299E-06,
& 0.1115E-05, 0.1467E-05, 0.2236E-05, 0.3672E-05, 0.5668E-05,
& 0.7772E-05, 0.9094E-05, 0.8827E-05, 0.7041E-05, 0.4638E-05,
& 0.2539E-05/
data ((h81(ip,iw,1),iw=1,31),ip= 1, 1)/
& 0.1342E-04, 0.2640E-04, 0.5137E-04, 0.9829E-04, 0.1832E-03,
& 0.3284E-03, 0.5585E-03, 0.8907E-03, 0.1327E-02, 0.1856E-02,
& 0.2461E-02, 0.3138E-02, 0.3898E-02, 0.4766E-02, 0.5783E-02,
& 0.7007E-02, 0.8521E-02, 0.1041E-01, 0.1278E-01, 0.1570E-01,
& 0.1928E-01, 0.2361E-01, 0.2884E-01, 0.3520E-01, 0.4305E-01,
& 0.5286E-01, 0.6531E-01, 0.8127E-01, 0.1019E+00, 0.1287E+00,
& 0.1632E+00/
data ((h82(ip,iw,1),iw=1,31),ip= 1, 1)/
& -0.5685E-08, -0.1331E-07, -0.3249E-07, -0.8137E-07, -0.2048E-06,
& -0.4973E-06, -0.1118E-05, -0.2246E-05, -0.3982E-05, -0.6290E-05,
& -0.9040E-05, -0.1215E-04, -0.1567E-04, -0.1970E-04, -0.2449E-04,
& -0.3046E-04, -0.3798E-04, -0.4725E-04, -0.5831E-04, -0.7123E-04,
& -0.8605E-04, -0.1028E-03, -0.1212E-03, -0.1413E-03, -0.1635E-03,
& -0.1884E-03, -0.2160E-03, -0.2461E-03, -0.2778E-03, -0.3098E-03,
& -0.3411E-03/
data ((h83(ip,iw,1),iw=1,31),ip= 1, 1)/
& 0.2169E-10, 0.5237E-10, 0.1296E-09, 0.3204E-09, 0.7665E-09,
& 0.1691E-08, 0.3222E-08, 0.5110E-08, 0.6779E-08, 0.7681E-08,
& 0.7378E-08, 0.5836E-08, 0.3191E-08, -0.1491E-08, -0.1022E-07,
& -0.2359E-07, -0.3957E-07, -0.5553E-07, -0.6927E-07, -0.7849E-07,
& -0.8139E-07, -0.7853E-07, -0.7368E-07, -0.7220E-07, -0.7780E-07,
& -0.9091E-07, -0.1038E-06, -0.9929E-07, -0.5422E-07, 0.5379E-07,
& 0.2350E-06/
data ((h81(ip,iw,1),iw=1,31),ip= 2, 2)/
& 0.1342E-04, 0.2640E-04, 0.5137E-04, 0.9829E-04, 0.1832E-03,
& 0.3284E-03, 0.5586E-03, 0.8908E-03, 0.1327E-02, 0.1856E-02,
& 0.2462E-02, 0.3140E-02, 0.3902E-02, 0.4774E-02, 0.5797E-02,
& 0.7033E-02, 0.8570E-02, 0.1050E-01, 0.1294E-01, 0.1599E-01,
& 0.1979E-01, 0.2448E-01, 0.3024E-01, 0.3738E-01, 0.4633E-01,
& 0.5766E-01, 0.7218E-01, 0.9096E-01, 0.1154E+00, 0.1471E+00,
& 0.1880E+00/
data ((h82(ip,iw,1),iw=1,31),ip= 2, 2)/
& -0.5684E-08, -0.1331E-07, -0.3248E-07, -0.8133E-07, -0.2047E-06,
& -0.4971E-06, -0.1117E-05, -0.2245E-05, -0.3981E-05, -0.6287E-05,
& -0.9035E-05, -0.1215E-04, -0.1565E-04, -0.1967E-04, -0.2444E-04,
& -0.3036E-04, -0.3780E-04, -0.4694E-04, -0.5779E-04, -0.7042E-04,
& -0.8491E-04, -0.1013E-03, -0.1196E-03, -0.1399E-03, -0.1625E-03,
& -0.1879E-03, -0.2163E-03, -0.2474E-03, -0.2803E-03, -0.3140E-03,
& -0.3478E-03/
data ((h83(ip,iw,1),iw=1,31),ip= 2, 2)/
& 0.2168E-10, 0.5242E-10, 0.1295E-09, 0.3201E-09, 0.7662E-09,
& 0.1690E-08, 0.3220E-08, 0.5106E-08, 0.6776E-08, 0.7673E-08,
& 0.7362E-08, 0.5808E-08, 0.3138E-08, -0.1595E-08, -0.1041E-07,
& -0.2390E-07, -0.4010E-07, -0.5636E-07, -0.7045E-07, -0.7972E-07,
& -0.8178E-07, -0.7677E-07, -0.6876E-07, -0.6381E-07, -0.6583E-07,
& -0.7486E-07, -0.8229E-07, -0.7017E-07, -0.1497E-07, 0.1051E-06,
& 0.2990E-06/
data ((h81(ip,iw,1),iw=1,31),ip= 3, 3)/
& 0.1342E-04, 0.2640E-04, 0.5137E-04, 0.9830E-04, 0.1832E-03,
& 0.3285E-03, 0.5587E-03, 0.8911E-03, 0.1328E-02, 0.1857E-02,
& 0.2465E-02, 0.3144E-02, 0.3909E-02, 0.4787E-02, 0.5820E-02,
& 0.7075E-02, 0.8646E-02, 0.1064E-01, 0.1319E-01, 0.1643E-01,
& 0.2053E-01, 0.2569E-01, 0.3215E-01, 0.4028E-01, 0.5059E-01,
& 0.6380E-01, 0.8088E-01, 0.1031E+00, 0.1321E+00, 0.1698E+00,
& 0.2179E+00/
data ((h82(ip,iw,1),iw=1,31),ip= 3, 3)/
& -0.5682E-08, -0.1330E-07, -0.3247E-07, -0.8129E-07, -0.2046E-06,
& -0.4968E-06, -0.1117E-05, -0.2244E-05, -0.3978E-05, -0.6283E-05,
& -0.9027E-05, -0.1213E-04, -0.1563E-04, -0.1963E-04, -0.2436E-04,
& -0.3021E-04, -0.3754E-04, -0.4649E-04, -0.5709E-04, -0.6940E-04,
& -0.8359E-04, -0.9986E-04, -0.1182E-03, -0.1388E-03, -0.1620E-03,
& -0.1882E-03, -0.2175E-03, -0.2498E-03, -0.2843E-03, -0.3203E-03,
& -0.3573E-03/
data ((h83(ip,iw,1),iw=1,31),ip= 3, 3)/
& 0.2167E-10, 0.5238E-10, 0.1294E-09, 0.3198E-09, 0.7656E-09,
& 0.1688E-08, 0.3217E-08, 0.5104E-08, 0.6767E-08, 0.7661E-08,
& 0.7337E-08, 0.5764E-08, 0.3051E-08, -0.1752E-08, -0.1068E-07,
& -0.2436E-07, -0.4081E-07, -0.5740E-07, -0.7165E-07, -0.8046E-07,
& -0.8082E-07, -0.7289E-07, -0.6141E-07, -0.5294E-07, -0.5134E-07,
& -0.5552E-07, -0.5609E-07, -0.3464E-07, 0.3275E-07, 0.1669E-06,
& 0.3745E-06/
data ((h81(ip,iw,1),iw=1,31),ip= 4, 4)/
& 0.1342E-04, 0.2640E-04, 0.5138E-04, 0.9830E-04, 0.1832E-03,
& 0.3286E-03, 0.5589E-03, 0.8915E-03, 0.1329E-02, 0.1859E-02,
& 0.2468E-02, 0.3150E-02, 0.3920E-02, 0.4806E-02, 0.5855E-02,
& 0.7140E-02, 0.8763E-02, 0.1085E-01, 0.1356E-01, 0.1707E-01,
& 0.2158E-01, 0.2736E-01, 0.3471E-01, 0.4407E-01, 0.5608E-01,
& 0.7161E-01, 0.9184E-01, 0.1183E+00, 0.1528E+00, 0.1973E+00,
& 0.2537E+00/
data ((h82(ip,iw,1),iw=1,31),ip= 4, 4)/
& -0.5680E-08, -0.1329E-07, -0.3243E-07, -0.8121E-07, -0.2044E-06,
& -0.4963E-06, -0.1115E-05, -0.2242E-05, -0.3974E-05, -0.6276E-05,
& -0.9015E-05, -0.1211E-04, -0.1559E-04, -0.1956E-04, -0.2423E-04,
& -0.2999E-04, -0.3716E-04, -0.4588E-04, -0.5618E-04, -0.6818E-04,
& -0.8218E-04, -0.9847E-04, -0.1171E-03, -0.1382E-03, -0.1621E-03,
& -0.1892E-03, -0.2197E-03, -0.2535E-03, -0.2902E-03, -0.3293E-03,
& -0.3700E-03/
data ((h83(ip,iw,1),iw=1,31),ip= 4, 4)/
& 0.2166E-10, 0.5229E-10, 0.1294E-09, 0.3193E-09, 0.7644E-09,
& 0.1686E-08, 0.3213E-08, 0.5092E-08, 0.6753E-08, 0.7640E-08,
& 0.7302E-08, 0.5696E-08, 0.2917E-08, -0.1984E-08, -0.1108E-07,
& -0.2497E-07, -0.4171E-07, -0.5849E-07, -0.7254E-07, -0.8017E-07,
& -0.7802E-07, -0.6662E-07, -0.5153E-07, -0.3961E-07, -0.3387E-07,
& -0.3219E-07, -0.2426E-07, 0.8700E-08, 0.9027E-07, 0.2400E-06,
& 0.4623E-06/
data ((h81(ip,iw,1),iw=1,31),ip= 5, 5)/
& 0.1342E-04, 0.2640E-04, 0.5138E-04, 0.9832E-04, 0.1833E-03,
& 0.3287E-03, 0.5591E-03, 0.8922E-03, 0.1330E-02, 0.1862E-02,
& 0.2473E-02, 0.3159E-02, 0.3937E-02, 0.4837E-02, 0.5911E-02,
& 0.7240E-02, 0.8943E-02, 0.1117E-01, 0.1411E-01, 0.1798E-01,
& 0.2304E-01, 0.2961E-01, 0.3807E-01, 0.4896E-01, 0.6308E-01,
& 0.8148E-01, 0.1056E+00, 0.1371E+00, 0.1780E+00, 0.2303E+00,
& 0.2958E+00/
data ((h82(ip,iw,1),iw=1,31),ip= 5, 5)/
& -0.5675E-08, -0.1328E-07, -0.3239E-07, -0.8110E-07, -0.2040E-06,
& -0.4954E-06, -0.1114E-05, -0.2238E-05, -0.3968E-05, -0.6265E-05,
& -0.8996E-05, -0.1208E-04, -0.1553E-04, -0.1945E-04, -0.2404E-04,
& -0.2966E-04, -0.3663E-04, -0.4508E-04, -0.5508E-04, -0.6686E-04,
& -0.8082E-04, -0.9732E-04, -0.1165E-03, -0.1382E-03, -0.1630E-03,
& -0.1913E-03, -0.2234E-03, -0.2593E-03, -0.2989E-03, -0.3417E-03,
& -0.3857E-03/
data ((h83(ip,iw,1),iw=1,31),ip= 5, 5)/
& 0.2163E-10, 0.5209E-10, 0.1291E-09, 0.3186E-09, 0.7626E-09,
& 0.1682E-08, 0.3203E-08, 0.5078E-08, 0.6730E-08, 0.7606E-08,
& 0.7246E-08, 0.5592E-08, 0.2735E-08, -0.2325E-08, -0.1162E-07,
& -0.2576E-07, -0.4268E-07, -0.5938E-07, -0.7262E-07, -0.7827E-07,
& -0.7297E-07, -0.5786E-07, -0.3930E-07, -0.2373E-07, -0.1295E-07,
& -0.3728E-08, 0.1465E-07, 0.6114E-07, 0.1590E-06, 0.3257E-06,
& 0.5622E-06/
data ((h81(ip,iw,1),iw=1,31),ip= 6, 6)/
& 0.1342E-04, 0.2640E-04, 0.5139E-04, 0.9834E-04, 0.1833E-03,
& 0.3288E-03, 0.5596E-03, 0.8932E-03, 0.1332E-02, 0.1866E-02,
& 0.2481E-02, 0.3174E-02, 0.3963E-02, 0.4885E-02, 0.5997E-02,
& 0.7394E-02, 0.9215E-02, 0.1164E-01, 0.1489E-01, 0.1924E-01,
& 0.2501E-01, 0.3258E-01, 0.4243E-01, 0.5523E-01, 0.7195E-01,
& 0.9387E-01, 0.1226E+00, 0.1601E+00, 0.2084E+00, 0.2695E+00,
& 0.3446E+00/
data ((h82(ip,iw,1),iw=1,31),ip= 6, 6)/
& -0.5671E-08, -0.1326E-07, -0.3234E-07, -0.8091E-07, -0.2035E-06,
& -0.4941E-06, -0.1111E-05, -0.2232E-05, -0.3958E-05, -0.6247E-05,
& -0.8966E-05, -0.1202E-04, -0.1544E-04, -0.1929E-04, -0.2377E-04,
& -0.2921E-04, -0.3593E-04, -0.4409E-04, -0.5385E-04, -0.6555E-04,
& -0.7965E-04, -0.9656E-04, -0.1163E-03, -0.1390E-03, -0.1649E-03,
& -0.1947E-03, -0.2288E-03, -0.2675E-03, -0.3109E-03, -0.3575E-03,
& -0.4039E-03/
data ((h83(ip,iw,1),iw=1,31),ip= 6, 6)/
& 0.2155E-10, 0.5188E-10, 0.1288E-09, 0.3175E-09, 0.7599E-09,
& 0.1675E-08, 0.3190E-08, 0.5059E-08, 0.6699E-08, 0.7551E-08,
& 0.7154E-08, 0.5435E-08, 0.2452E-08, -0.2802E-08, -0.1235E-07,
& -0.2668E-07, -0.4353E-07, -0.5962E-07, -0.7134E-07, -0.7435E-07,
& -0.6551E-07, -0.4676E-07, -0.2475E-07, -0.4876E-08, 0.1235E-07,
& 0.3092E-07, 0.6192E-07, 0.1243E-06, 0.2400E-06, 0.4247E-06,
& 0.6755E-06/
data ((h81(ip,iw,1),iw=1,31),ip= 7, 7)/
& 0.1342E-04, 0.2640E-04, 0.5139E-04, 0.9837E-04, 0.1834E-03,
& 0.3291E-03, 0.5603E-03, 0.8949E-03, 0.1336E-02, 0.1873E-02,
& 0.2494E-02, 0.3198E-02, 0.4005E-02, 0.4960E-02, 0.6130E-02,
& 0.7628E-02, 0.9618E-02, 0.1232E-01, 0.1599E-01, 0.2097E-01,
& 0.2764E-01, 0.3646E-01, 0.4803E-01, 0.6319E-01, 0.8312E-01,
& 0.1093E+00, 0.1436E+00, 0.1881E+00, 0.2448E+00, 0.3153E+00,
& 0.4001E+00/
data ((h82(ip,iw,1),iw=1,31),ip= 7, 7)/
& -0.5665E-08, -0.1322E-07, -0.3224E-07, -0.8063E-07, -0.2027E-06,
& -0.4921E-06, -0.1106E-05, -0.2223E-05, -0.3942E-05, -0.6220E-05,
& -0.8920E-05, -0.1194E-04, -0.1530E-04, -0.1905E-04, -0.2337E-04,
& -0.2860E-04, -0.3505E-04, -0.4296E-04, -0.5259E-04, -0.6439E-04,
& -0.7884E-04, -0.9635E-04, -0.1170E-03, -0.1407E-03, -0.1681E-03,
& -0.1998E-03, -0.2366E-03, -0.2790E-03, -0.3265E-03, -0.3763E-03,
& -0.4235E-03/
data ((h83(ip,iw,1),iw=1,31),ip= 7, 7)/
& 0.2157E-10, 0.5178E-10, 0.1283E-09, 0.3162E-09, 0.7558E-09,
& 0.1665E-08, 0.3169E-08, 0.5027E-08, 0.6645E-08, 0.7472E-08,
& 0.7017E-08, 0.5212E-08, 0.2059E-08, -0.3443E-08, -0.1321E-07,
& -0.2754E-07, -0.4389E-07, -0.5869E-07, -0.6825E-07, -0.6819E-07,
& -0.5570E-07, -0.3343E-07, -0.7592E-08, 0.1778E-07, 0.4322E-07,
& 0.7330E-07, 0.1190E-06, 0.1993E-06, 0.3348E-06, 0.5376E-06,
& 0.8030E-06/
data ((h81(ip,iw,1),iw=1,31),ip= 8, 8)/
& 0.1342E-04, 0.2641E-04, 0.5141E-04, 0.9842E-04, 0.1836E-03,
& 0.3295E-03, 0.5614E-03, 0.8975E-03, 0.1341E-02, 0.1884E-02,
& 0.2514E-02, 0.3234E-02, 0.4071E-02, 0.5075E-02, 0.6332E-02,
& 0.7976E-02, 0.1021E-01, 0.1328E-01, 0.1751E-01, 0.2329E-01,
& 0.3109E-01, 0.4146E-01, 0.5517E-01, 0.7325E-01, 0.9710E-01,
& 0.1284E+00, 0.1693E+00, 0.2217E+00, 0.2876E+00, 0.3679E+00,
& 0.4616E+00/
data ((h82(ip,iw,1),iw=1,31),ip= 8, 8)/
& -0.5652E-08, -0.1318E-07, -0.3210E-07, -0.8018E-07, -0.2014E-06,
& -0.4888E-06, -0.1099E-05, -0.2210E-05, -0.3918E-05, -0.6179E-05,
& -0.8849E-05, -0.1182E-04, -0.1509E-04, -0.1871E-04, -0.2284E-04,
& -0.2782E-04, -0.3403E-04, -0.4177E-04, -0.5145E-04, -0.6354E-04,
& -0.7853E-04, -0.9681E-04, -0.1185E-03, -0.1437E-03, -0.1729E-03,
& -0.2072E-03, -0.2475E-03, -0.2942E-03, -0.3457E-03, -0.3973E-03,
& -0.4434E-03/
data ((h83(ip,iw,1),iw=1,31),ip= 8, 8)/
& 0.2153E-10, 0.5151E-10, 0.1273E-09, 0.3136E-09, 0.7488E-09,
& 0.1649E-08, 0.3142E-08, 0.4980E-08, 0.6559E-08, 0.7346E-08,
& 0.6813E-08, 0.4884E-08, 0.1533E-08, -0.4209E-08, -0.1409E-07,
& -0.2801E-07, -0.4320E-07, -0.5614E-07, -0.6312E-07, -0.5976E-07,
& -0.4369E-07, -0.1775E-07, 0.1280E-07, 0.4534E-07, 0.8106E-07,
& 0.1246E-06, 0.1874E-06, 0.2873E-06, 0.4433E-06, 0.6651E-06,
& 0.9477E-06/
data ((h81(ip,iw,1),iw=1,31),ip= 9, 9)/
& 0.1342E-04, 0.2641E-04, 0.5143E-04, 0.9849E-04, 0.1838E-03,
& 0.3302E-03, 0.5631E-03, 0.9016E-03, 0.1350E-02, 0.1901E-02,
& 0.2546E-02, 0.3292E-02, 0.4171E-02, 0.5250E-02, 0.6634E-02,
& 0.8486E-02, 0.1104E-01, 0.1460E-01, 0.1955E-01, 0.2635E-01,
& 0.3555E-01, 0.4786E-01, 0.6421E-01, 0.8588E-01, 0.1145E+00,
& 0.1519E+00, 0.2003E+00, 0.2615E+00, 0.3372E+00, 0.4269E+00,
& 0.5281E+00/
data ((h82(ip,iw,1),iw=1,31),ip= 9, 9)/
& -0.5629E-08, -0.1310E-07, -0.3186E-07, -0.7948E-07, -0.1995E-06,
& -0.4837E-06, -0.1088E-05, -0.2188E-05, -0.3880E-05, -0.6115E-05,
& -0.8743E-05, -0.1165E-04, -0.1480E-04, -0.1824E-04, -0.2216E-04,
& -0.2691E-04, -0.3293E-04, -0.4067E-04, -0.5057E-04, -0.6314E-04,
& -0.7885E-04, -0.9813E-04, -0.1212E-03, -0.1482E-03, -0.1799E-03,
& -0.2175E-03, -0.2622E-03, -0.3135E-03, -0.3678E-03, -0.4193E-03,
& -0.4627E-03/
data ((h83(ip,iw,1),iw=1,31),ip= 9, 9)/
& 0.2121E-10, 0.5076E-10, 0.1257E-09, 0.3091E-09, 0.7379E-09,
& 0.1623E-08, 0.3097E-08, 0.4904E-08, 0.6453E-08, 0.7168E-08,
& 0.6534E-08, 0.4458E-08, 0.8932E-09, -0.5026E-08, -0.1469E-07,
& -0.2765E-07, -0.4103E-07, -0.5169E-07, -0.5585E-07, -0.4913E-07,
& -0.2954E-07, 0.6372E-09, 0.3738E-07, 0.7896E-07, 0.1272E-06,
& 0.1867E-06, 0.2682E-06, 0.3895E-06, 0.5672E-06, 0.8091E-06,
& 0.1114E-05/
data ((h81(ip,iw,1),iw=1,31),ip=10,10)/
& 0.1343E-04, 0.2642E-04, 0.5147E-04, 0.9861E-04, 0.1842E-03,
& 0.3312E-03, 0.5658E-03, 0.9080E-03, 0.1364E-02, 0.1928E-02,
& 0.2595E-02, 0.3379E-02, 0.4325E-02, 0.5513E-02, 0.7077E-02,
& 0.9215E-02, 0.1220E-01, 0.1640E-01, 0.2226E-01, 0.3032E-01,
& 0.4127E-01, 0.5598E-01, 0.7559E-01, 0.1016E+00, 0.1359E+00,
& 0.1804E+00, 0.2372E+00, 0.3081E+00, 0.3935E+00, 0.4916E+00,
& 0.5975E+00/
data ((h82(ip,iw,1),iw=1,31),ip=10,10)/
& -0.5597E-08, -0.1300E-07, -0.3148E-07, -0.7838E-07, -0.1964E-06,
& -0.4759E-06, -0.1071E-05, -0.2155E-05, -0.3822E-05, -0.6019E-05,
& -0.8586E-05, -0.1139E-04, -0.1439E-04, -0.1764E-04, -0.2134E-04,
& -0.2591E-04, -0.3188E-04, -0.3978E-04, -0.5011E-04, -0.6334E-04,
& -0.7998E-04, -0.1006E-03, -0.1253E-03, -0.1547E-03, -0.1895E-03,
& -0.2315E-03, -0.2811E-03, -0.3363E-03, -0.3917E-03, -0.4413E-03,
& -0.4809E-03/
data ((h83(ip,iw,1),iw=1,31),ip=10,10)/
& 0.2109E-10, 0.5017E-10, 0.1235E-09, 0.3021E-09, 0.7217E-09,
& 0.1585E-08, 0.3028E-08, 0.4796E-08, 0.6285E-08, 0.6910E-08,
& 0.6178E-08, 0.3945E-08, 0.2436E-09, -0.5632E-08, -0.1464E-07,
& -0.2596E-07, -0.3707E-07, -0.4527E-07, -0.4651E-07, -0.3644E-07,
& -0.1296E-07, 0.2250E-07, 0.6722E-07, 0.1202E-06, 0.1831E-06,
& 0.2605E-06, 0.3627E-06, 0.5062E-06, 0.7064E-06, 0.9725E-06,
& 0.1304E-05/
data ((h81(ip,iw,1),iw=1,31),ip=11,11)/
& 0.1343E-04, 0.2644E-04, 0.5152E-04, 0.9878E-04, 0.1847E-03,
& 0.3328E-03, 0.5701E-03, 0.9179E-03, 0.1385E-02, 0.1969E-02,
& 0.2671E-02, 0.3513E-02, 0.4554E-02, 0.5900E-02, 0.7713E-02,
& 0.1023E-01, 0.1379E-01, 0.1879E-01, 0.2578E-01, 0.3542E-01,
& 0.4854E-01, 0.6622E-01, 0.8983E-01, 0.1211E+00, 0.1619E+00,
& 0.2145E+00, 0.2807E+00, 0.3614E+00, 0.4559E+00, 0.5603E+00,
& 0.6675E+00/
data ((h82(ip,iw,1),iw=1,31),ip=11,11)/
& -0.5538E-08, -0.1280E-07, -0.3089E-07, -0.7667E-07, -0.1917E-06,
& -0.4642E-06, -0.1045E-05, -0.2106E-05, -0.3736E-05, -0.5878E-05,
& -0.8363E-05, -0.1104E-04, -0.1387E-04, -0.1692E-04, -0.2044E-04,
& -0.2493E-04, -0.3101E-04, -0.3926E-04, -0.5020E-04, -0.6429E-04,
& -0.8213E-04, -0.1044E-03, -0.1314E-03, -0.1637E-03, -0.2027E-03,
& -0.2498E-03, -0.3042E-03, -0.3617E-03, -0.4163E-03, -0.4625E-03,
& -0.4969E-03/
data ((h83(ip,iw,1),iw=1,31),ip=11,11)/
& 0.2067E-10, 0.4903E-10, 0.1200E-09, 0.2917E-09, 0.6965E-09,
& 0.1532E-08, 0.2925E-08, 0.4632E-08, 0.6054E-08, 0.6590E-08,
& 0.5746E-08, 0.3436E-08, -0.2251E-09, -0.5703E-08, -0.1344E-07,
& -0.2256E-07, -0.3120E-07, -0.3690E-07, -0.3520E-07, -0.2164E-07,
& 0.6510E-08, 0.4895E-07, 0.1037E-06, 0.1702E-06, 0.2502E-06,
& 0.3472E-06, 0.4710E-06, 0.6379E-06, 0.8633E-06, 0.1159E-05,
& 0.1514E-05/
data ((h81(ip,iw,1),iw=1,31),ip=12,12)/
& 0.1344E-04, 0.2647E-04, 0.5161E-04, 0.9906E-04, 0.1856E-03,
& 0.3353E-03, 0.5765E-03, 0.9331E-03, 0.1417E-02, 0.2032E-02,
& 0.2785E-02, 0.3712E-02, 0.4892E-02, 0.6456E-02, 0.8604E-02,
& 0.1162E-01, 0.1590E-01, 0.2192E-01, 0.3033E-01, 0.4193E-01,
& 0.5774E-01, 0.7906E-01, 0.1075E+00, 0.1449E+00, 0.1934E+00,
& 0.2549E+00, 0.3309E+00, 0.4213E+00, 0.5232E+00, 0.6308E+00,
& 0.7348E+00/
data ((h82(ip,iw,1),iw=1,31),ip=12,12)/
& -0.5476E-08, -0.1257E-07, -0.3008E-07, -0.7418E-07, -0.1848E-06,
& -0.4468E-06, -0.1006E-05, -0.2032E-05, -0.3611E-05, -0.5679E-05,
& -0.8058E-05, -0.1059E-04, -0.1324E-04, -0.1612E-04, -0.1956E-04,
& -0.2411E-04, -0.3046E-04, -0.3925E-04, -0.5098E-04, -0.6619E-04,
& -0.8562E-04, -0.1100E-03, -0.1399E-03, -0.1761E-03, -0.2202E-03,
& -0.2726E-03, -0.3306E-03, -0.3885E-03, -0.4404E-03, -0.4820E-03,
& -0.5082E-03/
data ((h83(ip,iw,1),iw=1,31),ip=12,12)/
& 0.2041E-10, 0.4771E-10, 0.1149E-09, 0.2782E-09, 0.6614E-09,
& 0.1451E-08, 0.2778E-08, 0.4401E-08, 0.5736E-08, 0.6189E-08,
& 0.5315E-08, 0.3087E-08, -0.2518E-09, -0.4806E-08, -0.1071E-07,
& -0.1731E-07, -0.2346E-07, -0.2659E-07, -0.2184E-07, -0.4261E-08,
& 0.2975E-07, 0.8112E-07, 0.1484E-06, 0.2308E-06, 0.3296E-06,
& 0.4475E-06, 0.5942E-06, 0.7859E-06, 0.1041E-05, 0.1369E-05,
& 0.1726E-05/
data ((h81(ip,iw,1),iw=1,31),ip=13,13)/
& 0.1345E-04, 0.2650E-04, 0.5173E-04, 0.9947E-04, 0.1868E-03,
& 0.3389E-03, 0.5861E-03, 0.9559E-03, 0.1466E-02, 0.2125E-02,
& 0.2955E-02, 0.4004E-02, 0.5376E-02, 0.7235E-02, 0.9824E-02,
& 0.1348E-01, 0.1866E-01, 0.2596E-01, 0.3613E-01, 0.5016E-01,
& 0.6929E-01, 0.9504E-01, 0.1292E+00, 0.1738E+00, 0.2309E+00,
& 0.3021E+00, 0.3880E+00, 0.4868E+00, 0.5936E+00, 0.7003E+00,
& 0.7964E+00/
data ((h82(ip,iw,1),iw=1,31),ip=13,13)/
& -0.5362E-08, -0.1223E-07, -0.2895E-07, -0.7071E-07, -0.1748E-06,
& -0.4219E-06, -0.9516E-06, -0.1928E-05, -0.3436E-05, -0.5409E-05,
& -0.7666E-05, -0.1005E-04, -0.1254E-04, -0.1533E-04, -0.1880E-04,
& -0.2358E-04, -0.3038E-04, -0.3988E-04, -0.5264E-04, -0.6934E-04,
& -0.9083E-04, -0.1179E-03, -0.1515E-03, -0.1927E-03, -0.2424E-03,
& -0.2994E-03, -0.3591E-03, -0.4155E-03, -0.4634E-03, -0.4982E-03,
& -0.5096E-03/
data ((h83(ip,iw,1),iw=1,31),ip=13,13)/
& 0.1976E-10, 0.4551E-10, 0.1086E-09, 0.2601E-09, 0.6126E-09,
& 0.1345E-08, 0.2583E-08, 0.4112E-08, 0.5365E-08, 0.5796E-08,
& 0.5031E-08, 0.3182E-08, 0.5970E-09, -0.2547E-08, -0.6172E-08,
& -0.1017E-07, -0.1388E-07, -0.1430E-07, -0.6118E-08, 0.1624E-07,
& 0.5791E-07, 0.1205E-06, 0.2025E-06, 0.3032E-06, 0.4225E-06,
& 0.5619E-06, 0.7322E-06, 0.9528E-06, 0.1243E-05, 0.1592E-05,
& 0.1904E-05/
data ((h81(ip,iw,1),iw=1,31),ip=14,14)/
& 0.1346E-04, 0.2655E-04, 0.5192E-04, 0.1001E-03, 0.1887E-03,
& 0.3442E-03, 0.6001E-03, 0.9892E-03, 0.1536E-02, 0.2262E-02,
& 0.3200E-02, 0.4420E-02, 0.6053E-02, 0.8300E-02, 0.1146E-01,
& 0.1592E-01, 0.2224E-01, 0.3112E-01, 0.4348E-01, 0.6051E-01,
& 0.8369E-01, 0.1147E+00, 0.1556E+00, 0.2084E+00, 0.2749E+00,
& 0.3561E+00, 0.4511E+00, 0.5562E+00, 0.6644E+00, 0.7655E+00,
& 0.8499E+00/
data ((h82(ip,iw,1),iw=1,31),ip=14,14)/
& -0.5210E-08, -0.1172E-07, -0.2731E-07, -0.6598E-07, -0.1615E-06,
& -0.3880E-06, -0.8769E-06, -0.1787E-05, -0.3204E-05, -0.5066E-05,
& -0.7197E-05, -0.9451E-05, -0.1185E-04, -0.1465E-04, -0.1831E-04,
& -0.2346E-04, -0.3088E-04, -0.4132E-04, -0.5545E-04, -0.7410E-04,
& -0.9820E-04, -0.1288E-03, -0.1670E-03, -0.2140E-03, -0.2692E-03,
& -0.3293E-03, -0.3886E-03, -0.4417E-03, -0.4840E-03, -0.5073E-03,
& -0.4944E-03/
data ((h83(ip,iw,1),iw=1,31),ip=14,14)/
& 0.1880E-10, 0.4271E-10, 0.9966E-10, 0.2352E-09, 0.5497E-09,
& 0.1205E-08, 0.2334E-08, 0.3765E-08, 0.4993E-08, 0.5532E-08,
& 0.5148E-08, 0.4055E-08, 0.2650E-08, 0.1326E-08, 0.2019E-09,
& -0.1124E-08, -0.2234E-08, 0.2827E-09, 0.1247E-07, 0.4102E-07,
& 0.9228E-07, 0.1682E-06, 0.2676E-06, 0.3885E-06, 0.5286E-06,
& 0.6904E-06, 0.8871E-06, 0.1142E-05, 0.1466E-05, 0.1800E-05,
& 0.2004E-05/
data ((h81(ip,iw,1),iw=1,31),ip=15,15)/
& 0.1348E-04, 0.2663E-04, 0.5216E-04, 0.1009E-03, 0.1912E-03,
& 0.3515E-03, 0.6196E-03, 0.1036E-02, 0.1637E-02, 0.2456E-02,
& 0.3544E-02, 0.4996E-02, 0.6973E-02, 0.9722E-02, 0.1360E-01,
& 0.1908E-01, 0.2681E-01, 0.3766E-01, 0.5272E-01, 0.7343E-01,
& 0.1015E+00, 0.1388E+00, 0.1874E+00, 0.2492E+00, 0.3257E+00,
& 0.4165E+00, 0.5191E+00, 0.6275E+00, 0.7324E+00, 0.8235E+00,
& 0.8939E+00/
data ((h82(ip,iw,1),iw=1,31),ip=15,15)/
& -0.5045E-08, -0.1113E-07, -0.2540E-07, -0.6008E-07, -0.1449E-06,
& -0.3457E-06, -0.7826E-06, -0.1609E-05, -0.2920E-05, -0.4665E-05,
& -0.6691E-05, -0.8868E-05, -0.1127E-04, -0.1422E-04, -0.1820E-04,
& -0.2389E-04, -0.3213E-04, -0.4380E-04, -0.5975E-04, -0.8092E-04,
& -0.1083E-03, -0.1433E-03, -0.1873E-03, -0.2402E-03, -0.2997E-03,
& -0.3607E-03, -0.4178E-03, -0.4662E-03, -0.4994E-03, -0.5028E-03,
& -0.4563E-03/
data ((h83(ip,iw,1),iw=1,31),ip=15,15)/
& 0.1804E-10, 0.3983E-10, 0.9045E-10, 0.2080E-09, 0.4786E-09,
& 0.1046E-08, 0.2052E-08, 0.3413E-08, 0.4704E-08, 0.5565E-08,
& 0.5887E-08, 0.5981E-08, 0.6202E-08, 0.6998E-08, 0.8493E-08,
& 0.1002E-07, 0.1184E-07, 0.1780E-07, 0.3483E-07, 0.7122E-07,
& 0.1341E-06, 0.2259E-06, 0.3446E-06, 0.4866E-06, 0.6486E-06,
& 0.8343E-06, 0.1063E-05, 0.1356E-05, 0.1690E-05, 0.1951E-05,
& 0.2005E-05/
data ((h81(ip,iw,1),iw=1,31),ip=16,16)/
& 0.1351E-04, 0.2672E-04, 0.5247E-04, 0.1019E-03, 0.1944E-03,
& 0.3609E-03, 0.6451E-03, 0.1098E-02, 0.1772E-02, 0.2718E-02,
& 0.4009E-02, 0.5767E-02, 0.8190E-02, 0.1158E-01, 0.1636E-01,
& 0.2311E-01, 0.3260E-01, 0.4586E-01, 0.6425E-01, 0.8940E-01,
& 0.1232E+00, 0.1678E+00, 0.2251E+00, 0.2967E+00, 0.3831E+00,
& 0.4825E+00, 0.5901E+00, 0.6976E+00, 0.7946E+00, 0.8725E+00,
& 0.9285E+00/
data ((h82(ip,iw,1),iw=1,31),ip=16,16)/
& -0.4850E-08, -0.1045E-07, -0.2334E-07, -0.5367E-07, -0.1265E-06,
& -0.2980E-06, -0.6750E-06, -0.1406E-05, -0.2601E-05, -0.4239E-05,
& -0.6201E-05, -0.8389E-05, -0.1091E-04, -0.1413E-04, -0.1859E-04,
& -0.2500E-04, -0.3432E-04, -0.4761E-04, -0.6595E-04, -0.9030E-04,
& -0.1219E-03, -0.1624E-03, -0.2126E-03, -0.2708E-03, -0.3327E-03,
& -0.3926E-03, -0.4458E-03, -0.4871E-03, -0.5045E-03, -0.4777E-03,
& -0.3954E-03/
data ((h83(ip,iw,1),iw=1,31),ip=16,16)/
& 0.1717E-10, 0.3723E-10, 0.8093E-10, 0.1817E-09, 0.4100E-09,
& 0.8932E-09, 0.1791E-08, 0.3126E-08, 0.4634E-08, 0.6095E-08,
& 0.7497E-08, 0.9170E-08, 0.1136E-07, 0.1453E-07, 0.1892E-07,
& 0.2369E-07, 0.2909E-07, 0.3922E-07, 0.6232E-07, 0.1083E-06,
& 0.1847E-06, 0.2943E-06, 0.4336E-06, 0.5970E-06, 0.7815E-06,
& 0.9959E-06, 0.1263E-05, 0.1583E-05, 0.1880E-05, 0.2009E-05,
& 0.1914E-05/
data ((h81(ip,iw,1),iw=1,31),ip=17,17)/
& 0.1353E-04, 0.2681E-04, 0.5283E-04, 0.1031E-03, 0.1981E-03,
& 0.3721E-03, 0.6761E-03, 0.1176E-02, 0.1943E-02, 0.3055E-02,
& 0.4612E-02, 0.6766E-02, 0.9760E-02, 0.1396E-01, 0.1986E-01,
& 0.2818E-01, 0.3984E-01, 0.5609E-01, 0.7850E-01, 0.1090E+00,
& 0.1495E+00, 0.2023E+00, 0.2691E+00, 0.3508E+00, 0.4465E+00,
& 0.5524E+00, 0.6613E+00, 0.7633E+00, 0.8485E+00, 0.9119E+00,
& 0.9543E+00/
data ((h82(ip,iw,1),iw=1,31),ip=17,17)/
& -0.4673E-08, -0.9862E-08, -0.2135E-07, -0.4753E-07, -0.1087E-06,
& -0.2512E-06, -0.5671E-06, -0.1199E-05, -0.2281E-05, -0.3842E-05,
& -0.5804E-05, -0.8110E-05, -0.1088E-04, -0.1452E-04, -0.1961E-04,
& -0.2696E-04, -0.3768E-04, -0.5311E-04, -0.7444E-04, -0.1028E-03,
& -0.1397E-03, -0.1865E-03, -0.2427E-03, -0.3047E-03, -0.3667E-03,
& -0.4237E-03, -0.4712E-03, -0.5003E-03, -0.4921E-03, -0.4286E-03,
& -0.3188E-03/
data ((h83(ip,iw,1),iw=1,31),ip=17,17)/
& 0.1653E-10, 0.3436E-10, 0.7431E-10, 0.1605E-09, 0.3548E-09,
& 0.7723E-09, 0.1595E-08, 0.2966E-08, 0.4849E-08, 0.7169E-08,
& 0.1003E-07, 0.1366E-07, 0.1825E-07, 0.2419E-07, 0.3186E-07,
& 0.4068E-07, 0.5064E-07, 0.6618E-07, 0.9684E-07, 0.1536E-06,
& 0.2450E-06, 0.3730E-06, 0.5328E-06, 0.7184E-06, 0.9291E-06,
& 0.1180E-05, 0.1484E-05, 0.1798E-05, 0.1992E-05, 0.1968E-05,
& 0.1736E-05/
data ((h81(ip,iw,1),iw=1,31),ip=18,18)/
& 0.1356E-04, 0.2691E-04, 0.5318E-04, 0.1043E-03, 0.2020E-03,
& 0.3841E-03, 0.7100E-03, 0.1263E-02, 0.2144E-02, 0.3464E-02,
& 0.5359E-02, 0.8019E-02, 0.1174E-01, 0.1694E-01, 0.2426E-01,
& 0.3451E-01, 0.4883E-01, 0.6870E-01, 0.9593E-01, 0.1326E+00,
& 0.1809E+00, 0.2428E+00, 0.3196E+00, 0.4112E+00, 0.5147E+00,
& 0.6239E+00, 0.7297E+00, 0.8217E+00, 0.8928E+00, 0.9421E+00,
& 0.9726E+00/
data ((h82(ip,iw,1),iw=1,31),ip=18,18)/
& -0.4532E-08, -0.9395E-08, -0.1978E-07, -0.4272E-07, -0.9442E-07,
& -0.2124E-06, -0.4747E-06, -0.1017E-05, -0.2003E-05, -0.3524E-05,
& -0.5567E-05, -0.8108E-05, -0.1127E-04, -0.1547E-04, -0.2138E-04,
& -0.2996E-04, -0.4251E-04, -0.6059E-04, -0.8563E-04, -0.1190E-03,
& -0.1623E-03, -0.2156E-03, -0.2767E-03, -0.3403E-03, -0.4006E-03,
& -0.4530E-03, -0.4912E-03, -0.4995E-03, -0.4563E-03, -0.3592E-03,
& -0.2383E-03/
data ((h83(ip,iw,1),iw=1,31),ip=18,18)/
& 0.1593E-10, 0.3276E-10, 0.6896E-10, 0.1476E-09, 0.3190E-09,
& 0.6944E-09, 0.1474E-08, 0.2935E-08, 0.5300E-08, 0.8697E-08,
& 0.1336E-07, 0.1946E-07, 0.2707E-07, 0.3637E-07, 0.4800E-07,
& 0.6187E-07, 0.7806E-07, 0.1008E-06, 0.1404E-06, 0.2089E-06,
& 0.3153E-06, 0.4613E-06, 0.6416E-06, 0.8506E-06, 0.1095E-05,
& 0.1387E-05, 0.1708E-05, 0.1956E-05, 0.2003E-05, 0.1836E-05,
& 0.1483E-05/
data ((h81(ip,iw,1),iw=1,31),ip=19,19)/
& 0.1358E-04, 0.2700E-04, 0.5350E-04, 0.1054E-03, 0.2057E-03,
& 0.3955E-03, 0.7434E-03, 0.1353E-02, 0.2361E-02, 0.3928E-02,
& 0.6237E-02, 0.9531E-02, 0.1416E-01, 0.2063E-01, 0.2968E-01,
& 0.4233E-01, 0.5990E-01, 0.8412E-01, 0.1170E+00, 0.1608E+00,
& 0.2177E+00, 0.2894E+00, 0.3764E+00, 0.4768E+00, 0.5855E+00,
& 0.6941E+00, 0.7921E+00, 0.8710E+00, 0.9276E+00, 0.9641E+00,
& 0.9846E+00/
data ((h82(ip,iw,1),iw=1,31),ip=19,19)/
& -0.4448E-08, -0.9085E-08, -0.1877E-07, -0.3946E-07, -0.8472E-07,
& -0.1852E-06, -0.4074E-06, -0.8791E-06, -0.1789E-05, -0.3314E-05,
& -0.5521E-05, -0.8425E-05, -0.1215E-04, -0.1711E-04, -0.2407E-04,
& -0.3421E-04, -0.4905E-04, -0.7032E-04, -0.9985E-04, -0.1394E-03,
& -0.1897E-03, -0.2491E-03, -0.3132E-03, -0.3763E-03, -0.4332E-03,
& -0.4786E-03, -0.5005E-03, -0.4775E-03, -0.3970E-03, -0.2794E-03,
& -0.1652E-03/
data ((h83(ip,iw,1),iw=1,31),ip=19,19)/
& 0.1566E-10, 0.3219E-10, 0.6635E-10, 0.1400E-09, 0.2999E-09,
& 0.6513E-09, 0.1406E-08, 0.2953E-08, 0.5789E-08, 0.1037E-07,
& 0.1709E-07, 0.2623E-07, 0.3777E-07, 0.5159E-07, 0.6823E-07,
& 0.8864E-07, 0.1134E-06, 0.1461E-06, 0.1960E-06, 0.2761E-06,
& 0.3962E-06, 0.5583E-06, 0.7580E-06, 0.9957E-06, 0.1282E-05,
& 0.1607E-05, 0.1898E-05, 0.2020E-05, 0.1919E-05, 0.1623E-05,
& 0.1171E-05/
data ((h81(ip,iw,1),iw=1,31),ip=20,20)/
& 0.1360E-04, 0.2707E-04, 0.5375E-04, 0.1063E-03, 0.2087E-03,
& 0.4052E-03, 0.7731E-03, 0.1437E-02, 0.2575E-02, 0.4414E-02,
& 0.7212E-02, 0.1128E-01, 0.1704E-01, 0.2509E-01, 0.3631E-01,
& 0.5188E-01, 0.7338E-01, 0.1028E+00, 0.1422E+00, 0.1940E+00,
& 0.2603E+00, 0.3422E+00, 0.4387E+00, 0.5459E+00, 0.6563E+00,
& 0.7597E+00, 0.8461E+00, 0.9105E+00, 0.9536E+00, 0.9791E+00,
& 0.9920E+00/
data ((h82(ip,iw,1),iw=1,31),ip=20,20)/
& -0.4403E-08, -0.8896E-08, -0.1818E-07, -0.3751E-07, -0.7880E-07,
& -0.1683E-06, -0.3640E-06, -0.7852E-06, -0.1640E-05, -0.3191E-05,
& -0.5634E-05, -0.9046E-05, -0.1355E-04, -0.1953E-04, -0.2786E-04,
& -0.3995E-04, -0.5752E-04, -0.8256E-04, -0.1174E-03, -0.1638E-03,
& -0.2211E-03, -0.2854E-03, -0.3507E-03, -0.4116E-03, -0.4633E-03,
& -0.4966E-03, -0.4921E-03, -0.4309E-03, -0.3215E-03, -0.2016E-03,
& -0.1061E-03/
data ((h83(ip,iw,1),iw=1,31),ip=20,20)/
& 0.1551E-10, 0.3147E-10, 0.6419E-10, 0.1356E-09, 0.2860E-09,
& 0.6178E-09, 0.1353E-08, 0.2934E-08, 0.6095E-08, 0.1174E-07,
& 0.2067E-07, 0.3346E-07, 0.5014E-07, 0.7024E-07, 0.9377E-07,
& 0.1226E-06, 0.1592E-06, 0.2056E-06, 0.2678E-06, 0.3584E-06,
& 0.4892E-06, 0.6651E-06, 0.8859E-06, 0.1160E-05, 0.1488E-05,
& 0.1814E-05, 0.2010E-05, 0.1984E-05, 0.1748E-05, 0.1338E-05,
& 0.8445E-06/
data ((h81(ip,iw,1),iw=1,31),ip=21,21)/
& 0.1361E-04, 0.2711E-04, 0.5393E-04, 0.1070E-03, 0.2110E-03,
& 0.4129E-03, 0.7973E-03, 0.1508E-02, 0.2769E-02, 0.4886E-02,
& 0.8229E-02, 0.1322E-01, 0.2037E-01, 0.3038E-01, 0.4427E-01,
& 0.6342E-01, 0.8963E-01, 0.1250E+00, 0.1720E+00, 0.2327E+00,
& 0.3089E+00, 0.4007E+00, 0.5052E+00, 0.6163E+00, 0.7241E+00,
& 0.8179E+00, 0.8905E+00, 0.9408E+00, 0.9720E+00, 0.9887E+00,
& 0.9961E+00/
data ((h82(ip,iw,1),iw=1,31),ip=21,21)/
& -0.4379E-08, -0.8801E-08, -0.1782E-07, -0.3642E-07, -0.7536E-07,
& -0.1581E-06, -0.3366E-06, -0.7227E-06, -0.1532E-05, -0.3106E-05,
& -0.5810E-05, -0.9862E-05, -0.1540E-04, -0.2279E-04, -0.3292E-04,
& -0.4738E-04, -0.6817E-04, -0.9765E-04, -0.1384E-03, -0.1918E-03,
& -0.2551E-03, -0.3226E-03, -0.3876E-03, -0.4452E-03, -0.4883E-03,
& -0.5005E-03, -0.4598E-03, -0.3633E-03, -0.2416E-03, -0.1349E-03,
& -0.6278E-04/
data ((h83(ip,iw,1),iw=1,31),ip=21,21)/
& 0.1542E-10, 0.3111E-10, 0.6345E-10, 0.1310E-09, 0.2742E-09,
& 0.5902E-09, 0.1289E-08, 0.2826E-08, 0.6103E-08, 0.1250E-07,
& 0.2355E-07, 0.4041E-07, 0.6347E-07, 0.9217E-07, 0.1256E-06,
& 0.1658E-06, 0.2175E-06, 0.2824E-06, 0.3607E-06, 0.4614E-06,
& 0.6004E-06, 0.7880E-06, 0.1034E-05, 0.1349E-05, 0.1698E-05,
& 0.1965E-05, 0.2021E-05, 0.1857E-05, 0.1500E-05, 0.1015E-05,
& 0.5467E-06/
data ((h81(ip,iw,1),iw=1,31),ip=22,22)/
& 0.1362E-04, 0.2714E-04, 0.5405E-04, 0.1074E-03, 0.2127E-03,
& 0.4187E-03, 0.8159E-03, 0.1565E-02, 0.2933E-02, 0.5314E-02,
& 0.9222E-02, 0.1525E-01, 0.2406E-01, 0.3649E-01, 0.5367E-01,
& 0.7717E-01, 0.1090E+00, 0.1514E+00, 0.2067E+00, 0.2770E+00,
& 0.3633E+00, 0.4640E+00, 0.5742E+00, 0.6853E+00, 0.7859E+00,
& 0.8670E+00, 0.9253E+00, 0.9629E+00, 0.9842E+00, 0.9942E+00,
& 0.9983E+00/
data ((h82(ip,iw,1),iw=1,31),ip=22,22)/
& -0.4366E-08, -0.8749E-08, -0.1761E-07, -0.3578E-07, -0.7322E-07,
& -0.1517E-06, -0.3189E-06, -0.6785E-06, -0.1446E-05, -0.3014E-05,
& -0.5933E-05, -0.1069E-04, -0.1755E-04, -0.2683E-04, -0.3936E-04,
& -0.5675E-04, -0.8137E-04, -0.1160E-03, -0.1630E-03, -0.2223E-03,
& -0.2899E-03, -0.3589E-03, -0.4230E-03, -0.4755E-03, -0.5031E-03,
& -0.4834E-03, -0.4036E-03, -0.2849E-03, -0.1687E-03, -0.8356E-04,
& -0.3388E-04/
data ((h83(ip,iw,1),iw=1,31),ip=22,22)/
& 0.1536E-10, 0.3086E-10, 0.6248E-10, 0.1288E-09, 0.2664E-09,
& 0.5637E-09, 0.1222E-08, 0.2680E-08, 0.5899E-08, 0.1262E-07,
& 0.2527E-07, 0.4621E-07, 0.7678E-07, 0.1165E-06, 0.1640E-06,
& 0.2199E-06, 0.2904E-06, 0.3783E-06, 0.4787E-06, 0.5925E-06,
& 0.7377E-06, 0.9389E-06, 0.1216E-05, 0.1560E-05, 0.1879E-05,
& 0.2025E-05, 0.1940E-05, 0.1650E-05, 0.1194E-05, 0.6981E-06,
& 0.3103E-06/
data ((h81(ip,iw,1),iw=1,31),ip=23,23)/
& 0.1362E-04, 0.2716E-04, 0.5413E-04, 0.1077E-03, 0.2139E-03,
& 0.4228E-03, 0.8295E-03, 0.1609E-02, 0.3063E-02, 0.5676E-02,
& 0.1013E-01, 0.1726E-01, 0.2799E-01, 0.4332E-01, 0.6452E-01,
& 0.9328E-01, 0.1317E+00, 0.1820E+00, 0.2467E+00, 0.3270E+00,
& 0.4228E+00, 0.5308E+00, 0.6434E+00, 0.7499E+00, 0.8395E+00,
& 0.9065E+00, 0.9515E+00, 0.9782E+00, 0.9916E+00, 0.9973E+00,
& 0.9993E+00/
data ((h82(ip,iw,1),iw=1,31),ip=23,23)/
& -0.4359E-08, -0.8720E-08, -0.1749E-07, -0.3527E-07, -0.7175E-07,
& -0.1473E-06, -0.3062E-06, -0.6451E-06, -0.1372E-05, -0.2902E-05,
& -0.5936E-05, -0.1133E-04, -0.1971E-04, -0.3143E-04, -0.4715E-04,
& -0.6833E-04, -0.9759E-04, -0.1379E-03, -0.1907E-03, -0.2542E-03,
& -0.3239E-03, -0.3935E-03, -0.4559E-03, -0.4991E-03, -0.5009E-03,
& -0.4414E-03, -0.3306E-03, -0.2077E-03, -0.1093E-03, -0.4754E-04,
& -0.1642E-04/
data ((h83(ip,iw,1),iw=1,31),ip=23,23)/
& 0.1531E-10, 0.3070E-10, 0.6184E-10, 0.1257E-09, 0.2578E-09,
& 0.5451E-09, 0.1159E-08, 0.2526E-08, 0.5585E-08, 0.1225E-07,
& 0.2576E-07, 0.5017E-07, 0.8855E-07, 0.1417E-06, 0.2078E-06,
& 0.2858E-06, 0.3802E-06, 0.4946E-06, 0.6226E-06, 0.7572E-06,
& 0.9137E-06, 0.1133E-05, 0.1438E-05, 0.1772E-05, 0.1994E-05,
& 0.1994E-05, 0.1779E-05, 0.1375E-05, 0.8711E-06, 0.4273E-06,
& 0.1539E-06/
data ((h81(ip,iw,1),iw=1,31),ip=24,24)/
& 0.1362E-04, 0.2717E-04, 0.5417E-04, 0.1079E-03, 0.2146E-03,
& 0.4256E-03, 0.8393E-03, 0.1641E-02, 0.3163E-02, 0.5968E-02,
& 0.1092E-01, 0.1915E-01, 0.3195E-01, 0.5066E-01, 0.7669E-01,
& 0.1117E+00, 0.1578E+00, 0.2173E+00, 0.2919E+00, 0.3824E+00,
& 0.4867E+00, 0.5992E+00, 0.7100E+00, 0.8076E+00, 0.8838E+00,
& 0.9370E+00, 0.9702E+00, 0.9880E+00, 0.9959E+00, 0.9988E+00,
& 0.9998E+00/
data ((h82(ip,iw,1),iw=1,31),ip=24,24)/
& -0.4354E-08, -0.8703E-08, -0.1742E-07, -0.3499E-07, -0.7074E-07,
& -0.1441E-06, -0.2971E-06, -0.6195E-06, -0.1309E-05, -0.2780E-05,
& -0.5823E-05, -0.1165E-04, -0.2152E-04, -0.3616E-04, -0.5604E-04,
& -0.8230E-04, -0.1173E-03, -0.1635E-03, -0.2211E-03, -0.2868E-03,
& -0.3567E-03, -0.4260E-03, -0.4844E-03, -0.5097E-03, -0.4750E-03,
& -0.3779E-03, -0.2522E-03, -0.1409E-03, -0.6540E-04, -0.2449E-04,
& -0.6948E-05/
data ((h83(ip,iw,1),iw=1,31),ip=24,24)/
& 0.1529E-10, 0.3060E-10, 0.6142E-10, 0.1241E-09, 0.2535E-09,
& 0.5259E-09, 0.1107E-08, 0.2383E-08, 0.5243E-08, 0.1161E-07,
& 0.2523E-07, 0.5188E-07, 0.9757E-07, 0.1657E-06, 0.2553E-06,
& 0.3629E-06, 0.4878E-06, 0.6323E-06, 0.7923E-06, 0.9575E-06,
& 0.1139E-05, 0.1381E-05, 0.1687E-05, 0.1952E-05, 0.2029E-05,
& 0.1890E-05, 0.1552E-05, 0.1062E-05, 0.5728E-06, 0.2280E-06,
& 0.6762E-07/
data ((h81(ip,iw,1),iw=1,31),ip=25,25)/
& 0.1363E-04, 0.2718E-04, 0.5420E-04, 0.1080E-03, 0.2151E-03,
& 0.4275E-03, 0.8461E-03, 0.1664E-02, 0.3237E-02, 0.6195E-02,
& 0.1156E-01, 0.2080E-01, 0.3573E-01, 0.5818E-01, 0.8981E-01,
& 0.1323E+00, 0.1874E+00, 0.2570E+00, 0.3423E+00, 0.4425E+00,
& 0.5534E+00, 0.6669E+00, 0.7714E+00, 0.8568E+00, 0.9191E+00,
& 0.9597E+00, 0.9828E+00, 0.9938E+00, 0.9981E+00, 0.9996E+00,
& 0.1000E+01/
data ((h82(ip,iw,1),iw=1,31),ip=25,25)/
& -0.4352E-08, -0.8693E-08, -0.1738E-07, -0.3483E-07, -0.7006E-07,
& -0.1423E-06, -0.2905E-06, -0.6008E-06, -0.1258E-05, -0.2663E-05,
& -0.5638E-05, -0.1165E-04, -0.2270E-04, -0.4044E-04, -0.6554E-04,
& -0.9855E-04, -0.1407E-03, -0.1928E-03, -0.2534E-03, -0.3197E-03,
& -0.3890E-03, -0.4563E-03, -0.5040E-03, -0.4998E-03, -0.4249E-03,
& -0.3025E-03, -0.1794E-03, -0.8860E-04, -0.3575E-04, -0.1122E-04,
& -0.2506E-05/
data ((h83(ip,iw,1),iw=1,31),ip=25,25)/
& 0.1527E-10, 0.3053E-10, 0.6115E-10, 0.1230E-09, 0.2492E-09,
& 0.5149E-09, 0.1068E-08, 0.2268E-08, 0.4932E-08, 0.1089E-07,
& 0.2408E-07, 0.5156E-07, 0.1028E-06, 0.1859E-06, 0.3028E-06,
& 0.4476E-06, 0.6124E-06, 0.7932E-06, 0.9879E-06, 0.1194E-05,
& 0.1417E-05, 0.1673E-05, 0.1929E-05, 0.2064E-05, 0.1997E-05,
& 0.1725E-05, 0.1267E-05, 0.7464E-06, 0.3312E-06, 0.1066E-06,
& 0.2718E-07/
data ((h81(ip,iw,1),iw=1,31),ip=26,26)/
& 0.1363E-04, 0.2719E-04, 0.5422E-04, 0.1081E-03, 0.2154E-03,
& 0.4287E-03, 0.8506E-03, 0.1680E-02, 0.3291E-02, 0.6364E-02,
& 0.1206E-01, 0.2218E-01, 0.3912E-01, 0.6544E-01, 0.1033E+00,
& 0.1544E+00, 0.2198E+00, 0.3008E+00, 0.3970E+00, 0.5060E+00,
& 0.6209E+00, 0.7311E+00, 0.8254E+00, 0.8972E+00, 0.9462E+00,
& 0.9757E+00, 0.9907E+00, 0.9970E+00, 0.9992E+00, 0.9999E+00,
& 0.1000E+01/
data ((h82(ip,iw,1),iw=1,31),ip=26,26)/
& -0.4351E-08, -0.8688E-08, -0.1736E-07, -0.3473E-07, -0.6966E-07,
& -0.1405E-06, -0.2857E-06, -0.5867E-06, -0.1218E-05, -0.2563E-05,
& -0.5435E-05, -0.1144E-04, -0.2321E-04, -0.4379E-04, -0.7487E-04,
& -0.1163E-03, -0.1670E-03, -0.2250E-03, -0.2876E-03, -0.3535E-03,
& -0.4215E-03, -0.4826E-03, -0.5082E-03, -0.4649E-03, -0.3564E-03,
& -0.2264E-03, -0.1188E-03, -0.5128E-04, -0.1758E-04, -0.4431E-05,
& -0.7275E-06/
data ((h83(ip,iw,1),iw=1,31),ip=26,26)/
& 0.1525E-10, 0.3048E-10, 0.6097E-10, 0.1223E-09, 0.2466E-09,
& 0.5021E-09, 0.1032E-08, 0.2195E-08, 0.4688E-08, 0.1027E-07,
& 0.2279E-07, 0.4999E-07, 0.1046E-06, 0.2009E-06, 0.3460E-06,
& 0.5335E-06, 0.7478E-06, 0.9767E-06, 0.1216E-05, 0.1469E-05,
& 0.1735E-05, 0.1977E-05, 0.2121E-05, 0.2103E-05, 0.1902E-05,
& 0.1495E-05, 0.9541E-06, 0.4681E-06, 0.1672E-06, 0.4496E-07,
& 0.9859E-08/