      SUBROUTINE CKDLW4 
C
C     * FEB 02/2018 - J.LI. CORRECTS THE WATER VAPOUR CONTINUUM IN BAND 6
C     *                     WHICH WAS NOT ACCURATE FOR MUCH WARMER TEMPS.
C     * APR 21/2010 - J.LI. NEW VERSION FOR GCM15I:
C     *                     - REVISION OF MANY BANDS FOR GREATER 
C     *                       ACCURACY.
C     * MAY 10/2006 - J.LI. PREVIOUS VERSION CKDLW3 FOR GCM15F/G/H:
C     *                      - REVISED FOR MORE ACCURATE CO2, CH4, N2O.
C     * DEC 07/2004 - J.LI. PREVIOUS VERSION CKDLW2 FOR GCM15C/D/E:
C     *                     BUGFIX FOR CL6CS AND CL6CF SECOND
C     *                     DIMENSION SIZE (SHOULD BE 4 AND NOT
C     *                     18!).
C     * APR 25/2003 - J.LI. PREVIOUS VERSION CKDLW FOR GCM15B.
C
      IMPLICIT REAL (A-H,O-Z),
     +INTEGER (I-N)
C
C----------------------------------------------------------------------C
C     Li 2006 REVISED VERSION, COMPARED TO LI / BARKER (2005) THE MINORC
C     GAS, CO2, N2O, CH4 ECT ARE MORE ACCURATELY EVALUED               C
C----------------------------------------------------------------------C
C
C----------------------------------------------------------------------C
C     SPECTRAL REGION: 2200-2500 CM^-1. GAS: H2O, CO2                  C
C     K IN UNIT CM^2 / GRAM FOR ALL DATA IN LONGWAVE                   C
C----------------------------------------------------------------------C
C
      COMMON /BANDL1/ GWL1(1), CL1H2O(5,18), CL1CO2(5,18)
      DATA GWL1 / .4500 /
      DATA (( CL1H2O(K,J), K = 1, 5), J = 1, 18)             /
     1 .7729E-02, .2411E-03, .2956E-05, .1077E-07,-.4460E-10,
     1 .7769E-02, .2493E-03, .3163E-05, .9180E-08,-.8711E-10,
     1 .8240E-02, .2499E-03, .2716E-05, .9216E-08,-.1298E-10,
     1 .8275E-02, .2642E-03, .3245E-05, .1214E-07,-.3853E-10,
     1 .8342E-02, .2629E-03, .3204E-05, .1246E-07,-.3213E-10,
     1 .8414E-02, .2588E-03, .3128E-05, .1643E-07, .2609E-10,
     1 .8506E-02, .2647E-03, .3275E-05, .1555E-07,-.2425E-11,
     1 .8624E-02, .2658E-03, .3256E-05, .1554E-07, .6619E-12,
     1 .8844E-02, .2684E-03, .3227E-05, .1590E-07, .1128E-10,
     1 .9063E-02, .2741E-03, .3251E-05, .1459E-07,-.3333E-11,
     1 .9189E-02, .2746E-03, .3223E-05, .1586E-07, .1758E-10,
     1 .9306E-02, .2778E-03, .3257E-05, .1565E-07, .1259E-10,
     1 .9324E-02, .2823E-03, .3399E-05, .1497E-07,-.1343E-10,
     1 .9387E-02, .2820E-03, .3363E-05, .1622E-07, .7870E-11,
     1 .9468E-02, .2822E-03, .3352E-05, .1724E-07, .2221E-10,
     1 .9603E-02, .2824E-03, .3283E-05, .1713E-07, .2963E-10,
     1 .9891E-02, .2820E-03, .2973E-05, .1730E-07, .8245E-10,
     1 .9909E-02, .3031E-03, .3554E-05, .1315E-07,-.3465E-10 /
      DATA (( CL1CO2(K,J), K = 1, 5), J = 1, 18)             /
     1 .1225E-02, .2765E-04, .2198E-06, .7150E-09, .1736E-11,
     1 .1702E-02, .3824E-04, .3057E-06, .9857E-09, .1965E-11,
     1 .2359E-02, .5288E-04, .4341E-06, .1416E-08, .1210E-11,
     1 .3290E-02, .7353E-04, .6138E-06, .2027E-08, .2927E-12,
     1 .4627E-02, .1024E-03, .8357E-06, .2952E-08, .4676E-11,
     1 .6529E-02, .1434E-03, .1148E-05, .4100E-08, .9037E-11,
     1 .9233E-02, .2015E-03, .1577E-05, .5542E-08, .1518E-10,
     1 .1303E-01, .2829E-03, .2162E-05, .7338E-08, .2307E-10,
     1 .1829E-01, .3952E-03, .2984E-05, .9599E-08, .2792E-10,
     1 .2544E-01, .5478E-03, .4138E-05, .1292E-07, .3108E-10,
     1 .3508E-01, .7593E-03, .5745E-05, .1694E-07, .3395E-10,
     1 .4732E-01, .1047E-02, .8186E-05, .2136E-07, .2658E-11,
     1 .6245E-01, .1406E-02, .1136E-04, .2811E-07,-.4140E-10,
     1 .8172E-01, .1836E-02, .1490E-04, .3860E-07,-.4997E-10,
     1 .1064E+00, .2378E-02, .1923E-04, .4933E-07,-.8392E-10,
     1 .1375E+00, .3059E-02, .2446E-04, .6294E-07,-.7413E-10,
     1 .1773E+00, .3944E-02, .3123E-04, .7490E-07,-.1274E-09,
     1 .2250E+00, .4978E-02, .3971E-04, .9725E-07,-.2245E-09 /
C
      COMMON /BANDL1GH/ GWL1GH(5), CL1CO2GH(5,28,5)
      DATA GWL1GH / .31000, .13000, .07000, .03000, .01000 /
      DATA ((( CL1CO2GH(K,J,I), K = 1, 5), J = 1, 28), I = 1, 3) /
     2 .6738E-02, .1474E-03, .1914E-05, .2326E-07, .1486E-09,
     2 .1066E-01, .2126E-03, .2442E-05, .2517E-07, .1354E-09,
     2 .1737E-01, .3190E-03, .3098E-05, .2805E-07, .1422E-09,
     2 .2858E-01, .4879E-03, .3877E-05, .3181E-07, .1829E-09,
     2 .4760E-01, .7644E-03, .4907E-05, .3653E-07, .2698E-09,
     2 .7982E-01, .1237E-02, .7031E-05, .3818E-07, .2891E-09,
     2 .1352E+00, .2034E-02, .1055E-04, .3694E-07, .2859E-09,
     2 .2326E+00, .3384E-02, .1584E-04, .3587E-07, .3916E-09,
     2 .4048E+00, .5695E-02, .2485E-04, .3519E-07, .5623E-09,
     2 .7080E+00, .9656E-02, .4384E-04, .3414E-07, .1870E-09,
     2 .1706E+01, .2188E-01, .1009E-03, .3305E-07,-.1328E-08,
     2 .2386E+01, .2974E-01, .1333E-03, .4796E-07,-.1721E-08,
     2 .3350E+01, .4070E-01, .1757E-03, .3596E-07,-.2213E-08,
     2 .4730E+01, .5602E-01, .2264E-03, .2641E-07,-.1543E-08,
     2 .6689E+01, .7768E-01, .3047E-03,-.3627E-07,-.2017E-08,
     2 .9492E+01, .1081E+00, .4080E-03,-.7802E-07,-.1117E-08,
     2 .1348E+02, .1506E+00, .5554E-03,-.1418E-06,-.4081E-09,
     2 .1910E+02, .2106E+00, .7977E-03,-.3192E-06,-.6841E-08,
     2 .2700E+02, .2918E+00, .1121E-02,-.3098E-06,-.1607E-07,
     2 .3803E+02, .4044E+00, .1567E-02,-.4187E-06,-.2876E-07,
     2 .5343E+02, .5610E+00, .2087E-02,-.3239E-06,-.2884E-07,
     2 .7462E+02, .7751E+00, .2679E-02,-.7249E-06,-.1690E-07,
     2 .1027E+03, .1064E+01, .3476E-02,-.2547E-05, .1010E-07,
     2 .1386E+03, .1409E+01, .4877E-02,-.3540E-05,-.2021E-07,
     2 .1857E+03, .1825E+01, .6552E-02,-.2374E-05,-.5292E-07,
     2 .2455E+03, .2303E+01, .8402E-02, .1602E-05,-.9114E-07,
     2 .3170E+03, .2824E+01, .9579E-02, .6663E-05,-.3177E-07,
     2 .3924E+03, .3305E+01, .1073E-01, .1084E-04,-.5578E-08,
     3 .2275E+00, .7262E-02, .1177E-03, .1392E-05, .8708E-08,
     3 .2788E+00, .8069E-02, .1224E-03, .1343E-05, .8082E-08,
     3 .3628E+00, .9253E-02, .1305E-03, .1318E-05, .7473E-08,
     3 .4993E+00, .1100E-01, .1428E-03, .1297E-05, .6672E-08,
     3 .7244E+00, .1350E-01, .1597E-03, .1314E-05, .6102E-08,
     3 .1101E+01, .1740E-01, .1916E-03, .1325E-05, .3991E-08,
     3 .1763E+01, .2312E-01, .2301E-03, .1408E-05, .2465E-08,
     3 .2935E+01, .3173E-01, .2773E-03, .1579E-05, .2010E-08,
     3 .5070E+01, .4504E-01, .3339E-03, .1827E-05, .2292E-08,
     3 .9005E+01, .6610E-01, .3775E-03, .2286E-05, .1025E-07,
     3 .2241E+02, .1307E+00, .4512E-03, .2587E-05, .3188E-07,
     3 .3170E+02, .1724E+00, .4976E-03, .2542E-05, .4311E-07,
     3 .4493E+02, .2297E+00, .7073E-03, .2388E-05, .3032E-07,
     3 .6390E+02, .3110E+00, .1110E-02, .1629E-05,-.1046E-07,
     3 .9126E+02, .4127E+00, .1572E-02, .2561E-05,-.5125E-07,
     3 .1308E+03, .5465E+00, .2060E-02, .4614E-05,-.9379E-07,
     3 .1880E+03, .7338E+00, .2436E-02, .8014E-05,-.1026E-06,
     3 .2711E+03, .9960E+00, .2260E-02, .1285E-04,-.6623E-08,
     3 .3909E+03, .1362E+01, .1590E-02, .1661E-04, .1523E-06,
     3 .5621E+03, .1903E+01, .6027E-04, .8748E-05, .4488E-06,
     3 .8007E+03, .2645E+01, .7700E-03,-.1335E-04, .4367E-06,
     3 .1131E+04, .3452E+01, .5129E-02,-.1868E-04,-.1365E-06,
     3 .1592E+04, .4300E+01, .7911E-02, .1566E-04,-.4882E-06,
     3 .2230E+04, .5343E+01, .3924E-02, .7204E-04,-.2967E-06,
     3 .3083E+04, .7011E+01,-.7174E-02, .9605E-04, .2091E-06,
     3 .4174E+04, .9686E+01,-.1919E-01, .1037E-03,-.6807E-07,
     3 .5522E+04, .1421E+02,-.4063E-01, .1461E-04, .2124E-05,
     3 .7210E+04, .2017E+02,-.3837E-01,-.2109E-03, .1876E-05,
     4 .1108E+02, .3429E+00, .4345E-02, .2875E-04, .9755E-07,
     4 .1144E+02, .3418E+00, .4266E-02, .2884E-04, .1077E-06,
     4 .1214E+02, .3422E+00, .4194E-02, .2895E-04, .1098E-06,
     4 .1333E+02, .3516E+00, .4189E-02, .2782E-04, .9596E-07,
     4 .1534E+02, .3690E+00, .4142E-02, .2645E-04, .9214E-07,
     4 .1851E+02, .3987E+00, .4196E-02, .2525E-04, .8338E-07,
     4 .2363E+02, .4459E+00, .4358E-02, .2358E-04, .6343E-07,
     4 .3217E+02, .5172E+00, .4574E-02, .2220E-04, .5251E-07,
     4 .4634E+02, .6332E+00, .5193E-02, .1942E-04,-.4200E-08,
     4 .7052E+02, .7966E+00, .6123E-02, .1998E-04,-.5578E-07,
     4 .1470E+03, .1198E+01, .7539E-02, .2687E-04,-.1083E-07,
     4 .1974E+03, .1421E+01, .8434E-02, .3125E-04,-.1393E-07,
     4 .2690E+03, .1711E+01, .8646E-02, .3705E-04, .1207E-06,
     4 .3707E+03, .2104E+01, .8274E-02, .3783E-04, .3138E-06,
     4 .5159E+03, .2658E+01, .8280E-02, .2972E-04, .3843E-06,
     4 .7219E+03, .3425E+01, .7638E-02, .1577E-04, .6599E-06,
     4 .1010E+04, .4531E+01, .9475E-02,-.2722E-04, .6672E-06,
     4 .1406E+04, .5896E+01, .1459E-01,-.8524E-04, .4200E-06,
     4 .1942E+04, .7336E+01, .2846E-01,-.1039E-03,-.8586E-06,
     4 .2677E+04, .8625E+01, .4491E-01,-.3324E-04,-.2342E-05,
     4 .3696E+04, .9635E+01, .4063E-01, .1259E-03,-.1060E-05,
     4 .5057E+04, .1136E+02, .2002E-01, .1965E-03, .1828E-05,
     4 .6836E+04, .1477E+02, .4018E-02, .9761E-04, .1983E-05,
     4 .9024E+04, .1972E+02,-.1033E-01,-.1716E-03, .3867E-05,
     4 .1163E+05, .2698E+02, .6287E-03,-.9831E-03, .1049E-04,
     4 .1477E+05, .2452E+02, .1734E+00,-.9441E-03,-.3499E-05,
     4 .1910E+05, .9065E+01, .1955E+00,-.3053E-03,-.2538E-05,
     4 .2461E+05,-.9810E+01, .1550E+00, .1568E-03,-.1033E-05 /
      DATA ((( CL1CO2GH(K,J,I), K = 1, 5), J = 1, 28), I = 4, 5) /
     5 .7986E+03, .1677E+02, .1210E+00, .2314E-03,-.1038E-05,
     5 .7993E+03, .1676E+02, .1211E+00, .2310E-03,-.1046E-05,
     5 .8010E+03, .1675E+02, .1212E+00, .2303E-03,-.1039E-05,
     5 .8054E+03, .1670E+02, .1211E+00, .2327E-03,-.9910E-06,
     5 .8153E+03, .1661E+02, .1210E+00, .2362E-03,-.9439E-06,
     5 .8377E+03, .1643E+02, .1206E+00, .2536E-03,-.1036E-05,
     5 .8863E+03, .1611E+02, .1183E+00, .3027E-03,-.1159E-05,
     5 .9827E+03, .1601E+02, .1064E+00, .3228E-03, .1490E-07,
     5 .1148E+04, .1637E+02, .9050E-01, .2998E-03, .1869E-05,
     5 .1416E+04, .1733E+02, .7984E-01, .2508E-03, .2858E-05,
     5 .2198E+04, .2018E+02, .6760E-01, .1663E-03, .5252E-05,
     5 .2681E+04, .2193E+02, .7743E-01, .7488E-04, .3599E-05,
     5 .3323E+04, .2426E+02, .1092E+00,-.5198E-04,-.1494E-05,
     5 .4212E+04, .2681E+02, .1294E+00,-.1206E-03,-.4404E-05,
     5 .5449E+04, .2865E+02, .1226E+00, .2527E-04,-.3612E-05,
     5 .7140E+04, .3023E+02, .6931E-01, .2631E-03, .5208E-05,
     5 .9356E+04, .3291E+02, .5977E-01, .3857E-03, .6337E-05,
     5 .1233E+05, .3880E+02, .8451E-01, .1655E-03,-.2356E-05,
     5 .1629E+05, .4636E+02, .6859E-02, .6641E-04, .6865E-05,
     5 .2128E+05, .5681E+02,-.4704E-01, .1862E-03, .9793E-05,
     5 .2726E+05, .7843E+02,-.4767E-01,-.1853E-02, .1714E-04,
     5 .3422E+05, .9059E+02, .2994E+00,-.3000E-02,-.9698E-05,
     5 .4300E+05, .6553E+02, .4254E+00,-.8920E-03,-.6760E-06,
     5 .5474E+05, .2816E+02, .4003E+00,-.5322E-03,-.4311E-06,
     5 .6905E+05,-.2155E+02, .3057E+00, .1376E-02,-.1023E-04,
     5 .8411E+05,-.5324E+02,-.1065E+00, .9477E-03, .1867E-04,
     5 .9612E+05,-.6344E+02,-.1826E+00, .6654E-04, .1295E-04,
     5 .1020E+06,-.6770E+02,-.1738E+00, .2740E-04, .7889E-05,
     6 .2751E+06,-.1179E+03,-.1559E+00, .1723E-02, .9732E-05,
     6 .2751E+06,-.1179E+03,-.1596E+00, .1720E-02, .1039E-04,
     6 .2751E+06,-.1179E+03,-.1582E+00, .1726E-02, .1009E-04,
     6 .2751E+06,-.1179E+03,-.1549E+00, .1730E-02, .9570E-05,
     6 .2750E+06,-.1178E+03,-.1565E+00, .1717E-02, .9918E-05,
     6 .2750E+06,-.1178E+03,-.1541E+00, .1702E-02, .9738E-05,
     6 .2750E+06,-.1177E+03,-.1550E+00, .1651E-02, .1055E-04,
     6 .2749E+06,-.1180E+03,-.1415E+00, .1612E-02, .9390E-05,
     6 .2747E+06,-.1189E+03,-.1235E+00, .1598E-02, .7860E-05,
     6 .2744E+06,-.1207E+03,-.1105E+00, .1556E-02, .7872E-05,
     6 .2737E+06,-.1259E+03,-.7812E-01, .1345E-02, .7062E-05,
     6 .2732E+06,-.1290E+03,-.7044E-01, .1259E-02, .8850E-05,
     6 .2725E+06,-.1327E+03,-.8298E-01, .1147E-02, .1445E-04,
     6 .2716E+06,-.1364E+03,-.8634E-01, .9498E-03, .1880E-04,
     6 .2701E+06,-.1385E+03,-.6870E-01, .5579E-03, .1955E-04,
     6 .2680E+06,-.1381E+03,-.2096E-01, .1477E-03, .1196E-04,
     6 .2650E+06,-.1353E+03,-.4792E-01, .4883E-05, .1189E-04,
     6 .2607E+06,-.1311E+03,-.1436E+00, .3124E-03, .2108E-04,
     6 .2547E+06,-.1254E+03,-.1750E+00, .4198E-03, .1541E-04,
     6 .2471E+06,-.1240E+03,-.2163E+00, .6966E-04, .1613E-04,
     6 .2378E+06,-.1394E+03,-.2353E+00, .1544E-02, .7290E-05,
     6 .2266E+06,-.1548E+03,-.5408E+00, .2372E-02, .2895E-04,
     6 .2121E+06,-.1434E+03,-.6396E+00, .4379E-03, .2133E-04,
     6 .1931E+06,-.1265E+03,-.5790E+00, .4702E-03, .1629E-04,
     6 .1698E+06,-.1066E+03,-.4847E+00, .3626E-03, .9090E-05,
     6 .1434E+06,-.8694E+02,-.4484E+00, .6072E-03, .1448E-04,
     6 .1162E+06,-.6672E+02,-.3481E+00, .3352E-03, .8064E-05,
     6 .9060E+05,-.5008E+02,-.2867E+00, .2329E-03, .1025E-04 /
 
C
C----------------------------------------------------------------------C
C     SPECTRAL REGION: 1900-2200 CM^-1. GAS: H2O                       C
C----------------------------------------------------------------------C
C
      COMMON /BANDL2/ GWL2(1), CL2H2O(5,18), CL2CS(5,3), CL2CF(5,3)
      DATA GWL2 / .65000 /
      DATA (( CL2H2O(K,J), K = 1, 5), J = 1, 18)             /
     1 .1635E-03, .2510E-05, .1165E-07, .6099E-11,-.6637E-13,
     1 .2428E-03, .3731E-05, .1727E-07, .8565E-11,-.8956E-13,
     1 .3603E-03, .5548E-05, .2564E-07, .1195E-10,-.1220E-12,
     1 .5345E-03, .8248E-05, .3813E-07, .1682E-10,-.1752E-12,
     1 .7928E-03, .1226E-04, .5699E-07, .2270E-10,-.2956E-12,
     1 .1175E-02, .1823E-04, .8542E-07, .3186E-10,-.5231E-12,
     1 .1739E-02, .2706E-04, .1287E-06, .4714E-10,-.9960E-12,
     1 .2570E-02, .4011E-04, .1939E-06, .7463E-10,-.1852E-11,
     1 .3793E-02, .5927E-04, .2896E-06, .1431E-09,-.2750E-11,
     1 .5588E-02, .8725E-04, .4266E-06, .2680E-09,-.3413E-11,
     1 .8207E-02, .1282E-03, .6235E-06, .4425E-09,-.3973E-11,
     1 .1202E-01, .1875E-03, .9017E-06, .7194E-09,-.3595E-11,
     1 .1748E-01, .2737E-03, .1297E-05, .8795E-09,-.2771E-11,
     1 .2519E-01, .3970E-03, .1885E-05, .9664E-09,-.3063E-11,
     1 .3575E-01, .5659E-03, .2843E-05, .1564E-08,-.2169E-10,
     1 .5020E-01, .7858E-03, .4096E-05, .3595E-08,-.4269E-10,
     1 .7024E-01, .1068E-02, .5442E-05, .7079E-08,-.4472E-10,
     1 .9820E-01, .1444E-02, .6762E-05, .9510E-08,-.2463E-10 /
      DATA (( CL2CS(K,J), K = 1, 5), J = 1, 3)               /
     1 .2074E+01,-.3404E-01, .3410E-03,-.2830E-05, .1315E-07,
     1 .3090E+01,-.5095E-01, .5008E-03,-.4236E-05, .2128E-07,
     1 .4599E+01,-.7532E-01, .7173E-03,-.6543E-05, .3852E-07 /
      DATA (( CL2CF(K,J), K = 1, 5), J = 1, 3)               /
     1 .1645E-01,-.1179E-04, .4388E-06,-.9480E-09,-.7306E-10,
     1 .2422E-01,-.1917E-04, .4174E-06,-.1452E-08,-.7633E-10,
     1 .3556E-01,-.1747E-04,-.4582E-07,-.4974E-08, .1378E-10 /
      COMMON /BANDL2GH/ GWL2GH(1), CL2H2OGH(5,28), 
     1                             CL2CSGH(5,3), CL2CFGH(5,3)
      DATA GWL2GH / .35000 /
      DATA (( CL2H2OGH(K,J), K = 1, 5), J = 1, 28)           /
     1 .3402E+01, .2934E-01, .4803E-05,-.2079E-06, .6822E-09,
     1 .3468E+01, .2991E-01, .4902E-05,-.2120E-06, .6954E-09,
     1 .3535E+01, .3049E-01, .5015E-05,-.2159E-06, .7054E-09,
     1 .3602E+01, .3106E-01, .5104E-05,-.2200E-06, .7192E-09,
     1 .3668E+01, .3164E-01, .5168E-05,-.2241E-06, .7385E-09,
     1 .3735E+01, .3221E-01, .5290E-05,-.2280E-06, .7472E-09,
     1 .3802E+01, .3279E-01, .5377E-05,-.2322E-06, .7613E-09,
     1 .3869E+01, .3336E-01, .5486E-05,-.2363E-06, .7722E-09,
     1 .3935E+01, .3394E-01, .5573E-05,-.2405E-06, .7872E-09,
     1 .4002E+01, .3451E-01, .5669E-05,-.2446E-06, .8003E-09,
     1 .4065E+01, .3506E-01, .5779E-05,-.2484E-06, .8106E-09,
     1 .4130E+01, .3564E-01, .5857E-05,-.2525E-06, .8281E-09,
     1 .4197E+01, .3621E-01, .5962E-05,-.2567E-06, .8412E-09,
     1 .4264E+01, .3679E-01, .6058E-05,-.2609E-06, .8562E-09,
     1 .4329E+01, .3736E-01, .6171E-05,-.2652E-06, .8692E-09,
     1 .4394E+01, .3794E-01, .6279E-05,-.2694E-06, .8841E-09,
     1 .4460E+01, .3850E-01, .6409E-05,-.2738E-06, .8969E-09,
     1 .4523E+01, .3907E-01, .6532E-05,-.2780E-06, .9115E-09,
     1 .4587E+01, .3963E-01, .6646E-05,-.2823E-06, .9258E-09,
     1 .4652E+01, .4019E-01, .6765E-05,-.2864E-06, .9355E-09,
     1 .4716E+01, .4075E-01, .6816E-05,-.2905E-06, .9500E-09,
     1 .4781E+01, .4130E-01, .6831E-05,-.2946E-06, .9629E-09,
     1 .4844E+01, .4183E-01, .6790E-05,-.2989E-06, .9745E-09,
     1 .4908E+01, .4236E-01, .6666E-05,-.3028E-06, .9879E-09,
     1 .4970E+01, .4287E-01, .6389E-05,-.3071E-06, .1009E-08,
     1 .5031E+01, .4335E-01, .6006E-05,-.3119E-06, .1030E-08,
     1 .5090E+01, .4381E-01, .5556E-05,-.3174E-06, .1046E-08,
     1 .5145E+01, .4424E-01, .5125E-05,-.3225E-06, .1050E-08 /
      DATA (( CL2CSGH(K,J), K = 1, 5), J = 1, 3)             /
     1 .6173E+01,-.9432E-01, .7384E-03,-.5151E-05, .3060E-07,
     1 .9216E+01,-.1404E+00, .1120E-02,-.7676E-05, .4232E-07,
     1 .1376E+02,-.2109E+00, .1733E-02,-.1102E-04, .4933E-07 /
      DATA (( CL2CFGH(K,J), K = 1, 5), J = 1, 3)             /
     1 .9702E-01,-.5003E-03, .1178E-05,-.7351E-08, .1902E-09,
     1 .1451E+00,-.7394E-03, .2253E-05,-.1085E-07, .2121E-09,
     1 .2170E+00,-.1121E-02, .4710E-05,-.1042E-07, .5378E-10 /
C
C----------------------------------------------------------------------C
C     SPECTRAL REGION: 1400-1900 CM^-1. GAS: H2O                       C
C----------------------------------------------------------------------C
C
      COMMON /BANDL3/ GWL3(2), CL3H2O(5,18,2), CL3CH4(2), CL3CS(5,4,2),
     1                CL3CF(5,4,2)
      DATA GWL3 / .35000, .42800 / 
      DATA CL3CH4 / 3.2742, 5.4269 /
      DATA ((( CL3H2O(K,J,I), K = 1, 5), J = 1, 18), I = 1, 2) /
     1 .1346E-01, .3885E-04,-.1051E-06, .1206E-09,-.3369E-11,
     1 .2004E-01, .5747E-04,-.1486E-06, .2288E-09,-.5499E-11,
     1 .2983E-01, .8477E-04,-.2198E-06, .4393E-09,-.7404E-11,
     1 .4442E-01, .1251E-03,-.3292E-06, .7923E-09,-.9568E-11,
     1 .6618E-01, .1843E-03,-.4857E-06, .1357E-08,-.1418E-10,
     1 .9847E-01, .2718E-03,-.7280E-06, .2189E-08,-.2010E-10,
     1 .1467E+00, .4012E-03,-.1094E-05, .3386E-08,-.2946E-10,
     1 .2183E+00, .5922E-03,-.1624E-05, .5178E-08,-.4821E-10,
     1 .3247E+00, .8738E-03,-.2425E-05, .7887E-08,-.7561E-10,
     1 .4824E+00, .1290E-02,-.3749E-05, .1189E-07,-.9333E-10,
     1 .7162E+00, .1903E-02,-.5877E-05, .1754E-07,-.8788E-10,
     1 .1060E+01, .2814E-02,-.9071E-05, .2461E-07,-.6135E-10,
     1 .1565E+01, .4155E-02,-.1449E-04, .3320E-07, .9926E-10,
     1 .2302E+01, .6147E-02,-.2199E-04, .3954E-07, .2928E-09,
     1 .3371E+01, .9014E-02,-.3310E-04, .5333E-07, .6451E-09,
     1 .4910E+01, .1318E-01,-.5060E-04, .6969E-07, .1479E-08,
     1 .7113E+01, .1895E-01,-.7459E-04, .1205E-06, .2632E-08,
     1 .1025E+02, .2642E-01,-.1077E-03, .2868E-06, .3422E-08,
     2 .1827E+00, .3217E-03, .2040E-06, .3824E-08,-.1900E-10,
     2 .2697E+00, .4479E-03, .1816E-06, .5756E-08,-.2757E-10,
     2 .3983E+00, .6269E-03, .6031E-07, .8292E-08,-.3313E-10,
     2 .5886E+00, .8792E-03,-.2372E-06, .1193E-07,-.3245E-10,
     2 .8702E+00, .1242E-02,-.7474E-06, .1636E-07,-.3505E-10,
     2 .1286E+01, .1761E-02,-.1512E-05, .2243E-07,-.5179E-10,
     2 .1902E+01, .2518E-02,-.2696E-05, .2919E-07,-.7042E-10,
     2 .2808E+01, .3618E-02,-.4325E-05, .3677E-07,-.1088E-09,
     2 .4137E+01, .5203E-02,-.7001E-05, .4220E-07,-.7366E-10,
     2 .6076E+01, .7428E-02,-.9254E-05, .5012E-07,-.1806E-09,
     2 .8884E+01, .1047E-01,-.7983E-05, .7354E-07,-.1034E-08,
     2 .1292E+02, .1458E-01,-.4125E-05, .1232E-06,-.2362E-08,
     2 .1871E+02, .1936E-01, .1851E-05, .3028E-06,-.4561E-08,
     2 .2696E+02, .2490E-01, .3493E-06, .6347E-06,-.7641E-08,
     2 .3871E+02, .3116E-01,-.6083E-04, .1167E-05,-.3467E-08,
     2 .5530E+02, .4078E-01,-.1803E-03, .1381E-05, .2540E-08,
     2 .7833E+02, .5606E-01,-.2409E-03, .1278E-05,-.6412E-08,
     2 .1096E+03, .6881E-01,-.3671E-03, .2262E-05,-.1106E-07 /
      DATA ((( CL3CS(K,J,I), K = 1, 5), J = 1, 4), I = 1, 2) /
     1 .3996E+02,-.5365E+00, .3540E-02,-.2717E-04, .2081E-06,
     1 .5942E+02,-.7948E+00, .5248E-02,-.4151E-04, .3219E-06,
     1 .8827E+02,-.1189E+01, .8359E-02,-.6131E-04, .3842E-06,
     1 .1308E+03,-.1790E+01, .1399E-01,-.8808E-04, .2861E-06,
     2 .7479E+02,-.1212E+01, .1079E-01,-.7085E-04, .2736E-06,
     2 .1124E+03,-.1825E+01, .1624E-01,-.1047E-03, .3862E-06,
     2 .1688E+03,-.2728E+01, .2371E-01,-.1581E-03, .6927E-06,
     2 .2536E+03,-.4072E+01, .3414E-01,-.2392E-03, .1289E-05 /
      DATA ((( CL3CF(K,J,I), K = 1, 5), J = 1, 4), I = 1, 2) /
     1 .1834E+01,-.3554E-02,-.1324E-05,-.1868E-06, .4608E-08,
     1 .2720E+01,-.5179E-02,-.1857E-06,-.3105E-06, .6846E-08,
     1 .4029E+01,-.7783E-02, .3094E-04,-.4834E-06, .4418E-08,
     1 .5946E+01,-.1209E-01, .1296E-03,-.7238E-06,-.9306E-08,
     2 .4059E+01,-.1863E-01, .8584E-04,-.2080E-06,-.2539E-08,
     2 .6099E+01,-.2803E-01, .1283E-03,-.2700E-06,-.4145E-08,
     2 .9158E+01,-.4174E-01, .1571E-03,-.4211E-06, .3909E-09,
     2 .1376E+02,-.6215E-01, .1582E-03,-.6142E-06, .1511E-07 /
      COMMON /BANDL3GH/ GWL3GH(3), CL3H2OGH(5,28,3), CL3CSGH(5,4),
     1                  CL3CFGH(5,4)
      DATA GWL3GH / .21200, .00900, .00100 /
      DATA ((( CL3H2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 1, 3) /
     1 .2818E+01, .4977E-01, .3333E-03, .1033E-05, .5543E-09,
     1 .2852E+01, .5005E-01, .3357E-03, .1037E-05, .6017E-09,
     1 .2904E+01, .5029E-01, .3382E-03, .1042E-05, .6547E-09,
     1 .2990E+01, .5042E-01, .3410E-03, .1044E-05, .7345E-09,
     1 .3143E+01, .5032E-01, .3453E-03, .1065E-05, .4436E-09,
     1 .3436E+01, .4988E-01, .3482E-03, .1138E-05,-.1935E-09,
     1 .3997E+01, .4948E-01, .3348E-03, .1222E-05, .7964E-09,
     1 .5031E+01, .5016E-01, .3080E-03, .1223E-05, .2391E-08,
     1 .6866E+01, .5321E-01, .2905E-03, .1111E-05, .1466E-08,
     1 .1009E+02, .5979E-01, .2750E-03, .9415E-06, .1258E-08,
     1 .2023E+02, .7639E-01, .3233E-03, .1042E-05,-.1104E-07,
     1 .2702E+02, .8421E-01, .3657E-03, .1351E-05,-.1924E-07,
     1 .3660E+02, .9413E-01, .3198E-03, .1687E-05,-.1054E-07,
     1 .5018E+02, .1060E+00, .2284E-03, .2134E-05, .2182E-08,
     1 .6946E+02, .1204E+00, .1469E-03, .2435E-05, .4934E-08,
     1 .9688E+02, .1372E+00, .5108E-04, .2902E-05, .5369E-08,
     1 .1356E+03, .1614E+00,-.4585E-04, .3030E-05,-.1509E-08,
     1 .1902E+03, .1914E+00,-.2006E-03, .3070E-05,-.8193E-08,
     1 .2661E+03, .2191E+00,-.3400E-03, .4267E-05,-.3542E-07,
     1 .3698E+03, .2405E+00,-.7398E-03, .6909E-05,-.3960E-07,
     1 .5068E+03, .2605E+00,-.1477E-02, .1130E-04,-.4522E-07,
     1 .6786E+03, .3004E+00,-.2379E-02, .1174E-04,-.4238E-07,
     1 .8796E+03, .3413E+00,-.3577E-02, .9236E-05, .5275E-07,
     1 .1099E+04, .3193E+00,-.3336E-02, .7836E-05,-.5794E-07,
     1 .1322E+04, .2322E+00,-.3523E-02, .1497E-04,-.1227E-06,
     1 .1525E+04, .1338E+00,-.3548E-02, .1797E-04,-.1815E-06,
     1 .1696E+04,-.1624E-02,-.3572E-02, .1515E-04,-.1152E-06,
     1 .1825E+04,-.1337E+00,-.3511E-02, .5190E-05, .4501E-07,
     2 .1141E+05, .7342E+02,-.1039E+00,-.3141E-03, .3118E-05,
     2 .1148E+05, .7392E+02,-.1046E+00,-.3161E-03, .3141E-05,
     2 .1156E+05, .7441E+02,-.1052E+00,-.3181E-03, .3158E-05,
     2 .1165E+05, .7490E+02,-.1059E+00,-.3203E-03, .3172E-05,
     2 .1173E+05, .7538E+02,-.1065E+00,-.3228E-03, .3195E-05,
     2 .1181E+05, .7583E+02,-.1070E+00,-.3267E-03, .3215E-05,
     2 .1190E+05, .7621E+02,-.1068E+00,-.3309E-03, .3172E-05,
     2 .1202E+05, .7644E+02,-.1061E+00,-.3354E-03, .3129E-05,
     2 .1218E+05, .7635E+02,-.1052E+00,-.3401E-03, .3181E-05,
     2 .1243E+05, .7562E+02,-.1030E+00,-.3404E-03, .3128E-05,
     2 .1320E+05, .7181E+02,-.9546E-01,-.3504E-03, .2937E-05,
     2 .1379E+05, .6938E+02,-.8864E-01,-.3585E-03, .2327E-05,
     2 .1460E+05, .6611E+02,-.8538E-01,-.3954E-03, .2062E-05,
     2 .1570E+05, .6148E+02,-.7656E-01,-.3982E-03, .1060E-05,
     2 .1718E+05, .5490E+02,-.8533E-01,-.3193E-03, .3048E-05,
     2 .1908E+05, .4677E+02,-.8618E-01,-.2462E-03, .4298E-05,
     2 .2138E+05, .3694E+02,-.6726E-01,-.1685E-03, .2112E-05,
     2 .2403E+05, .2616E+02,-.6348E-01, .4946E-05,-.1312E-07,
     2 .2666E+05, .1605E+02,-.3698E-01, .1642E-03,-.5717E-05,
     2 .2888E+05, .6788E+01,-.4987E-01, .4297E-03,-.5067E-05,
     2 .3024E+05, .1303E+01,-.3833E-01, .1349E-03,-.4714E-05,
     2 .3042E+05,-.3760E+01,-.5905E-01,-.8417E-04, .5035E-05,
     2 .2933E+05,-.8881E+01, .1676E-01,-.5683E-04,-.3842E-05,
     2 .2728E+05,-.1272E+02, .1116E-01, .6502E-04,-.8432E-06,
     2 .2440E+05,-.1390E+02, .1179E-01,-.1524E-03, .1268E-05,
     2 .2112E+05,-.1461E+02, .2503E-01,-.3063E-03, .2521E-05,
     2 .1778E+05,-.1432E+02, .3541E-01,-.3318E-03, .1949E-05,
     2 .1459E+05,-.1398E+02, .5595E-01,-.1771E-03,-.2845E-05,
     3 .4620E+06,-.9277E+03, .8396E+00, .3048E-02,-.4573E-04,
     3 .4647E+06,-.9322E+03, .8442E+00, .3071E-02,-.4592E-04,
     3 .4674E+06,-.9377E+03, .8487E+00, .3089E-02,-.4613E-04,
     3 .4701E+06,-.9431E+03, .8526E+00, .3107E-02,-.4631E-04,
     3 .4727E+06,-.9485E+03, .8577E+00, .3119E-02,-.4673E-04,
     3 .4752E+06,-.9530E+03, .8603E+00, .3142E-02,-.4688E-04,
     3 .4776E+06,-.9576E+03, .8591E+00, .3162E-02,-.4652E-04,
     3 .4797E+06,-.9603E+03, .8565E+00, .3201E-02,-.4653E-04,
     3 .4811E+06,-.9603E+03, .8497E+00, .3272E-02,-.4681E-04,
     3 .4811E+06,-.9540E+03, .8312E+00, .3305E-02,-.4627E-04,
     3 .4742E+06,-.9195E+03, .7422E+00, .3348E-02,-.4106E-04,
     3 .4700E+06,-.8967E+03, .6618E+00, .3325E-02,-.3259E-04,
     3 .4628E+06,-.8660E+03, .6419E+00, .3593E-02,-.3209E-04,
     3 .4516E+06,-.8219E+03, .5752E+00, .3479E-02,-.2460E-04,
     3 .4350E+06,-.7585E+03, .6894E+00, .2544E-02,-.4573E-04,
     3 .4122E+06,-.6799E+03, .7230E+00, .1644E-02,-.5840E-04,
     3 .3823E+06,-.5859E+03, .5548E+00, .7847E-03,-.3405E-04,
     3 .3449E+06,-.4838E+03, .5570E+00,-.1030E-02,-.1073E-04,
     3 .3025E+06,-.3884E+03, .3217E+00,-.2968E-02, .5427E-04,
     3 .2574E+06,-.3008E+03, .5530E+00,-.6339E-02, .4849E-04,
     3 .2125E+06,-.2520E+03, .6118E+00,-.4391E-02, .4666E-04,
     3 .1707E+06,-.2130E+03, .1042E+01,-.2282E-02,-.5365E-04,
     3 .1341E+06,-.1744E+03, .5511E+00,-.2045E-02, .1543E-04,
     3 .1017E+06,-.1342E+03, .5526E+00,-.3116E-02, .1288E-04,
     3 .7507E+05,-.1065E+03, .6268E+00,-.2878E-02, .4302E-05,
     3 .5468E+05,-.8312E+02, .5621E+00,-.2137E-02, .2262E-05,
     3 .3924E+05,-.6453E+02, .5006E+00,-.1175E-02,-.4003E-05,
     3 .2792E+05,-.4693E+02, .3507E+00,-.9196E-03, .8430E-05 /
      DATA (( CL3CSGH(K,J), K = 1, 5), J = 1, 4)             /
     1 .8254E+02,-.1308E+01, .1136E-01,-.8548E-04, .4490E-06,
     1 .1227E+03,-.1942E+01, .1684E-01,-.1282E-03, .6873E-06,
     1 .1828E+03,-.2898E+01, .2532E-01,-.1890E-03, .9647E-06,
     1 .2721E+03,-.4314E+01, .3809E-01,-.2830E-03, .1388E-05 /
      DATA (( CL3CFGH(K,J), K = 1, 5), J = 1, 4)             /
     1 .4588E+01,-.1977E-01, .8047E-04,-.3912E-06, .1906E-08,
     1 .6826E+01,-.2936E-01, .1185E-03,-.6154E-06, .3345E-08,
     1 .1018E+02,-.4402E-01, .1899E-03,-.8496E-06, .2045E-08,
     1 .1517E+02,-.6521E-01, .3075E-03,-.1328E-05,-.7347E-09 /
C
C----------------------------------------------------------------------C
C     SPECTRAL REGION: 1100_1400 CM^-1. GAS: H2O, N2O, CH4, CFC12      C
C----------------------------------------------------------------------C
C
      COMMON /BANDL4/ GWL4(5), CL4H2O(5,18,5), CL4N2O(5,18,5), 
     1                CL4CH4(5,18,5), CL4CS(5,4,5), CL4CF(5,4,5),
     2                CL4F12(5)
      DATA (CL4F12(I), I = 1, 5) / .2137E+04, .5064E+03, 0., 0.,
     1                             .7622E+02                   /
      DATA GWL4 / .41600, .19000, .05600, .06600, .13000 /
      DATA ((( CL4H2O(K,J,I), K = 1, 5), J = 1, 18), I = 1, 5) /
     1 .4522E-04, .8245E-06, .5346E-08, .1280E-10,-.1079E-13,
     1 .6617E-04, .1203E-05, .7622E-08, .1888E-10, .1704E-13,
     1 .9684E-04, .1760E-05, .1107E-07, .2745E-10, .3642E-13,
     1 .1415E-03, .2557E-05, .1568E-07, .4371E-10, .1647E-12,
     1 .2058E-03, .3743E-05, .2343E-07, .6158E-10, .1603E-12,
     1 .2993E-03, .5469E-05, .3457E-07, .8483E-10, .1397E-12,
     1 .4342E-03, .7950E-05, .5162E-07, .1268E-09, .2153E-13,
     1 .6306E-03, .1149E-04, .7380E-07, .1884E-09, .1725E-12,
     1 .9155E-03, .1675E-04, .1097E-06, .2639E-09,-.2506E-12,
     1 .1329E-02, .2417E-04, .1555E-06, .4129E-09, .3781E-12,
     1 .1916E-02, .3479E-04, .2190E-06, .6039E-09, .1572E-11,
     1 .2705E-02, .4936E-04, .3259E-06, .8815E-09, .1638E-12,
     1 .3820E-02, .6863E-04, .4362E-06, .1232E-08, .1997E-11,
     1 .5350E-02, .9586E-04, .6027E-06, .1772E-08, .4391E-11,
     1 .7351E-02, .1320E-03, .8311E-06, .2401E-08, .5945E-11,
     1 .9807E-02, .1753E-03, .1111E-05, .3083E-08, .3626E-11,
     1 .1287E-01, .2297E-03, .1492E-05, .4040E-08,-.2848E-11,
     1 .1727E-01, .3040E-03, .1918E-05, .5621E-08, .5334E-11,
     2 .1656E-02, .2445E-04, .1066E-06, .6257E-10, .5280E-12,
     2 .2420E-02, .3584E-04, .1581E-06, .8450E-10, .6278E-12,
     2 .3532E-02, .5255E-04, .2433E-06, .9942E-10,-.1181E-11,
     2 .5160E-02, .7654E-04, .3459E-06, .1875E-09, .4289E-12,
     2 .7508E-02, .1115E-03, .5156E-06, .3366E-09,-.2368E-13,
     2 .1092E-01, .1620E-03, .7701E-06, .5736E-09,-.2538E-11,
     2 .1585E-01, .2338E-03, .1129E-05, .1361E-08,-.8501E-12,
     2 .2304E-01, .3376E-03, .1616E-05, .2244E-08, .2423E-11,
     2 .3333E-01, .4885E-03, .2410E-05, .3030E-08,-.1164E-10,
     2 .4812E-01, .7065E-03, .3576E-05, .3943E-08,-.3673E-10,
     2 .6940E-01, .1013E-02, .5035E-05, .6085E-08,-.4138E-10,
     2 .9942E-01, .1434E-02, .6652E-05, .9787E-08, .2130E-10,
     2 .1407E+00, .2016E-02, .8991E-05, .1109E-07, .4046E-10,
     2 .1970E+00, .2802E-02, .1200E-04, .1927E-07, .1629E-09,
     2 .2707E+00, .3848E-02, .1668E-04, .2874E-07, .2089E-09,
     2 .3622E+00, .5233E-02, .2438E-04, .3566E-07,-.3670E-10,
     2 .4726E+00, .7117E-02, .3608E-04, .4033E-07,-.2733E-09,
     2 .6076E+00, .9701E-02, .5685E-04, .2606E-07,-.1326E-08,
     3 .2216E-03, .3554E-05, .2075E-07,-.2917E-10,-.9166E-12,
     3 .3235E-03, .5219E-05, .3392E-07,-.2936E-10,-.1760E-11,
     3 .4736E-03, .7562E-05, .4818E-07, .6518E-11,-.1707E-11,
     3 .6990E-03, .1127E-04, .7254E-07, .1496E-10,-.2450E-11,
     3 .1048E-02, .1664E-04, .9840E-07, .4709E-10,-.2066E-11,
     3 .1557E-02, .2410E-04, .1391E-06, .1806E-09,-.2184E-11,
     3 .2336E-02, .3598E-04, .1922E-06, .2000E-09,-.1765E-11,
     3 .3477E-02, .5344E-04, .2640E-06, .4470E-09, .3117E-11,
     3 .5099E-02, .7906E-04, .4082E-06, .3883E-09,-.8146E-12,
     3 .7646E-02, .1168E-03, .4470E-06,-.1348E-09, .1608E-10,
     3 .1126E-01, .1758E-03, .7926E-06,-.1417E-08,-.8058E-11,
     3 .1664E-01, .2664E-03, .1509E-05,-.2640E-08,-.7754E-10,
     3 .2434E-01, .3944E-03, .1962E-05, .7539E-11,-.8640E-11,
     3 .3374E-01, .5451E-03, .2840E-05, .3798E-08, .1227E-10,
     3 .4843E-01, .8062E-03, .4038E-05, .1406E-08, .3070E-10,
     3 .6891E-01, .1094E-02, .6680E-05, .8490E-08,-.1232E-09,
     3 .9395E-01, .1433E-02, .1118E-04, .2712E-07,-.4738E-09,
     3 .1249E+00, .1763E-02, .8218E-05, .5259E-07, .4610E-09,
     4 .2978E-03, .4096E-05, .1821E-07, .1786E-10,-.1332E-12,
     4 .4490E-03, .6184E-05, .2733E-07,-.4189E-11,-.5915E-12,
     4 .6686E-03, .9254E-05, .4312E-07,-.1507E-10,-.1331E-11,
     4 .9926E-03, .1376E-04, .7283E-07,-.3685E-10,-.3920E-11,
     4 .1487E-02, .2058E-04, .1053E-06,-.5939E-10,-.5269E-11,
     4 .2232E-02, .3027E-04, .1280E-06, .3122E-10,-.1858E-11,
     4 .3334E-02, .4576E-04, .2042E-06,-.1316E-09,-.6451E-11,
     4 .4918E-02, .6854E-04, .3483E-06,-.4051E-09,-.1835E-10,
     4 .7333E-02, .9814E-04, .3934E-06, .1784E-09,-.1910E-11,
     4 .1075E-01, .1408E-03, .5224E-06, .9762E-09, .1017E-10,
     4 .1545E-01, .2011E-03, .9206E-06, .2739E-08, .1004E-11,
     4 .2213E-01, .2862E-03, .1320E-05, .4216E-08, .9818E-11,
     4 .3112E-01, .4058E-03, .2414E-05, .4595E-08,-.9702E-10,
     4 .4392E-01, .5939E-03, .3704E-05,-.1661E-08,-.2390E-09,
     4 .6035E-01, .8365E-03, .6483E-05,-.4570E-08,-.5600E-09,
     4 .8357E-01, .1060E-02, .4470E-05, .8835E-08, .1228E-09,
     4 .1158E+00, .1378E-02, .3205E-05, .9850E-08, .4720E-09,
     4 .1582E+00, .1941E-02, .5674E-05, .9262E-08, .4614E-09,
     5 .3080E-01, .4314E-03, .1986E-05, .1956E-08,-.1402E-10,
     5 .4426E-01, .6104E-03, .2697E-05, .2671E-08,-.1020E-10,
     5 .6373E-01, .8681E-03, .3768E-05, .3091E-08,-.2370E-10,
     5 .9181E-01, .1233E-02, .5120E-05, .3968E-08,-.1630E-10,
     5 .1324E+00, .1759E-02, .7044E-05, .4812E-08,-.5648E-11,
     5 .1911E+00, .2512E-02, .9758E-05, .5417E-08, .1050E-11,
     5 .2757E+00, .3591E-02, .1365E-04, .7245E-08, .1285E-10,
     5 .3972E+00, .5141E-02, .1923E-04, .6153E-08,-.1002E-10,
     5 .5701E+00, .7312E-02, .2630E-04, .6808E-08, .8962E-10,
     5 .8135E+00, .1036E-01, .3567E-04,-.4509E-10, .2321E-09,
     5 .1147E+01, .1455E-01, .5332E-04,-.1359E-07,-.4653E-09,
     5 .1591E+01, .2004E-01, .7386E-04,-.1697E-07,-.8798E-09,
     5 .2162E+01, .2714E-01, .1005E-03,-.9313E-08,-.1059E-08,
     5 .2882E+01, .3633E-01, .1426E-03, .8892E-07,-.9844E-09,
     5 .3810E+01, .4930E-01, .2167E-03, .1527E-06,-.3229E-08,
     5 .5089E+01, .6618E-01, .2436E-03, .2950E-06, .4565E-08,
     5 .6791E+01, .9040E-01, .3260E-03, .6389E-08, .2512E-08,
     5 .8947E+01, .1217E+00, .4721E-03,-.2841E-06,-.4937E-08 /
      DATA ((( CL4N2O(K,J,I), K = 1, 5), J = 1, 18), I = 1, 5) /
     1 .1221E+00, .4607E-02,-.1092E-03,-.7950E-06, .2260E-07,
     1 .1736E+00, .4696E-02,-.1028E-03,-.7547E-06, .2142E-07,
     1 .2480E+00, .4554E-02,-.8742E-04,-.6458E-06, .1842E-07,
     1 .3534E+00, .2425E-03, .5366E-04, .3462E-06,-.1017E-07,
     1 .5066E+00, .6379E-03, .6300E-04, .4188E-06,-.1199E-07,
     1 .7217E+00, .7438E-03, .8979E-04, .6128E-06,-.1728E-07,
     1 .1022E+01,-.1727E-02, .1967E-03, .1406E-05,-.3894E-07,
     1 .1423E+01, .2931E-02, .1229E-03, .8570E-06,-.2317E-07,
     1 .1969E+01, .4369E-02, .1433E-03, .1043E-05,-.2714E-07,
     1 .2703E+01, .4148E-02, .2228E-03, .1704E-05,-.4389E-07,
     1 .3660E+01, .1966E-02, .3835E-03, .2971E-05,-.7781E-07,
     1 .4891E+01, .6197E-02, .3848E-03, .3143E-05,-.7857E-07,
     1 .6230E+01, .9593E-02, .5283E-03, .3610E-05,-.1012E-06,
     1 .7923E+01, .1151E-01, .6181E-03, .3950E-05,-.1194E-06,
     1 .9847E+01, .1396E-01, .7092E-03, .4052E-05,-.1370E-06,
     1 .1212E+02, .1507E-01, .7382E-03, .4072E-05,-.1381E-06,
     1 .1381E+02, .1632E-01, .7336E-03, .3528E-05,-.1242E-06,
     1 .1469E+02, .6227E-02, .5287E-03, .6379E-05,-.9610E-07,
     2 .1673E+00, .3458E-03, .1699E-04, .9082E-07,-.3284E-08,
     2 .2408E+00, .4617E-03, .2320E-04, .1292E-06,-.4544E-08,
     2 .3458E+00, .5739E-03, .3052E-04, .1966E-06,-.5963E-08,
     2 .4970E+00, .7537E-03, .4125E-04, .2809E-06,-.8042E-08,
     2 .7095E+00, .1138E-02, .5930E-04, .3617E-06,-.1148E-07,
     2 .1013E+01, .1578E-02, .8125E-04, .4838E-06,-.1564E-07,
     2 .1433E+01, .2548E-02, .1216E-03, .5861E-06,-.2299E-07,
     2 .2019E+01, .3330E-02, .1598E-03, .7950E-06,-.3003E-07,
     2 .2879E+01, .3812E-02, .2007E-03, .1309E-05,-.3749E-07,
     2 .4062E+01, .5861E-02, .2928E-03, .1624E-05,-.5574E-07,
     2 .5640E+01, .9247E-02, .4214E-03, .1720E-05,-.7880E-07,
     2 .7643E+01, .1320E-01, .5633E-03, .1869E-05,-.9837E-07,
     2 .1072E+02, .1005E-01, .5204E-03, .3153E-05,-.9999E-07,
     2 .1472E+02, .1435E-01, .6798E-03, .3103E-05,-.1311E-06,
     2 .1964E+02, .1496E-01, .7514E-03, .4260E-05,-.1423E-06,
     2 .2542E+02, .1663E-03, .4323E-03, .8283E-05,-.1120E-06,
     2 .3044E+02, .8567E-02, .8712E-03, .9115E-05,-.2504E-06,
     2 .3769E+02, .1006E-01, .1067E-02, .1187E-04,-.2966E-06,
     3 .1484E+02, .5334E-01, .2501E-02, .1325E-04,-.4186E-06,
     3 .1941E+02, .6501E-01, .3013E-02, .1519E-04,-.5088E-06,
     3 .2572E+02, .7385E-01, .3493E-02, .1886E-04,-.5901E-06,
     3 .3425E+02, .8483E-01, .4074E-02, .2342E-04,-.6783E-06,
     3 .4614E+02, .9777E-01, .4768E-02, .2844E-04,-.7989E-06,
     3 .6298E+02, .1052E+00, .5435E-02, .3644E-04,-.9412E-06,
     3 .8640E+02, .1317E+00, .6768E-02, .4267E-04,-.1233E-05,
     3 .1173E+03, .1642E+00, .8449E-02, .5211E-04,-.1579E-05,
     3 .1586E+03, .1946E+00, .1018E-01, .6401E-04,-.1946E-05,
     3 .2076E+03, .2239E+00, .1144E-01, .6956E-04,-.2126E-05,
     3 .2711E+03, .2072E+00, .1130E-01, .7784E-04,-.2170E-05,
     3 .3552E+03, .2081E+00, .1209E-01, .8748E-04,-.2514E-05,
     3 .4641E+03, .1634E+00, .1221E-01, .1153E-03,-.2857E-05,
     3 .5812E+03, .1662E+00, .1184E-01, .1027E-03,-.2862E-05,
     3 .6853E+03, .4071E+00, .1649E-01, .3255E-04,-.3037E-05,
     3 .8408E+03, .7898E-01, .2854E-02, .1555E-04,-.4177E-07,
     3 .1031E+04,-.1059E+00,-.1015E-01,-.1071E-03, .2761E-05,
     3 .1245E+04,-.5350E+00,-.2760E-01,-.1375E-03, .6120E-05,
     4 .1791E+01, .4671E-02, .2245E-03, .1154E-05,-.4032E-07,
     4 .2465E+01, .5317E-02, .2662E-03, .1574E-05,-.4716E-07,
     4 .3441E+01, .5277E-02, .2950E-03, .2225E-05,-.5287E-07,
     4 .4766E+01, .7379E-02, .3979E-03, .2820E-05,-.7061E-07,
     4 .6615E+01, .9570E-02, .5076E-03, .3359E-05,-.9344E-07,
     4 .9163E+01, .1539E-01, .7306E-03, .3510E-05,-.1351E-06,
     4 .1279E+02, .1617E-01, .8247E-03, .5140E-05,-.1464E-06,
     4 .1789E+02, .2130E-01, .1031E-02, .5581E-05,-.1820E-06,
     4 .2391E+02, .3796E-01, .1474E-02, .3418E-05,-.2163E-06,
     4 .3294E+02, .3936E-01, .1483E-02, .3084E-05,-.2004E-06,
     4 .4575E+02, .2773E-01, .1137E-02, .5439E-05,-.1215E-06,
     4 .6301E+02, .1832E-01, .7399E-03, .4006E-05,-.5753E-07,
     4 .8609E+02, .8497E-02, .1991E-03,-.1211E-06, .3695E-07,
     4 .1156E+03,-.2822E-01,-.8305E-03, .5836E-05, .1911E-06,
     4 .1653E+03,-.1781E+00,-.4480E-02, .3480E-04, .5037E-06,
     4 .2123E+03, .5571E-01, .1559E-02,-.1667E-04,-.4486E-06,
     4 .2704E+03, .7448E-01, .6277E-03,-.3309E-04, .2755E-06,
     4 .3374E+03,-.7487E-02,-.4234E-02,-.6698E-04, .1356E-05,
     5 .7360E+00, .2716E-02, .1361E-03, .9457E-06,-.2056E-07,
     5 .9957E+00, .3583E-02, .1763E-03, .1155E-05,-.2717E-07,
     5 .1358E+01, .4862E-02, .2315E-03, .1361E-05,-.3651E-07,
     5 .1864E+01, .6831E-02, .3127E-03, .1536E-05,-.5179E-07,
     5 .2562E+01, .8541E-02, .3961E-03, .2102E-05,-.6380E-07,
     5 .3592E+01, .1004E-01, .4876E-03, .2997E-05,-.7786E-07,
     5 .4915E+01, .1421E-01, .6639E-03, .3703E-05,-.1042E-06,
     5 .6845E+01, .1895E-01, .8707E-03, .4489E-05,-.1401E-06,
     5 .9531E+01, .2304E-01, .1086E-02, .5880E-05,-.1806E-06,
     5 .1338E+02, .2529E-01, .1300E-02, .8908E-05,-.2159E-06,
     5 .1859E+02, .2983E-01, .1642E-02, .1271E-04,-.2808E-06,
     5 .2555E+02, .3943E-01, .2143E-02, .1555E-04,-.3852E-06,
     5 .3279E+02, .6610E-01, .3127E-02, .1593E-04,-.5566E-06,
     5 .4081E+02, .8791E-01, .4129E-02, .2120E-04,-.7149E-06,
     5 .5086E+02, .1277E+00, .5650E-02, .2339E-04,-.9697E-06,
     5 .6022E+02, .1590E+00, .7100E-02, .3072E-04,-.1207E-05,
     5 .7874E+02, .8541E-01, .6203E-02, .6140E-04,-.1318E-05,
     5 .9991E+02, .1184E+00, .8159E-02, .7115E-04,-.1868E-05 /
      DATA ((( CL4CH4(K,J,I), K = 1, 5), J = 1, 18), I = 1, 5) /
     1 .9137E-01, .1088E-02, .4972E-05, .1499E-07,-.2950E-10,
     1 .1187E+00, .1335E-02, .5474E-05, .1353E-07,-.4323E-10,
     1 .1551E+00, .1652E-02, .5309E-05, .1271E-07, .1100E-09,
     1 .2047E+00, .2143E-02, .7594E-05,-.6530E-08,-.2620E-09,
     1 .2732E+00, .2688E-02, .7900E-05,-.4138E-08,-.1992E-09,
     1 .3623E+00, .3390E-02, .9013E-05, .6175E-08,-.4666E-10,
     1 .4805E+00, .4327E-02, .1129E-04, .2055E-07, .1086E-09,
     1 .6329E+00, .5551E-02, .1557E-04, .3098E-07,-.8012E-13,
     1 .8298E+00, .7139E-02, .2222E-04, .5144E-07,-.1101E-09,
     1 .1092E+01, .9247E-02, .3166E-04, .4297E-07,-.1151E-08,
     1 .1422E+01, .1168E-01, .3258E-04, .1151E-06, .4173E-09,
     1 .1831E+01, .1444E-01, .3322E-04, .2244E-06, .2416E-08,
     1 .2325E+01, .1759E-01, .4613E-04, .1798E-06,-.1103E-08,
     1 .2957E+01, .2229E-01, .6204E-04, .2746E-07,-.5260E-08,
     1 .3733E+01, .2761E-01, .6807E-04, .7011E-07,-.4948E-08,
     1 .4620E+01, .3617E-01, .1329E-03,-.2251E-06,-.1553E-07,
     1 .5887E+01, .4158E-01,-.3489E-04, .4706E-06, .1494E-07,
     1 .7667E+01, .5108E-01,-.8798E-04, .8921E-06, .1366E-07,
     2 .2207E+00, .2008E-02, .8345E-05,-.3194E-08,-.7102E-10,
     2 .2915E+00, .2405E-02, .8360E-05, .1547E-08, .1615E-09,
     2 .3892E+00, .2974E-02, .8936E-05,-.7955E-08, .3137E-09,
     2 .5225E+00, .3597E-02, .8928E-05, .1703E-07, .8602E-09,
     2 .7027E+00, .4644E-02, .1317E-04,-.1240E-07, .7214E-09,
     2 .9451E+00, .6081E-02, .2750E-04,-.5610E-07,-.9667E-09,
     2 .1287E+01, .7621E-02, .3806E-04,-.3813E-07,-.1639E-08,
     2 .1759E+01, .9770E-02, .5419E-04,-.5969E-07,-.3062E-08,
     2 .2394E+01, .1202E-01, .7968E-04, .4902E-07,-.4798E-08,
     2 .3271E+01, .1417E-01, .8826E-04, .3344E-06,-.2054E-08,
     2 .4481E+01, .1632E-01, .1096E-03, .7152E-06,-.1640E-08,
     2 .6107E+01, .1992E-01, .1268E-03, .5190E-06,-.4426E-08,
     2 .8397E+01, .2262E-01, .1162E-03, .8987E-06,-.1597E-08,
     2 .1147E+02, .2732E-01, .7073E-04, .1168E-05, .3837E-08,
     2 .1583E+02, .3975E-01,-.1534E-03,-.1913E-06, .3267E-07,
     2 .2112E+02, .5559E-01,-.2737E-03,-.1964E-05, .6435E-07,
     2 .2715E+02, .5229E-01, .3344E-03, .1562E-05,-.5051E-07,
     2 .3467E+02, .3740E-01, .2171E-03, .3982E-05,-.2886E-07,
     3 .2407E+00, .2039E-02, .1470E-04,-.2640E-07,-.8912E-09,
     3 .3188E+00, .2290E-02, .1830E-04, .8208E-08,-.1229E-08,
     3 .4211E+00, .2495E-02, .2941E-04, .8411E-07,-.2567E-08,
     3 .5768E+00, .2748E-02, .3366E-04, .1720E-06,-.2882E-08,
     3 .8098E+00, .3386E-02, .3183E-04, .2231E-06,-.2288E-08,
     3 .1146E+01, .4600E-02, .2915E-04, .2112E-06,-.1932E-08,
     3 .1632E+01, .6820E-02, .5652E-05, .6807E-07, .1466E-08,
     3 .2301E+01, .1010E-01,-.1987E-04,-.1066E-06, .7104E-08,
     3 .3197E+01, .1400E-01,-.1927E-04,-.2818E-06, .9577E-08,
     3 .4407E+01, .1813E-01,-.2739E-07,-.4008E-06, .1006E-07,
     3 .6107E+01, .2184E-01, .3399E-04,-.6081E-06, .7130E-08,
     3 .8543E+01, .2574E-01, .1007E-03,-.4743E-06, .1007E-08,
     3 .1159E+02, .3344E-01, .3544E-03,-.9878E-06,-.2314E-07,
     3 .1563E+02, .3590E-01, .6387E-03,-.5254E-06,-.6602E-07,
     3 .2259E+02, .4160E-01, .6703E-03, .5133E-06,-.8723E-07,
     3 .3362E+02, .5251E-01,-.5808E-03, .1067E-05, .1409E-06,
     3 .4756E+02, .7566E-01,-.4022E-03,-.3155E-05, .8415E-07,
     3 .6182E+02, .8859E-01, .3841E-03,-.6404E-05,-.2222E-07,
     4 .2988E+02, .3101E+00, .2051E-02, .4433E-05,-.9226E-09,
     4 .3625E+02, .3201E+00, .2046E-02, .6589E-05, .1640E-07,
     4 .4474E+02, .3416E+00, .2380E-02, .6462E-05,-.2999E-07,
     4 .5692E+02, .3657E+00, .2588E-02, .6339E-05,-.7359E-07,
     4 .7390E+02, .3828E+00, .2355E-02, .8384E-05,-.3824E-07,
     4 .9619E+02, .4112E+00, .2900E-02, .8277E-05,-.1406E-06,
     4 .1281E+03, .4211E+00, .1764E-02, .1049E-04, .1216E-07,
     4 .1721E+03, .4390E+00,-.1284E-03, .1275E-04, .3038E-06,
     4 .2294E+03, .4536E+00,-.3047E-03, .1296E-04, .2741E-06,
     4 .3065E+03, .4878E+00, .7446E-03, .1574E-04, .6018E-07,
     4 .4118E+03, .5523E+00, .7160E-03, .1813E-04, .4300E-07,
     4 .5493E+03, .6324E+00, .6411E-03, .1278E-04, .1444E-06,
     4 .7262E+03, .5727E+00, .9721E-03, .2628E-04, .4376E-07,
     4 .9323E+03, .4248E+00, .6676E-02, .6926E-04,-.1448E-05,
     4 .1174E+04, .8226E+00,-.1731E-01, .7288E-05, .2157E-05,
     4 .1350E+04, .1466E+01, .1950E-02,-.6319E-04,-.1249E-05,
     4 .1469E+04, .1092E+01, .7563E-03, .4991E-04,-.3726E-06,
     4 .1518E+04, .6355E-01,-.1367E-02, .1037E-03, .1104E-05,
     5 .2036E+01, .1970E-01, .6954E-04, .9777E-06, .1427E-07,
     5 .2489E+01, .2249E-01, .9201E-04, .6975E-06, .9741E-08,
     5 .3087E+01, .2558E-01, .1240E-03, .5592E-06, .4320E-08,
     5 .3903E+01, .2815E-01, .1190E-03, .6690E-06, .7383E-08,
     5 .5022E+01, .3039E-01, .1048E-03, .1061E-05, .1199E-07,
     5 .6720E+01, .3072E-01,-.1784E-04, .1993E-05, .3744E-07,
     5 .8736E+01, .3483E-01, .1329E-03, .2483E-05, .1622E-07,
     5 .1156E+02, .4173E-01, .2808E-03, .2431E-05,-.7176E-08,
     5 .1559E+02, .5133E-01, .5124E-03, .1729E-05,-.5871E-07,
     5 .2104E+02, .6360E-01, .3861E-03, .1025E-05,-.4281E-07,
     5 .2888E+02, .7407E-01,-.2885E-03, .8115E-06, .4623E-07,
     5 .3933E+02, .1041E+00,-.5496E-03, .1333E-05, .2076E-07,
     5 .5151E+02, .1307E+00,-.1016E-02, .3993E-05, .8703E-07,
     5 .6489E+02, .1424E+00,-.1220E-02, .8490E-05, .2009E-06,
     5 .7902E+02, .4233E-01,-.2834E-04, .2733E-04, .5109E-07,
     5 .9987E+02, .5085E-02,-.1784E-02, .2788E-04, .1585E-06,
     5 .1163E+03, .1377E+00,-.5601E-03, .5898E-06, .6894E-07,
     5 .1301E+03, .2690E+00, .7167E-04,-.1505E-04,-.1757E-06 /
      DATA ((( CL4CS(K,J,I), K = 1, 5), J = 1, 4), I = 1, 5) /
     1 .2963E+01,-.6248E-01, .7072E-03,-.6852E-05, .4073E-07,
     1 .4389E+01,-.9282E-01, .1053E-02,-.1018E-04, .6033E-07,
     1 .6504E+01,-.1379E+00, .1563E-02,-.1513E-04, .8989E-07,
     1 .9655E+01,-.2045E+00, .2315E-02,-.2248E-04, .1345E-06,
     2 .5426E+01,-.7237E-01, .5760E-03,-.4182E-05, .2285E-07,
     2 .7880E+01,-.1059E+00, .8600E-03,-.5971E-05, .2769E-07,
     2 .1137E+02,-.1502E+00, .1194E-02,-.9983E-05, .6469E-07,
     2 .1633E+02,-.2158E+00, .1902E-02,-.1555E-04, .7317E-07,
     3 .1842E+01,-.3104E-01, .2853E-03,-.2193E-05, .1164E-07,
     3 .2775E+01,-.4614E-01, .4189E-03,-.3011E-05, .1430E-07,
     3 .4184E+01,-.6835E-01, .6010E-03,-.4193E-05, .1973E-07,
     3 .6221E+01,-.1013E+00, .8702E-03,-.6274E-05, .3281E-07,
     4 .2481E+01,-.3523E-01, .3003E-03,-.1935E-05, .6590E-08,
     4 .3682E+01,-.5227E-01, .4152E-03,-.2940E-05, .1664E-07,
     4 .5486E+01,-.7810E-01, .6293E-03,-.4376E-05, .2069E-07,
     4 .8208E+01,-.1172E+00, .9091E-03,-.6048E-05, .3264E-07,
     5 .8893E+01,-.1096E+00, .7672E-03,-.4571E-05, .1791E-07,
     5 .1335E+02,-.1655E+00, .1103E-02,-.6265E-05, .3180E-07,
     5 .2001E+02,-.2519E+00, .1738E-02,-.8552E-05, .2439E-07,
     5 .3000E+02,-.3746E+00, .2320E-02,-.1363E-04, .9085E-07 /
      DATA ((( CL4CF(K,J,I), K = 1, 5), J = 1, 4), I = 1, 5) /
     1 .7013E-03,-.1603E-05, .1962E-07, .3683E-10,-.3567E-11,
     1 .8985E-03,-.1971E-05, .2133E-07,-.5080E-10,-.2559E-11,
     1 .1188E-02,-.3713E-05, .2277E-07,-.6132E-11,-.1074E-11,
     1 .1773E-02,-.7232E-05, .3104E-08, .2434E-09, .2715E-11,
     2 .9373E-01,-.2093E-03, .3432E-06, .4281E-08, .4751E-10,
     2 .1318E+00,-.2736E-03, .7616E-06, .1319E-07,-.1956E-09,
     2 .1819E+00,-.1819E-03,-.1961E-05,-.1174E-07, .5800E-09,
     2 .2472E+00,-.1279E-04, .3770E-05,-.5185E-07,-.2937E-09,
     3 .6826E-02,-.2275E-04, .8054E-07,-.6566E-09, .1963E-10,
     3 .1086E-01,-.4792E-04, .4297E-06, .6485E-09,-.3405E-10,
     3 .1737E-01,-.8208E-04, .5458E-06, .1082E-08,-.3918E-10,
     3 .2609E-01,-.1179E-03, .1103E-06,-.6427E-09, .5693E-10,
     4 .3075E-01,-.9096E-04, .1324E-05,-.4341E-08,-.1020E-09,
     4 .4570E-01,-.1504E-03, .3913E-06,-.6475E-08, .1799E-09,
     4 .6792E-01,-.2302E-03, .1675E-05,-.1538E-07,-.8774E-12,
     4 .1032E+00,-.3967E-03, .1016E-05,-.6557E-08, .2296E-09,
     5 .2480E+00,-.1007E-02, .4769E-05,-.2681E-07,-.2797E-10,
     5 .3749E+00,-.1603E-02, .4728E-05,-.1799E-07, .3663E-09,
     5 .5657E+00,-.2589E-02, .1026E-04,-.5741E-08,-.3444E-09,
     5 .8529E+00,-.3892E-02, .3271E-05,-.3967E-07, .1784E-08 /
      COMMON /BANDL4GH/ GWL4GH(5), CL4H2OGH(5,28,5), CL4N2OGH(5,28,5),
     1                             CL4CH4GH(5,28,5)
      DATA GWL4GH / .06000, .02000, .04000, .02000, .00200 /
      DATA ((( CL4H2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 1, 3) /
     1 .2389E-01, .8023E-03, .1119E-04, .7886E-07, .2424E-09,
     1 .2524E-01, .8180E-03, .1115E-04, .7834E-07, .2450E-09,
     1 .2783E-01, .8535E-03, .1113E-04, .7728E-07, .2525E-09,
     1 .3203E-01, .9216E-03, .1138E-04, .7569E-07, .2400E-09,
     1 .3887E-01, .1039E-02, .1195E-04, .7361E-07, .2101E-09,
     1 .4984E-01, .1225E-02, .1294E-04, .7330E-07, .1907E-09,
     1 .6746E-01, .1517E-02, .1453E-04, .7410E-07, .1717E-09,
     1 .9657E-01, .1984E-02, .1733E-04, .7454E-07, .7852E-10,
     1 .9675E-01, .1987E-02, .1709E-04, .7457E-07, .1291E-09,
     1 .2319E+00, .3958E-02, .2654E-04, .8626E-07, .1313E-09,
     1 .5036E+00, .7653E-02, .4228E-04, .8702E-07,-.2182E-10,
     1 .6835E+00, .1001E-01, .5237E-04, .8422E-07,-.2534E-09,
     1 .9369E+00, .1319E-01, .6201E-04, .8985E-07, .1192E-09,
     1 .1291E+01, .1752E-01, .7501E-04, .7891E-07, .2683E-09,
     1 .1788E+01, .2328E-01, .9027E-04, .1094E-06, .9234E-09,
     1 .2472E+01, .3122E-01, .1211E-03, .1212E-06,-.3275E-09,
     1 .3430E+01, .4227E-01, .1553E-03, .7843E-07,-.1063E-08,
     1 .4744E+01, .5677E-01, .1867E-03, .5932E-07,-.1628E-09,
     1 .6491E+01, .7539E-01, .2152E-03, .1557E-06, .3990E-08,
     1 .8763E+01, .1009E+00, .3017E-03, .2280E-06, .2903E-08,
     1 .1172E+02, .1371E+00, .4766E-03, .3806E-06,-.2891E-08,
     1 .1582E+02, .1884E+00, .5719E-03, .2031E-06, .9369E-08,
     1 .2147E+02, .2628E+00, .7701E-03,-.8997E-06, .4368E-08,
     1 .2891E+02, .3565E+00, .1105E-02,-.1426E-05,-.1688E-07,
     1 .3862E+02, .4676E+00, .1176E-02,-.1233E-05, .1237E-07,
     1 .5095E+02, .6090E+00, .1076E-02,-.2648E-05, .7162E-07,
     1 .6524E+02, .7809E+00, .1555E-02,-.5509E-05, .2720E-07,
     1 .8082E+02, .9810E+00, .2414E-02,-.8815E-05,-.5367E-07,
     2 .7236E+03, .7962E+01, .1904E-01,-.3996E-04,-.5148E-06,
     2 .7236E+03, .7962E+01, .1896E-01,-.4060E-04,-.4972E-06,
     2 .7236E+03, .7962E+01, .1896E-01,-.4067E-04,-.4960E-06,
     2 .7236E+03, .7962E+01, .1910E-01,-.4064E-04,-.5201E-06,
     2 .7236E+03, .7962E+01, .1936E-01,-.4068E-04,-.5609E-06,
     2 .7236E+03, .7968E+01, .1931E-01,-.4193E-04,-.5658E-06,
     2 .7236E+03, .7956E+01, .1883E-01,-.3833E-04,-.4978E-06,
     2 .7236E+03, .7938E+01, .1889E-01,-.3021E-04,-.4364E-06,
     2 .7242E+03, .7932E+01, .1871E-01,-.2850E-04,-.4095E-06,
     2 .7242E+03, .7896E+01, .2018E-01,-.4137E-04,-.4395E-06,
     2 .7350E+03, .7950E+01, .1039E-01,-.6774E-04, .1403E-05,
     2 .7356E+03, .7944E+01, .1055E-01,-.6654E-04, .1361E-05,
     2 .7434E+03, .7470E+01, .1583E-01, .3154E-04,-.4696E-07,
     2 .7446E+03, .7338E+01, .3541E-01, .6012E-04,-.4080E-05,
     2 .7464E+03, .7386E+01, .3458E-01, .5217E-04,-.3962E-05,
     2 .7488E+03, .7416E+01, .3224E-01, .4928E-04,-.3556E-05,
     2 .8112E+03, .7692E+01,-.2378E-01, .3646E-04, .5880E-05,
     2 .8088E+03, .7818E+01,-.1949E-01, .1360E-04, .5100E-05,
     2 .8052E+03, .9090E+01, .1899E-01,-.2113E-03,-.2146E-05,
     2 .7992E+03, .8844E+01, .1637E-01,-.5873E-04,-.6390E-08,
     2 .7920E+03, .8742E+01, .1591E-01,-.5873E-04, .1426E-07,
     2 .7818E+03, .8598E+01, .1531E-01,-.5706E-04, .4255E-07,
     2 .7674E+03, .8406E+01, .1509E-01,-.5579E-04,-.3805E-07,
     2 .7488E+03, .8136E+01, .1412E-01,-.4969E-04,-.4195E-07,
     2 .7260E+03, .7854E+01, .1159E-01,-.5386E-04, .2095E-06,
     2 .6942E+03, .7494E+01, .1076E-01,-.5536E-04, .1964E-06,
     2 .6540E+03, .7014E+01, .9864E-02,-.5251E-04, .1809E-06,
     2 .6072E+03, .6516E+01, .1027E-01,-.6330E-04,-.1893E-06,
     3 .2108E+01, .3332E-01, .1275E-03, .1178E-05, .1325E-07,
     3 .2108E+01, .3294E-01, .1379E-03, .1257E-05, .1107E-07,
     3 .2108E+01, .3294E-01, .1381E-03, .1268E-05, .1090E-07,
     3 .2126E+01, .3294E-01, .1198E-03, .1265E-05, .1391E-07,
     3 .2156E+01, .3293E-01, .8849E-04, .1269E-05, .1899E-07,
     3 .2117E+01, .3215E-01, .9393E-04, .1425E-05, .1947E-07,
     3 .2106E+01, .3404E-01, .1532E-03, .9540E-06, .1125E-07,
     3 .2108E+01, .3590E-01, .1476E-03,-.5847E-07, .3361E-08,
     3 .2075E+01, .3686E-01, .1700E-03,-.2662E-06, .3063E-10,
     3 .2045E+01, .3572E-01, .1901E-03,-.3326E-07,-.3711E-08,
     3 .1824E+01, .3158E-01, .2442E-03, .4196E-06,-.1189E-07,
     3 .1820E+01, .3198E-01, .2232E-03, .3441E-06,-.7679E-08,
     3 .1878E+01, .3197E-01, .1528E-03, .1701E-06, .2109E-08,
     3 .1815E+01, .3070E-01, .1596E-03, .2971E-06, .1288E-08,
     3 .1808E+01, .2829E-01, .8270E-04, .6339E-06, .1470E-07,
     3 .1766E+01, .2901E-01, .1250E-03, .2424E-06, .3840E-08,
     3 .1745E+01, .3131E-01, .1697E-03,-.9534E-06,-.1533E-07,
     3 .1680E+01, .2975E-01, .1597E-03,-.4634E-06,-.9044E-08,
     3 .1628E+01, .2907E-01, .1676E-03,-.9052E-07,-.6416E-08,
     3 .1541E+01, .2736E-01, .1364E-03, .2546E-06, .2139E-08,
     3 .1424E+01, .2636E-01, .1318E-03, .2340E-06, .1267E-08,
     3 .1267E+01, .2634E-01, .1556E-03, .8799E-07,-.3775E-08,
     3 .1109E+01, .2486E-01, .1188E-03, .4647E-07, .4857E-08,
     3 .8613E+00, .2496E-01, .1294E-03,-.3978E-06, .7470E-08,
     3 .4707E+00, .1772E-01, .3293E-03, .4122E-06,-.2613E-07,
     3 .4857E+00, .1040E-01, .1019E-03, .9338E-06, .6153E-08,
     3 .4899E+00, .1038E-01, .9413E-04, .2505E-06,-.1454E-08,
     3 .4833E+00, .7562E-02, .3546E-04, .3612E-06, .4517E-08 /
      DATA ((( CL4H2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 4, 5) /
     4 .2355E+02, .2819E+00,-.4206E-03,-.6588E-05, .1073E-06,
     4 .2355E+02, .2819E+00,-.4209E-03,-.6590E-05, .1074E-06,
     4 .2355E+02, .2819E+00,-.4208E-03,-.6590E-05, .1074E-06,
     4 .2353E+02, .2819E+00,-.4211E-03,-.6590E-05, .1074E-06,
     4 .2353E+02, .2819E+00,-.4211E-03,-.6590E-05, .1074E-06,
     4 .2353E+02, .2819E+00,-.4217E-03,-.6590E-05, .1075E-06,
     4 .2353E+02, .2819E+00,-.4215E-03,-.6551E-05, .1070E-06,
     4 .2352E+02, .2817E+00,-.4235E-03,-.6551E-05, .1074E-06,
     4 .2352E+02, .2817E+00,-.4236E-03,-.6562E-05, .1073E-06,
     4 .2346E+02, .2916E+00,-.8387E-03,-.3810E-05, .1225E-06,
     4 .2105E+02, .2838E+00, .1490E-02, .1889E-05,-.3219E-06,
     4 .2091E+02, .2828E+00, .1485E-02, .1736E-05,-.3197E-06,
     4 .1859E+02, .3990E+00, .2987E-03,-.2243E-04, .1270E-07,
     4 .1823E+02, .4320E+00,-.4620E-02,-.2981E-04, .1022E-05,
     4 .1755E+02, .4209E+00,-.4274E-02,-.2850E-04, .9660E-06,
     4 .1670E+02, .4073E+00,-.3795E-02,-.2700E-04, .8865E-06,
     4 .5743E+00, .3263E+00, .1010E-01,-.2136E-04,-.1434E-05,
     4 .4236E+00, .2876E+00, .9015E-02,-.1662E-04,-.1252E-05,
     4 .3987E+00,-.4227E-01,-.6518E-03, .3882E-04, .5528E-06,
     4 .4442E+00, .5766E-02, .7944E-05,-.6069E-07, .7719E-09,
     4 .4914E+00, .7053E-02, .1367E-04,-.7704E-07, .1159E-08,
     4 .5693E+00, .9095E-02, .3801E-04,-.1469E-06,-.2042E-08,
     4 .6678E+00, .1032E-01, .2110E-04, .1560E-06, .4224E-08,
     4 .7842E+00, .1593E-01, .6816E-05,-.3554E-06, .1052E-07,
     4 .8238E+00, .2334E-01, .8207E-04,-.1137E-05, .4041E-08,
     4 .3765E+00, .2898E-01, .7379E-03,-.1364E-05,-.9786E-07,
     4 .3693E+00, .2225E-01, .5910E-03, .1003E-05,-.5321E-07,
     4 .4338E+00,-.1136E-04,-.6776E-04, .5445E-05, .7788E-07,
     5 .9687E-02, .1412E-03, .5307E-06,-.5223E-09,-.2049E-11,
     5 .9690E-02, .1413E-03, .5309E-06,-.5186E-09,-.2009E-11,
     5 .9698E-02, .1413E-03, .5304E-06,-.5111E-09,-.1814E-11,
     5 .9711E-02, .1415E-03, .5309E-06,-.4959E-09,-.1613E-11,
     5 .9738E-02, .1418E-03, .5316E-06,-.4677E-09,-.1178E-11,
     5 .9793E-02, .1425E-03, .5325E-06,-.4074E-09,-.2019E-12,
     5 .9906E-02, .1439E-03, .5349E-06,-.2852E-09, .1674E-11,
     5 .1013E-01, .1466E-03, .5391E-06,-.3668E-10, .5639E-11,
     5 .1013E-01, .1466E-03, .5391E-06,-.3675E-10, .5640E-11,
     5 .1153E-01, .1642E-03, .5758E-06, .9417E-09, .2184E-10,
     5 .1511E-01, .2118E-03, .6582E-06, .6767E-09, .3303E-10,
     5 .1770E-01, .2436E-03, .7868E-06, .1764E-08, .3789E-10,
     5 .2153E-01, .2931E-03, .9288E-06, .2837E-08, .5458E-10,
     5 .2721E-01, .3674E-03, .1228E-05, .5044E-08, .4404E-10,
     5 .3557E-01, .4854E-03, .1211E-05, .5428E-08, .1463E-09,
     5 .4920E-01, .7096E-03,-.7649E-06,-.1568E-07, .4641E-09,
     5 .6774E-01, .9642E-03,-.1386E-05,-.1477E-07, .6924E-09,
     5 .8295E-01, .1503E-02, .9383E-05,-.5270E-07,-.9002E-09,
     5 .1053E+00, .2090E-02, .2388E-04,-.6977E-07,-.2912E-08,
     5 .1493E+00, .2139E-02, .4439E-05, .4974E-07, .1430E-08,
     5 .1845E+00, .3423E-02, .5772E-05,-.8297E-07, .1452E-08,
     5 .1401E+00, .2064E-02,-.1348E-04, .1100E-06, .6345E-08,
     5 .1269E+00, .1383E-02, .6630E-05, .3254E-07, .2028E-09,
     5 .1572E+00, .2025E-02, .8321E-05,-.4928E-07,-.4596E-09,
     5 .1524E+00, .2465E-02, .3357E-04, .1213E-07,-.3288E-08,
     5 .1567E+00, .2385E-02, .8036E-05, .1980E-07, .7383E-09,
     5 .1728E+00, .2756E-02, .2018E-04,-.3805E-08,-.8982E-09,
     5 .1614E+00, .1926E-02, .1683E-04, .9033E-07, .2361E-09 /
      DATA ((( CL4N2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 1, 3) /
     1 .4988E-01, .8580E-03, .3692E-04, .2180E-06,-.3876E-08,
     1 .5165E-01, .8462E-03, .3643E-04, .2110E-06,-.3960E-08,
     1 .5233E-01, .9050E-03, .3818E-04, .2030E-06,-.4235E-08,
     1 .5855E-01, .9452E-03, .4001E-04, .2128E-06,-.4518E-08,
     1 .7071E-01, .8644E-03, .3850E-04, .2357E-06,-.4512E-08,
     1 .8943E-01, .9599E-03, .4286E-04, .2450E-06,-.5571E-08,
     1 .1124E+00, .1075E-02, .4820E-04, .2629E-06,-.6742E-08,
     1 .1522E+00, .1398E-02, .6125E-04, .2914E-06,-.9041E-08,
     1 .2362E+00, .1645E-02, .7551E-04, .3925E-06,-.1201E-07,
     1 .3505E+00, .1991E-02, .9643E-04, .6076E-06,-.1485E-07,
     1 .6880E+00, .3824E-02, .1786E-03, .1011E-05,-.2760E-07,
     1 .9256E+00, .4666E-02, .2183E-03, .1189E-05,-.3527E-07,
     1 .1217E+01, .6512E-02, .2931E-03, .1344E-05,-.4883E-07,
     1 .1636E+01, .6174E-02, .3114E-03, .2063E-05,-.5101E-07,
     1 .2280E+01, .6586E-02, .3680E-03, .2917E-05,-.6316E-07,
     1 .3157E+01, .7771E-02, .4553E-03, .3738E-05,-.8330E-07,
     1 .4350E+01, .8261E-02, .5513E-03, .5395E-05,-.1028E-06,
     1 .6032E+01, .1205E-01, .7615E-03, .6747E-05,-.1472E-06,
     1 .8129E+01, .1545E-01, .9619E-03, .8408E-05,-.1837E-06,
     1 .1056E+02, .1961E-01, .1206E-02, .1050E-04,-.2262E-06,
     1 .1323E+02, .3396E-01, .1781E-02, .1175E-04,-.3247E-06,
     1 .1643E+02, .4218E-01, .2290E-02, .1606E-04,-.4258E-06,
     1 .2066E+02, .5072E-01, .2954E-02, .2282E-04,-.5743E-06,
     1 .2703E+02, .6713E-01, .4093E-02, .3230E-04,-.8506E-06,
     1 .3367E+02, .9359E-01, .5513E-02, .4178E-04,-.1121E-05,
     1 .4364E+02, .1033E+00, .6674E-02, .5709E-04,-.1403E-05,
     1 .5596E+02, .1693E+00, .9550E-02, .6365E-04,-.2023E-05,
     1 .6287E+02, .4216E+00, .1751E-01, .3710E-04,-.3394E-05,
     2 .5170E-01, .1044E-02, .4268E-04, .1976E-06,-.4816E-08,
     2 .5375E-01, .1045E-02, .4276E-04, .1985E-06,-.4844E-08,
     2 .5968E-01, .1002E-02, .4182E-04, .2101E-06,-.4757E-08,
     2 .6615E-01, .1034E-02, .4324E-04, .2126E-06,-.5081E-08,
     2 .7531E-01, .1173E-02, .4785E-04, .1966E-06,-.6056E-08,
     2 .1018E+00, .1173E-02, .5008E-04, .2383E-06,-.6684E-08,
     2 .1342E+00, .1309E-02, .5669E-04, .2672E-06,-.8100E-08,
     2 .1917E+00, .1682E-02, .7213E-04, .2842E-06,-.1152E-07,
     2 .2972E+00, .1897E-02, .8747E-04, .4546E-06,-.1414E-07,
     2 .3855E+00, .3031E-02, .1288E-03, .5204E-06,-.1954E-07,
     2 .7423E+00, .4535E-02, .1965E-03, .8849E-06,-.2927E-07,
     2 .9859E+00, .4597E-02, .2158E-03, .1331E-05,-.3080E-07,
     2 .1316E+01, .6987E-02, .3086E-03, .1467E-05,-.4673E-07,
     2 .1809E+01, .6752E-02, .3375E-03, .2355E-05,-.5047E-07,
     2 .2343E+01, .9041E-02, .4397E-03, .3010E-05,-.6184E-07,
     2 .3125E+01, .1392E-01, .6355E-03, .3391E-05,-.9717E-07,
     2 .4146E+01, .1739E-01, .8144E-03, .4677E-05,-.1251E-06,
     2 .5620E+01, .2043E-01, .1038E-02, .7100E-05,-.1679E-06,
     2 .7262E+01, .2520E-01, .1319E-02, .9658E-05,-.2124E-06,
     2 .1011E+02, .4856E-01, .2259E-02, .1040E-04,-.4136E-06,
     2 .1330E+02, .7198E-01, .3203E-02, .1265E-04,-.5738E-06,
     2 .1731E+02, .7242E-01, .3471E-02, .1956E-04,-.5831E-06,
     2 .2076E+02, .1096E+00, .4867E-02, .2097E-04,-.8149E-06,
     2 .2346E+02, .1381E+00, .5856E-02, .2247E-04,-.9158E-06,
     2 .2809E+02, .1022E+00, .5081E-02, .3419E-04,-.7825E-06,
     2 .2414E+02, .1368E+00, .5566E-02, .2155E-04,-.7330E-06,
     2 .1476E+02, .1447E+00, .5366E-02, .1282E-04,-.6336E-06,
     2 .5787E+01, .5165E-02, .1446E-02, .3817E-04, .4241E-07,
     3 .6458E+04,-.4833E-01, .3890E-02, .1125E-03,-.1087E-05,
     3 .6458E+04,-.4827E-01, .3888E-02, .1124E-03,-.1086E-05,
     3 .6458E+04,-.4791E-01, .3887E-02, .1123E-03,-.1084E-05,
     3 .6458E+04,-.4778E-01, .3872E-02, .1119E-03,-.1076E-05,
     3 .6458E+04,-.4840E-01, .3821E-02, .1115E-03,-.1062E-05,
     3 .6458E+04, .2823E-02, .5023E-02, .9978E-04,-.1185E-05,
     3 .6458E+04, .2388E-02, .4853E-02, .9690E-04,-.1138E-05,
     3 .6451E+04,-.7123E-02, .4602E-02, .9830E-04,-.1114E-05,
     3 .6458E+04,-.1205E+00, .5893E-02, .1799E-03,-.2481E-05,
     3 .6458E+04,-.1635E+00, .3339E-02, .1668E-03,-.1773E-05,
     3 .6426E+04, .1113E+01, .3695E-01,-.1197E-03,-.7629E-05,
     3 .6419E+04, .1027E+01, .3404E-01,-.1017E-03,-.6733E-05,
     3 .6383E+04, .1558E+01, .4609E-01,-.2414E-03,-.8186E-05,
     3 .6366E+04, .3765E+00, .2042E-01, .1448E-03,-.3753E-05,
     3 .6340E+04, .7142E-01, .3606E-02, .4442E-04,-.8531E-08,
     3 .6333E+04, .2743E+00, .1009E-01, .1786E-04,-.1330E-05,
     3 .6282E+04, .3212E+00, .4309E-02,-.1311E-03, .2304E-06,
     3 .6232E+04,-.2892E+00,-.1575E-01,-.7142E-04, .4072E-05,
     3 .6172E+04,-.9869E+00,-.3712E-01, .1841E-06, .7296E-05,
     3 .6032E+04,-.5739E+00,-.3114E-01,-.1738E-03, .7066E-05,
     3 .5885E+04,-.5738E+00,-.3492E-01,-.2867E-03, .6931E-05,
     3 .5678E+04,-.4250E+00,-.3835E-01,-.4296E-03, .9120E-05,
     3 .5459E+04,-.8243E+00,-.5504E-01,-.4660E-03, .1238E-04,
     3 .5187E+04,-.9670E+00,-.6470E-01,-.5443E-03, .1471E-04,
     3 .4896E+04,-.1658E+01,-.8486E-01,-.4743E-03, .1706E-04,
     3 .4541E+04,-.1835E+01,-.8762E-01,-.4542E-03, .1573E-04,
     3 .4055E+04,-.1467E+01,-.7584E-01,-.4803E-03, .1400E-04,
     3 .3500E+04,-.1173E+01,-.6168E-01,-.3969E-03, .1165E-04 /
      DATA ((( CL4N2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 4, 5) /
     4 .3893E+03, .1021E+01, .3123E-01,-.1210E-03,-.5144E-05,
     4 .3893E+03, .1021E+01, .3123E-01,-.1210E-03,-.5144E-05,
     4 .3893E+03, .1021E+01, .3123E-01,-.1210E-03,-.5144E-05,
     4 .3894E+03, .1020E+01, .3123E-01,-.1210E-03,-.5144E-05,
     4 .3894E+03, .1020E+01, .3122E-01,-.1210E-03,-.5144E-05,
     4 .3931E+03, .9536E+00, .2956E-01,-.1073E-03,-.4952E-05,
     4 .3934E+03, .9516E+00, .2955E-01,-.1060E-03,-.4956E-05,
     4 .3942E+03, .9580E+00, .2943E-01,-.1122E-03,-.4888E-05,
     4 .3876E+03, .1090E+01, .2708E-01,-.2214E-03,-.3004E-05,
     4 .3873E+03, .1126E+01, .2891E-01,-.2179E-03,-.3568E-05,
     4 .4184E+03,-.5248E+00,-.1714E-01, .1022E-03, .4688E-05,
     4 .4248E+03,-.3435E+00,-.1757E-01,-.3228E-04, .5424E-05,
     4 .5268E+03,-.2199E+01,-.6428E-01, .3501E-03, .1122E-04,
     4 .5412E+03,-.7284E+00,-.3442E-01,-.1727E-03, .6188E-05,
     4 .5608E+03,-.5328E+00,-.1857E-01, .4252E-04, .3948E-05,
     4 .5900E+03,-.1583E+01,-.4900E-01, .1828E-03, .8308E-05,
     4 .6188E+03,-.8484E+00,-.2166E-01, .1429E-03, .1974E-05,
     4 .6592E+03, .6440E-01, .1962E-02,-.1083E-03,-.3201E-05,
     4 .6804E+03, .5872E+00, .1542E-01,-.2383E-03,-.5716E-05,
     4 .7504E+03,-.7692E+00,-.1903E-01, .8080E-04,-.1088E-06,
     4 .7328E+03,-.1586E+00,-.1535E-02, .6512E-04,-.5992E-06,
     4 .7340E+03,-.5016E+00,-.5500E-02, .1926E-03,-.1719E-05,
     4 .6772E+03,-.1717E+00, .5508E-02, .1743E-03,-.3544E-05,
     4 .6228E+03,-.1493E+00, .8392E-02, .2060E-03,-.4472E-05,
     4 .5224E+03, .4880E+00, .2377E-01, .8404E-04,-.5656E-05,
     4 .4116E+03, .5196E+00, .2191E-01, .7456E-04,-.3667E-05,
     4 .3674E+03, .3179E+00, .1746E-01, .1248E-03,-.3306E-05,
     4 .3502E+03, .2198E+00, .8108E-02, .1192E-04,-.1179E-05,
     5 .3956E+04,-.9684E+01,-.2756E+00, .1190E-02, .3309E-04,
     5 .3956E+04,-.9688E+01,-.2756E+00, .1190E-02, .3309E-04,
     5 .3955E+04,-.9684E+01,-.2756E+00, .1190E-02, .3310E-04,
     5 .3955E+04,-.9684E+01,-.2756E+00, .1190E-02, .3309E-04,
     5 .3954E+04,-.9684E+01,-.2756E+00, .1190E-02, .3310E-04,
     5 .3952E+04,-.9684E+01,-.2756E+00, .1190E-02, .3311E-04,
     5 .3949E+04,-.9684E+01,-.2755E+00, .1191E-02, .3312E-04,
     5 .3943E+04,-.9684E+01,-.2756E+00, .1195E-02, .3321E-04,
     5 .3930E+04,-.9680E+01,-.2754E+00, .1195E-02, .3328E-04,
     5 .3903E+04,-.9664E+01,-.2752E+00, .1196E-02, .3339E-04,
     5 .3804E+04,-.9592E+01,-.2737E+00, .1193E-02, .3378E-04,
     5 .3734E+04,-.1061E+02,-.2560E+00, .2086E-02, .2102E-04,
     5 .3032E+04, .9632E+00, .3287E-01,-.2678E-03,-.1206E-04,
     5 .2910E+04, .6236E+00, .2294E-01,-.1914E-03,-.9672E-05,
     5 .2743E+04, .1983E+01, .3851E-01,-.1425E-02,-.2592E-04,
     5 .2118E+04, .9328E+01, .2214E+00,-.2838E-02,-.4424E-04,
     5 .1852E+04, .5196E+00,-.2855E-01,-.9160E-03, .9244E-05,
     5 .1217E+04,-.2219E+01,-.7616E-01, .5096E-03, .2496E-04,
     5 .6204E+03,-.1749E+00,-.1348E-01, .5316E-03, .2213E-04,
     5 .1615E+03, .6936E+01, .1902E+00,-.9124E-03,-.1962E-04,
     5 .1904E+03,-.4192E-01, .2323E-02, .6436E-04,-.1037E-05,
     5 .1386E+03, .2807E+00, .5912E-02,-.4012E-04, .5732E-06,
     5 .1503E+03, .4096E+00, .6616E-02,-.1279E-03, .5024E-06,
     5 .2210E+03, .1447E+00, .1008E-02,-.5940E-04, .8608E-06,
     5 .3346E+03, .6364E-01,-.6224E-02,-.1564E-03, .2112E-05,
     5 .5816E+03,-.6336E+00,-.1241E-01, .1678E-03, .1669E-06,
     5 .7484E+03,-.2662E+00, .1446E-01, .4064E-03,-.6384E-05,
     5 .8964E+03, .5260E+00, .6216E-01, .7264E-03,-.1772E-04 /
      DATA ((( CL4CH4GH(K,J,I), K = 1, 5), J = 1, 28), I = 1, 3) /
     1 .8700E+00, .1887E-01, .1585E-03, .6363E-06, .1081E-08,
     1 .8721E+00, .1898E-01, .1413E-03, .5553E-06, .3840E-08,
     1 .8595E+00, .1880E-01, .1489E-03, .5433E-06, .2285E-08,
     1 .8466E+00, .1902E-01, .1696E-03, .4416E-06,-.1869E-08,
     1 .8448E+00, .1890E-01, .1844E-03, .5346E-06,-.3618E-08,
     1 .8460E+00, .1804E-01, .1724E-03, .7254E-06,-.4830E-09,
     1 .8769E+00, .1775E-01, .1611E-03, .7674E-06, .1459E-08,
     1 .9585E+00, .1811E-01, .1305E-03, .8235E-06, .8208E-08,
     1 .1076E+01, .1884E-01, .1309E-03, .7077E-06, .7203E-08,
     1 .1241E+01, .1978E-01, .1883E-03, .6351E-06,-.3513E-08,
     1 .1919E+01, .2328E-01, .1845E-03, .4407E-06,-.3924E-08,
     1 .2375E+01, .2612E-01, .1809E-03, .1315E-06,-.4521E-08,
     1 .2954E+01, .2696E-01, .1611E-03, .3363E-06,-.1368E-08,
     1 .3774E+01, .2908E-01, .4320E-04, .5202E-06, .2121E-07,
     1 .4824E+01, .3621E-01, .7428E-04,-.4026E-06, .1263E-07,
     1 .6174E+01, .4110E-01, .2357E-03,-.7044E-06,-.1811E-07,
     1 .8148E+01, .4674E-01, .2657E-03,-.1123E-06,-.1929E-07,
     1 .1036E+02, .4995E-01, .6102E-03, .7980E-06,-.7266E-07,
     1 .1414E+02, .6255E-01, .2994E-03, .1214E-06,-.3504E-07,
     1 .1903E+02, .7083E-01,-.1424E-03, .2311E-05, .2283E-07,
     1 .2470E+02, .1071E+00, .4068E-03,-.2388E-05,-.5868E-07,
     1 .3108E+02, .1164E+00, .3711E-03,-.2117E-05, .2126E-07,
     1 .3771E+02, .1077E+00, .1159E-02, .3057E-05,-.9174E-07,
     1 .4809E+02, .1572E+00,-.8061E-03,-.7326E-06, .1206E-06,
     1 .5589E+02, .2635E+00,-.2446E-02,-.9432E-05, .3012E-06,
     1 .6153E+02, .3111E+00,-.5085E-03,-.9444E-05, .6441E-07,
     1 .6975E+02, .3501E+00, .4641E-03,-.2692E-05,-.9003E-07,
     1 .8316E+02, .4320E+00,-.2826E-02,-.1446E-04, .4611E-06,
     2 .8589E+00, .1775E-01, .1834E-03, .1063E-05,-.4194E-09,
     2 .8619E+00, .1764E-01, .1781E-03, .1091E-05, .5043E-09,
     2 .8634E+00, .1822E-01, .1967E-03, .1024E-05,-.2585E-08,
     2 .8694E+00, .1804E-01, .1970E-03, .1136E-05,-.1791E-08,
     2 .8784E+00, .1763E-01, .1835E-03, .1063E-05,-.1280E-08,
     2 .8652E+00, .1762E-01, .2120E-03, .1033E-05,-.6234E-08,
     2 .9228E+00, .1781E-01, .2100E-03, .9363E-06,-.7014E-08,
     2 .1009E+01, .1795E-01, .1923E-03, .8424E-06,-.4398E-08,
     2 .1153E+01, .1739E-01, .1936E-03, .1064E-05,-.4563E-08,
     2 .1369E+01, .1763E-01, .1357E-03, .7248E-06, .3159E-08,
     2 .2197E+01, .2318E-01, .1815E-03,-.4185E-06,-.2029E-07,
     2 .2599E+01, .2272E-01, .1598E-03, .9402E-07,-.1427E-07,
     2 .3441E+01, .2298E-01,-.6693E-04, .9123E-06, .2633E-07,
     2 .4131E+01, .2627E-01, .8970E-04, .1018E-05, .4293E-08,
     2 .5148E+01, .2958E-01, .1367E-03, .1379E-05,-.5712E-08,
     2 .6624E+01, .2888E-01,-.8442E-04, .3177E-05, .3993E-07,
     2 .8817E+01, .5097E-01, .5445E-04,-.1598E-05, .3513E-08,
     2 .1220E+02, .6765E-01,-.1743E-03,-.3681E-05, .3231E-07,
     2 .1527E+02, .6414E-01, .6732E-04, .2051E-05, .3408E-07,
     2 .1929E+02, .7989E-01, .3669E-03,-.2651E-05, .3153E-09,
     2 .2435E+02, .7494E-01, .7125E-05, .2423E-05, .4284E-07,
     2 .3306E+02, .8523E-01,-.1250E-02, .6003E-05, .1263E-06,
     2 .4257E+02, .2278E+00,-.4995E-03,-.2163E-04,-.2819E-07,
     2 .5352E+02, .1195E+00, .1703E-02, .8169E-05,-.4698E-06,
     2 .7062E+02, .4803E-01, .1991E-02, .5082E-04,-.8274E-06,
     2 .9615E+02, .2264E+00,-.1710E-01, .4059E-04, .2430E-05,
     2 .9891E+02, .5631E+00,-.1117E-01,-.3456E-05, .1443E-05,
     2 .9564E+02, .8934E+00, .6780E-03,-.4305E-04,-.6852E-06,
     3 .9288E+00, .2126E-01, .1902E-03, .4353E-06,-.2975E-08,
     3 .9306E+00, .2115E-01, .1935E-03, .4560E-06,-.3603E-08,
     3 .9387E+00, .2134E-01, .1973E-03, .4104E-06,-.4506E-08,
     3 .9636E+00, .2127E-01, .1868E-03, .4221E-06,-.3084E-08,
     3 .9810E+00, .2158E-01, .1865E-03, .3675E-06,-.2958E-08,
     3 .1034E+01, .2176E-01, .1823E-03, .3576E-06,-.2314E-08,
     3 .1118E+01, .2164E-01, .1850E-03, .4491E-06,-.2807E-08,
     3 .1232E+01, .2098E-01, .2039E-03, .7506E-06,-.4689E-08,
     3 .1621E+01, .2367E-01, .1262E-03, .3819E-06, .5298E-08,
     3 .2102E+01, .2708E-01, .1778E-03, .2137E-06,-.5181E-08,
     3 .3567E+01, .3681E-01, .2037E-03,-.3219E-07,-.5022E-08,
     3 .4428E+01, .4692E-01, .3123E-03,-.1232E-05,-.2515E-07,
     3 .5760E+01, .5175E-01, .2055E-03,-.1133E-05,-.3948E-08,
     3 .7287E+01, .5418E-01, .2750E-03,-.4224E-06,-.6207E-08,
     3 .9219E+01, .5823E-01, .5517E-03,-.2557E-06,-.3555E-07,
     3 .1274E+02, .6270E-01, .2239E-03,-.3996E-06, .1998E-07,
     3 .1728E+02, .6105E-01, .3735E-03, .9441E-06, .2895E-08,
     3 .2393E+02, .5451E-01, .6534E-03, .2003E-05,-.7485E-07,
     3 .3444E+02, .4383E-01,-.2811E-03, .5136E-05, .7017E-07,
     3 .4809E+02, .4314E-01,-.7395E-03, .6189E-05, .1073E-06,
     3 .6579E+02, .5343E-01,-.1095E-02, .1158E-04, .8841E-07,
     3 .9036E+02, .9243E-01,-.8157E-03, .1553E-04,-.9471E-07,
     3 .1236E+03, .2937E+00,-.4410E-02,-.4323E-06, .4398E-06,
     3 .1607E+03, .5868E+00,-.7134E-02,-.5088E-04, .1144E-05,
     3 .1815E+03, .5172E+00, .1127E-01,-.3252E-04,-.1679E-05,
     3 .2223E+03,-.1233E-01, .5787E-02, .3966E-04,-.4056E-06,
     3 .2791E+03,-.3414E+00,-.1515E-02, .1201E-04, .7755E-07,
     3 .3342E+03,-.3147E+00,-.2453E-02, .3483E-04,-.1173E-06 /
      DATA ((( CL4CH4GH(K,J,I), K = 1, 5), J = 1, 28), I = 4, 5) /
     4 .4757E+04, .3723E+02,-.1232E-01,-.1715E-03, .2729E-05,
     4 .4757E+04, .3723E+02,-.1232E-01,-.1714E-03, .2731E-05,
     4 .4757E+04, .3723E+02,-.1232E-01,-.1714E-03, .2729E-05,
     4 .4758E+04, .3723E+02,-.1231E-01,-.1713E-03, .2728E-05,
     4 .4759E+04, .3722E+02,-.1230E-01,-.1711E-03, .2727E-05,
     4 .4762E+04, .3720E+02,-.1230E-01,-.1710E-03, .2729E-05,
     4 .4768E+04, .3717E+02,-.1225E-01,-.1714E-03, .2737E-05,
     4 .4779E+04, .3709E+02,-.1190E-01,-.1722E-03, .2726E-05,
     4 .4803E+04, .3690E+02,-.1079E-01,-.1692E-03, .2628E-05,
     4 .4856E+04, .3645E+02,-.9280E-02,-.1562E-03, .2479E-05,
     4 .5073E+04, .3486E+02,-.8470E-02,-.1160E-03, .2350E-05,
     4 .5236E+04, .3382E+02,-.1048E-01,-.9670E-04, .2602E-05,
     4 .5475E+04, .3243E+02,-.1390E-01,-.7469E-04, .3056E-05,
     4 .5813E+04, .3057E+02,-.1208E-01,-.3754E-04, .2472E-05,
     4 .6287E+04, .2813E+02,-.1333E-01, .3365E-04, .2126E-05,
     4 .6931E+04, .2547E+02,-.2359E-01, .2483E-04, .3583E-05,
     4 .7753E+04, .2220E+02,-.2430E-01, .1363E-04, .3552E-05,
     4 .8761E+04, .1796E+02,-.2315E-01, .7604E-04, .3398E-05,
     4 .9912E+04, .1323E+02,-.2065E-01, .2217E-03, .1908E-05,
     4 .1108E+05, .9344E+01,-.3527E-01, .1472E-03, .4259E-05,
     4 .1204E+05, .4914E+01,-.1852E-01, .1686E-03, .2102E-05,
     4 .1264E+05, .4016E+00,-.2033E-01, .2019E-03, .3795E-05,
     4 .1273E+05,-.3879E+01,-.4584E-02, .2450E-03, .1802E-05,
     4 .1231E+05,-.7157E+01,-.1190E-01, .1783E-03, .4332E-05,
     4 .1146E+05,-.1005E+02, .1147E-01, .1396E-03, .1857E-05,
     4 .1039E+05,-.1248E+02, .1441E-01, .1426E-03, .2535E-05,
     4 .9251E+04,-.1326E+02, .1343E-01, .8996E-04, .3177E-05,
     4 .8208E+04,-.1274E+02, .1830E-01, .6832E-04, .2486E-05,
     5 .2579E+06,-.5724E+03,-.1749E+00, .7040E-02, .5157E-04,
     5 .2579E+06,-.5723E+03,-.1754E+00, .7039E-02, .5167E-04,
     5 .2579E+06,-.5723E+03,-.1755E+00, .7036E-02, .5167E-04,
     5 .2579E+06,-.5722E+03,-.1754E+00, .7035E-02, .5164E-04,
     5 .2579E+06,-.5721E+03,-.1755E+00, .7034E-02, .5164E-04,
     5 .2578E+06,-.5718E+03,-.1757E+00, .7031E-02, .5163E-04,
     5 .2577E+06,-.5712E+03,-.1768E+00, .7020E-02, .5172E-04,
     5 .2574E+06,-.5701E+03,-.1776E+00, .7002E-02, .5164E-04,
     5 .2568E+06,-.5679E+03,-.1814E+00, .6972E-02, .5195E-04,
     5 .2557E+06,-.5631E+03,-.1885E+00, .6883E-02, .5277E-04,
     5 .2517E+06,-.5460E+03,-.2030E+00, .6495E-02, .5515E-04,
     5 .2487E+06,-.5342E+03,-.1863E+00, .6232E-02, .5273E-04,
     5 .2444E+06,-.5180E+03,-.1508E+00, .5899E-02, .4738E-04,
     5 .2385E+06,-.4955E+03,-.1888E+00, .5289E-02, .5658E-04,
     5 .2302E+06,-.4653E+03,-.1771E+00, .4150E-02, .6117E-04,
     5 .2188E+06,-.4324E+03,-.3606E-01, .4062E-02, .4050E-04,
     5 .2039E+06,-.3916E+03,-.6078E-02, .3974E-02, .3790E-04,
     5 .1853E+06,-.3383E+03, .1536E-01, .2900E-02, .3585E-04,
     5 .1632E+06,-.2789E+03, .9858E-02, .6367E-03, .5666E-04,
     5 .1386E+06,-.2343E+03, .2216E+00, .1417E-02, .2702E-04,
     5 .1138E+06,-.1868E+03, .1016E+00, .7532E-03, .4567E-04,
     5 .9064E+05,-.1440E+03, .1976E+00, .7790E-04, .2259E-04,
     5 .7047E+05,-.1085E+03, .1522E+00,-.5594E-03, .2874E-04,
     5 .5398E+05,-.8334E+02, .2023E+00,-.6550E-03, .1868E-04,
     5 .4124E+05,-.6157E+02, .1818E+00,-.1532E-02, .2463E-04,
     5 .3195E+05,-.5278E+02, .2321E+00,-.6407E-03, .9920E-05,
     5 .2647E+05,-.4635E+02, .1244E+00,-.3183E-03, .7762E-05,
     5 .2338E+05,-.4074E+02, .5421E-01,-.1589E-03, .9273E-05 /
 
C
C----------------------------------------------------------------------C
C     SPECTRAL REGION: 980-1100 CM^-1. GAS: H2O, O3                    C
C----------------------------------------------------------------------C
C
      COMMON /BANDL5/ GWL5(2), CL5H2O(5,18,2), CL5O3(5,18,2),
     1                         CL5CS(5,4,2), CL5CF(5,4,2),
     2                         CL5F11(2), CL5F12(2)
      DATA GWL5 / .59500, .27000 /
C
      DATA (CL5F11(I), I = 1, 2) / 1526.4, 152.1 /
      DATA (CL5F12(I), I = 1, 2) / 1404.3, 12.13 /
C
      DATA ((( CL5H2O(K,J,I), K = 1, 5), J = 1, 18), I = 1, 2) /
     1 .1199E-04, .3452E-06, .3698E-08, .1688E-10, .2669E-13,
     1 .1776E-04, .5178E-06, .5692E-08, .2394E-10,-.9638E-15,
     1 .2650E-04, .7678E-06, .8330E-08, .3730E-10, .3919E-13,
     1 .3945E-04, .1140E-05, .1221E-07, .5509E-10, .8179E-13,
     1 .5863E-04, .1697E-05, .1830E-07, .8018E-10, .7755E-13,
     1 .8687E-04, .2499E-05, .2670E-07, .1238E-09, .2242E-12,
     1 .1281E-03, .3732E-05, .4083E-07, .1763E-09, .7845E-13,
     1 .1888E-03, .5512E-05, .6031E-07, .2707E-09, .2675E-12,
     1 .2760E-03, .8048E-05, .8772E-07, .4009E-09, .5227E-12,
     1 .3990E-03, .1166E-04, .1275E-06, .5941E-09, .9192E-12,
     1 .5720E-03, .1687E-04, .1881E-06, .8442E-09, .5834E-12,
     1 .8128E-03, .2387E-04, .2675E-06, .1277E-08, .1619E-11,
     1 .1148E-02, .3365E-04, .3711E-06, .1627E-08, .9590E-12,
     1 .1593E-02, .4704E-04, .5275E-06, .2319E-08, .8217E-12,
     1 .2157E-02, .6330E-04, .7332E-06, .3460E-08, .8971E-12,
     1 .2896E-02, .8347E-04, .9484E-06, .4549E-08, .3177E-11,
     1 .3820E-02, .1071E-03, .1158E-05, .5380E-08, .5630E-11,
     1 .4987E-02, .1364E-03, .1349E-05, .6183E-08, .1832E-10,
     2 .1105E-04, .3303E-06, .3827E-08, .1485E-10,-.3545E-13,
     2 .1649E-04, .4848E-06, .5454E-08, .2438E-10, .7586E-14,
     2 .2440E-04, .7254E-06, .8353E-08, .3456E-10,-.4444E-13,
     2 .3615E-04, .1091E-05, .1294E-07, .5181E-10,-.1218E-12,
     2 .5385E-04, .1606E-05, .1879E-07, .8369E-10,-.4627E-13,
     2 .8044E-04, .2408E-05, .2803E-07, .1162E-09,-.1638E-12,
     2 .1199E-03, .3529E-05, .4009E-07, .1841E-09, .9172E-13,
     2 .1801E-03, .5244E-05, .5750E-07, .2597E-09, .2938E-12,
     2 .2675E-03, .7872E-05, .8875E-07, .4029E-09, .2491E-12,
     2 .3930E-03, .1162E-04, .1349E-06, .6092E-09,-.1131E-12,
     2 .5813E-03, .1676E-04, .1875E-06, .9503E-09, .1692E-11,
     2 .8444E-03, .2467E-04, .2840E-06, .1246E-08,-.8799E-12,
     2 .1225E-02, .3499E-04, .3994E-06, .2118E-08, .3382E-11,
     2 .1822E-02, .5009E-04, .5195E-06, .2921E-08, .1109E-10,
     2 .2649E-02, .7517E-04, .7642E-06, .3027E-08, .3209E-11,
     2 .3729E-02, .1078E-03, .1124E-05, .3997E-08,-.4317E-11,
     2 .4991E-02, .1468E-03, .1554E-05, .6573E-08, .8653E-11,
     2 .6182E-02, .1898E-03, .2226E-05, .9410E-08,-.7934E-11 /
      DATA ((( CL5O3(K,J,I), K = 1, 5), J = 1, 18), I = 1, 2) /
     1 .7227E+01, .6737E-01, .2301E-03, .9636E-07,-.3997E-08,
     1 .9629E+01, .8488E-01, .2596E-03,-.1467E-07,-.5302E-08,
     1 .1295E+02, .1082E+00, .2804E-03,-.1549E-06,-.4808E-08,
     1 .1755E+02, .1392E+00, .2985E-03,-.2718E-06,-.4402E-08,
     1 .2382E+02, .1807E+00, .3017E-03,-.4668E-06,-.1571E-08,
     1 .3224E+02, .2364E+00, .3046E-03,-.9947E-06, .7062E-09,
     1 .4321E+02, .3102E+00, .3024E-03,-.1909E-05, .7458E-08,
     1 .5702E+02, .4064E+00, .4323E-03,-.3237E-05,-.2147E-08,
     1 .7388E+02, .5251E+00, .6050E-03,-.4465E-05,-.9082E-08,
     1 .9364E+02, .6619E+00, .8856E-03,-.4863E-05,-.2401E-07,
     1 .1161E+03, .8160E+00, .1052E-02,-.5650E-05,-.1708E-07,
     1 .1419E+03, .9792E+00, .1153E-02,-.6110E-05,-.8594E-08,
     1 .1716E+03, .1144E+01, .1234E-02,-.5189E-05,-.2551E-07,
     1 .2053E+03, .1309E+01, .1311E-02,-.2540E-05,-.9645E-07,
     1 .2413E+03, .1505E+01, .6268E-03,-.2568E-05,-.5036E-07,
     1 .2762E+03, .1718E+01,-.2570E-03,-.1056E-05,-.1939E-07,
     1 .3056E+03, .1961E+01,-.8495E-03,-.6960E-05, .2950E-07,
     1 .3272E+03, .2169E+01,-.6410E-03,-.1738E-04, .3894E-07,
     2 .1420E+03, .1113E+01, .3418E-02, .5459E-05, .4714E-07,
     2 .1711E+03, .1199E+01, .3319E-02, .3513E-05, .4462E-07,
     2 .2093E+03, .1323E+01, .3506E-02,-.1264E-05, .1046E-07,
     2 .2597E+03, .1463E+01, .3852E-02,-.3441E-05,-.5330E-07,
     2 .3260E+03, .1631E+01, .3808E-02,-.4302E-05,-.4033E-07,
     2 .4122E+03, .1813E+01, .3875E-02,-.4645E-05,-.8157E-07,
     2 .5227E+03, .1998E+01, .3714E-02,-.7030E-05,-.1000E-06,
     2 .6645E+03, .2100E+01, .3737E-02,-.2429E-05,-.1654E-06,
     2 .8466E+03, .2074E+01, .3199E-02, .5591E-05,-.2743E-06,
     2 .1078E+04, .1932E+01,-.5908E-03, .1557E-04,-.2044E-07,
     2 .1353E+04, .1757E+01,-.3764E-02, .1058E-04, .8142E-07,
     2 .1656E+04, .1481E+01,-.5733E-02, .9746E-05, .3976E-07,
     2 .1959E+04, .1076E+01,-.5487E-02, .1454E-04,-.1805E-06,
     2 .2239E+04, .4363E+00,-.6362E-02, .2840E-04,-.1221E-06,
     2 .2475E+04,-.2581E+00,-.5978E-02, .1979E-04,-.1271E-07,
     2 .2664E+04,-.9293E+00,-.9063E-02, .2347E-04, .4743E-06,
     2 .2803E+04,-.1565E+01,-.4884E-02, .3316E-04,-.3786E-06,
     2 .2915E+04,-.2057E+01,-.4014E-02, .4109E-04,-.6772E-06 /
      DATA ((( CL5CS(K,J,I), K = 1, 5), J = 1, 4), I = 1, 2) /
     1 .4632E+01,-.1078E+00, .1342E-02,-.1431E-04, .8921E-07,
     1 .6883E+01,-.1601E+00, .1991E-02,-.2127E-04, .1330E-06,
     1 .1023E+02,-.2378E+00, .2957E-02,-.3161E-04, .1978E-06,
     1 .1520E+02,-.3535E+00, .4395E-02,-.4686E-04, .2923E-06,
     2 .4540E+01,-.1051E+00, .1301E-02,-.1384E-04, .8638E-07,
     2 .6735E+01,-.1564E+00, .1939E-02,-.2051E-04, .1270E-06,
     2 .9997E+01,-.2325E+00, .2885E-02,-.3044E-04, .1882E-06,
     2 .1485E+02,-.3453E+00, .4284E-02,-.4530E-04, .2808E-06 /
      DATA ((( CL5CF(K,J,I), K = 1, 5), J = 1, 4), I = 1, 2) /
     1 .2729E-04,-.1128E-06, .4232E-09,-.1910E-11, .7769E-14,
     1 .4053E-04,-.1672E-06, .6241E-09,-.2850E-11, .1225E-13,
     1 .6017E-04,-.2479E-06, .9307E-09,-.4219E-11, .1739E-13,
     1 .8929E-04,-.3675E-06, .1386E-08,-.6293E-11, .2534E-13,
     2 .2415E-04,-.9788E-07, .3696E-09,-.1732E-11, .7413E-14,
     2 .3575E-04,-.1453E-06, .5643E-09,-.2588E-11, .8712E-14,
     2 .5297E-04,-.2160E-06, .8246E-09,-.3847E-11, .1521E-13,
     2 .7852E-04,-.3215E-06, .1206E-08,-.5637E-11, .2550E-13 /
C
      COMMON /BANDL5GH/ GWL5GH(4), CL5H2OGH(5,28,4), CL5O3GH(5,28,4),
     1                             CL5CSGH(5,4,2), CL5CFGH(5,4,2)
      DATA GWL5GH / .06800, .04000, .02000, .00700 /
      DATA ((( CL5H2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 1, 2) /
     1-.7654E-07,-.4227E-10, .7509E-10, .2732E-13,-.1185E-13,
     1-.2006E-07, .2266E-09, .3211E-10, .4164E-13,-.4422E-14,
     1 .2940E-07, .8358E-09, .8166E-11, .2437E-13,-.2927E-16,
     1 .5849E-07, .1670E-08, .1713E-10, .5471E-13,-.1257E-15,
     1 .1186E-06, .3448E-08, .3590E-10, .9692E-13,-.5131E-15,
     1 .2457E-06, .6849E-08, .6347E-10, .2321E-12, .7383E-15,
     1 .4934E-06, .1358E-07, .1248E-09, .5416E-12, .2615E-14,
     1 .1005E-05, .2888E-07, .2864E-09, .8145E-12,-.1790E-14,
     1 .2063E-05, .5785E-07, .5505E-09, .1925E-11, .3449E-14,
     1 .4126E-05, .1123E-06, .1066E-08, .5289E-11, .2494E-13,
     1 .1213E-04, .3413E-06, .3351E-08, .1183E-10, .8867E-14,
     1 .1827E-04, .5080E-06, .4635E-08, .1788E-10, .7838E-13,
     1 .2686E-04, .7628E-06, .7242E-08, .2259E-10, .2242E-13,
     1 .3961E-04, .1110E-05, .1056E-07, .3696E-10, .6435E-13,
     1 .5720E-04, .1690E-05, .1799E-07, .4245E-10,-.3654E-12,
     1 .8458E-04, .2599E-05, .2917E-07, .6167E-10,-.7969E-12,
     1 .1284E-03, .3760E-05, .3775E-07, .1339E-09, .1346E-12,
     1 .1771E-03, .5522E-05, .6646E-07, .2150E-09,-.1313E-11,
     1 .2619E-03, .8018E-05, .9340E-07, .2641E-09,-.2127E-11,
     1 .3956E-03, .1205E-04, .1389E-06, .3524E-09,-.3647E-11,
     1 .5623E-03, .1707E-04, .1992E-06, .5093E-09,-.5530E-11,
     1 .8228E-03, .2325E-04, .2358E-06, .9902E-09, .1748E-11,
     1 .1191E-02, .3244E-04, .2971E-06, .1749E-08, .1240E-10,
     1 .1610E-02, .4717E-04, .5064E-06, .1976E-08,-.3265E-12,
     1 .2351E-02, .6762E-04, .6379E-06, .2052E-08, .4956E-11,
     1 .3566E-02, .1057E-03, .9799E-06, .1821E-08,-.4604E-11,
     1 .4778E-02, .1530E-03, .1767E-05, .1962E-08,-.7291E-10,
     1 .6378E-02, .2029E-03, .2534E-05, .9835E-08,-.3423E-10,
     2 .4716E+00, .1382E-01, .1508E-03, .6249E-06, .7696E-10,
     2 .4737E+00, .1388E-01, .1515E-03, .6278E-06, .7874E-10,
     2 .4758E+00, .1394E-01, .1521E-03, .6306E-06, .7832E-10,
     2 .4779E+00, .1401E-01, .1528E-03, .6333E-06, .7815E-10,
     2 .4800E+00, .1407E-01, .1535E-03, .6361E-06, .7898E-10,
     2 .4821E+00, .1413E-01, .1541E-03, .6389E-06, .7892E-10,
     2 .4841E+00, .1419E-01, .1548E-03, .6416E-06, .8011E-10,
     2 .4862E+00, .1425E-01, .1555E-03, .6443E-06, .8048E-10,
     2 .4882E+00, .1430E-01, .1560E-03, .6471E-06, .8212E-10,
     2 .4902E+00, .1436E-01, .1567E-03, .6497E-06, .8495E-10,
     2 .4915E+00, .1441E-01, .1572E-03, .6503E-06, .5395E-10,
     2 .4933E+00, .1446E-01, .1577E-03, .6542E-06, .7476E-10,
     2 .4955E+00, .1450E-01, .1578E-03, .6581E-06, .1603E-09,
     2 .4970E+00, .1461E-01, .1602E-03, .6482E-06,-.2112E-09,
     2 .4997E+00, .1461E-01, .1588E-03, .6692E-06, .2870E-09,
     2 .5010E+00, .1462E-01, .1584E-03, .6711E-06, .3862E-09,
     2 .5018E+00, .1474E-01, .1613E-03, .6482E-06,-.2112E-09,
     2 .5019E+00, .1472E-01, .1606E-03, .6691E-06, .1435E-09,
     2 .5009E+00, .1469E-01, .1604E-03, .6667E-06, .1074E-09,
     2 .4986E+00, .1464E-01, .1600E-03, .6653E-06, .9096E-10,
     2 .4943E+00, .1450E-01, .1586E-03, .6593E-06, .6827E-10,
     2 .4860E+00, .1431E-01, .1577E-03, .6476E-06,-.1598E-09,
     2 .4790E+00, .1403E-01, .1519E-03, .6259E-06, .1653E-09,
     2 .4669E+00, .1377E-01, .1509E-03, .6118E-06,-.1115E-09,
     2 .4504E+00, .1330E-01, .1455E-03, .5929E-06,-.2088E-10,
     2 .4307E+00, .1271E-01, .1392E-03, .5669E-06,-.5525E-10,
     2 .4018E+00, .1189E-01, .1308E-03, .5330E-06,-.8155E-10,
     2 .3688E+00, .1094E-01, .1205E-03, .4936E-06,-.6727E-10 /
      DATA ((( CL5H2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 3, 4) /
     3 .1975E-02, .8771E-04, .1749E-05, .1968E-07, .9965E-10,
     3 .1976E-02, .8773E-04, .1749E-05, .1968E-07, .9966E-10,
     3 .1977E-02, .8776E-04, .1749E-05, .1968E-07, .9966E-10,
     3 .1979E-02, .8782E-04, .1749E-05, .1968E-07, .9966E-10,
     3 .1984E-02, .8794E-04, .1750E-05, .1968E-07, .9967E-10,
     3 .1993E-02, .8818E-04, .1752E-05, .1968E-07, .9970E-10,
     3 .2012E-02, .8868E-04, .1754E-05, .1968E-07, .9980E-10,
     3 .2035E-02, .8970E-04, .1776E-05, .1967E-07, .9737E-10,
     3 .2097E-02, .9175E-04, .1805E-05, .1966E-07, .9501E-10,
     3 .2226E-02, .9607E-04, .1862E-05, .1965E-07, .9057E-10,
     3 .2728E-02, .1056E-03, .1768E-05, .2223E-07, .1534E-09,
     3 .3097E-02, .1184E-03, .1895E-05, .1938E-07, .1089E-09,
     3 .2434E-02, .1423E-03, .3039E-05, .1606E-07,-.7396E-10,
     3 .3276E-02, .3815E-04,-.6392E-06, .4120E-07, .6979E-09,
     3 .1292E-02, .1253E-03, .3249E-05, .1574E-08,-.3267E-09,
     3 .1511E-02, .1822E-03, .4974E-05, .7616E-09,-.5322E-09,
     3 .2065E-02, .3523E-05,-.2470E-06, .5055E-07, .7047E-09,
     3 .2866E-02, .8566E-04, .1400E-05, .7920E-08,-.3194E-10,
     3 .4800E-02, .1201E-03, .1055E-05, .1082E-07, .1046E-09,
     3 .6333E-02, .1705E-03, .1582E-05,-.2512E-08,-.1049E-09,
     3 .9130E-02, .2425E-03, .1998E-05, .9971E-08, .1034E-09,
     3 .1613E-01, .3682E-03, .8668E-06, .1063E-07, .4306E-09,
     3 .1386E-01, .4767E-03, .7866E-05, .3283E-07,-.2597E-09,
     3 .1393E-01, .3021E-03, .2470E-05, .2731E-07, .2545E-09,
     3 .1274E-01, .2569E-03, .2541E-05, .2895E-07, .1749E-09,
     3 .4975E-02, .9229E-04, .1107E-05, .3766E-07, .4034E-09,
     3 .6847E-02, .1176E-03, .1078E-05, .3656E-07, .4049E-09,
     3 .8163E-02, .1578E-03, .1467E-05, .8812E-08, .8120E-12,
     4 .1003E-03, .2113E-05, .1250E-07,-.7693E-11,-.1713E-12,
     4 .1003E-03, .2115E-05, .1251E-07,-.7643E-11,-.1707E-12,
     4 .1005E-03, .2119E-05, .1254E-07,-.7440E-11,-.1691E-12,
     4 .1008E-03, .2127E-05, .1260E-07,-.7069E-11,-.1653E-12,
     4 .1015E-03, .2144E-05, .1272E-07,-.6313E-11,-.1584E-12,
     4 .1029E-03, .2177E-05, .1297E-07,-.4854E-11,-.1439E-12,
     4 .1057E-03, .2244E-05, .1347E-07,-.1776E-11,-.1144E-12,
     4 .1114E-03, .2382E-05, .1449E-07, .4365E-11,-.5653E-13,
     4 .1229E-03, .2660E-05, .1656E-07, .1684E-10, .6300E-13,
     4 .1463E-03, .3222E-05, .2065E-07, .4198E-10, .3147E-12,
     4 .2351E-03, .5446E-05, .3916E-07, .1354E-09, .8846E-12,
     4 .3027E-03, .7053E-05, .4966E-07, .2098E-09, .1853E-11,
     4 .4006E-03, .9441E-05, .6829E-07, .3165E-09, .2729E-11,
     4 .5457E-03, .1170E-04, .7246E-07, .1601E-08, .2115E-10,
     4 .6958E-03, .2474E-04, .4081E-06, .6539E-09,-.2852E-10,
     4 .9830E-03, .3472E-04, .5765E-06, .1280E-08,-.3606E-10,
     4 .1416E-02, .5141E-04, .8230E-06, .1365E-08,-.5324E-10,
     4 .2046E-02, .7889E-04, .1119E-05, .1223E-08,-.6010E-10,
     4 .1965E-02, .1172E-03, .2723E-05, .1967E-08,-.2599E-09,
     4 .2618E-02, .2531E-04, .8428E-07, .3269E-07, .4267E-09,
     4 .3062E-02, .8200E-04, .1184E-05, .3648E-08,-.6129E-10,
     4 .1906E-02, .2289E-04, .1368E-06, .1956E-07, .2512E-09,
     4 .2480E-02, .3805E-04, .3607E-06, .9217E-08, .8740E-10,
     4 .3818E-02, .3690E-04, .3426E-06, .7042E-08, .1646E-10,
     4 .7511E-02, .9734E-04, .2720E-07, .4261E-09, .3096E-10,
     4 .1132E-01, .1903E-03, .4145E-06,-.1841E-07,-.1902E-09,
     4 .1293E-01, .2035E-03,-.2079E-06,-.1947E-07,-.9651E-10,
     4 .1252E-01, .1719E-03,-.6563E-06,-.1314E-07, .1552E-10 /
      DATA ((( CL5O3GH(K,J,I), K = 1, 5), J = 1, 28), I = 1, 2) /
     1 .1235E+04, .1437E+02, .3476E-01,-.1760E-03, .2748E-07,
     1 .1244E+04, .1450E+02, .3664E-01,-.1823E-03,-.2837E-06,
     1 .1256E+04, .1459E+02, .3672E-01,-.1763E-03,-.2575E-06,
     1 .1267E+04, .1472E+02, .3858E-01,-.1803E-03,-.5642E-06,
     1 .1277E+04, .1485E+02, .3967E-01,-.1827E-03,-.6947E-06,
     1 .1292E+04, .1494E+02, .3904E-01,-.1772E-03,-.5306E-06,
     1 .1309E+04, .1501E+02, .3750E-01,-.1704E-03,-.1571E-06,
     1 .1330E+04, .1512E+02, .3972E-01,-.1833E-03,-.5111E-06,
     1 .1365E+04, .1513E+02, .3958E-01,-.1923E-03,-.3143E-06,
     1 .1427E+04, .1492E+02, .4083E-01,-.1917E-03,-.2172E-06,
     1 .1668E+04, .1372E+02, .4072E-01,-.1408E-03,-.6785E-06,
     1 .1853E+04, .1292E+02, .3722E-01,-.9009E-04,-.8662E-06,
     1 .2117E+04, .1202E+02, .2847E-01,-.6750E-04,-.3243E-06,
     1 .2484E+04, .1080E+02, .1706E-01,-.2108E-04, .3646E-06,
     1 .2969E+04, .9694E+01, .5055E-02,-.4960E-04, .1103E-05,
     1 .3579E+04, .8069E+01, .6587E-02,-.5096E-04,-.5986E-06,
     1 .4328E+04, .5771E+01,-.7496E-02,-.1220E-04, .2698E-06,
     1 .5148E+04, .3211E+01,-.4069E-02, .4743E-04,-.1966E-05,
     1 .5954E+04, .1135E+01,-.9591E-02, .3693E-05,-.2039E-05,
     1 .6605E+04,-.1389E+01,-.7061E-02, .4273E-04,-.2449E-05,
     1 .7002E+04,-.3843E+01, .5711E-03, .3050E-04,-.2514E-05,
     1 .7122E+04,-.6037E+01,-.1215E-01, .1899E-05, .1128E-05,
     1 .6973E+04,-.7800E+01, .2080E-03,-.3970E-04, .1924E-06,
     1 .6627E+04,-.9133E+01, .6821E-02, .4145E-04,-.5536E-06,
     1 .6188E+04,-.9111E+01, .3886E-02, .2176E-04, .3929E-06,
     1 .5749E+04,-.8867E+01, .7791E-02, .1619E-04, .2636E-06,
     1 .5424E+04,-.9020E+01, .1058E-01, .4350E-04,-.1057E-07,
     1 .5168E+04,-.9070E+01, .9129E-02, .4971E-04, .3295E-06,
     2 .7157E+02, .8460E+00, .6690E-02,-.2680E-05,-.8151E-06,
     2 .7449E+02, .8585E+00, .4937E-02, .1631E-05,-.4676E-06,
     2 .7553E+02, .9243E+00, .5326E-02,-.7469E-05,-.5097E-06,
     2 .7747E+02, .9323E+00, .3551E-02,-.4554E-05,-.1456E-06,
     2 .7949E+02, .9316E+00, .2689E-02,-.3205E-05, .2839E-08,
     2 .7936E+02, .9821E+00, .4394E-02,-.1273E-04,-.2897E-06,
     2 .8052E+02, .1046E+01, .6462E-02,-.2437E-04,-.6985E-06,
     2 .8358E+02, .1014E+01, .4208E-02,-.1568E-04,-.2126E-06,
     2 .8608E+02, .1023E+01, .5603E-02,-.1633E-04,-.4437E-06,
     2 .9581E+02, .1002E+01, .5243E-02,-.1903E-04,-.5671E-06,
     2 .1127E+03, .9163E+00, .4838E-02,-.1098E-04,-.5042E-06,
     2 .1285E+03, .9922E+00, .4078E-02,-.2246E-04,-.2863E-06,
     2 .1508E+03, .9634E+00, .4752E-02,-.5648E-05,-.4935E-06,
     2 .1786E+03, .1134E+01, .5403E-02,-.3748E-04,-.5169E-06,
     2 .2172E+03, .9412E+00, .9844E-02,-.3387E-05,-.1518E-05,
     2 .2727E+03, .8324E+00, .9425E-03, .2089E-04,-.1031E-07,
     2 .3342E+03, .8265E+00, .4453E-02, .4150E-04,-.7344E-06,
     2 .4196E+03, .1106E+01,-.1299E-01,-.7813E-05, .2289E-05,
     2 .5050E+03, .1058E+01,-.1588E-01,-.6986E-05, .2980E-05,
     2 .5807E+03, .1296E+01,-.8803E-02,-.6923E-04, .2207E-05,
     2 .6610E+03, .1030E+01,-.8179E-02,-.4433E-05, .1702E-05,
     2 .7302E+03, .9501E+00, .7137E-02, .4027E-04,-.1734E-05,
     2 .8080E+03, .1145E+01,-.1154E-01, .5962E-04, .2895E-06,
     2 .8706E+03, .2410E+01,-.1576E-01,-.1432E-03, .1547E-05,
     2 .9180E+03, .2359E+01,-.4957E-02,-.8643E-04,-.6621E-06,
     2 .9676E+03, .1970E+01, .1470E-01,-.1135E-03,-.2863E-05,
     2 .1015E+04, .1572E+01,-.5877E-04,-.1230E-03, .9117E-06,
     2 .1059E+04, .9647E+00,-.3888E-02,-.1913E-04, .1558E-05 /
      DATA ((( CL5O3GH(K,J,I), K = 1, 5), J = 1, 28), I = 3, 4) /
     3 .2169E+05, .7335E+02,-.4330E+00, .1545E-03, .1892E-05,
     3 .2185E+05, .7391E+02,-.4363E+00, .1557E-03, .1912E-05,
     3 .2202E+05, .7445E+02,-.4395E+00, .1569E-03, .1923E-05,
     3 .2219E+05, .7499E+02,-.4427E+00, .1580E-03, .1927E-05,
     3 .2236E+05, .7547E+02,-.4456E+00, .1591E-03, .1939E-05,
     3 .2253E+05, .7590E+02,-.4484E+00, .1596E-03, .1956E-05,
     3 .2272E+05, .7617E+02,-.4501E+00, .1599E-03, .1919E-05,
     3 .2290E+05, .7612E+02,-.4499E+00, .1607E-03, .1741E-05,
     3 .2313E+05, .7545E+02,-.4463E+00, .1577E-03, .1503E-05,
     3 .2340E+05, .7348E+02,-.4362E+00, .1346E-03, .1458E-05,
     3 .2398E+05, .6486E+02,-.4009E+00,-.8347E-04, .4101E-05,
     3 .2441E+05, .5864E+02,-.3582E+00,-.1835E-03, .2996E-05,
     3 .2493E+05, .4948E+02,-.2987E+00,-.1936E-03, .5015E-06,
     3 .2553E+05, .3768E+02,-.2377E+00,-.1325E-03,-.2168E-05,
     3 .2617E+05, .2330E+02,-.2049E+00,-.4649E-05, .8632E-06,
     3 .2668E+05, .8568E+01,-.1820E+00, .5630E-04, .4441E-05,
     3 .2677E+05,-.4442E+01,-.1110E+00,-.1121E-03, .5058E-06,
     3 .2623E+05,-.1553E+02,-.8104E-01,-.1024E-03, .1870E-05,
     3 .2487E+05,-.2402E+02,-.4247E-01, .1475E-03,-.6166E-06,
     3 .2274E+05,-.2679E+02,-.3230E-01,-.2455E-04, .7648E-06,
     3 .2003E+05,-.2667E+02,-.2679E-01,-.1149E-03, .2611E-05,
     3 .1711E+05,-.2494E+02, .4987E-02,-.1531E-03, .4351E-06,
     3 .1436E+05,-.2266E+02, .1446E-01,-.1134E-03, .7320E-06,
     3 .1204E+05,-.1987E+02, .1266E-01,-.9089E-04, .1351E-05,
     3 .1034E+05,-.1722E+02, .6935E-02,-.7658E-04, .1111E-05,
     3 .9135E+04,-.1510E+02, .3963E-02,-.1003E-03, .8410E-06,
     3 .8254E+04,-.1232E+02,-.1244E-02,-.2059E-03, .1421E-05,
     3 .7687E+04,-.1028E+02, .2411E-02,-.3823E-03, .2191E-05,
     4 .1576E+06,-.5123E+03, .4692E+00, .1804E-02,-.5527E-05,
     4 .1576E+06,-.5122E+03, .4689E+00, .1804E-02,-.5497E-05,
     4 .1576E+06,-.5122E+03, .4684E+00, .1802E-02,-.5441E-05,
     4 .1576E+06,-.5119E+03, .4682E+00, .1804E-02,-.5473E-05,
     4 .1575E+06,-.5116E+03, .4672E+00, .1804E-02,-.5457E-05,
     4 .1574E+06,-.5110E+03, .4657E+00, .1806E-02,-.5507E-05,
     4 .1572E+06,-.5096E+03, .4611E+00, .1810E-02,-.5291E-05,
     4 .1568E+06,-.5070E+03, .4528E+00, .1807E-02,-.5027E-05,
     4 .1558E+06,-.5016E+03, .4356E+00, .1805E-02,-.4340E-05,
     4 .1539E+06,-.4910E+03, .4092E+00, .1793E-02,-.4169E-05,
     4 .1471E+06,-.4547E+03, .3347E+00, .1817E-02,-.6128E-05,
     4 .1426E+06,-.4299E+03, .2583E+00, .1659E-02,-.2025E-05,
     4 .1362E+06,-.3969E+03, .1668E+00, .1383E-02, .3499E-05,
     4 .1278E+06,-.3562E+03, .9654E-01, .9971E-03, .7272E-05,
     4 .1169E+06,-.3081E+03, .9909E-01, .5652E-03,-.6837E-06,
     4 .1039E+06,-.2565E+03, .1040E+00, .1636E-03,-.5338E-05,
     4 .8923E+05,-.2060E+03, .2627E-01, .1960E-03, .4067E-05,
     4 .7390E+05,-.1598E+03, .5783E-01,-.1043E-03,-.7839E-06,
     4 .5917E+05,-.1206E+03, .4088E-01,-.6056E-03, .6282E-05,
     4 .4623E+05,-.9289E+02, .5606E-01,-.3440E-03, .4447E-05,
     4 .3570E+05,-.7021E+02, .7477E-01,-.2703E-03,-.6300E-06,
     4 .2761E+05,-.5355E+02, .5410E-01,-.1901E-03,-.7134E-06,
     4 .2162E+05,-.4037E+02, .4764E-01,-.3343E-03, .1002E-05,
     4 .1745E+05,-.3323E+02, .4941E-01,-.2557E-03,-.7868E-07,
     4 .1442E+05,-.2881E+02, .4497E-01,-.2317E-03, .1581E-05,
     4 .1220E+05,-.2478E+02, .4946E-01,-.1645E-03,-.3950E-06,
     4 .1060E+05,-.2295E+02, .4247E-01, .6230E-04,-.1118E-05,
     4 .9390E+04,-.2105E+02, .2323E-01, .1997E-03,-.6701E-06 /
      DATA ((( CL5CSGH(K,J,I), K = 1, 5), J = 1, 4), I = 1, 2) /
     1 .4348E+01,-.1005E+00, .1239E-02,-.1314E-04, .8208E-07,
     1 .6415E+01,-.1484E+00, .1839E-02,-.1945E-04, .1202E-06,
     1 .9472E+01,-.2190E+00, .2706E-02,-.2862E-04, .1775E-06,
     1 .1399E+02,-.3238E+00, .3994E-02,-.4211E-04, .2608E-06,
     2 .4281E+01,-.9904E-01, .1234E-02,-.1305E-04, .8016E-07,
     2 .6346E+01,-.1463E+00, .1800E-02,-.1913E-04, .1202E-06,
     2 .9353E+01,-.2154E+00, .2646E-02,-.2801E-04, .1754E-06,
     2 .1375E+02,-.3143E+00, .3878E-02,-.4270E-04, .2755E-06 /
      DATA ((( CL5CFGH(K,J,I), K = 1, 5), J = 1, 4), I = 1, 2) /
     1 .2394E-04,-.9995E-07, .3865E-09,-.1762E-11, .6796E-14,
     1 .3556E-04,-.1490E-06, .5572E-09,-.2571E-11, .1282E-13,
     1 .5287E-04,-.2219E-06, .8228E-09,-.3875E-11, .2042E-13,
     1 .7859E-04,-.3299E-06, .1299E-08,-.5788E-11, .1850E-13,
     2 .2561E-04,-.1053E-06, .3964E-09,-.1842E-11, .6970E-14,
     2 .3804E-04,-.1560E-06, .5589E-09,-.2537E-11, .1297E-13,
     2 .5644E-04,-.2318E-06, .8781E-09,-.3557E-11, .8562E-14,
     2 .8398E-04,-.3427E-06, .1217E-08,-.5530E-11, .2224E-13 /
C
C----------------------------------------------------------------------C
C     SPECTRAL REGION: 800-980 CM^-1. GAS: H2O                         C
C----------------------------------------------------------------------C
C
      COMMON /BANDL6/ GWL6(3), CL6H2O(5,18,3), CL6F11(5,18,3),
     1                         CL6F12(5,18,3), CL6CS(5,4,3),
     2                         CL6CF(5,4,3)
      DATA GWL6 / .69000, .26500, .04500 /
      DATA ((( CL6H2O(K,J,I), K = 1, 5), J = 1, 18), I = 1, 3) /
     1 .2034E-05, .5496E-07, .5971E-09, .3049E-11, .5524E-14,
     1 .3018E-05, .8157E-07, .8861E-09, .4526E-11, .8197E-14,
     1 .4478E-05, .1210E-06, .1315E-08, .6716E-11, .1217E-13,
     1 .6646E-05, .1796E-06, .1951E-08, .9964E-11, .1806E-13,
     1 .9864E-05, .2666E-06, .2896E-08, .1479E-10, .2687E-13,
     1 .1463E-04, .3957E-06, .4297E-08, .2194E-10, .3991E-13,
     1 .2171E-04, .5872E-06, .6376E-08, .3255E-10, .5925E-13,
     1 .3222E-04, .8714E-06, .9464E-08, .4829E-10, .8792E-13,
     1 .4780E-04, .1293E-05, .1404E-07, .7164E-10, .1305E-12,
     1 .7092E-04, .1919E-05, .2085E-07, .1063E-09, .1929E-12,
     1 .1051E-03, .2847E-05, .3096E-07, .1577E-09, .2825E-12,
     1 .1558E-03, .4222E-05, .4597E-07, .2340E-09, .4123E-12,
     1 .2304E-03, .6253E-05, .6819E-07, .3478E-09, .6146E-12,
     1 .3397E-03, .9236E-05, .1010E-06, .5169E-09, .9155E-12,
     1 .4988E-03, .1357E-04, .1486E-06, .7680E-09, .1434E-11,
     1 .7275E-03, .1977E-04, .2160E-06, .1137E-08, .2385E-11,
     1 .1051E-02, .2856E-04, .3124E-06, .1635E-08, .3326E-11,
     1 .1499E-02, .4073E-04, .4458E-06, .2336E-08, .4737E-11,
     2 .6224E-04, .1760E-05, .2012E-07, .1084E-09, .2104E-12,
     2 .9204E-04, .2605E-05, .2987E-07, .1609E-09, .3066E-12,
     2 .1361E-03, .3858E-05, .4431E-07, .2388E-09, .4499E-12,
     2 .2013E-03, .5710E-05, .6562E-07, .3547E-09, .6832E-12,
     2 .2977E-03, .8454E-05, .9734E-07, .5264E-09, .1003E-11,
     2 .4397E-03, .1251E-04, .1443E-06, .7814E-09, .1473E-11,
     2 .6485E-03, .1845E-04, .2135E-06, .1164E-08, .2243E-11,
     2 .9544E-03, .2719E-04, .3158E-06, .1734E-08, .3350E-11,
     2 .1400E-02, .3989E-04, .4645E-06, .2574E-08, .5141E-11,
     2 .2041E-02, .5804E-04, .6752E-06, .3809E-08, .8410E-11,
     2 .2949E-02, .8364E-04, .9725E-06, .5532E-08, .1268E-10,
     2 .4221E-02, .1191E-03, .1379E-05, .7881E-08, .1873E-10,
     2 .5988E-02, .1679E-03, .1924E-05, .1100E-07, .2742E-10,
     2 .8412E-02, .2350E-03, .2670E-05, .1506E-07, .3740E-10,
     2 .1165E-01, .3245E-03, .3683E-05, .2055E-07, .4842E-10,
     2 .1586E-01, .4391E-03, .4965E-05, .2770E-07, .6569E-10,
     2 .2116E-01, .5844E-03, .6673E-05, .3649E-07, .6974E-10,
     2 .2767E-01, .7531E-03, .8515E-05, .4688E-07, .9368E-10,
     3 .7985E+00, .2077E-01, .2296E-03, .1338E-05, .3583E-08,
     3 .7979E+00, .2076E-01, .2296E-03, .1338E-05, .3580E-08,
     3 .7972E+00, .2075E-01, .2295E-03, .1337E-05, .3576E-08,
     3 .7962E+00, .2073E-01, .2294E-03, .1337E-05, .3573E-08,
     3 .7949E+00, .2071E-01, .2293E-03, .1337E-05, .3568E-08,
     3 .7932E+00, .2067E-01, .2290E-03, .1335E-05, .3561E-08,
     3 .7911E+00, .2063E-01, .2286E-03, .1333E-05, .3553E-08,
     3 .7885E+00, .2056E-01, .2279E-03, .1329E-05, .3544E-08,
     3 .7852E+00, .2047E-01, .2269E-03, .1324E-05, .3530E-08,
     3 .7805E+00, .2034E-01, .2255E-03, .1315E-05, .3509E-08,
     3 .7743E+00, .2018E-01, .2235E-03, .1304E-05, .3480E-08,
     3 .7658E+00, .1993E-01, .2208E-03, .1288E-05, .3440E-08,
     3 .7539E+00, .1960E-01, .2171E-03, .1266E-05, .3384E-08,
     3 .7376E+00, .1915E-01, .2120E-03, .1238E-05, .3317E-08,
     3 .7158E+00, .1854E-01, .2050E-03, .1201E-05, .3240E-08,
     3 .6872E+00, .1775E-01, .1961E-03, .1151E-05, .3120E-08,
     3 .6506E+00, .1674E-01, .1842E-03, .1090E-05, .3080E-08,
     3 .6052E+00, .1553E-01, .1709E-03, .1015E-05, .2911E-08 /
      DATA ((( CL6F11(K,J,I), K = 1, 5), J = 1, 18), I = 1, 3) /
     1 .3381E+04,-.2732E+01,-.1639E+00, .6997E-03, .4222E-05,
     1 .3231E+04,-.1926E+01,-.1613E+00, .6339E-03, .4676E-05,
     1 .3033E+04,-.1040E+01,-.1545E+00, .5682E-03, .4642E-05,
     1 .2786E+04,-.7138E-01,-.1450E+00, .4882E-03, .4578E-05,
     1 .2506E+04, .8395E+00,-.1358E+00, .4018E-03, .4926E-05,
     1 .2212E+04, .1500E+01,-.1207E+00, .3216E-03, .4524E-05,
     1 .1953E+04, .1769E+01,-.1060E+00, .2625E-03, .4082E-05,
     1 .1766E+04, .1686E+01,-.9499E-01, .2305E-03, .3758E-05,
     1 .1670E+04, .1436E+01,-.8888E-01, .2246E-03, .3547E-05,
     1 .1638E+04, .1264E+01,-.8698E-01, .2271E-03, .3464E-05,
     1 .1632E+04, .1214E+01,-.8635E-01, .2286E-03, .3371E-05,
     1 .1632E+04, .1184E+01,-.8583E-01, .2330E-03, .3256E-05,
     1 .1633E+04, .1164E+01,-.8623E-01, .2375E-03, .3262E-05,
     1 .1634E+04, .1253E+01,-.8736E-01, .2210E-03, .3362E-05,
     1 .1633E+04, .1310E+01,-.8648E-01, .2097E-03, .3159E-05,
     1 .1628E+04, .1227E+01,-.8157E-01, .2246E-03, .2256E-05,
     1 .1631E+04, .1091E+01,-.8327E-01, .2157E-03, .2212E-05,
     1 .1633E+04, .1296E+01,-.9664E-01, .1599E-03, .4437E-05,
     2 .6106E+04,-.1961E+02,-.2294E+00, .9638E-03, .6765E-05,
     2 .5837E+04,-.1801E+02,-.2154E+00, .9796E-03, .4416E-05,
     2 .5476E+04,-.1612E+02,-.1988E+00, .1047E-02, .1772E-05,
     2 .5028E+04,-.1338E+02,-.1840E+00, .9520E-03, .4294E-06,
     2 .4503E+04,-.1058E+02,-.1536E+00, .8490E-03,-.2598E-05,
     2 .3981E+04,-.7747E+01,-.1482E+00, .6647E-03,-.5842E-06,
     2 .3519E+04,-.6007E+01,-.1327E+00, .5541E-03,-.2578E-06,
     2 .3197E+04,-.5197E+01,-.1286E+00, .4610E-03, .1385E-05,
     2 .3028E+04,-.5128E+01,-.1193E+00, .4272E-03, .9513E-06,
     2 .2971E+04,-.5395E+01,-.1172E+00, .4522E-03, .9949E-06,
     2 .2957E+04,-.5178E+01,-.1101E+00, .4019E-03,-.2902E-06,
     2 .2950E+04,-.5062E+01,-.1120E+00, .3947E-03, .2682E-06,
     2 .2941E+04,-.4941E+01,-.1135E+00, .3850E-03, .8468E-06,
     2 .2930E+04,-.4965E+01,-.1080E+00, .3827E-03, .1011E-06,
     2 .2903E+04,-.4839E+01,-.1021E+00, .3474E-03,-.1298E-06,
     2 .2884E+04,-.4852E+01,-.1131E+00, .3768E-03, .2581E-05,
     2 .2849E+04,-.4552E+01,-.9886E-01, .4233E-03, .1158E-05,
     2 .2820E+04,-.4794E+01,-.7237E-01, .5268E-03,-.2885E-05,
     3 .6794E+04,-.2563E+02,-.8233E-01, .2736E-02,-.3357E-04,
     3 .6490E+04,-.2222E+02,-.1202E+00, .2399E-02,-.2502E-04,
     3 .6124E+04,-.1574E+02,-.1942E+00, .1330E-02,-.7309E-05,
     3 .5662E+04,-.1167E+02,-.2352E+00, .1043E-02, .2647E-05,
     3 .5138E+04,-.7515E+01,-.2862E+00, .6414E-03, .1440E-04,
     3 .4524E+04,-.6262E+01,-.2168E+00, .7032E-03, .5112E-05,
     3 .3987E+04,-.4657E+01,-.1870E+00, .5214E-03, .3763E-05,
     3 .3553E+04,-.4860E+01,-.9823E-01, .6298E-03,-.7960E-05,
     3 .3332E+04,-.5270E+01,-.8622E-01, .6832E-03,-.7269E-05,
     3 .3269E+04,-.4862E+01,-.7506E-01, .5417E-03,-.8338E-05,
     3 .3284E+04,-.6640E+01,-.1195E+00, .8530E-03, .3108E-06,
     3 .3312E+04,-.6994E+01,-.1160E+00, .8318E-03,-.1221E-05,
     3 .3348E+04,-.7408E+01,-.1011E+00, .8199E-03,-.4718E-05,
     3 .3396E+04,-.8623E+01,-.1163E+00, .1087E-02,-.1853E-05,
     3 .3569E+04,-.1024E+02,-.1645E+00, .1468E-02, .2608E-05,
     3 .3743E+04,-.8904E+01,-.1749E+00, .1068E-02, .4947E-06,
     3 .3915E+04,-.8567E+01,-.2328E+00, .9282E-03, .9550E-05,
     3 .4051E+04,-.1028E+02,-.1838E+00, .1174E-02,-.7296E-06 /
      DATA ((( CL6F12(K,J,I), K = 1, 5), J = 1, 18), I = 1, 3) /
     1 .3831E+04,-.6616E+01,-.1311E+00, .3745E-03, .5462E-05,
     1 .3690E+04,-.5755E+01,-.1296E+00, .3549E-03, .5348E-05,
     1 .3501E+04,-.4707E+01,-.1258E+00, .3331E-03, .5043E-05,
     1 .3264E+04,-.3453E+01,-.1212E+00, .2984E-03, .4772E-05,
     1 .2987E+04,-.2156E+01,-.1142E+00, .2519E-03, .4460E-05,
     1 .2694E+04,-.1040E+01,-.1052E+00, .2027E-03, .4145E-05,
     1 .2430E+04,-.3488E+00,-.9475E-01, .1635E-03, .3724E-05,
     1 .2238E+04,-.1245E+00,-.8580E-01, .1381E-03, .3398E-05,
     1 .2137E+04,-.2169E+00,-.8068E-01, .1339E-03, .3191E-05,
     1 .2104E+04,-.3494E+00,-.7895E-01, .1348E-03, .3156E-05,
     1 .2099E+04,-.3710E+00,-.7997E-01, .1299E-03, .3388E-05,
     1 .2099E+04,-.3345E+00,-.8031E-01, .1120E-03, .3593E-05,
     1 .2100E+04,-.3338E+00,-.7947E-01, .1153E-03, .3395E-05,
     1 .2103E+04,-.4294E+00,-.7784E-01, .1408E-03, .2912E-05,
     1 .2107E+04,-.6355E+00,-.7374E-01, .1914E-03, .1978E-05,
     1 .2124E+04,-.6312E+00,-.8343E-01, .1962E-03, .3349E-05,
     1 .2142E+04,-.5083E+00,-.9308E-01, .1848E-03, .4644E-05,
     1 .2148E+04,-.5107E+00,-.8249E-01, .1974E-03, .2445E-05,
     2 .3174E+04, .1559E+01,-.1525E+00, .9536E-03,-.5138E-05,
     2 .3059E+04, .2038E+01,-.1502E+00, .8782E-03,-.4550E-05,
     2 .2905E+04, .2563E+01,-.1422E+00, .8081E-03,-.4707E-05,
     2 .2707E+04, .3185E+01,-.1359E+00, .6975E-03,-.3539E-05,
     2 .2474E+04, .3716E+01,-.1232E+00, .6017E-03,-.3297E-05,
     2 .2234E+04, .4198E+01,-.1148E+00, .4547E-03,-.1784E-05,
     2 .2015E+04, .4453E+01,-.1056E+00, .3494E-03,-.9578E-06,
     2 .1855E+04, .4296E+01,-.9284E-01, .3081E-03,-.1551E-05,
     2 .1775E+04, .3852E+01,-.8603E-01, .3381E-03,-.1903E-05,
     2 .1749E+04, .3716E+01,-.8444E-01, .3368E-03,-.2097E-05,
     2 .1749E+04, .3599E+01,-.8786E-01, .3613E-03,-.1568E-05,
     2 .1750E+04, .3597E+01,-.8534E-01, .3824E-03,-.2436E-05,
     2 .1749E+04, .3518E+01,-.8555E-01, .3936E-03,-.2192E-05,
     2 .1742E+04, .3750E+01,-.8911E-01, .3302E-03,-.1102E-05,
     2 .1740E+04, .4170E+01,-.1042E+00, .2203E-03, .1979E-05,
     2 .1700E+04, .4231E+01,-.7888E-01, .1958E-03,-.1699E-05,
     2 .1659E+04, .4097E+01,-.5662E-01, .2025E-03,-.4840E-05,
     2 .1651E+04, .4286E+01,-.8666E-01, .1600E-03, .1194E-05,
     3 .2697E+04, .1630E+01,-.1335E+00, .2269E-03, .3152E-05,
     3 .2583E+04, .2012E+01,-.1201E+00, .2585E-03, .2430E-05,
     3 .2430E+04, .3323E+01,-.1422E+00, .4445E-04, .8851E-05,
     3 .2263E+04, .3939E+01,-.1253E+00, .5915E-05, .6341E-05,
     3 .2072E+04, .4716E+01,-.1336E+00,-.1317E-03, .9209E-05,
     3 .1847E+04, .4478E+01,-.9821E-01, .7760E-04, .2975E-05,
     3 .1656E+04, .3802E+01,-.7643E-01, .1790E-03, .7571E-06,
     3 .1527E+04, .3486E+01,-.9055E-01, .1987E-03, .4812E-05,
     3 .1435E+04, .4339E+01,-.9408E-01,-.5978E-04, .6688E-05,
     3 .1396E+04, .4102E+01,-.9198E-01,-.2017E-04, .7000E-05,
     3 .1346E+04, .4119E+01,-.5129E-01,-.6117E-04, .1038E-06,
     3 .1332E+04, .3472E+01,-.6103E-01, .9062E-04, .2054E-05,
     3 .1331E+04, .3920E+01,-.7302E-01,-.2448E-04, .3725E-05,
     3 .1320E+04, .4012E+01,-.7672E-01,-.4056E-04, .4657E-05,
     3 .1259E+04, .4705E+01,-.5093E-01,-.1710E-03, .8423E-06,
     3 .1247E+04, .4276E+01,-.5120E-01,-.1004E-03, .1440E-05,
     3 .1211E+04, .3173E+01,-.3464E-01, .3911E-04, .1399E-06,
     3 .1187E+04, .2100E+01,-.1986E-01, .9420E-04,-.1724E-05 /
      DATA ((( CL6CS(K,J,I), K = 1, 5), J = 1, 4), I = 1, 3)          /
     1 0.9225E+01,-.2231E+00,0.2872E-02,-.3173E-04,0.2020E-06,
     1 0.1367E+02,-.3306E+00,0.4258E-02,-.4708E-04,0.2997E-06,
     1 0.2026E+02,-.4890E+00,0.6290E-02,-.7008E-04,0.4499E-06,
     1 0.2998E+02,-.7240E+00,0.9349E-02,-.1041E-03,0.6642E-06,
     2 0.1013E+02,-.2497E+00,0.3357E-02,-.3928E-04,0.2557E-06,
     2 0.1505E+02,-.3714E+00,0.4988E-02,-.5820E-04,0.3789E-06,
     2 0.2237E+02,-.5543E+00,0.7459E-02,-.8556E-04,0.5467E-06,
     2 0.3335E+02,-.8248E+00,0.1099E-01,-.1265E-03,0.8198E-06,
     3 0.1033E+02,-.2517E+00,0.3290E-02,-.3758E-04,0.2446E-06,
     3 0.1547E+02,-.3758E+00,0.4905E-02,-.5638E-04,0.3690E-06,
     3 0.2322E+02,-.5640E+00,0.7377E-02,-.8531E-04,0.5607E-06,
     3 0.3498E+02,-.8503E+00,0.1116E-01,-.1282E-03,0.8341E-06 /
      DATA ((( CL6CF(K,J,I), K = 1, 5), J = 1, 4), I = 1, 3)          /
     1 0.2706E-03,-.9217E-06,0.2712E-09,-.7194E-11,0.2548E-12,
     1 0.3985E-03,-.1334E-05,0.7971E-09,-.1672E-10,0.3355E-12,
     1 0.5855E-03,-.1878E-05,0.1764E-09,-.4380E-10,0.8238E-12,
     1 0.8541E-03,-.2734E-05,0.5340E-08,-.7213E-10,0.5962E-12,
     2 0.4487E-03,-.2569E-05,0.1725E-07,-.5912E-10,-.3469E-12,
     2 0.6706E-03,-.3909E-05,0.2441E-07,-.6902E-10,-.3758E-12,
     2 0.1004E-02,-.6043E-05,0.3903E-07,-.5366E-10,-.1457E-11,
     2 0.1514E-02,-.9109E-05,0.4388E-07,-.6677E-10,-.3873E-12,
     3 0.4631E-03,-.1973E-05,0.6861E-08,-.4313E-10,0.2514E-12,
     3 0.7054E-03,-.2873E-05,0.1125E-07,-.8126E-10,0.1829E-12,
     3 0.1087E-02,-.4411E-05,0.1540E-07,-.1159E-09,0.6158E-12,
     3 0.1693E-02,-.6519E-05,0.2737E-07,-.1411E-09,0.1217E-12 /
C
C----------------------------------------------------------------------C
C     SPECTRAL REGION: 540-800 CM^-1. GAS: H2O, CO2, N2O               C
C----------------------------------------------------------------------C
C
      COMMON /BANDL7/ GW(3), CL7H2OU(5,11,3), CL7H2OD(5,5,7,3),
     1                       CL7CO2U(5,11,3), CL7CO2D(5,5,7,3),
     2                       CL7N2O(3), CL7O3(3),
     3                       CL7CS(5,5,4,3), CL7CF(5,5,4,3)
      DATA GW / .14000, .23500, .24000 /
      DATA CL7N2O / 0.8775E+01, 0.6730E+02, 0.6931E+02 /
      DATA CL7O3 / 6.73423, 10.96969, 42.10655 /
      DATA ((( CL7H2OU(K,J,I), K = 1, 5), J = 1, 11), I = 1, 3) /
     1 .3198E-03, .7010E-05, .5087E-07, .1823E-09, .8000E-12,
     1 .4744E-03, .1039E-04, .7481E-07, .2733E-09, .1358E-11,
     1 .7031E-03, .1544E-04, .1106E-06, .4005E-09, .2096E-11,
     1 .1043E-02, .2301E-04, .1664E-06, .5895E-09, .2823E-11,
     1 .1542E-02, .3408E-04, .2504E-06, .8968E-09, .3832E-11,
     1 .2277E-02, .5052E-04, .3783E-06, .1336E-08, .4584E-11,
     1 .3349E-02, .7481E-04, .5774E-06, .1984E-08, .4136E-11,
     1 .4915E-02, .1107E-03, .8788E-06, .2888E-08, .2030E-11,
     1 .7128E-02, .1599E-03, .1302E-05, .4852E-08, .4836E-11,
     1 .1027E-01, .2335E-03, .2002E-05, .6551E-08,-.1648E-10,
     1 .1473E-01, .3365E-03, .2992E-05, .9252E-08,-.4561E-10,
     2 .3860E-02, .6592E-04, .4173E-06, .1467E-08, .2925E-11,
     2 .5671E-02, .9710E-04, .6148E-06, .1939E-08, .1773E-11,
     2 .8281E-02, .1405E-03, .9136E-06, .3551E-08, .6629E-11,
     2 .1224E-01, .2051E-03, .1275E-05, .5589E-08, .2230E-10,
     2 .1786E-01, .2895E-03, .1683E-05, .9969E-08, .6822E-10,
     2 .2603E-01, .4244E-03, .2602E-05, .1281E-07, .5263E-10,
     2 .3822E-01, .6217E-03, .3781E-05, .1670E-07, .4943E-10,
     2 .5569E-01, .8796E-03, .4931E-05, .2712E-07, .1516E-09,
     2 .8122E-01, .1300E-02, .7901E-05, .2939E-07,-.1662E-10,
     2 .1186E+00, .1870E-02, .1121E-04, .3777E-07,-.1080E-09,
     2 .1744E+00, .2704E-02, .1413E-04, .4233E-07,-.2056E-10,
     3 .2535E-01, .4376E-03, .2415E-05, .5321E-08, .2793E-10,
     3 .3648E-01, .6177E-03, .3550E-05, .7499E-08,-.8573E-11,
     3 .5284E-01, .8857E-03, .4607E-05, .7056E-08, .1293E-10,
     3 .7569E-01, .1249E-02, .5929E-05, .1228E-07, .1470E-09,
     3 .1098E+00, .1771E-02, .7478E-05, .2647E-07, .4460E-09,
     3 .1581E+00, .2472E-02, .9066E-05, .4093E-07, .8467E-09,
     3 .2314E+00, .3685E-02, .1369E-04, .1789E-07, .7564E-09,
     3 .3308E+00, .5356E-02, .2346E-04,-.5571E-08, .1889E-09,
     3 .4624E+00, .7352E-02, .3650E-04, .3410E-07,-.1585E-09,
     3 .6519E+00, .1004E-01, .3635E-04, .9474E-07, .2475E-08,
     3 .9176E+00, .1456E-01, .6342E-04,-.2006E-08, .3091E-09 /
      DATA (((( CL7H2OD(K,L,J,I), K = 1, 5), L = 1, 5), J = 1, 7),
     1                                                  I = 1, 2) /
     1 .2122E-01, .4754E-03, .3935E-05, .1405E-07,-.7501E-11,
     1 .1206E-01, .2866E-03, .2068E-05, .3657E-08, .1041E-10,
     1 .6465E-02, .1665E-03, .1387E-05, .1798E-08,-.2136E-10,
     1 .3193E-02, .8096E-04, .7273E-06, .2920E-08, .8332E-11,
     1 .1888E-02, .4747E-04, .3982E-06,-.1080E-09,-.1454E-10,
     1 .3023E-01, .6682E-03, .5530E-05, .2168E-07, .8249E-12,
     1 .1711E-01, .4164E-03, .3124E-05, .3919E-08,-.1459E-10,
     1 .9017E-02, .2384E-03, .2100E-05, .2122E-08,-.5086E-10,
     1 .4516E-02, .1140E-03, .1005E-05, .4126E-08, .1567E-10,
     1 .2661E-02, .6773E-04, .6267E-06, .1011E-09,-.2749E-10,
     1 .4278E-01, .9224E-03, .7342E-05, .3254E-07, .6124E-10,
     1 .2396E-01, .5895E-03, .4432E-05, .5729E-08,-.9743E-11,
     1 .1242E-01, .3331E-03, .3106E-05, .4000E-08,-.8491E-10,
     1 .6415E-02, .1521E-03, .1074E-05, .6962E-08, .8110E-10,
     1 .3739E-02, .9653E-04, .9598E-06, .2371E-09,-.4901E-10,
     1 .6120E-01, .1324E-02, .9951E-05, .3875E-07, .9646E-10,
     1 .3376E-01, .8242E-03, .6056E-05, .9813E-08, .2581E-10,
     1 .1695E-01, .4537E-03, .4180E-05, .6927E-08,-.8408E-10,
     1 .8837E-02, .2112E-03, .1434E-05, .8920E-08, .1169E-09,
     1 .5242E-02, .1346E-03, .1358E-05, .9875E-09,-.6359E-10,
     1 .8754E-01, .1892E-02, .1266E-04, .4015E-07, .2227E-09,
     1 .4642E-01, .1137E-02, .8871E-05, .1865E-07, .1096E-11,
     1 .2276E-01, .6006E-03, .5328E-05, .1010E-07,-.6748E-10,
     1 .1207E-01, .3052E-03, .2477E-05, .7695E-08, .3896E-10,
     1 .7335E-02, .1780E-03, .1611E-05, .3203E-08,-.3384E-10,
     1 .1204E+00, .2525E-02, .1520E-04, .4697E-07, .4019E-09,
     1 .6313E-01, .1528E-02, .1087E-04, .2288E-07, .1257E-09,
     1 .2950E-01, .8041E-03, .7944E-05, .1390E-07,-.2084E-09,
     1 .1603E-01, .3958E-03, .3219E-05, .1115E-07, .5508E-10,
     1 .1018E-01, .2421E-03, .2095E-05, .5623E-08,-.1446E-10,
     1 .1625E+00, .3545E-02, .2246E-04, .1677E-07,-.1586E-09,
     1 .8242E-01, .2086E-02, .1565E-04, .1280E-07,-.1366E-09,
     1 .3755E-01, .9723E-03, .8996E-05, .3195E-07, .2688E-10,
     1 .2144E-01, .5492E-03, .5077E-05, .9584E-08,-.9889E-10,
     1 .1378E-01, .3173E-03, .2807E-05, .1019E-07,-.4310E-11,
     2 .2502E+00, .3828E-02, .2098E-04, .6728E-07,-.2163E-09,
     2 .1351E+00, .2202E-02, .1169E-04, .2027E-07,-.3301E-10,
     2 .7174E-01, .1160E-02, .5519E-05, .1603E-07, .1577E-09,
     2 .3879E-01, .6627E-03, .4357E-05, .1218E-07,-.3509E-10,
     2 .2402E-01, .4150E-03, .2207E-05, .5301E-08, .2091E-10,
     2 .3564E+00, .5352E-02, .2909E-04, .1161E-06,-.1663E-09,
     2 .1949E+00, .3118E-02, .1478E-04, .2446E-07, .1307E-09,
     2 .1038E+00, .1665E-02, .7581E-05, .1688E-07, .1882E-09,
     2 .5596E-01, .9185E-03, .5313E-05, .2023E-07, .7491E-10,
     2 .3445E-01, .5925E-03, .3029E-05, .6692E-08, .3801E-10,
     2 .5083E+00, .7692E-02, .3604E-04, .1088E-06, .1514E-09,
     2 .2792E+00, .4398E-02, .2038E-04, .2957E-07, .4913E-10,
     2 .1498E+00, .2363E-02, .1009E-04, .2250E-07, .2980E-09,
     2 .8048E-01, .1288E-02, .6713E-05, .2666E-07, .1613E-09,
     2 .4856E-01, .8429E-03, .4527E-05, .6941E-08,-.5864E-11,
     2 .7258E+00, .1116E-01, .4425E-04, .7730E-07, .7876E-09,
     2 .3979E+00, .6172E-02, .2732E-04, .4212E-07, .5499E-10,
     2 .2161E+00, .3366E-02, .1360E-04, .2253E-07, .3647E-09,
     2 .1146E+00, .1853E-02, .9905E-05, .2338E-07, .2420E-10,
     2 .6742E-01, .1155E-02, .6134E-05, .1191E-07, .2888E-10,
     2 .1030E+01, .1615E-01, .5639E-04, .1022E-06, .2680E-08,
     2 .5701E+00, .9025E-02, .3124E-04,-.5345E-08, .1152E-08,
     2 .3057E+00, .4857E-02, .2139E-04, .9328E-08, .1029E-09,
     2 .1600E+00, .2521E-02, .1453E-04, .4003E-07,-.1410E-09,
     2 .9516E-01, .1618E-02, .7903E-05, .7070E-08, .2683E-10,
     2 .1405E+01, .2295E-01, .9099E-04,-.2412E-07, .1033E-08,
     2 .7993E+00, .1288E-01, .4976E-04,-.1862E-07, .1021E-08,
     2 .4242E+00, .6613E-02, .2929E-04, .4863E-07, .4837E-09,
     2 .2273E+00, .3429E-02, .1564E-04, .4485E-07, .1848E-09,
     2 .1359E+00, .2303E-02, .1000E-04, .2450E-08, .1606E-09,
     2 .1910E+01, .3128E-01, .1092E-03, .5854E-07, .6144E-08,
     2 .1107E+01, .1746E-01, .6235E-04, .5236E-07, .2686E-08,
     2 .5959E+00, .9343E-02, .3786E-04,-.3029E-07, .1286E-09,
     2 .3203E+00, .4732E-02, .1825E-04, .3272E-07, .2774E-09,
     2 .1935E+00, .3265E-02, .1215E-04,-.1320E-07, .3797E-09 /
      DATA (((( CL7H2OD(K,L,J,I), K = 1, 5), L = 1, 5), J = 1, 7),
     1                                                  I = 3, 3) /
     3 .1288E+01, .1982E-01, .7932E-04, .1506E-06, .2769E-08,
     3 .6732E+00, .1075E-01, .5420E-04,-.1191E-07,-.1135E-08,
     3 .3483E+00, .5282E-02, .2187E-04, .1975E-07, .2887E-09,
     3 .1959E+00, .3065E-02, .1492E-04,-.1861E-08,-.3155E-09,
     3 .1173E+00, .1856E-02, .8988E-05,-.1027E-07,-.2508E-09,
     3 .1793E+01, .2778E-01, .1076E-03, .2464E-07, .2382E-08,
     3 .9374E+00, .1489E-01, .7284E-04,-.2248E-07,-.1285E-08,
     3 .4796E+00, .7298E-02, .3483E-04, .1079E-07,-.6009E-09,
     3 .2739E+00, .4303E-02, .2221E-04,-.6108E-08,-.6761E-09,
     3 .1680E+00, .2540E-02, .1009E-04, .5848E-08, .1792E-09,
     3 .2479E+01, .3818E-01, .1255E-03,-.9731E-07, .6012E-08,
     3 .1302E+01, .1940E-01, .7569E-04, .1666E-06, .2569E-08,
     3 .6647E+00, .9983E-02, .4455E-04, .6638E-08,-.4726E-09,
     3 .3882E+00, .5991E-02, .2640E-04,-.2330E-07,-.4318E-09,
     3 .2409E+00, .3575E-02, .1264E-04, .2199E-07, .6260E-09,
     3 .3448E+01, .5463E-01, .2772E-03,-.6672E-06,-.1532E-07,
     3 .1791E+01, .2708E-01, .1157E-03, .4916E-07, .2512E-09,
     3 .9230E+00, .1424E-01, .7422E-04,-.7568E-07,-.3182E-08,
     3 .5445E+00, .8268E-02, .3229E-04, .3190E-08, .4198E-09,
     3 .3417E+00, .5074E-02, .1897E-04, .2249E-07, .5607E-09,
     3 .4601E+01, .6643E-01, .3080E-03, .1927E-06,-.4891E-08,
     3 .2428E+01, .3692E-01, .1684E-03, .1351E-06, .2882E-09,
     3 .1278E+01, .1882E-01, .8434E-04, .1643E-06, .3421E-09,
     3 .7541E+00, .1167E-01, .5045E-04,-.3429E-07,-.4394E-09,
     3 .4761E+00, .7213E-02, .3041E-04,-.8801E-08,-.1827E-09,
     3 .6015E+01, .8087E-01, .3583E-03, .1619E-05, .7963E-08,
     3 .3308E+01, .4919E-01, .2322E-03,-.2056E-07,-.6857E-08,
     3 .1731E+01, .2596E-01, .1057E-03, .7529E-08, .5775E-09,
     3 .1015E+01, .1601E-01, .8324E-04,-.2715E-07,-.2508E-08,
     3 .6430E+00, .9946E-02, .4431E-04,-.4379E-07,-.8073E-09,
     3 .7170E+01, .9746E-01, .5182E-03,-.5037E-06,-.3281E-07,
     3 .4311E+01, .6002E-01, .2196E-03, .1687E-06, .2666E-08,
     3 .2263E+01, .3324E-01, .1076E-03, .8376E-07, .6195E-08,
     3 .1332E+01, .2104E-01, .1020E-03, .6250E-07,-.5010E-09,
     3 .8303E+00, .1303E-01, .6471E-04,-.3176E-07,-.1833E-08 /
      DATA ((( CL7CO2U(K,J,I), K = 1, 5), J = 1, 11), I = 1, 3) /
     1 .4904E-04, .1609E-05, .2180E-07, .1390E-09, .3177E-12,
     1 .7290E-04, .2394E-05, .3248E-07, .2065E-09, .4603E-12,
     1 .1084E-03, .3562E-05, .4835E-07, .3072E-09, .6805E-12,
     1 .1610E-03, .5291E-05, .7169E-07, .4570E-09, .1049E-11,
     1 .2392E-03, .7867E-05, .1064E-06, .6785E-09, .1588E-11,
     1 .3543E-03, .1167E-04, .1582E-06, .1010E-08, .2369E-11,
     1 .5234E-03, .1727E-04, .2351E-06, .1505E-08, .3491E-11,
     1 .7692E-03, .2538E-04, .3466E-06, .2250E-08, .5443E-11,
     1 .1124E-02, .3697E-04, .5026E-06, .3334E-08, .9072E-11,
     1 .1623E-02, .5275E-04, .7100E-06, .4932E-08, .1625E-10,
     1 .2316E-02, .7453E-04, .9939E-06, .6987E-08, .2446E-10,
     2 .1502E-02, .3778E-04, .3395E-06, .1011E-08,-.1556E-11,
     2 .2199E-02, .5550E-04, .5037E-06, .1546E-08,-.2156E-11,
     2 .3214E-02, .8127E-04, .7393E-06, .2358E-08,-.2031E-11,
     2 .4677E-02, .1182E-03, .1078E-05, .3660E-08,-.2471E-12,
     2 .6791E-02, .1719E-03, .1570E-05, .5437E-08, .1264E-11,
     2 .9799E-02, .2477E-03, .2266E-05, .8090E-08, .4361E-11,
     2 .1406E-01, .3540E-03, .3248E-05, .1193E-07, .7723E-11,
     2 .2007E-01, .5033E-03, .4602E-05, .1701E-07, .1187E-10,
     2 .2856E-01, .7077E-03, .6282E-05, .2422E-07, .4679E-10,
     2 .4034E-01, .9965E-03, .8614E-05, .3165E-07, .7316E-10,
     2 .5625E-01, .1394E-02, .1197E-04, .4058E-07, .7027E-10,
     3 .2543E-01, .5185E-03, .3802E-05, .8871E-08,-.1849E-10,
     3 .3643E-01, .7330E-03, .5302E-05, .1280E-07,-.2020E-10,
     3 .5234E-01, .1039E-02, .7422E-05, .1805E-07,-.2737E-10,
     3 .7547E-01, .1478E-02, .1027E-04, .2461E-07,-.2592E-10,
     3 .1088E+00, .2103E-02, .1412E-04, .3220E-07,-.1723E-10,
     3 .1566E+00, .3000E-02, .1945E-04, .4064E-07,-.3222E-11,
     3 .2244E+00, .4274E-02, .2712E-04, .4915E-07,-.3124E-10,
     3 .3186E+00, .6048E-02, .3849E-04, .5988E-07,-.2055E-09,
     3 .4479E+00, .8441E-02, .5385E-04, .8065E-07,-.4098E-09,
     3 .6230E+00, .1159E-01, .7311E-04, .1143E-06,-.5444E-09,
     3 .8571E+00, .1568E-01, .9611E-04, .1568E-06,-.5048E-09 /
      DATA (((( CL7CO2D(K,L,J,I), K = 1, 5), L = 1, 5), J = 1, 7),
     1                                                  I = 1, 2) /
     1 .3255E-02, .1040E-03, .1387E-05, .9581E-08, .3107E-10,
     1 .4614E-02, .1308E-03, .1606E-05, .1133E-07, .3897E-10,
     1 .8000E-02, .2025E-03, .2015E-05, .1305E-07, .6382E-10,
     1 .1608E-01, .4327E-03, .4148E-05, .8855E-08,-.7839E-10,
     1 .3006E-01, .7894E-03, .7339E-05, .4311E-07, .2559E-09,
     1 .4549E-02, .1443E-03, .1895E-05, .1271E-07, .3962E-10,
     1 .6526E-02, .1809E-03, .2151E-05, .1538E-07, .5875E-10,
     1 .1145E-01, .2827E-03, .2617E-05, .1811E-07, .1158E-09,
     1 .2264E-01, .6134E-03, .5976E-05, .1229E-07,-.1286E-09,
     1 .4252E-01, .1115E-02, .9811E-05, .5431E-07, .3797E-09,
     1 .6295E-02, .1988E-03, .2587E-05, .1663E-07, .4580E-10,
     1 .9195E-02, .2505E-03, .2872E-05, .1991E-07, .7763E-10,
     1 .1628E-01, .3991E-03, .3504E-05, .2247E-07, .1547E-09,
     1 .3086E-01, .8906E-03, .1019E-04, .1209E-07,-.4987E-09,
     1 .5926E-01, .1522E-02, .1236E-04, .7739E-07, .7260E-09,
     1 .8550E-02, .2658E-03, .3428E-05, .2218E-07, .6261E-10,
     1 .1271E-01, .3464E-03, .3894E-05, .2481E-07, .8621E-10,
     1 .2267E-01, .5632E-03, .5213E-05, .2786E-07, .1182E-09,
     1 .4263E-01, .1203E-02, .1377E-04, .2406E-07,-.6019E-09,
     1 .8037E-01, .2070E-02, .1694E-04, .9654E-07, .8452E-09,
     1 .1140E-01, .3506E-03, .4551E-05, .2893E-07, .6920E-10,
     1 .1743E-01, .4719E-03, .5160E-05, .3007E-07, .9235E-10,
     1 .3140E-01, .7874E-03, .7397E-05, .3604E-07, .1089E-09,
     1 .5772E-01, .1532E-02, .1545E-04, .5578E-07,-.1105E-09,
     1 .1060E+00, .2889E-02, .2743E-04, .1007E-06, .1655E-09,
     1 .1514E-01, .4601E-03, .5967E-05, .3708E-07, .7576E-10,
     1 .2354E-01, .6282E-03, .6910E-05, .3900E-07, .9360E-10,
     1 .4317E-01, .1064E-02, .8955E-05, .4370E-07, .2462E-09,
     1 .7690E-01, .2072E-02, .2034E-04, .6934E-07,-.8692E-10,
     1 .1381E+00, .3797E-02, .3719E-04, .1078E-06,-.3219E-09,
     1 .1979E-01, .5740E-03, .7208E-05, .4868E-07, .1467E-09,
     1 .3168E-01, .8015E-03, .8039E-05, .5036E-07, .2217E-09,
     1 .5674E-01, .1496E-02, .1408E-04, .3696E-07,-.1705E-09,
     1 .9986E-01, .2547E-02, .2090E-04, .1060E-06, .8137E-09,
     1 .1824E+00, .5133E-02, .4785E-04, .9002E-07,-.5910E-09,
     2 .7750E-01, .1926E-02, .1647E-04, .5152E-07, .5789E-10,
     2 .9252E-01, .2176E-02, .1805E-04, .5697E-07, .4090E-10,
     2 .1256E+00, .2757E-02, .2200E-04, .6171E-07,-.7270E-10,
     2 .1997E+00, .3954E-02, .2617E-04, .6572E-07, .1797E-09,
     2 .3415E+00, .6298E-02, .4389E-04, .1357E-06, .8247E-10,
     2 .1051E+00, .2611E-02, .2185E-04, .6654E-07, .1234E-09,
     2 .1264E+00, .2955E-02, .2427E-04, .7624E-07, .6777E-10,
     2 .1737E+00, .3761E-02, .2920E-04, .8313E-07,-.2525E-10,
     2 .2793E+00, .5549E-02, .3784E-04, .6902E-07,-.2349E-09,
     2 .4851E+00, .8731E-02, .5836E-04, .1805E-06, .1464E-09,
     2 .1393E+00, .3468E-02, .2892E-04, .8188E-07, .1027E-09,
     2 .1688E+00, .3947E-02, .3179E-04, .9314E-07, .8401E-10,
     2 .2355E+00, .5063E-02, .3872E-04, .1004E-06,-.1287E-09,
     2 .3871E+00, .7623E-02, .5141E-04, .8296E-07,-.4458E-09,
     2 .6934E+00, .1205E-01, .7024E-04, .2347E-06, .1293E-08,
     2 .1789E+00, .4491E-02, .3824E-04, .9838E-07,-.7182E-10,
     2 .2207E+00, .5185E-02, .4150E-04, .1067E-06,-.1754E-10,
     2 .3149E+00, .6732E-02, .5003E-04, .1184E-06,-.1814E-09,
     2 .5358E+00, .1028E-01, .6192E-04, .1167E-06, .4598E-09,
     2 .9829E+00, .1710E-01, .9858E-04, .2107E-06, .2801E-09,
     2 .2253E+00, .5681E-02, .4891E-04, .1097E-06,-.3620E-09,
     2 .2837E+00, .6655E-02, .5329E-04, .1255E-06,-.2267E-09,
     2 .4190E+00, .8860E-02, .6180E-04, .1329E-06, .3621E-10,
     2 .7333E+00, .1419E-01, .8173E-04, .7045E-07, .3811E-09,
     2 .1347E+01, .2269E-01, .1314E-03, .3965E-06, .8550E-09,
     2 .2805E+00, .7112E-02, .6151E-04, .1254E-06,-.6195E-09,
     2 .3568E+00, .8458E-02, .6798E-04, .1356E-06,-.5463E-09,
     2 .5474E+00, .1172E-01, .8464E-04, .1108E-06,-.1226E-08,
     2 .9699E+00, .1876E-01, .1179E-03, .1239E-06,-.7090E-09,
     2 .1815E+01, .2923E-01, .1676E-03, .5291E-06,-.3456E-09,
     2 .3383E+00, .8644E-02, .7789E-04, .1622E-06,-.1140E-08,
     2 .4362E+00, .1044E-01, .8731E-04, .1638E-06,-.1184E-08,
     2 .6993E+00, .1458E-01, .1057E-03, .2338E-06,-.7636E-09,
     2 .1276E+01, .2441E-01, .1581E-03, .1820E-06,-.1661E-08,
     2 .2438E+01, .3783E-01, .2135E-03, .7464E-06,-.1470E-08 /
      DATA (((( CL7CO2D(K,L,J,I), K = 1, 5), L = 1, 5), J = 1, 7),
     1                                                  I = 3, 3) /
     3 .1167E+01, .2108E-01, .1237E-03, .1746E-06,-.5044E-09,
     3 .1275E+01, .2281E-01, .1314E-03, .1947E-06,-.2232E-09,
     3 .1486E+01, .2643E-01, .1517E-03, .1999E-06,-.5959E-09,
     3 .1876E+01, .3241E-01, .1728E-03, .2616E-06, .1049E-08,
     3 .2672E+01, .4497E-01, .2296E-03, .3947E-06, .2269E-08,
     3 .1565E+01, .2793E-01, .1598E-03, .1901E-06,-.6590E-09,
     3 .1712E+01, .3031E-01, .1698E-03, .2092E-06,-.3258E-09,
     3 .2002E+01, .3520E-01, .1958E-03, .2216E-06,-.5193E-09,
     3 .2531E+01, .4308E-01, .2237E-03, .3119E-06, .1414E-08,
     3 .3605E+01, .6133E-01, .3406E-03, .2296E-06,-.4799E-08,
     3 .2059E+01, .3596E-01, .2083E-03, .2687E-06,-.1859E-08,
     3 .2258E+01, .3921E-01, .2210E-03, .2619E-06,-.1513E-08,
     3 .2658E+01, .4551E-01, .2468E-03, .3205E-06,-.4218E-09,
     3 .3371E+01, .5604E-01, .2877E-03, .4227E-06, .1310E-08,
     3 .4826E+01, .8129E-01, .4636E-03,-.4164E-07,-.1377E-07,
     3 .2713E+01, .4529E-01, .2301E-03, .3232E-06, .9465E-09,
     3 .2984E+01, .4978E-01, .2522E-03, .2712E-06, .4486E-10,
     3 .3523E+01, .5791E-01, .2817E-03, .3919E-06, .2269E-08,
     3 .4482E+01, .7323E-01, .3860E-03, .2529E-06,-.5461E-08,
     3 .6493E+01, .1068E+00, .5665E-03,-.1502E-06,-.1384E-07,
     3 .3571E+01, .5797E-01, .2707E-03, .1700E-06, .1403E-09,
     3 .3929E+01, .6345E-01, .3014E-03, .1354E-06,-.1783E-08,
     3 .4642E+01, .7465E-01, .3501E-03, .1434E-06,-.1217E-08,
     3 .5959E+01, .9345E-01, .4426E-03, .4426E-06,-.1279E-08,
     3 .8688E+01, .1389E+00, .6834E-03, .9559E-07,-.8553E-08,
     3 .4648E+01, .7368E-01, .3137E-03,-.4722E-07,-.3984E-10,
     3 .5107E+01, .7983E-01, .3357E-03, .7199E-07, .1513E-08,
     3 .6056E+01, .9394E-01, .3957E-03, .1422E-06, .1723E-08,
     3 .7848E+01, .1185E+00, .4563E-03, .5001E-06, .1056E-07,
     3 .1153E+02, .1781E+00, .8249E-03, .7612E-06,-.1393E-08,
     3 .5932E+01, .9222E-01, .3615E-03,-.1798E-06, .1687E-08,
     3 .6475E+01, .9998E-01, .4053E-03,-.2179E-06,-.1145E-08,
     3 .7702E+01, .1173E+00, .4919E-03,-.2205E-06,-.5892E-08,
     3 .9986E+01, .1478E+00, .5509E-03, .9207E-07, .5696E-08,
     3 .1490E+02, .2225E+00, .9115E-03, .1485E-05, .1755E-07 /
      DATA (((( CL7CS(K,L,J,I), K = 1, 5),  L = 1, 5), J = 1, 4),
     1                          I = 1, 3)                    /
     1 .1396E+02,-.2899E+00, .3004E-02,-.2032E-04, .7639E-07,
     1 .1353E+02,-.2584E+00, .2485E-02,-.2471E-04, .1733E-06,
     1 .1257E+02,-.2425E+00, .2678E-02,-.2986E-04, .1957E-06,
     1 .1220E+02,-.2489E+00, .2698E-02,-.4082E-04, .3670E-06,
     1 .1250E+02,-.2966E+00, .4165E-02,-.4513E-04, .2460E-06,
     1 .2076E+02,-.4239E+00, .4211E-02,-.2978E-04, .1392E-06,
     1 .1980E+02,-.3811E+00, .3767E-02,-.3469E-04, .2172E-06,
     1 .1832E+02,-.3536E+00, .3858E-02,-.4568E-04, .3246E-06,
     1 .1781E+02,-.3669E+00, .4217E-02,-.6134E-04, .5105E-06,
     1 .1853E+02,-.4439E+00, .6060E-02,-.6637E-04, .3895E-06,
     1 .3051E+02,-.6205E+00, .6107E-02,-.4250E-04, .1959E-06,
     1 .2883E+02,-.5561E+00, .5442E-02,-.4706E-04, .2801E-06,
     1 .2641E+02,-.5175E+00, .5890E-02,-.6928E-04, .4738E-06,
     1 .2575E+02,-.5494E+00, .6783E-02,-.9038E-04, .6733E-06,
     1 .2749E+02,-.6635E+00, .8844E-02,-.9781E-04, .6089E-06,
     1 .4463E+02,-.8951E+00, .8654E-02,-.6029E-04, .2823E-06,
     1 .4156E+02,-.7814E+00, .7533E-02,-.7295E-04, .4848E-06,
     1 .3793E+02,-.7457E+00, .8307E-02,-.1079E-03, .8356E-06,
     1 .3743E+02,-.8170E+00, .1082E-01,-.1344E-03, .8735E-06,
     1 .4082E+02,-.9914E+00, .1288E-01,-.1441E-03, .9500E-06,
     2 .3576E+02,-.7950E+00, .9379E-02,-.1004E-03, .6593E-06,
     2 .3695E+02,-.8510E+00, .1037E-01,-.9624E-04, .5167E-06,
     2 .3768E+02,-.8574E+00, .1002E-01,-.9300E-04, .5332E-06,
     2 .3653E+02,-.8198E+00, .9766E-02,-.8351E-04, .3882E-06,
     2 .3441E+02,-.7423E+00, .8193E-02,-.7873E-04, .4911E-06,
     2 .5297E+02,-.1176E+01, .1408E-01,-.1506E-03, .9642E-06,
     2 .5513E+02,-.1255E+01, .1508E-01,-.1464E-03, .8476E-06,
     2 .5620E+02,-.1271E+01, .1481E-01,-.1387E-03, .8010E-06,
     2 .5408E+02,-.1219E+01, .1447E-01,-.1224E-03, .5719E-06,
     2 .5082E+02,-.1091E+01, .1205E-01,-.1176E-03, .7357E-06,
     2 .7874E+02,-.1749E+01, .2121E-01,-.2258E-03, .1406E-05,
     2 .8230E+02,-.1860E+01, .2225E-01,-.2246E-03, .1361E-05,
     2 .8369E+02,-.1886E+01, .2197E-01,-.2060E-03, .1185E-05,
     2 .8068E+02,-.1803E+01, .2095E-01,-.1809E-03, .9093E-06,
     2 .7519E+02,-.1597E+01, .1758E-01,-.1773E-03, .1140E-05,
     2 .1172E+03,-.2615E+01, .3219E-01,-.3423E-03, .2103E-05,
     2 .1231E+03,-.2805E+01, .3371E-01,-.3281E-03, .1912E-05,
     2 .1248E+03,-.2812E+01, .3300E-01,-.3006E-03, .1622E-05,
     2 .1202E+03,-.2669E+01, .3020E-01,-.2658E-03, .1463E-05,
     2 .1111E+03,-.2337E+01, .2557E-01,-.2674E-03, .1780E-05,
     3 .3100E+02,-.6945E+00, .8494E-02,-.8672E-04, .5088E-06,
     3 .3181E+02,-.7074E+00, .8455E-02,-.8803E-04, .5462E-06,
     3 .3326E+02,-.7418E+00, .8828E-02,-.8823E-04, .5238E-06,
     3 .3536E+02,-.7839E+00, .9161E-02,-.8986E-04, .5339E-06,
     3 .3711E+02,-.8247E+00, .9616E-02,-.9420E-04, .5646E-06,
     3 .4620E+02,-.1045E+01, .1277E-01,-.1280E-03, .7438E-06,
     3 .4726E+02,-.1059E+01, .1273E-01,-.1299E-03, .7868E-06,
     3 .4936E+02,-.1106E+01, .1326E-01,-.1290E-03, .7332E-06,
     3 .5266E+02,-.1160E+01, .1345E-01,-.1343E-03, .8198E-06,
     3 .5515E+02,-.1228E+01, .1445E-01,-.1392E-03, .8026E-06,
     3 .6904E+02,-.1562E+01, .1886E-01,-.1902E-03, .1144E-05,
     3 .7050E+02,-.1592E+01, .1925E-01,-.1900E-03, .1102E-05,
     3 .7362E+02,-.1645E+01, .1947E-01,-.1898E-03, .1105E-05,
     3 .7804E+02,-.1715E+01, .1994E-01,-.2001E-03, .1228E-05,
     3 .8155E+02,-.1825E+01, .2167E-01,-.2044E-03, .1135E-05,
     3 .1034E+03,-.2340E+01, .2796E-01,-.2808E-03, .1696E-05,
     3 .1056E+03,-.2374E+01, .2853E-01,-.2854E-03, .1686E-05,
     3 .1099E+03,-.2444E+01, .2875E-01,-.2822E-03, .1675E-05,
     3 .1153E+03,-.2530E+01, .2960E-01,-.2994E-03, .1835E-05,
     3 .1201E+03,-.2705E+01, .3262E-01,-.2964E-03, .1525E-05 /
      DATA (((( CL7CF(K,L,J,I), K = 1, 5), L = 1, 5), J = 1, 4),
     1                          I = 1, 3)                    /
     1 .2721E-01,-.5029E-04,-.7229E-06, .1343E-07,-.1062E-09,
     1 .2194E-01, .7539E-04,-.1816E-05, .7955E-09, .1054E-09,
     1 .1344E-01, .1345E-03,-.6031E-06,-.4300E-08,-.3154E-10,
     1 .6618E-02, .9637E-04,-.1803E-05,-.6878E-08, .3614E-09,
     1 .1711E-02, .3592E-04, .1396E-05,-.3379E-08,-.1991E-09,
     1 .4055E-01,-.5527E-04,-.1803E-05, .1873E-07,-.4836E-10,
     1 .3142E-01, .1157E-03,-.2265E-05, .3978E-08, .5934E-10,
     1 .1852E-01, .1935E-03,-.1201E-05,-.7214E-08, .4518E-10,
     1 .8721E-02, .1498E-03,-.1686E-05,-.1406E-07, .3448E-09,
     1 .2531E-02, .2676E-04, .1288E-05,-.7368E-09,-.1513E-09,
     1 .5893E-01,-.6185E-04,-.2884E-05, .2840E-07,-.6746E-10,
     1 .4433E-01, .1868E-03,-.3518E-05, .1134E-07, .5021E-10,
     1 .2432E-01, .2755E-03,-.9316E-06,-.1096E-07,-.1363E-10,
     1 .1031E-01, .1906E-03,-.8226E-06,-.1849E-07, .2199E-09,
     1 .3749E-02, .7716E-05, .9610E-06, .4006E-08,-.5038E-10,
     1 .8478E-01,-.2040E-04,-.4858E-05, .3770E-07,-.7883E-10,
     1 .6069E-01, .3674E-03,-.5458E-05, .3683E-08, .1553E-09,
     1 .3107E-01, .3821E-03,-.2662E-05,-.1749E-07, .3548E-09,
     1 .1220E-01, .2782E-03, .1685E-05,-.3191E-07,-.2148E-09,
     1 .5567E-02,-.3440E-04, .3315E-07, .1223E-07, .1653E-09,
     2 .7821E-01,-.5032E-03, .1815E-05,-.1798E-07, .2725E-09,
     2 .8295E-01,-.6342E-03, .3803E-05,-.6655E-09,-.1459E-09,
     2 .8570E-01,-.6197E-03, .1921E-05, .2405E-08, .8082E-10,
     2 .8002E-01,-.4733E-03, .2838E-05, .3014E-08,-.3074E-09,
     2 .7042E-01,-.3041E-03,-.4697E-06, .1385E-08, .1470E-09,
     2 .1157E+00,-.7264E-03, .3596E-05,-.3150E-07, .2669E-09,
     2 .1245E+00,-.9118E-03, .4689E-05,-.9272E-08,-.2104E-10,
     2 .1285E+00,-.8969E-03, .2715E-05,-.2958E-09, .1281E-09,
     2 .1180E+00,-.7211E-03, .3951E-05, .1018E-07,-.3941E-09,
     2 .1035E+00,-.4199E-03,-.6634E-06,-.3520E-08, .1953E-09,
     2 .1723E+00,-.1062E-02, .6825E-05,-.5327E-07, .1619E-09,
     2 .1871E+00,-.1329E-02, .6384E-05,-.2777E-07, .1529E-09,
     2 .1920E+00,-.1307E-02, .4023E-05,-.4661E-08, .1563E-09,
     2 .1769E+00,-.1041E-02, .4307E-05, .1321E-07,-.3727E-09,
     2 .1526E+00,-.5553E-03,-.1259E-05,-.1704E-07, .3511E-09,
     2 .2566E+00,-.1644E-02, .1261E-04,-.7588E-07, .5754E-10,
     2 .2816E+00,-.2071E-02, .1010E-04,-.2053E-07, .1099E-09,
     2 .2876E+00,-.1907E-02, .7436E-05,-.7658E-08,-.1866E-09,
     2 .2645E+00,-.1549E-02, .2845E-05, .2773E-07, .1846E-10,
     2 .2245E+00,-.7345E-03,-.2852E-05,-.4225E-07, .7253E-09,
     3 .5417E-01,-.2528E-03, .2038E-05,-.1069E-07,-.9237E-10,
     3 .5733E-01,-.2676E-03, .1178E-05,-.1113E-07, .6626E-10,
     3 .6326E-01,-.3189E-03, .1382E-05,-.8199E-08, .2497E-11,
     3 .7192E-01,-.3792E-03, .1203E-05,-.6301E-08, .3709E-10,
     3 .7876E-01,-.4561E-03, .1581E-05,-.7160E-08, .7944E-10,
     3 .8131E-01,-.4257E-03, .2970E-05,-.9726E-08,-.1144E-09,
     3 .8526E-01,-.4267E-03, .2139E-05,-.1287E-07, .3529E-10,
     3 .9381E-01,-.4804E-03, .2577E-05,-.8269E-08,-.1095E-09,
     3 .1076E+00,-.5418E-03, .1434E-05,-.1212E-07, .1226E-09,
     3 .1173E+00,-.6765E-03, .3044E-05,-.9734E-08,-.1606E-10,
     3 .1230E+00,-.6759E-03, .3263E-05,-.9553E-08, .4656E-10,
     3 .1282E+00,-.6832E-03, .3999E-05,-.9516E-08,-.1161E-09,
     3 .1408E+00,-.7172E-03, .3002E-05,-.8244E-08,-.4856E-10,
     3 .1592E+00,-.7890E-03, .2233E-05,-.1915E-07, .2194E-09,
     3 .1729E+00,-.1016E-02, .5181E-05,-.9115E-08,-.1553E-09,
     3 .1872E+00,-.1039E-02, .3510E-05,-.1482E-07, .1817E-09,
     3 .1948E+00,-.1027E-02, .5437E-05,-.2273E-07,-.9952E-10,
     3 .2118E+00,-.1057E-02, .3727E-05,-.1216E-07, .8117E-10,
     3 .2342E+00,-.1121E-02, .4051E-05,-.3507E-07, .2993E-09,
     3 .2527E+00,-.1504E-02, .9940E-05,-.1262E-08,-.7234E-09 /
C
      COMMON /BANDL7GH/ GWL7GH(7), CL7H2OGH(5,28,4),
     1                             CL7CO2GH(5,28,7), CL7O3GH(2)
      DATA GWL7GH / .18200, .13600, .05000, .01270, .00300,
     1              .00100, .00030 /
      DATA CL7O3GH / 40.73849, 43.96434 /
      DATA ((( CL7H2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 1, 3) /
     4 .3979E-03, .1309E-04, .2319E-06, .2275E-08, .9044E-11,
     4 .5975E-03, .1801E-04, .3143E-06, .2752E-08, .6934E-11,
     4 .9489E-03, .2967E-04, .5084E-06, .3076E-08,-.5444E-11,
     4 .1616E-02, .4305E-04, .6158E-06, .3792E-08, .1404E-11,
     4 .2657E-02, .6118E-04, .7583E-06, .5784E-08, .2172E-10,
     4 .4296E-02, .8016E-04, .8953E-06, .8844E-08, .4875E-10,
     4 .7236E-02, .1351E-03, .1344E-05, .8520E-08, .3701E-10,
     4 .1304E-01, .1880E-03, .1277E-05, .1610E-07, .1506E-09,
     4 .2337E-01, .3183E-03, .1052E-05, .1674E-07, .3188E-09,
     4 .4154E-01, .5183E-03, .2804E-05, .2479E-07, .2173E-09,
     4 .1062E+00, .1367E-02, .7187E-05,-.9725E-08,-.2056E-09,
     4 .1507E+00, .1994E-02, .1516E-04,-.3444E-07,-.1388E-08,
     4 .2212E+00, .2635E-02, .1612E-04, .2766E-08,-.9770E-09,
     4 .3162E+00, .3718E-02, .1361E-04, .2238E-07, .6228E-09,
     4 .4491E+00, .5330E-02, .1967E-04, .1130E-07, .9380E-09,
     4 .6229E+00, .6924E-02, .2318E-04, .7405E-07, .1877E-08,
     4 .8901E+00, .1036E-01, .5791E-04,-.1261E-06,-.4170E-08,
     4 .1264E+01, .1329E-01, .5246E-04, .8264E-07, .8006E-09,
     4 .1837E+01, .1838E-01, .1531E-04, .1192E-06, .9628E-08,
     4 .2553E+01, .2565E-01, .1345E-03, .2501E-06,-.7128E-08,
     4 .3616E+01, .3494E-01, .1811E-03, .1876E-06,-.9945E-08,
     4 .5193E+01, .4251E-01, .2234E-03, .1113E-05,-.1956E-07,
     4 .7291E+01, .5548E-01, .2691E-03, .2257E-05,-.2823E-07,
     4 .9882E+01, .8229E-01,-.3997E-03, .2539E-05, .7505E-07,
     4 .1040E+02, .1364E+00, .2396E-03,-.2653E-05,-.8985E-08,
     4 .9481E+01, .1431E+00, .1698E-03,-.1884E-05, .4727E-07,
     4 .7102E+01, .1382E+00, .8000E-03,-.4169E-05,-.5986E-07,
     4 .4817E+01, .1006E+00, .4971E-03, .1741E-05, .3680E-07,
     5 .3073E-01, .1060E-02, .1685E-04, .2057E-06, .1376E-08,
     5 .3250E-01, .1081E-02, .1674E-04, .2063E-06, .1410E-08,
     5 .3729E-01, .1104E-02, .1512E-04, .2029E-06, .1591E-08,
     5 .4358E-01, .1219E-02, .1567E-04, .1915E-06, .1457E-08,
     5 .5140E-01, .1576E-02, .2414E-04, .1799E-06, .3830E-09,
     5 .6843E-01, .1849E-02, .2645E-04, .1623E-06,-.7235E-10,
     5 .9013E-01, .2220E-02, .2932E-04, .1516E-06,-.2603E-09,
     5 .1477E+00, .2575E-02, .1313E-04, .2283E-06, .3220E-08,
     5 .2275E+00, .3596E-02, .1003E-04, .2908E-06, .5134E-08,
     5 .3341E+00, .5577E-02, .2436E-04, .2137E-06, .4207E-08,
     5 .6167E+00, .9654E-02, .8056E-04, .2617E-06,-.1574E-08,
     5 .8408E+00, .1139E-01, .7003E-04, .4346E-06, .2950E-08,
     5 .1122E+01, .1629E-01, .1129E-03, .1767E-06,-.1711E-08,
     5 .1604E+01, .2096E-01, .1567E-03, .4008E-06,-.8837E-08,
     5 .2256E+01, .3159E-01, .2720E-03, .2558E-06,-.2096E-07,
     5 .3228E+01, .3908E-01, .2333E-03, .1666E-05, .1700E-08,
     5 .4433E+01, .5401E-01, .8836E-04, .1209E-05, .3277E-07,
     5 .6214E+01, .7139E-01, .2844E-03, .8659E-06,-.8975E-08,
     5 .8883E+01, .1214E+00, .4692E-03,-.3952E-05,-.4179E-07,
     5 .1070E+02, .1283E+00, .1178E-02, .1746E-05,-.1318E-06,
     5 .1423E+02, .1890E+00, .2108E-04,-.1841E-05, .4531E-07,
     5 .1308E+02, .2516E+00, .1488E-02,-.8041E-05,-.1593E-06,
     5 .1082E+02, .2402E+00, .4970E-03,-.3117E-05, .1181E-06,
     5 .5873E+01, .2170E+00, .2438E-02,-.6079E-05,-.1877E-06,
     5 .2984E+01, .1027E+00, .1260E-02, .7025E-05, .2700E-07,
     5 .1567E+01, .6182E-01, .1249E-02, .4508E-05,-.6663E-07,
     5 .1627E+01, .2983E-01, .1840E-03, .5014E-05, .6238E-07,
     5 .1814E+01, .4301E-01, .3540E-03,-.6079E-06,-.2215E-07,
     6 .2679E+01, .8688E-01, .1266E-02, .5835E-05,-.2292E-07,
     6 .2674E+01, .9032E-01, .1363E-02, .5089E-05,-.4266E-07,
     6 .2907E+01, .9037E-01, .1116E-02, .5038E-05,-.1392E-08,
     6 .3053E+01, .8953E-01, .9663E-03, .5114E-05, .2324E-07,
     6 .3393E+01, .9585E-01, .9985E-03, .3540E-05, .1842E-08,
     6 .3641E+01, .8739E-01, .8533E-03, .6089E-05, .3778E-07,
     6 .3979E+01, .8723E-01, .8792E-03, .6312E-05, .2811E-07,
     6 .4731E+01, .1070E+00, .1184E-02, .4556E-05,-.2335E-07,
     6 .5910E+01, .1202E+00, .1488E-02, .3533E-05,-.9056E-07,
     6 .8394E+01, .1517E+00, .1013E-02, .3045E-05, .9213E-08,
     6 .1445E+02, .2547E+00, .9205E-03,-.6289E-05, .2503E-07,
     6 .1641E+02, .2691E+00, .2174E-02,-.5779E-05,-.2074E-06,
     6 .1824E+02, .2805E+00, .2827E-02, .1470E-05,-.1362E-06,
     6 .2484E+02, .2895E+00, .2182E-02, .2012E-04, .9200E-07,
     6 .3228E+02, .2715E+00,-.7519E-03, .2783E-04, .4698E-06,
     6 .4015E+02, .4094E+00, .2015E-03, .1272E-04, .1433E-06,
     6 .4570E+02, .6543E+00, .2055E-02,-.6647E-05,-.8492E-07,
     6 .4541E+02, .7479E+00, .4208E-03,-.8566E-05, .3976E-06,
     6 .3539E+02, .6533E+00, .2515E-02, .8626E-05, .2095E-06,
     6 .2673E+02, .6560E+00, .2446E-02, .1054E-05, .3383E-06,
     6 .1179E+02, .4299E+00, .5160E-02, .1176E-04,-.1008E-06,
     6 .6849E+01, .1998E+00, .1027E-02, .2448E-04, .4590E-06,
     6 .2467E+01, .1354E+00, .3275E-02, .7239E-05,-.2512E-06,
     6 .2487E+01, .4085E-01, .3215E-03, .1424E-04, .1790E-06,
     6 .2652E+01, .5485E-01, .4623E-03, .9730E-06,-.4515E-10,
     6 .2757E+01, .5373E-01, .5512E-03, .1454E-05,-.1937E-07,
     6 .2587E+01, .5036E-01, .5962E-03, .2420E-05,-.1868E-07,
     6 .1840E+01, .2508E-01, .5036E-03, .6535E-05, .1483E-07 /
      DATA ((( CL7H2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 4, 4) /
     7 .2162E+03, .3719E+01, .1760E-01, .6433E-04, .9080E-06,
     7 .2162E+03, .3706E+01, .1721E-01, .6730E-04, .9864E-06,
     7 .2152E+03, .3705E+01, .1822E-01, .6752E-04, .8199E-06,
     7 .2146E+03, .3707E+01, .1880E-01, .6733E-04, .7229E-06,
     7 .2131E+03, .3677E+01, .1858E-01, .7369E-04, .8188E-06,
     7 .2121E+03, .3715E+01, .1902E-01, .5693E-04, .7750E-06,
     7 .2106E+03, .4204E+01, .3293E-01,-.4423E-04,-.2055E-05,
     7 .2228E+03, .3967E+01, .2013E-01,-.7162E-05,-.1466E-06,
     7 .2174E+03, .3899E+01, .1884E-01,-.3389E-05, .1150E-06,
     7 .2271E+03, .3934E+01, .2140E-01, .1457E-04,-.1974E-06,
     7 .2004E+03, .3456E+01, .2094E-01, .5202E-04,-.1874E-06,
     7 .1905E+03, .3366E+01, .1588E-01, .4846E-04, .7028E-06,
     7 .1803E+03, .3253E+01, .1270E-01, .2200E-04, .4645E-06,
     7 .1488E+03, .3143E+01, .1470E-01,-.5471E-04,-.3892E-06,
     7 .1114E+03, .3069E+01, .2493E-01,-.8397E-04,-.1775E-05,
     7 .6775E+02, .2405E+01, .2132E-01,-.4006E-04,-.7314E-06,
     7 .2845E+02, .1198E+01, .1481E-01, .4502E-04,-.6451E-07,
     7 .3587E+01, .5628E+00, .1903E-01, .5347E-04,-.1599E-05,
     7 .3853E+01, .2854E+00, .8946E-02, .3495E-04,-.6220E-06,
     7 .4115E+01, .3230E-01,-.1339E-03, .9949E-06, .1713E-07,
     7 .4514E+01, .4306E-01, .1045E-03,-.3784E-06,-.3653E-07,
     7 .5037E+01, .5328E-01,-.1313E-03,-.1217E-05, .4063E-08,
     7 .5058E+01, .6589E-01,-.4212E-04,-.1356E-05, .1604E-07,
     7 .4487E+01, .6287E-01, .1931E-03, .7326E-06,-.1275E-08,
     7 .4122E+01, .6398E-01,-.1124E-04,-.3712E-06, .1871E-07,
     7 .3504E+01, .7436E-01,-.1268E-03,-.3277E-05, .5389E-07,
     7 .2483E+01, .7784E-01, .3708E-03,-.4513E-05,-.1066E-07,
     7 .3159E+01, .7310E-01,-.2678E-03,-.6098E-05, .5793E-07 /
      DATA ((( CL7CO2GH(K,J,I), K = 1, 5), J = 1, 28), I = 1, 3) /
     4 .7533E-03, .1759E-04, .2086E-06, .1701E-08, .7958E-11,
     4 .1240E-02, .2724E-04, .3004E-06, .1972E-08, .6215E-11,
     4 .2071E-02, .4233E-04, .4310E-06, .2389E-08, .4750E-11,
     4 .3501E-02, .6658E-04, .6299E-06, .3096E-08, .3672E-11,
     4 .6005E-02, .1055E-03, .9128E-06, .4268E-08, .6298E-11,
     4 .1045E-01, .1707E-03, .1361E-05, .5896E-08, .7869E-11,
     4 .1848E-01, .2775E-03, .2017E-05, .8748E-08, .1520E-10,
     4 .3312E-01, .4599E-03, .3097E-05, .1267E-07, .9837E-11,
     4 .6036E-01, .7744E-03, .4852E-05, .1960E-07,-.1083E-10,
     4 .1122E+00, .1343E-02, .7612E-05, .2884E-07,-.5713E-10,
     4 .2939E+00, .3218E-02, .1513E-04, .5520E-07,-.1293E-09,
     4 .4231E+00, .4509E-02, .1931E-04, .7009E-07,-.8888E-10,
     4 .6096E+00, .6369E-02, .2573E-04, .8445E-07,-.1876E-09,
     4 .8783E+00, .8991E-02, .3577E-04, .1071E-06,-.5840E-09,
     4 .1263E+01, .1267E-01, .4923E-04, .1465E-06,-.1119E-08,
     4 .1814E+01, .1777E-01, .6644E-04, .2139E-06,-.1677E-08,
     4 .2595E+01, .2469E-01, .8332E-04, .3488E-06,-.1476E-08,
     4 .3695E+01, .3432E-01, .1039E-03, .4822E-06,-.1712E-08,
     4 .5231E+01, .4768E-01, .1220E-03, .5797E-06,-.1247E-08,
     4 .7349E+01, .6585E-01, .1372E-03, .6522E-06, .3123E-10,
     4 .1022E+02, .8967E-01, .1715E-03, .7535E-06,-.1828E-08,
     4 .1416E+02, .1201E+00, .1571E-03, .8937E-06, .1947E-08,
     4 .1954E+02, .1614E+00, .9713E-04, .7591E-06, .7562E-08,
     4 .2670E+02, .2189E+00, .1658E-04, .3104E-06, .1403E-07,
     4 .3583E+02, .2967E+00,-.1940E-03,-.3044E-06, .3986E-07,
     4 .4628E+02, .4074E+00,-.2678E-03,-.3593E-05, .4834E-07,
     4 .5626E+02, .5270E+00, .2664E-03,-.7034E-05, .6535E-08,
     4 .6676E+02, .6160E+00, .3844E-03,-.6498E-05, .1904E-07,
     5 .5221E-01, .1805E-02, .2934E-04, .2960E-06, .1506E-08,
     5 .6099E-01, .1958E-02, .3034E-04, .2919E-06, .1428E-08,
     5 .7430E-01, .2183E-02, .3210E-04, .2900E-06, .1305E-08,
     5 .9564E-01, .2507E-02, .3425E-04, .2939E-06, .1267E-08,
     5 .1308E+00, .2982E-02, .3636E-04, .3019E-06, .1392E-08,
     5 .1887E+00, .3740E-02, .4048E-04, .3122E-06, .1437E-08,
     5 .2868E+00, .4941E-02, .4705E-04, .3218E-06, .1375E-08,
     5 .4563E+00, .6876E-02, .5772E-04, .3267E-06, .1108E-08,
     5 .7576E+00, .9984E-02, .7128E-04, .3349E-06, .1147E-08,
     5 .1301E+01, .1510E-01, .9173E-04, .3467E-06, .1288E-08,
     5 .3084E+01, .3015E-01, .1499E-03, .3736E-06, .1305E-08,
     5 .4287E+01, .3959E-01, .1842E-03, .3846E-06, .1300E-08,
     5 .5989E+01, .5211E-01, .2223E-03, .4357E-06, .2183E-08,
     5 .8378E+01, .6927E-01, .2770E-03, .4164E-06, .2439E-08,
     5 .1174E+02, .9184E-01, .3309E-03, .4309E-06, .5361E-08,
     5 .1644E+02, .1224E+00, .3954E-03, .2477E-06, .8943E-08,
     5 .2294E+02, .1624E+00, .5228E-03,-.4672E-07, .4298E-08,
     5 .3187E+02, .2121E+00, .6170E-03,-.3082E-06, .1099E-07,
     5 .4400E+02, .2719E+00, .6996E-03,-.8778E-06, .2000E-07,
     5 .6025E+02, .3486E+00, .8769E-03,-.2275E-05, .1487E-07,
     5 .8148E+02, .4338E+00, .1275E-02,-.2286E-05,-.2183E-07,
     5 .1091E+03, .5291E+00, .1301E-02,-.1092E-05,-.1145E-07,
     5 .1433E+03, .6458E+00, .1046E-02,-.2897E-05, .3588E-07,
     5 .1827E+03, .7671E+00, .1326E-02,-.8701E-05, .4600E-07,
     5 .2277E+03, .8028E+00, .2318E-02,-.7950E-05,-.1857E-07,
     5 .2850E+03, .7545E+00, .2500E-02,-.8734E-05, .3775E-07,
     5 .3618E+03, .6011E+00, .2124E-02,-.7617E-05, .1066E-06,
     5 .4619E+03, .3803E+00, .2990E-02,-.7075E-05,-.9234E-07,
     6 .4780E+01, .1369E+00, .1601E-02, .8635E-05, .1564E-07,
     6 .4916E+01, .1363E+00, .1576E-02, .8748E-05, .1836E-07,
     6 .5166E+01, .1368E+00, .1545E-02, .8726E-05, .2062E-07,
     6 .5579E+01, .1392E+00, .1525E-02, .8545E-05, .1990E-07,
     6 .6258E+01, .1443E+00, .1500E-02, .8234E-05, .1968E-07,
     6 .7359E+01, .1546E+00, .1495E-02, .7704E-05, .1741E-07,
     6 .9122E+01, .1720E+00, .1526E-02, .7079E-05, .1276E-07,
     6 .1195E+02, .1972E+00, .1548E-02, .6922E-05, .1710E-07,
     6 .1663E+02, .2384E+00, .1626E-02, .6359E-05, .1751E-07,
     6 .2454E+02, .3044E+00, .1758E-02, .5424E-05, .1714E-07,
     6 .4848E+02, .4761E+00, .2260E-02, .4878E-05, .3592E-09,
     6 .6383E+02, .5736E+00, .2499E-02, .4589E-05,-.7953E-08,
     6 .8489E+02, .6976E+00, .2668E-02, .3466E-05,-.5880E-08,
     6 .1134E+03, .8629E+00, .2916E-02, .3468E-06, .2279E-08,
     6 .1520E+03, .1073E+01, .3294E-02,-.2331E-05, .2682E-07,
     6 .2033E+03, .1319E+01, .4290E-02,-.2585E-05,-.5028E-07,
     6 .2706E+03, .1592E+01, .5192E-02, .7664E-06,-.1258E-06,
     6 .3575E+03, .1906E+01, .4917E-02, .9025E-05,-.6084E-07,
     6 .4645E+03, .2358E+01, .4227E-02, .5232E-05,-.2967E-07,
     6 .5874E+03, .2909E+01, .2957E-02,-.1132E-04, .1926E-06,
     6 .7166E+03, .3404E+01, .3177E-02,-.3915E-04, .4958E-06,
     6 .8538E+03, .3568E+01, .8872E-02,-.6325E-04, .7559E-07,
     6 .1026E+04, .3023E+01, .1190E-01,-.2772E-04,-.1500E-06,
     6 .1264E+04, .2224E+01, .8202E-02,-.7830E-05, .6620E-07,
     6 .1558E+04, .1497E+01, .5592E-02,-.1036E-04,-.8107E-07,
     6 .1876E+04, .6267E+00, .2353E-02, .7971E-05,-.2378E-07,
     6 .2159E+04,-.1868E+00,-.2069E-03, .1924E-04,-.8951E-07,
     6 .2348E+04,-.8938E+00,-.4795E-02, .1456E-04, .5410E-06 /
      DATA ((( CL7CO2GH(K,J,I), K = 1, 5), J = 1, 28), I = 4, 6) /
     7 .2615E+03, .5304E+01, .3627E-01, .5074E-04,-.3389E-06,
     7 .2617E+03, .5303E+01, .3639E-01, .5039E-04,-.3520E-06,
     7 .2623E+03, .5296E+01, .3652E-01, .5041E-04,-.3596E-06,
     7 .2639E+03, .5276E+01, .3662E-01, .5097E-04,-.3578E-06,
     7 .2679E+03, .5237E+01, .3681E-01, .5271E-04,-.3778E-06,
     7 .2771E+03, .5164E+01, .3685E-01, .5950E-04,-.4241E-06,
     7 .2978E+03, .5056E+01, .3443E-01, .7421E-04,-.1410E-06,
     7 .3368E+03, .5065E+01, .3200E-01, .7296E-04, .2043E-07,
     7 .4073E+03, .5236E+01, .2858E-01, .5791E-04, .2245E-06,
     7 .5211E+03, .5557E+01, .3079E-01, .5554E-04,-.4996E-06,
     7 .8666E+03, .6459E+01, .2403E-01, .7457E-04, .3639E-06,
     7 .1085E+04, .7166E+01, .1887E-01, .4120E-04, .8569E-06,
     7 .1368E+04, .8129E+01, .1834E-01, .8641E-05, .6606E-06,
     7 .1734E+04, .9322E+01, .2297E-01, .3645E-05,-.7712E-06,
     7 .2203E+04, .1051E+02, .1850E-01, .7040E-04,-.9868E-06,
     7 .2771E+04, .1259E+02, .4016E-02,-.1628E-04, .7452E-06,
     7 .3414E+04, .1509E+02,-.3010E-02,-.1970E-03, .2855E-05,
     7 .4135E+04, .1642E+02, .2275E-01,-.3437E-03, .4329E-06,
     7 .5048E+04, .1487E+02, .3174E-01,-.2763E-03, .5903E-06,
     7 .6264E+04, .1120E+02, .3591E-01,-.1358E-03,-.9681E-06,
     7 .7830E+04, .6923E+01, .1644E-01, .2735E-04,-.1368E-05,
     7 .9576E+04, .3529E+01,-.2416E-01, .1569E-03, .4027E-06,
     7 .1108E+05, .2838E+01,-.4676E-01, .2050E-04, .5772E-06,
     7 .1185E+05, .2034E+01,-.4604E-01, .4265E-04, .1925E-06,
     7 .1169E+05, .6925E+00,-.5102E-01, .2157E-04, .1562E-05,
     7 .1066E+05,-.1466E+00,-.3748E-01,-.8924E-05, .9231E-06,
     7 .9231E+04,-.8276E+00,-.3130E-01, .5709E-04, .1299E-05,
     7 .7788E+04, .9468E+00,-.1446E-01,-.1953E-04, .2703E-06,
     8 .4476E+04, .5788E+02, .1918E+00,-.2188E-03,-.1428E-05,
     8 .4477E+04, .5788E+02, .1916E+00,-.2194E-03,-.1407E-05,
     8 .4479E+04, .5788E+02, .1915E+00,-.2201E-03,-.1383E-05,
     8 .4482E+04, .5787E+02, .1913E+00,-.2214E-03,-.1367E-05,
     8 .4488E+04, .5785E+02, .1912E+00,-.2248E-03,-.1350E-05,
     8 .4500E+04, .5781E+02, .1915E+00,-.2427E-03,-.1268E-05,
     8 .4525E+04, .5766E+02, .1989E+00,-.2801E-03,-.2176E-05,
     8 .4590E+04, .5682E+02, .2049E+00,-.2793E-03,-.2457E-05,
     8 .4758E+04, .5483E+02, .2150E+00,-.1972E-03,-.3812E-05,
     8 .5198E+04, .5185E+02, .1836E+00,-.6698E-04,-.7395E-06,
     8 .6666E+04, .4913E+02, .1324E+00,-.1569E-03,-.7295E-06,
     8 .7490E+04, .4931E+02, .1489E+00,-.2815E-03,-.5456E-05,
     8 .8585E+04, .4861E+02, .9724E-01,-.2913E-03, .3049E-05,
     8 .9957E+04, .4754E+02, .7270E-01,-.7409E-03, .8337E-05,
     8 .1172E+05, .4459E+02, .1294E+00,-.1470E-02, .5003E-05,
     8 .1419E+05, .3088E+02, .2149E+00,-.9643E-03,-.3364E-05,
     8 .1783E+05, .8358E+01, .1741E+00, .9848E-04,-.2619E-05,
     8 .2259E+05,-.1332E+02, .6490E-01, .5333E-03, .1723E-05,
     8 .2785E+05,-.2933E+02,-.2199E-01, .5109E-03, .3031E-05,
     8 .3240E+05,-.3835E+02,-.5586E-01, .4911E-03,-.6266E-06,
     8 .3522E+05,-.4264E+02,-.1567E+00, .6481E-03, .6558E-05,
     8 .3537E+05,-.3794E+02,-.1826E+00, .4845E-03, .5126E-05,
     8 .3304E+05,-.2947E+02,-.1975E+00, .6451E-03, .4877E-05,
     8 .2958E+05,-.1716E+02,-.1930E+00, .3573E-03, .2223E-05,
     8 .2679E+05,-.5498E+01,-.1766E+00, .2773E-03, .1864E-05,
     8 .2521E+05, .1577E+01,-.1613E+00, .1568E-03, .3465E-05,
     8 .2448E+05, .4568E+01,-.1126E+00,-.1242E-03, .2870E-06,
     8 .2433E+05,-.1987E+01,-.1213E+00, .1448E-03, .3506E-05,
     9 .4412E+05, .3472E+03,-.2846E+00,-.6166E-02, .8124E-05,
     9 .4413E+05, .3471E+03,-.2844E+00,-.6166E-02, .8085E-05,
     9 .4414E+05, .3471E+03,-.2841E+00,-.6166E-02, .8041E-05,
     9 .4415E+05, .3469E+03,-.2836E+00,-.6166E-02, .7975E-05,
     9 .4419E+05, .3466E+03,-.2833E+00,-.6166E-02, .7981E-05,
     9 .4426E+05, .3460E+03,-.2828E+00,-.6177E-02, .8074E-05,
     9 .4441E+05, .3448E+03,-.2810E+00,-.6204E-02, .8058E-05,
     9 .4472E+05, .3423E+03,-.2720E+00,-.6254E-02, .6958E-05,
     9 .4535E+05, .3371E+03,-.2607E+00,-.6429E-02, .7590E-05,
     9 .4661E+05, .3246E+03,-.2078E+00,-.6677E-02, .7502E-05,
     9 .5167E+05, .2660E+03,-.5957E-01,-.6248E-02, .8927E-05,
     9 .5572E+05, .2209E+03,-.9796E-01,-.5173E-02, .2121E-04,
     9 .6149E+05, .1612E+03,-.9377E-01,-.3597E-02, .1533E-04,
     9 .6919E+05, .9042E+02,-.1655E+00,-.2015E-02, .1561E-04,
     9 .7826E+05, .1096E+02,-.2393E+00, .1775E-02,-.5753E-05,
     9 .8635E+05,-.3982E+02,-.4361E+00, .1924E-02, .1590E-04,
     9 .9097E+05,-.6474E+02,-.3228E+00, .6485E-04,-.1016E-04,
     9 .9124E+05,-.7755E+02,-.5427E+00,-.6166E-03, .3452E-04,
     9 .8580E+05,-.7678E+02,-.3057E+00,-.1002E-02, .1055E-04,
     9 .7662E+05,-.8212E+02,-.3641E+00,-.2757E-03, .3060E-04,
     9 .6534E+05,-.7810E+02,-.1041E+00,-.4618E-03, .8734E-05,
     9 .5522E+05,-.8662E+02, .5203E-01,-.1841E-03, .1274E-05,
     9 .4858E+05,-.1007E+03, .9983E-01, .5084E-04,-.8371E-06,
     9 .4488E+05,-.1080E+03, .6578E-02, .3111E-03, .1139E-04,
     9 .4150E+05,-.1065E+03, .1077E+00,-.9938E-04, .4886E-06,
     9 .3871E+05,-.1083E+03, .1047E+00, .5064E-03,-.4781E-06,
     9 .3633E+05,-.1004E+03, .1903E-01, .5945E-03, .5293E-05,
     9 .3363E+05,-.8354E+02,-.1288E-01, .4747E-03, .1656E-05 /
      DATA ((( CL7CO2GH(K,J,I), K = 1, 5), J = 1, 28), I = 7, 7) /
     a .5140E+06,-.1411E+04,-.1048E+01, .1654E-01, .1947E-04,
     a .5140E+06,-.1411E+04,-.1047E+01, .1652E-01, .1922E-04,
     a .5140E+06,-.1411E+04,-.1047E+01, .1654E-01, .1930E-04,
     a .5140E+06,-.1410E+04,-.1050E+01, .1654E-01, .1964E-04,
     a .5136E+06,-.1409E+04,-.1054E+01, .1654E-01, .2006E-04,
     a .5132E+06,-.1407E+04,-.1056E+01, .1656E-01, .2031E-04,
     a .5120E+06,-.1402E+04,-.1066E+01, .1660E-01, .2123E-04,
     a .5100E+06,-.1392E+04,-.1083E+01, .1665E-01, .2266E-04,
     a .5056E+06,-.1372E+04,-.1124E+01, .1678E-01, .2670E-04,
     a .4968E+06,-.1331E+04,-.1149E+01, .1651E-01, .2540E-04,
     a .4664E+06,-.1185E+04,-.1219E+01, .1504E-01, .1425E-04,
     a .4456E+06,-.1085E+04,-.1202E+01, .1347E-01, .5864E-05,
     a .4172E+06,-.9484E+03,-.1014E+01, .1018E-01,-.1949E-04,
     a .3803E+06,-.7892E+03,-.8996E+00, .8948E-02,-.2216E-04,
     a .3355E+06,-.6040E+03,-.1064E+01, .2726E-02, .5016E-04,
     a .2868E+06,-.4540E+03,-.9408E+00, .9592E-03, .2099E-04,
     a .2383E+06,-.3363E+03,-.9800E+00, .2306E-02, .5124E-04,
     a .1916E+06,-.2437E+03,-.3055E+00, .3395E-02,-.4324E-04,
     a .1512E+06,-.1799E+03,-.5340E+00, .3604E-02, .6332E-06,
     a .1164E+06,-.1153E+03,-.2437E+00, .9536E-03,-.1570E-04,
     a .8864E+05,-.8796E+02,-.1052E+00,-.3615E-03,-.8576E-05,
     a .6732E+05,-.7572E+02,-.5404E-01,-.9768E-03, .1252E-04,
     a .5116E+05,-.7624E+02, .1354E+00,-.2120E-02, .2058E-04,
     a .4036E+05,-.1004E+03, .5168E+00,-.1731E-02,-.5504E-05,
     a .3519E+05,-.1283E+03, .3094E+00, .2044E-03, .1278E-04,
     a .3240E+05,-.1182E+03, .1915E+00,-.1668E-03, .1033E-05,
     a .2966E+05,-.9956E+02, .9680E-01, .1245E-03, .1818E-05,
     a .2662E+05,-.7916E+02, .2546E-01, .3327E-03, .1057E-05 /
C
C----------------------------------------------------------------------C
C     SPECTRAL REGION: 340-540 CM^-1. GAS: H2O                         C
C----------------------------------------------------------------------C
C
      COMMON /BANDL8/ GWL8(6), CL8H2O(5,18,6), CL8CS(5,6,4),
     1                         CL8CF(5,6,4)
      DATA GWL8 / .09800, .27720, .22500, .20600, .12500, .05300 /
      DATA ((( CL8H2O(K,J,I), K = 1, 5), J = 1, 18), I = 1, 4) /
     1 .3229E-03, .4497E-05, .2238E-07, .1178E-09, .6098E-12,
     1 .4900E-03, .6826E-05, .3397E-07, .1787E-09, .9256E-12,
     1 .7434E-03, .1036E-04, .5152E-07, .2711E-09, .1406E-11,
     1 .1127E-02, .1571E-04, .7807E-07, .4108E-09, .2145E-11,
     1 .1708E-02, .2381E-04, .1181E-06, .6211E-09, .3287E-11,
     1 .2588E-02, .3608E-04, .1787E-06, .9398E-09, .5027E-11,
     1 .3918E-02, .5465E-04, .2702E-06, .1421E-08, .7680E-11,
     1 .5931E-02, .8277E-04, .4081E-06, .2146E-08, .1183E-10,
     1 .8965E-02, .1252E-03, .6172E-06, .3235E-08, .1795E-10,
     1 .1354E-01, .1893E-03, .9381E-06, .4878E-08, .2651E-10,
     1 .2044E-01, .2859E-03, .1427E-05, .7366E-08, .3840E-10,
     1 .3081E-01, .4309E-03, .2152E-05, .1118E-07, .5852E-10,
     1 .4640E-01, .6479E-03, .3221E-05, .1699E-07, .9206E-10,
     1 .6971E-01, .9730E-03, .4778E-05, .2551E-07, .1489E-09,
     1 .1044E+00, .1458E-02, .7169E-05, .3796E-07, .2206E-09,
     1 .1558E+00, .2172E-02, .1060E-04, .5747E-07, .3551E-09,
     1 .2314E+00, .3216E-02, .1582E-04, .8670E-07, .5066E-09,
     1 .3426E+00, .4692E-02, .2161E-04, .1347E-06, .1031E-08,
     2 .2104E-02, .3167E-04, .1722E-06, .2633E-09,-.1578E-11,
     2 .3167E-02, .4767E-04, .2592E-06, .3958E-09,-.2383E-11,
     2 .4764E-02, .7173E-04, .3905E-06, .5944E-09,-.3642E-11,
     2 .7163E-02, .1079E-03, .5888E-06, .8916E-09,-.5679E-11,
     2 .1077E-01, .1623E-03, .8888E-06, .1334E-08,-.9037E-11,
     2 .1618E-01, .2442E-03, .1342E-05, .2002E-08,-.1440E-10,
     2 .2430E-01, .3669E-03, .2023E-05, .3027E-08,-.2209E-10,
     2 .3649E-01, .5507E-03, .3042E-05, .4617E-08,-.3314E-10,
     2 .5474E-01, .8258E-03, .4574E-05, .7060E-08,-.4968E-10,
     2 .8204E-01, .1238E-02, .6861E-05, .1084E-07,-.7308E-10,
     2 .1228E+00, .1851E-02, .1022E-04, .1654E-07,-.9934E-10,
     2 .1835E+00, .2766E-02, .1527E-04, .2466E-07,-.1446E-09,
     2 .2736E+00, .4125E-02, .2279E-04, .3703E-07,-.2095E-09,
     2 .4068E+00, .6129E-02, .3408E-04, .5640E-07,-.3322E-09,
     2 .6032E+00, .9050E-02, .5009E-04, .8847E-07,-.4121E-09,
     2 .8918E+00, .1329E-01, .7219E-04, .1369E-06,-.3589E-09,
     2 .1312E+01, .1948E-01, .1064E-03, .1939E-06,-.7568E-09,
     2 .1923E+01, .2839E-01, .1537E-03, .2804E-06,-.1043E-08,
     3 .7446E-02, .1111E-03, .6046E-06, .8289E-09,-.4900E-11,
     3 .1119E-01, .1671E-03, .9134E-06, .1258E-08,-.7887E-11,
     3 .1682E-01, .2510E-03, .1373E-05, .1945E-08,-.1124E-10,
     3 .2526E-01, .3770E-03, .2061E-05, .2983E-08,-.1581E-10,
     3 .3794E-01, .5659E-03, .3090E-05, .4602E-08,-.2153E-10,
     3 .5695E-01, .8488E-03, .4629E-05, .7068E-08,-.2907E-10,
     3 .8540E-01, .1272E-02, .6943E-05, .1085E-07,-.4262E-10,
     3 .1279E+00, .1903E-02, .1036E-04, .1674E-07,-.5470E-10,
     3 .1915E+00, .2846E-02, .1543E-04, .2488E-07,-.7320E-10,
     3 .2860E+00, .4248E-02, .2294E-04, .3714E-07,-.9169E-10,
     3 .4261E+00, .6327E-02, .3436E-04, .5581E-07,-.1570E-09,
     3 .6330E+00, .9376E-02, .5132E-04, .8718E-07,-.2525E-09,
     3 .9376E+00, .1384E-01, .7570E-04, .1350E-06,-.3252E-09,
     3 .1385E+01, .2027E-01, .1078E-03, .2157E-06, .1516E-09,
     3 .2038E+01, .2969E-01, .1553E-03, .2960E-06, .2982E-09,
     3 .2984E+01, .4326E-01, .2229E-03, .3967E-06, .3153E-09,
     3 .4333E+01, .6276E-01, .3264E-03, .5118E-06,-.9117E-09,
     3 .6276E+01, .9074E-01, .4698E-03, .6813E-06,-.1851E-08,
     4 .3967E-01, .6059E-03, .3125E-05, .2384E-08,-.3299E-10,
     4 .5947E-01, .9066E-03, .4649E-05, .3729E-08,-.4392E-10,
     4 .8910E-01, .1356E-02, .6930E-05, .5633E-08,-.6395E-10,
     4 .1335E+00, .2026E-02, .1038E-04, .8408E-08,-.1025E-09,
     4 .1998E+00, .3029E-02, .1547E-04, .1266E-07,-.1495E-09,
     4 .2991E+00, .4525E-02, .2298E-04, .1888E-07,-.2122E-09,
     4 .4470E+00, .6756E-02, .3422E-04, .2749E-07,-.3131E-09,
     4 .6667E+00, .1007E-01, .5103E-04, .4005E-07,-.4745E-09,
     4 .9922E+00, .1498E-01, .7611E-04, .6001E-07,-.7425E-09,
     4 .1472E+01, .2220E-01, .1135E-03, .8729E-07,-.1228E-08,
     4 .2175E+01, .3269E-01, .1657E-03, .1423E-06,-.1472E-08,
     4 .3201E+01, .4791E-01, .2404E-03, .2029E-06,-.1948E-08,
     4 .4684E+01, .6978E-01, .3502E-03, .2804E-06,-.3323E-08,
     4 .6810E+01, .1010E+00, .5049E-03, .3511E-06,-.5520E-08,
     4 .9836E+01, .1453E+00, .7112E-03, .4555E-06,-.6331E-08,
     4 .1413E+02, .2078E+00, .9918E-03, .6837E-06,-.4149E-08,
     4 .2014E+02, .2960E+00, .1430E-02, .7609E-06,-.1040E-07,
     4 .2842E+02, .4146E+00, .2034E-02, .1088E-05,-.2282E-07 /
      DATA ((( CL8H2O(K,J,I), K = 1, 5), J = 1, 18), I = 5, 6) /
     5 .3133E+00, .4523E-02, .1887E-04, .6784E-09,-.1336E-09,
     5 .4679E+00, .6729E-02, .2771E-04, .4290E-09,-.1794E-09,
     5 .6987E+00, .1002E-01, .4070E-04,-.3248E-08,-.2409E-09,
     5 .1043E+01, .1493E-01, .5981E-04,-.8776E-08,-.3005E-09,
     5 .1555E+01, .2224E-01, .8850E-04,-.2206E-07,-.4725E-09,
     5 .2316E+01, .3304E-01, .1310E-03,-.2990E-07,-.6487E-09,
     5 .3444E+01, .4901E-01, .1929E-03,-.3852E-07,-.7544E-09,
     5 .5109E+01, .7250E-01, .2833E-03,-.6448E-07,-.1062E-08,
     5 .7551E+01, .1068E+00, .4147E-03,-.9567E-07,-.1432E-08,
     5 .1111E+02, .1566E+00, .6031E-03,-.1274E-06,-.2022E-08,
     5 .1629E+02, .2283E+00, .8610E-03,-.2567E-06,-.2455E-08,
     5 .2374E+02, .3310E+00, .1219E-02,-.5411E-06,-.3350E-08,
     5 .3439E+02, .4767E+00, .1697E-02,-.8358E-06, .3353E-09,
     5 .4947E+02, .6840E+00, .2392E-02,-.1672E-05,-.1353E-08,
     5 .7058E+02, .9732E+00, .3392E-02,-.3087E-05,-.1572E-07,
     5 .9985E+02, .1362E+01, .4450E-02,-.5045E-05,-.8712E-08,
     5 .1385E+03, .1876E+01, .5845E-02,-.7922E-05,-.8375E-08,
     5 .1862E+03, .2526E+01, .7113E-02,-.1443E-04, .1020E-06,
     6 .4125E+01, .6340E-01, .2952E-03, .1065E-06,-.1185E-08,
     6 .6031E+01, .9171E-01, .4119E-03, .7714E-07,-.8214E-09,
     6 .8805E+01, .1326E+00, .5964E-03, .6948E-07,-.3100E-08,
     6 .1286E+02, .1918E+00, .8694E-03, .6308E-07,-.8493E-08,
     6 .1881E+02, .2766E+00, .1203E-02, .1540E-06,-.7264E-08,
     6 .2745E+02, .3997E+00, .1704E-02, .9639E-07,-.9601E-08,
     6 .3991E+02, .5767E+00, .2445E-02,-.1334E-06,-.2008E-07,
     6 .5792E+02, .8290E+00, .3401E-02,-.6853E-06,-.2564E-07,
     6 .8363E+02, .1189E+01, .4774E-02,-.1636E-05,-.3909E-07,
     6 .1201E+03, .1697E+01, .6539E-02,-.3083E-05,-.2372E-07,
     6 .1711E+03, .2415E+01, .9242E-02,-.6990E-05,-.6165E-07,
     6 .2423E+03, .3393E+01, .1259E-01,-.1152E-04,-.7322E-07,
     6 .3363E+03, .4678E+01, .1776E-01,-.1541E-04,-.2280E-06,
     6 .4560E+03, .6299E+01, .2211E-01,-.1754E-04, .2881E-07,
     6 .5923E+03, .8286E+01, .3171E-01,-.3971E-04,-.4238E-06,
     6 .7342E+03, .1019E+02, .3986E-01,-.2432E-04,-.4088E-06,
     6 .8676E+03, .1207E+02, .4605E-01,-.3246E-04,-.1283E-06,
     6 .9753E+03, .1367E+02, .5930E-01,-.3330E-04,-.1258E-05 /
      DATA ((( CL8CS(K,J,I), K = 1, 5), J = 1, 6), I = 1, 4) /
     1 .1958E+02,-.3684E+00, .3532E-02,-.3134E-04, .2012E-06,
     1 .2926E+02,-.5510E+00, .5292E-02,-.4673E-04, .2975E-06,
     1 .4370E+02,-.8226E+00, .7933E-02,-.6982E-04, .4380E-06,
     1 .6527E+02,-.1228E+01, .1187E-01,-.1047E-03, .6543E-06,
     1 .9733E+02,-.1834E+01, .1790E-01,-.1567E-03, .9477E-06,
     1 .1451E+03,-.2736E+01, .2682E-01,-.2359E-03, .1418E-05,
     2 .3586E+02,-.6042E+00, .5778E-02,-.4229E-04, .1921E-06,
     2 .5342E+02,-.9044E+00, .8585E-02,-.6263E-04, .2978E-06,
     2 .7956E+02,-.1359E+01, .1262E-01,-.9174E-04, .4884E-06,
     2 .1182E+03,-.2029E+01, .1914E-01,-.1372E-03, .6773E-06,
     2 .1757E+03,-.3030E+01, .2900E-01,-.2041E-03, .9247E-06,
     2 .2602E+03,-.4514E+01, .4452E-01,-.3055E-03, .1167E-05,
     3 .5001E+02,-.8113E+00, .6838E-02,-.4663E-04, .2328E-06,
     3 .7453E+02,-.1204E+01, .1025E-01,-.7046E-04, .3336E-06,
     3 .1113E+03,-.1778E+01, .1539E-01,-.1082E-03, .4612E-06,
     3 .1660E+03,-.2640E+01, .2245E-01,-.1629E-03, .7655E-06,
     3 .2476E+03,-.3897E+01, .3187E-01,-.2468E-03, .1418E-05,
     3 .3716E+03,-.5824E+01, .4584E-01,-.3619E-03, .2344E-05,
     4 .6183E+02,-.9639E+00, .7972E-02,-.5661E-04, .2868E-06,
     4 .9171E+02,-.1422E+01, .1168E-01,-.8534E-04, .4554E-06,
     4 .1360E+03,-.2116E+01, .1763E-01,-.1259E-03, .6335E-06,
     4 .2019E+03,-.3151E+01, .2653E-01,-.1855E-03, .9002E-06,
     4 .2994E+03,-.4715E+01, .4125E-01,-.2715E-03, .1029E-05,
     4 .4415E+03,-.7029E+01, .6260E-01,-.4001E-03, .1380E-05 /
      DATA ((( CL8CF(K,J,I), K = 1, 5), J = 1, 6), I = 1, 4) /
     1 .7421E-01,-.3174E-03,-.5260E-06,-.6845E-08, .2739E-09,
     1 .1109E+00,-.4750E-03,-.7115E-06,-.9775E-08, .3891E-09,
     1 .1654E+00,-.7022E-03,-.8033E-06,-.1512E-07, .5245E-09,
     1 .2468E+00,-.1038E-02,-.1078E-05,-.2435E-07, .7631E-09,
     1 .3669E+00,-.1544E-02,-.2402E-06,-.3858E-07, .8937E-09,
     1 .5456E+00,-.2285E-02, .4113E-06,-.6651E-07, .1243E-08,
     2 .1866E+00,-.7713E-03, .5633E-05,-.1263E-07,-.1169E-09,
     2 .2774E+00,-.1212E-02, .7367E-05,-.7826E-08, .5910E-10,
     2 .4119E+00,-.1990E-02, .7048E-05, .2037E-07, .8969E-09,
     2 .6094E+00,-.2981E-02, .1407E-04, .2701E-07, .6895E-09,
     2 .9005E+00,-.4492E-02, .2643E-04, .3653E-07,-.9039E-10,
     2 .1322E+01,-.6669E-02, .5356E-04, .3722E-07,-.2687E-08,
     3 .3532E+00,-.2106E-02, .5403E-05,-.5615E-08, .2486E-09,
     3 .5256E+00,-.3043E-02, .9467E-05,-.2657E-07, .4013E-10,
     3 .7843E+00,-.4225E-02, .1746E-04,-.9593E-07,-.8149E-09,
     3 .1169E+01,-.6121E-02, .1969E-04,-.1723E-06,-.3055E-09,
     3 .1741E+01,-.8663E-02, .1045E-04,-.2977E-06, .2924E-08,
     3 .2618E+01,-.1294E-01,-.2893E-05,-.3646E-06, .6870E-08,
     4 .5280E+00,-.3273E-02, .1221E-04,-.8300E-07, .5134E-09,
     4 .7823E+00,-.4740E-02, .1606E-04,-.1407E-06, .1188E-08,
     4 .1158E+01,-.7080E-02, .2810E-04,-.1972E-06, .1164E-08,
     4 .1717E+01,-.1065E-01, .4674E-04,-.2611E-06, .1267E-08,
     4 .2543E+01,-.1624E-01, .9264E-04,-.3372E-06,-.1986E-08,
     4 .3728E+01,-.2473E-01, .1575E-03,-.4391E-06,-.4979E-08 /
C
      COMMON /BANDL8GH/ GWL8GH(3), CL8H2OGH(5,28,3)
      DATA GWL8GH / .01500, .00062, .00018 /
      DATA ((( CL8H2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 1, 3) /
     1 .1238E+03, .3729E+01, .4546E-01, .1800E-03,-.5574E-06,
     1 .1259E+03, .3788E+01, .4616E-01, .1826E-03,-.5685E-06,
     1 .1281E+03, .3850E+01, .4689E-01, .1850E-03,-.5824E-06,
     1 .1308E+03, .3919E+01, .4766E-01, .1871E-03,-.6020E-06,
     1 .1344E+03, .4001E+01, .4850E-01, .1886E-03,-.6330E-06,
     1 .1398E+03, .4109E+01, .4949E-01, .1891E-03,-.6805E-06,
     1 .1489E+03, .4261E+01, .5046E-01, .1896E-03,-.7030E-06,
     1 .1657E+03, .4519E+01, .5168E-01, .1851E-03,-.7526E-06,
     1 .1971E+03, .4993E+01, .5469E-01, .1743E-03,-.1071E-05,
     1 .2595E+03, .5883E+01, .5851E-01, .1511E-03,-.1484E-05,
     1 .4676E+03, .8664E+01, .6072E-01, .1174E-03,-.6198E-06,
     1 .6148E+03, .1073E+02, .6252E-01, .8393E-04, .6668E-08,
     1 .8135E+03, .1345E+02, .6976E-01, .8291E-04, .3736E-06,
     1 .1074E+04, .1702E+02, .8706E-01, .9267E-04,-.4359E-06,
     1 .1424E+04, .2180E+02, .1051E+00, .6227E-04,-.9664E-06,
     1 .1872E+04, .2771E+02, .1266E+00, .1050E-03,-.5847E-06,
     1 .2434E+04, .3583E+02, .1612E+00,-.4468E-04,-.2449E-05,
     1 .3117E+04, .4481E+02, .1813E+00,-.9744E-04,-.1081E-05,
     1 .3859E+04, .5436E+02, .2064E+00,-.7528E-04, .1488E-06,
     1 .4619E+04, .6568E+02, .2608E+00,-.2598E-03,-.2915E-05,
     1 .5327E+04, .7536E+02, .3107E+00,-.1966E-03,-.4716E-05,
     1 .5951E+04, .8367E+02, .3174E+00,-.2324E-03,-.1596E-05,
     1 .6375E+04, .9020E+02, .3439E+00,-.3226E-03,-.2788E-05,
     1 .6576E+04, .9363E+02, .3532E+00,-.2514E-03,-.1234E-06,
     1 .6512E+04, .9342E+02, .3676E+00,-.4642E-04, .1030E-05,
     1 .6245E+04, .9136E+02, .4084E+00, .2778E-05,-.4842E-05,
     1 .5874E+04, .8886E+02, .4384E+00,-.5382E-04,-.9002E-05,
     1 .5436E+04, .8482E+02, .4088E+00,-.7221E-04,-.3601E-05,
     2 .4196E+05, .7703E+03, .4408E+01, .2918E-02,-.5111E-04,
     2 .4255E+05, .7812E+03, .4468E+01, .2964E-02,-.5162E-04,
     2 .4316E+05, .7920E+03, .4527E+01, .3016E-02,-.5174E-04,
     2 .4377E+05, .8029E+03, .4582E+01, .3080E-02,-.5133E-04,
     2 .4441E+05, .8137E+03, .4630E+01, .3168E-02,-.4987E-04,
     2 .4510E+05, .8246E+03, .4665E+01, .3300E-02,-.4627E-04,
     2 .4589E+05, .8362E+03, .4678E+01, .3467E-02,-.3965E-04,
     2 .4689E+05, .8471E+03, .4644E+01, .3832E-02,-.2528E-04,
     2 .4834E+05, .8587E+03, .4478E+01, .4506E-02, .1044E-04,
     2 .5064E+05, .8720E+03, .4122E+01, .5793E-02, .7756E-04,
     2 .5617E+05, .9023E+03, .4322E+01, .8086E-02, .4080E-04,
     2 .5969E+05, .9258E+03, .4981E+01, .1003E-01,-.6854E-04,
     2 .6446E+05, .9628E+03, .5034E+01, .1001E-01,-.7544E-04,
     2 .7071E+05, .1019E+04, .4418E+01, .7884E-02, .1396E-04,
     2 .7731E+05, .1091E+04, .4082E+01, .4058E-02, .5513E-04,
     2 .8343E+05, .1160E+04, .3898E+01,-.4203E-03, .5483E-04,
     2 .8752E+05, .1227E+04, .3976E+01,-.5464E-02, .4088E-04,
     2 .8794E+05, .1239E+04, .4270E+01,-.8613E-02,-.5020E-04,
     2 .8597E+05, .1240E+04, .4687E+01,-.1000E-01,-.1007E-03,
     2 .8158E+05, .1165E+04, .4020E+01,-.6421E-03, .6572E-04,
     2 .7379E+05, .1068E+04, .3222E+01,-.2272E-03, .1897E-03,
     2 .6323E+05, .9605E+03, .4888E+01, .4098E-02,-.5693E-04,
     2 .5446E+05, .8831E+03, .5626E+01, .3937E-02,-.1589E-03,
     2 .4699E+05, .8218E+03, .5864E+01, .1437E-02,-.2067E-03,
     2 .4138E+05, .7694E+03, .5271E+01,-.4315E-02,-.1818E-03,
     2 .3608E+05, .6972E+03, .4007E+01,-.6729E-02,-.3734E-04,
     2 .3122E+05, .5862E+03, .2734E+01,-.5396E-02, .4385E-04,
     2 .2676E+05, .4905E+03, .2289E+01,-.5190E-02,-.1373E-04,
     3 .5876E+06, .8786E+04, .3326E+02,-.5493E-01,-.2312E-03,
     3 .5953E+06, .8901E+04, .3370E+02,-.5574E-01,-.2357E-03,
     3 .6029E+06, .9017E+04, .3415E+02,-.5639E-01,-.2395E-03,
     3 .6106E+06, .9132E+04, .3461E+02,-.5719E-01,-.2462E-03,
     3 .6182E+06, .9248E+04, .3508E+02,-.5798E-01,-.2547E-03,
     3 .6255E+06, .9355E+04, .3559E+02,-.5890E-01,-.2690E-03,
     3 .6325E+06, .9471E+04, .3619E+02,-.6002E-01,-.2983E-03,
     3 .6386E+06, .9570E+04, .3695E+02,-.6154E-01,-.3523E-03,
     3 .6430E+06, .9668E+04, .3804E+02,-.6379E-01,-.4585E-03,
     3 .6441E+06, .9741E+04, .3977E+02,-.6758E-01,-.6683E-03,
     3 .6324E+06, .9675E+04, .3994E+02,-.7624E-01,-.6359E-03,
     3 .6275E+06, .9648E+04, .3841E+02,-.8242E-01,-.3230E-03,
     3 .6164E+06, .9548E+04, .3859E+02,-.8507E-01,-.3512E-03,
     3 .5966E+06, .9336E+04, .4030E+02,-.8175E-01,-.6161E-03,
     3 .5674E+06, .8972E+04, .4104E+02,-.6873E-01,-.7410E-03,
     3 .5276E+06, .8485E+04, .4094E+02,-.5921E-01,-.7990E-03,
     3 .4773E+06, .7741E+04, .3869E+02,-.2918E-01,-.6078E-03,
     3 .4207E+06, .7007E+04, .3671E+02,-.1289E-01,-.4289E-03,
     3 .3608E+06, .6161E+04, .3337E+02,-.8575E-02,-.3672E-03,
     3 .3035E+06, .5357E+04, .3087E+02,-.2419E-01,-.6899E-03,
     3 .2577E+06, .4701E+04, .2882E+02,-.3025E-01,-.9580E-03,
     3 .2206E+06, .4102E+04, .2169E+02,-.4117E-01,-.3724E-03,
     3 .1843E+06, .3408E+04, .1533E+02,-.3191E-01, .1304E-03,
     3 .1503E+06, .2756E+04, .1227E+02,-.2889E-01,-.2608E-04,
     3 .1215E+06, .2193E+04, .9605E+01,-.1932E-01,-.6223E-04,
     3 .9916E+05, .1780E+04, .7285E+01,-.1978E-01,-.7329E-04,
     3 .7702E+05, .1408E+04, .6071E+01,-.1547E-01,-.8183E-04,
     3 .5669E+05, .1049E+04, .4697E+01,-.1063E-01,-.6367E-04 /
C
C----------------------------------------------------------------------C
C     SPECTRAL REGION: 0-340 CM^-1. GAS: H2O                           C
C----------------------------------------------------------------------C
C
      COMMON /BANDL9/ GWL9(4), CL9H2O(5,18,4), CL9CS(5,6,4),
     1                         CL9CF(5,6,4)
      DATA GWL9 / .31030, .21554, .19500, .14000 /
      DATA ((( CL9H2O(K,J,I), K = 1, 5), J = 1, 18), I = 1, 4) /
     1 .4226E-01, .6101E-04,-.5452E-06, .2917E-08,-.8187E-11,
     1 .6312E-01, .9117E-04,-.8123E-06, .4352E-08,-.1261E-10,
     1 .9429E-01, .1361E-03,-.1215E-05, .6531E-08,-.1799E-10,
     1 .1409E+00, .2025E-03,-.1819E-05, .9890E-08,-.2549E-10,
     1 .2103E+00, .3016E-03,-.2717E-05, .1489E-07,-.3764E-10,
     1 .3140E+00, .4486E-03,-.4078E-05, .2248E-07,-.5288E-10,
     1 .4685E+00, .6674E-03,-.6145E-05, .3394E-07,-.7046E-10,
     1 .6987E+00, .9916E-03,-.9316E-05, .5116E-07,-.8603E-10,
     1 .1041E+01, .1477E-02,-.1405E-04, .7613E-07,-.1176E-09,
     1 .1551E+01, .2199E-02,-.2109E-04, .1127E-06,-.1699E-09,
     1 .2305E+01, .3266E-02,-.3159E-04, .1670E-06,-.2355E-09,
     1 .3424E+01, .4807E-02,-.4743E-04, .2530E-06,-.3121E-09,
     1 .5076E+01, .7066E-02,-.7225E-04, .3774E-06,-.1824E-09,
     1 .7508E+01, .1036E-01,-.1111E-03, .5618E-06, .2550E-09,
     1 .1108E+02, .1516E-01,-.1650E-03, .8310E-06, .2776E-09,
     1 .1631E+02, .2183E-01,-.2425E-03, .1277E-05,-.4663E-09,
     1 .2397E+02, .3125E-01,-.3851E-03, .1953E-05, .2786E-08,
     1 .3504E+02, .4459E-01,-.6395E-03, .2839E-05, .1592E-07,
     2 .2546E+00, .1815E-03,-.2208E-05, .2111E-08,-.1561E-10,
     2 .3800E+00, .2695E-03,-.3286E-05, .3314E-08,-.2203E-10,
     2 .5673E+00, .3995E-03,-.4889E-05, .5241E-08,-.3276E-10,
     2 .8468E+00, .5921E-03,-.7336E-05, .8258E-08,-.4111E-10,
     2 .1263E+01, .8762E-03,-.1088E-04, .1268E-07,-.7659E-10,
     2 .1883E+01, .1300E-02,-.1613E-04, .1870E-07,-.1449E-09,
     2 .2807E+01, .1937E-02,-.2426E-04, .2562E-07,-.1964E-09,
     2 .4180E+01, .2891E-02,-.3614E-04, .3357E-07,-.3073E-09,
     2 .6216E+01, .4325E-02,-.5375E-04, .4035E-07,-.4175E-09,
     2 .9238E+01, .6420E-02,-.7875E-04, .4805E-07,-.7080E-09,
     2 .1369E+02, .9538E-02,-.1166E-03, .4148E-07,-.9143E-09,
     2 .2023E+02, .1414E-01,-.1726E-03, .3111E-09,-.8711E-09,
     2 .2978E+02, .2082E-01,-.2275E-03,-.1247E-06,-.4911E-08,
     2 .4370E+02, .2936E-01,-.2826E-03,-.1437E-06,-.1470E-07,
     2 .6396E+02, .3982E-01,-.4087E-03, .1061E-06,-.2130E-07,
     2 .9322E+02, .5274E-01,-.6560E-03, .3482E-06,-.1457E-07,
     2 .1352E+03, .6623E-01,-.1059E-02, .6230E-06,-.2214E-08,
     2 .1954E+03, .9042E-01,-.1357E-02,-.3471E-06,-.3964E-07,
     3 .9075E+00, .2349E-03,-.4012E-05, .1157E-07, .7962E-10,
     3 .1352E+01, .3354E-03,-.6038E-05, .1817E-07, .1270E-09,
     3 .2015E+01, .4793E-03,-.9052E-05, .2765E-07, .1831E-09,
     3 .3002E+01, .6835E-03,-.1364E-04, .4185E-07, .2676E-09,
     3 .4472E+01, .9851E-03,-.2063E-04, .6109E-07, .4010E-09,
     3 .6654E+01, .1432E-02,-.3124E-04, .8690E-07, .6321E-09,
     3 .9898E+01, .2095E-02,-.4652E-04, .1206E-06, .9307E-09,
     3 .1469E+02, .2980E-02,-.6872E-04, .1737E-06, .1423E-08,
     3 .2176E+02, .4122E-02,-.9926E-04, .2522E-06, .1794E-08,
     3 .3212E+02, .5504E-02,-.1445E-03, .3404E-06, .3016E-08,
     3 .4721E+02, .6684E-02,-.1736E-03, .4461E-06,-.7950E-09,
     3 .6916E+02, .4844E-02,-.1773E-03, .1003E-05,-.1243E-07,
     3 .1010E+03,-.3009E-02,-.2229E-03, .2370E-05,-.2420E-07,
     3 .1471E+03,-.2144E-01,-.3871E-03, .4663E-05,-.2618E-07,
     3 .2134E+03,-.5700E-01,-.8083E-03, .7471E-05,-.2514E-08,
     3 .3089E+03,-.1087E+00,-.1370E-02, .9538E-05, .4948E-08,
     3 .4442E+03,-.1908E+00,-.1056E-02, .1380E-04,-.1654E-06,
     3 .6328E+03,-.3826E+00,-.1620E-02, .3299E-04,-.2052E-06,
     4 .3629E+01,-.7787E-03,-.6976E-05, .1193E-06,-.5476E-09,
     4 .5397E+01,-.1244E-02,-.1101E-04, .1756E-06,-.8064E-09,
     4 .8026E+01,-.1968E-02,-.1715E-04, .2604E-06,-.1219E-08,
     4 .1193E+02,-.2999E-02,-.2528E-04, .3702E-06,-.2060E-08,
     4 .1771E+02,-.4487E-02,-.4061E-04, .5268E-06,-.2565E-08,
     4 .2627E+02,-.6705E-02,-.6518E-04, .7423E-06,-.2699E-08,
     4 .3884E+02,-.1013E-01,-.8749E-04, .1037E-05,-.5258E-08,
     4 .5724E+02,-.1537E-01,-.1224E-03, .1402E-05,-.7379E-08,
     4 .8397E+02,-.2451E-01,-.1376E-03, .1964E-05,-.1405E-07,
     4 .1227E+03,-.4169E-01,-.1280E-03, .3161E-05,-.2905E-07,
     4 .1785E+03,-.7371E-01,-.1371E-03, .5716E-05,-.5114E-07,
     4 .2589E+03,-.1257E+00,-.4193E-03, .9398E-05,-.4654E-07,
     4 .3743E+03,-.2045E+00,-.1390E-02, .1334E-04, .5155E-07,
     4 .5382E+03,-.2915E+00,-.2555E-02, .1103E-04, .1227E-06,
     4 .7683E+03,-.4207E+00,-.1761E-02, .1120E-04,-.1680E-06,
     4 .1087E+04,-.7028E+00,-.2430E-02, .3252E-04,-.2404E-06,
     4 .1518E+04,-.1012E+01,-.7249E-02, .3761E-04, .1481E-06,
     4 .2063E+04,-.1267E+01,-.7527E-02, .1644E-04,-.2221E-06 /
      DATA ((( CL9CS(K,J,I), K = 1, 5), J = 1, 6), I = 1, 4) /
     1 .1166E+03,-.1766E+01, .1400E-01,-.9902E-04, .5646E-06,
     1 .1730E+03,-.2609E+01, .2048E-01,-.1482E-03, .8792E-06,
     1 .2571E+03,-.3825E+01, .2895E-01,-.2303E-03, .1611E-05,
     1 .3826E+03,-.5674E+01, .4231E-01,-.3452E-03, .2522E-05,
     1 .5680E+03,-.8350E+01, .6093E-01,-.5280E-03, .4119E-05,
     1 .8396E+03,-.1230E+02, .8937E-01,-.7953E-03, .6324E-05,
     2 .2341E+03,-.4082E+01, .3964E-01,-.3025E-03, .1407E-05,
     2 .3497E+03,-.6110E+01, .5917E-01,-.4487E-03, .2090E-05,
     2 .5217E+03,-.9141E+01, .8852E-01,-.6579E-03, .2952E-05,
     2 .7755E+03,-.1357E+02, .1309E+00,-.9772E-03, .4503E-05,
     2 .1152E+04,-.2029E+02, .1982E+00,-.1404E-02, .5673E-05,
     2 .1716E+04,-.3034E+02, .3007E+00,-.2035E-02, .6973E-05,
     3 .2553E+03,-.4445E+01, .4359E-01,-.4011E-03, .2437E-05,
     3 .3800E+03,-.6617E+01, .6517E-01,-.6000E-03, .3624E-05,
     3 .5659E+03,-.9905E+01, .9936E-01,-.8851E-03, .4962E-05,
     3 .8467E+03,-.1487E+02, .1509E+00,-.1302E-02, .6830E-05,
     3 .1269E+04,-.2221E+02, .2221E+00,-.1981E-02, .1118E-04,
     3 .1898E+04,-.3310E+02, .3270E+00,-.2980E-02, .1758E-04,
     4 .2682E+03,-.4700E+01, .4697E-01,-.4274E-03, .2521E-05,
     4 .4004E+03,-.7039E+01, .7080E-01,-.6350E-03, .3636E-05,
     4 .5980E+03,-.1053E+02, .1062E+00,-.9540E-03, .5472E-05,
     4 .8897E+03,-.1567E+02, .1591E+00,-.1442E-02, .8254E-05,
     4 .1319E+04,-.2341E+02, .2417E+00,-.2111E-02, .1116E-04,
     4 .1955E+04,-.3458E+02, .3462E+00,-.3158E-02, .1903E-04 /
      DATA ((( CL9CF(K,J,I), K = 1, 5), J = 1, 6), I = 1, 4) /
     1 .3948E+01,-.1931E-01, .3552E-04,-.5027E-06, .9660E-08,
     1 .5835E+01,-.2758E-01, .3790E-04,-.8682E-06, .1676E-07,
     1 .8634E+01,-.3825E-01,-.2193E-04,-.1821E-05, .4119E-07,
     1 .1281E+02,-.5589E-01,-.8400E-04,-.2935E-05, .6985E-07,
     1 .1896E+02,-.7819E-01,-.2426E-03,-.5361E-05, .1255E-06,
     1 .2779E+02,-.1116E+00,-.3913E-03,-.8869E-05, .1948E-06,
     2 .1200E+02,-.9434E-01, .6079E-03,-.1841E-05,-.1235E-07,
     2 .1796E+02,-.1419E+00, .8872E-03,-.2595E-05,-.1581E-07,
     2 .2682E+02,-.2126E+00, .1297E-02,-.3450E-05,-.2306E-07,
     2 .3985E+02,-.3150E+00, .1836E-02,-.5104E-05,-.1777E-07,
     2 .5911E+02,-.4745E+00, .2918E-02,-.5347E-05,-.7086E-07,
     2 .8774E+02,-.7101E+00, .4880E-02,-.5460E-05,-.2140E-06,
     3 .1354E+02,-.1043E+00, .5425E-03,-.4045E-05, .2942E-07,
     3 .2015E+02,-.1553E+00, .8368E-03,-.6041E-05, .4049E-07,
     3 .2999E+02,-.2340E+00, .1429E-02,-.8531E-05, .2462E-07,
     3 .4484E+02,-.3526E+00, .2331E-02,-.1189E-04,-.4458E-08,
     3 .6743E+02,-.5260E+00, .3208E-02,-.1884E-04, .5220E-07,
     3 .1012E+03,-.7764E+00, .4308E-02,-.3073E-04, .1633E-06,
     4 .1442E+02,-.1125E+00, .6521E-03,-.3817E-05, .1981E-07,
     4 .2152E+02,-.1690E+00, .1026E-02,-.5605E-05, .2030E-07,
     4 .3214E+02,-.2538E+00, .1542E-02,-.8381E-05, .3521E-07,
     4 .4779E+02,-.3767E+00, .2389E-02,-.1346E-04, .4555E-07,
     4 .7062E+02,-.5673E+00, .4024E-02,-.1808E-04,-.2171E-07,
     4 .1047E+03,-.8481E+00, .5019E-02,-.2529E-04, .1479E-06 /
C
      COMMON /BANDL9GH/ GWL9GH(6), CL9H2OGH(5,28,6)
      DATA GWL9GH / .08000, .05000, .00800, .00094, .00019, .00003 /
      DATA ((( CL9H2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 1, 3) /
     5 .1189E-01, .8033E-05,-.6385E-07, .2642E-09, .3063E-11,
     5 .2393E-01, .1606E-04,-.1259E-06, .3615E-09, .5371E-11,
     5 .4807E-01, .3218E-04,-.1752E-06, .2064E-09,-.2419E-11,
     5 .9646E-01, .6140E-04,-.1156E-06, .5331E-10,-.4231E-10,
     5 .1936E+00, .1096E-03,-.1202E-06, .9577E-09,-.8929E-10,
     5 .3887E+00, .1807E-03,-.2764E-06, .5614E-08,-.1281E-09,
     5 .7812E+00, .2805E-03,-.9748E-06, .1664E-07,-.1473E-09,
     5 .1571E+01, .4071E-03,-.2464E-05, .3803E-07,-.2193E-09,
     5 .3160E+01, .4679E-03,-.5703E-05, .8494E-07,-.4061E-09,
     5 .6356E+01, .3292E-03,-.1362E-04, .1664E-06,-.7436E-09,
     5 .1826E+02,-.9463E-03,-.4659E-04, .4466E-06,-.2670E-08,
     5 .2705E+02,-.1970E-02,-.7248E-04, .6245E-06,-.3709E-08,
     5 .4005E+02,-.3823E-02,-.1166E-03, .8934E-06,-.4207E-08,
     5 .5918E+02,-.6456E-02,-.1708E-03, .1134E-05,-.6114E-08,
     5 .8717E+02,-.1031E-01,-.2243E-03, .1313E-05,-.1105E-07,
     5 .1280E+03,-.1973E-01,-.2872E-03, .1942E-05,-.1862E-07,
     5 .1871E+03,-.3641E-01,-.3462E-03, .2902E-05,-.3248E-07,
     5 .2722E+03,-.7492E-01,-.4067E-03, .5809E-05,-.5395E-07,
     5 .3942E+03,-.1439E+00,-.5441E-03, .1108E-04,-.9498E-07,
     5 .5692E+03,-.2606E+00,-.1439E-02, .1907E-04,-.4731E-07,
     5 .8190E+03,-.4329E+00,-.3509E-02, .2691E-04, .1211E-06,
     5 .1172E+04,-.6517E+00,-.4980E-02, .2611E-04, .1083E-06,
     5 .1665E+04,-.1030E+01,-.3794E-02, .4164E-04,-.4559E-06,
     5 .2345E+04,-.1756E+01,-.7346E-02, .9487E-04,-.4119E-06,
     5 .3246E+04,-.2487E+01,-.1621E-01, .1023E-03, .1653E-06,
     5 .4341E+04,-.3216E+01,-.1522E-01, .7815E-04,-.5541E-06,
     5 .5545E+04,-.4277E+01,-.7660E-02, .1870E-03,-.2722E-05,
     5 .6763E+04,-.4141E+01,-.4154E-01, .8076E-04, .2662E-05,
     6 .4305E+00, .3161E-02, .1746E-04, .9764E-07, .3996E-09,
     6 .7599E+00, .4495E-02, .2078E-04, .1243E-06, .4571E-09,
     6 .1363E+01, .6564E-02, .2335E-04, .1351E-06, .6532E-09,
     6 .2479E+01, .9605E-02, .2449E-04, .1530E-06, .1117E-08,
     6 .4566E+01, .1414E-01, .2753E-04, .1936E-06, .9333E-09,
     6 .8525E+01, .2076E-01, .2243E-04, .2845E-06, .1622E-08,
     6 .1607E+02, .3052E-01, .1895E-04, .3518E-06,-.1335E-08,
     6 .3061E+02, .4421E-01,-.4170E-05, .6186E-06,-.5155E-08,
     6 .5867E+02, .6587E-01,-.1254E-03, .2684E-06, .1537E-08,
     6 .1131E+03, .9347E-01,-.4256E-03,-.3949E-06, .2888E-07,
     6 .3032E+03, .1242E+00,-.2503E-03, .8244E-06,-.6356E-07,
     6 .4377E+03, .1122E+00,-.1440E-03, .4225E-05,-.1285E-06,
     6 .6310E+03, .3900E-01,-.3976E-03, .1431E-04,-.1646E-06,
     6 .9078E+03,-.8215E-01,-.1018E-02, .2577E-04,-.1927E-06,
     6 .1307E+04,-.2744E+00,-.2323E-02, .4191E-04,-.2083E-06,
     6 .1880E+04,-.5997E+00,-.5883E-02, .6281E-04,-.5534E-07,
     6 .2697E+04,-.9574E+00,-.1055E-01, .6398E-04, .7040E-07,
     6 .3849E+04,-.1573E+01,-.1371E-01, .9501E-04,-.3864E-06,
     6 .5464E+04,-.2523E+01,-.2299E-01, .1431E-03,-.2625E-06,
     6 .7645E+04,-.3584E+01,-.3692E-01, .1610E-03,-.2000E-06,
     6 .1044E+05,-.5018E+01,-.3813E-01, .1942E-03,-.2101E-05,
     6 .1379E+05,-.7395E+01,-.5262E-01, .4428E-03,-.3657E-05,
     6 .1752E+05,-.7635E+01,-.1170E+00, .2848E-03, .3984E-05,
     6 .2124E+05,-.8251E+01,-.1104E+00, .1503E-03, .2151E-06,
     6 .2453E+05,-.1158E+02,-.8440E-01, .2243E-03,-.3439E-05,
     6 .2707E+05,-.1349E+02,-.1654E+00,-.1111E-04, .1140E-04,
     6 .2831E+05,-.1490E+02,-.7166E-01,-.1424E-03, .6813E-06,
     6 .2847E+05,-.1807E+02,-.2165E-01,-.2007E-03,-.2902E-05,
     7 .6099E+03, .7817E+01, .4070E-01, .1169E-03,-.3335E-06,
     7 .6402E+03, .7733E+01, .4121E-01, .1208E-03,-.3984E-06,
     7 .6962E+03, .7564E+01, .4096E-01, .1317E-03,-.4466E-06,
     7 .8011E+03, .7361E+01, .3831E-01, .1482E-03,-.4137E-06,
     7 .9790E+03, .7284E+01, .3362E-01, .1448E-03,-.1560E-06,
     7 .1278E+04, .7135E+01, .2383E-01, .1754E-03, .1057E-05,
     7 .1779E+04, .7101E+01, .2331E-01, .1808E-03, .5076E-06,
     7 .2630E+04, .7231E+01, .1379E-01, .2154E-03, .2451E-05,
     7 .4099E+04, .7726E+01,-.9201E-02, .1460E-03, .5437E-05,
     7 .6644E+04, .7222E+01,-.7209E-02, .2517E-03, .2655E-05,
     7 .1469E+05, .4748E+01, .4023E-01, .4281E-03,-.1120E-04,
     7 .2021E+05, .1874E+01, .1824E-02, .6068E-03,-.7271E-05,
     7 .2809E+05,-.1604E+01,-.9092E-01, .7971E-03, .2654E-05,
     7 .3901E+05,-.8209E+01,-.1128E+00, .1302E-02,-.6675E-05,
     7 .5371E+05,-.1471E+02,-.1666E+00, .1328E-02,-.1126E-04,
     7 .7237E+05,-.3177E+02,-.2566E+00, .2354E-02,-.1280E-04,
     7 .9439E+05,-.4523E+02,-.3673E+00, .3028E-02,-.2408E-04,
     7 .1185E+06,-.4731E+02,-.8933E+00, .1770E-02, .5301E-04,
     7 .1421E+06,-.6197E+02,-.6393E+00, .2076E-02,-.7348E-05,
     7 .1627E+06,-.8442E+02,-.6084E+00, .2413E-02,-.8757E-05,
     7 .1778E+06,-.9687E+02,-.8941E+00, .1762E-02, .4770E-04,
     7 .1849E+06,-.9453E+02,-.1786E+00, .4813E-03,-.4317E-04,
     7 .1853E+06,-.9769E+02,-.2466E-01,-.6269E-03,-.4343E-04,
     7 .1787E+06,-.1168E+03,-.4092E+00, .2030E-03, .5138E-04,
     7 .1655E+06,-.1111E+03,-.2212E+00, .1342E-04, .4497E-04,
     7 .1475E+06,-.8839E+02, .7246E+00,-.7165E-03,-.7844E-04,
     7 .1295E+06,-.5339E+02, .2270E+00,-.3102E-02, .1701E-04,
     7 .1112E+06,-.2827E+02, .2234E+00,-.1780E-02,-.5194E-05 /
      DATA ((( CL9H2OGH(K,J,I), K = 1, 5), J = 1, 28), I = 4, 6) /
     8 .2282E+06, .2322E+04, .5714E+01,-.3761E-01,-.3151E-03,
     8 .2296E+06, .2334E+04, .5747E+01,-.3775E-01,-.3161E-03,
     8 .2312E+06, .2345E+04, .5791E+01,-.3783E-01,-.3171E-03,
     8 .2331E+06, .2352E+04, .5865E+01,-.3775E-01,-.3188E-03,
     8 .2359E+06, .2350E+04, .5975E+01,-.3706E-01,-.3216E-03,
     8 .2410E+06, .2333E+04, .6160E+01,-.3621E-01,-.3337E-03,
     8 .2509E+06, .2300E+04, .5864E+01,-.3760E-01,-.2564E-03,
     8 .2712E+06, .2210E+04, .5542E+01,-.3522E-01,-.2389E-03,
     8 .3125E+06, .2047E+04, .3513E+01,-.2898E-01,-.3194E-04,
     8 .3887E+06, .1756E+04, .2574E+01,-.1444E-01,-.1193E-03,
     8 .6162E+06, .1170E+04,-.1032E+01, .1116E-02,-.1318E-03,
     8 .7345E+06, .8614E+03, .1080E+00, .2579E-01,-.4213E-03,
     8 .8733E+06, .6992E+03,-.5564E+01, .4154E-02, .4235E-03,
     8 .1012E+07, .4598E+03,-.6980E+01,-.5912E-02, .6048E-03,
     8 .1131E+07,-.5627E+02,-.4413E+01, .2644E-01, .2096E-03,
     8 .1228E+07,-.2410E+03,-.8442E+01, .3193E-02, .7231E-03,
     8 .1279E+07,-.4451E+03,-.4661E+01, .6349E-02, .2112E-03,
     8 .1276E+07,-.6033E+03, .3384E+01, .1265E-01,-.9195E-03,
     8 .1234E+07,-.4116E+03,-.2972E+01,-.3335E-01, .4665E-03,
     8 .1148E+07,-.4610E+03,-.4323E+01,-.2588E-01, .7519E-03,
     8 .1026E+07,-.4768E+03, .7506E+00,-.1789E-01, .9226E-05,
     8 .8869E+06,-.3862E+03,-.2371E+00,-.2820E-01, .3429E-03,
     8 .7349E+06,-.2595E+03, .2788E+01,-.2175E-01,-.3169E-04,
     8 .5951E+06, .1444E+01, .5039E+01,-.2911E-01,-.4986E-03,
     8 .4756E+06, .1935E+03, .2978E+01,-.3445E-01,-.2903E-03,
     8 .3819E+06, .1285E+03,-.2575E+01,-.1307E-01, .4107E-03,
     8 .3039E+06,-.3683E+02,-.2901E+01, .1221E-01, .3292E-03,
     8 .2372E+06,-.3331E+02,-.6236E+00, .1030E-01, .7012E-04,
     9 .8912E+07, .1888E+05,-.2018E+03, .2427E+00, .2538E-02,
     9 .8961E+07, .1897E+05,-.2030E+03, .2430E+00, .2589E-02,
     9 .9009E+07, .1904E+05,-.2044E+03, .2421E+00, .2702E-02,
     9 .9058E+07, .1907E+05,-.2059E+03, .2410E+00, .2868E-02,
     9 .9106E+07, .1903E+05,-.2078E+03, .2456E+00, .3077E-02,
     9 .9155E+07, .1883E+05,-.2105E+03, .2553E+00, .3488E-02,
     9 .9210E+07, .1827E+05,-.2120E+03, .2897E+00, .3898E-02,
     9 .9252E+07, .1717E+05,-.2138E+03, .3222E+00, .5106E-02,
     9 .9267E+07, .1509E+05,-.2053E+03, .3561E+00, .6120E-02,
     9 .9146E+07, .1137E+05,-.1615E+03, .4325E+00, .4301E-02,
     9 .8346E+07, .6656E+04,-.4017E+02, .3709E-01, .8325E-05,
     9 .7973E+07, .4554E+04,-.4539E+01,-.1428E+00,-.1672E-02,
     9 .7540E+07, .2223E+04, .3524E+02,-.2751E+00,-.5174E-02,
     9 .7117E+07,-.1772E+03, .5044E+02,-.2482E+00,-.7386E-02,
     9 .6698E+07,-.1730E+04, .1359E+02,-.3353E+00,-.2502E-02,
     9 .6106E+07,-.3671E+04, .1312E+02,-.5376E-01,-.2398E-02,
     9 .5318E+07,-.2869E+04, .2268E+02,-.1105E+00,-.1642E-02,
     9 .4486E+07,-.2202E+04, .1947E+02,-.1024E+00,-.4577E-03,
     9 .3682E+07,-.2441E+04, .2543E+02, .7032E-01,-.2329E-02,
     9 .2939E+07,-.7348E+03, .2495E+02,-.6691E-01,-.2004E-02,
     9 .2317E+07, .1401E+03, .1250E+02,-.1234E+00,-.4546E-03,
     9 .1823E+07,-.5861E+02,-.4110E+01,-.4951E-01, .1516E-02,
     9 .1417E+07,-.5177E+03,-.2440E+01, .2654E-01, .6276E-03,
     9 .1067E+07,-.5562E+03, .7921E+01, .4415E-01,-.6922E-03,
     9 .8017E+06,-.4462E+03, .6757E+01, .3992E-01,-.3595E-03,
     9 .5893E+06,-.2117E+01, .1586E+02,-.1702E-02,-.2042E-02,
     9 .4313E+06, .4256E+03, .1230E+02,-.5361E-01,-.1591E-02,
     9 .3157E+06, .4554E+03, .3390E+01,-.4530E-01,-.1535E-03,
     a .6301E+08,-.3184E+06, .1060E+04,-.2921E+00,-.1112E-01,
     a .6337E+08,-.3201E+06, .1066E+04,-.2934E+00,-.1139E-01,
     a .6368E+08,-.3217E+06, .1074E+04,-.2921E+00,-.1189E-01,
     a .6398E+08,-.3228E+06, .1084E+04,-.3109E+00,-.1286E-01,
     a .6422E+08,-.3233E+06, .1095E+04,-.3827E+00,-.1372E-01,
     a .6427E+08,-.3223E+06, .1111E+04,-.5298E+00,-.1554E-01,
     a .6395E+08,-.3184E+06, .1135E+04,-.7931E+00,-.1905E-01,
     a .6311E+08,-.3087E+06, .1165E+04,-.1223E+01,-.2563E-01,
     a .6104E+08,-.2882E+06, .1178E+04,-.1770E+01,-.3596E-01,
     a .5722E+08,-.2463E+06, .9214E+03,-.2642E+01,-.2202E-01,
     a .4622E+08,-.1555E+06, .1512E+03,-.3459E+00, .4365E-02,
     a .4032E+08,-.1143E+06,-.1324E+03, .3485E-01, .2109E-01,
     a .3365E+08,-.8049E+05,-.2025E+03, .1247E+01, .1580E-01,
     a .2677E+08,-.5099E+05,-.2342E+03, .1098E+01, .2610E-01,
     a .2033E+08,-.2543E+05,-.6168E+02, .5573E+00, .1124E-01,
     a .1517E+08,-.7334E+04, .9473E+02,-.6639E+00,-.3270E-02,
     a .1174E+08,-.4546E+04,-.2513E+02,-.5757E+00, .9035E-02,
     a .9169E+07,-.3423E+04,-.9998E+02,-.5366E+00, .1603E-01,
     a .6818E+07,-.2781E+04,-.4965E+01,-.3910E+00, .2521E-02,
     a .4979E+07,-.4028E+04, .5020E+02, .3666E-01,-.6955E-02,
     a .3584E+07,-.3114E+04, .5436E+02, .2033E+00,-.5940E-02,
     a .2553E+07,-.9871E+03, .3126E+02,-.1372E-01,-.2165E-02,
     a .1803E+07, .2082E+03, .3012E+00,-.1819E+00, .2786E-02,
     a .1270E+07, .6351E+03,-.2304E+02,-.2116E+00, .5869E-02,
     a .8807E+06, .5995E+03,-.2112E+02,-.1497E+00, .5022E-02,
     a .6069E+06, .3525E+03,-.1520E+02,-.3614E-01, .4058E-02,
     a .4196E+06, .4041E+03,-.4181E+01,-.1160E-01, .1868E-02,
     a .2939E+06, .3951E+03, .1880E+01,-.3537E-02, .3566E-03 /
C
      RETURN
      END
