]> git.uio.no Git - u/mrichter/AliRoot.git/blame - PDF/spdf/fxghar.F
Addition of CPV library as a separate detector from PHOS
[u/mrichter/AliRoot.git] / PDF / spdf / fxghar.F
CommitLineData
fe4da5cc 1*
2* $Id$
3*
4* $Log$
5* Revision 1.1.1.3 1996/11/15 17:32:45 cernlib
6* Import version 7.06
7*
8* Revision 1.2 1996/11/15 15:07:08 pdflib
9* Version 7.06: tabs removed and bug fixed in grsgalo
10*
11* Revision 1.1.1.1 1996/04/12 15:29:19 plothow
12* Version 7.01
13*
14*
15#include "pdf/pilot.h"
16C------------------------------------------------------------
17C------------- Subroutine to compute a point in x and q**2 --
18C------------- for the following parton distributions : --
19C------------- UP Valence, DOWN Valence , GLUON , QBAR , --
20C------------- UBAR , Strange , Charm , Bottom , Top . --
21C------------- Range of validity : --
22C------------- 5.E-05 < x < .95 --
23C------------- 1 <Log10 Q**2 < 8 --
24C------------------------------------------------------------
25C------------- Authors : M. Diemoz
26C------------- F. Ferroni
27C------------- E. Longo
28C------------- G. Martinelli
29C------------------------------------------------------------
30 SUBROUTINE FXGHAR(X,QSTAR2,STRFUN,FUNC)
31C------------------------------------------------------------
32C------------- X is x and QSTAR2 is Q square -------------
33 CHARACTER*(*) STRFUN
34C------------------------------------------------------------
35C------------ STRFUN specifies the desired function----------
36C------------------------------------------------------------
37C------------------------------------------------------------
38C IFUN = 1 UP valence 'UPVAL'
39C 2 DOWN valence 'DOVAL'
40C 3 Gluon 'GLUON'
41C 4 Q bar 'QBAR '
42C 5 UP bar 'UBAR '
43C 6 Strange 'SBAR '
44C 7 Charm 'CBAR '
45C 8 Bottom 'BBAR '
46C 9 Top 'TBAR '
47C------------------------------------------------------------
48C------------- FUNC is the output (parton density value)----
49C------------------------------------------------------------
50 PARAMETER (IX=104,IQ=9,NARG=2,KFUN=9)
51C------------------------------------------------------------
52C-----------Input tables are given as 104 x points at 9 Q**2
53C-----------positions (log spaced in Q**2 and x up to .6
54C-----------(90 points). The remaining 14 x points are ------
55C----------linearly spaced)----------------------------------
56C------------------------------------------------------------
57 DIMENSION ARG(NARG),NENT(NARG),ENT(IX+IQ)
58 DIMENSION XQDUM(IX,IQ,KFUN)
59 DIMENSION Q2(IQ),XCO(IX)
60C------------------------------------------------------------
61C----------- Next the 9 Q**2 of the input tables are defined
62C------------------------------------------------------------
63 DATA Q2 /10.,30.,100.,1000.,10000.,100000.,1000000,
64 + 10000000.,100000000./
65C----------------------------------------------------------------
66C----------- And now the 104 x positions ------------------------
67C----------------------------------------------------------------
68 DATA XCO /
69 +0.5000E-04,0.5545E-04,0.6150E-04,0.6820E-04,0.7564E-04,0.8389E-04,
70 +0.9303E-04,0.1032E-03,0.1144E-03,0.1269E-03,0.1407E-03,0.1561E-03,
71 +0.1731E-03,0.1920E-03,0.2129E-03,0.2361E-03,0.2619E-03,0.2904E-03,
72 +0.3221E-03,0.3572E-03,0.3961E-03,0.4393E-03,0.4872E-03,0.5404E-03,
73 +0.5993E-03,0.6646E-03,0.7371E-03,0.8174E-03,0.9066E-03,0.1005E-02,
74 +0.1115E-02,0.1237E-02,0.1371E-02,0.1521E-02,0.1687E-02,0.1871E-02,
75 +0.2075E-02,0.2301E-02,0.2552E-02,0.2830E-02,0.3139E-02,0.3481E-02,
76 +0.3860E-02,0.4281E-02,0.4748E-02,0.5266E-02,0.5840E-02,0.6476E-02,
77 +0.7182E-02,0.7966E-02,0.8834E-02,0.9797E-02,0.1087E-01,0.1205E-01,
78 +0.1336E-01,0.1482E-01,0.1644E-01,0.1823E-01,0.2022E-01,0.2242E-01,
79 +0.2487E-01,0.2758E-01,0.3058E-01,0.3392E-01,0.3762E-01,0.4172E-01,
80 +0.4627E-01,0.5131E-01,0.5690E-01,0.6311E-01,0.6999E-01,0.7762E-01,
81 +0.8608E-01,0.9547E-01,0.1059E+00,0.1174E+00,0.1302E+00,0.1444E+00,
82 +0.1602E+00,0.1776E+00,0.1970E+00,0.2185E+00,0.2423E+00,0.2687E+00,
83 +0.2980E+00,0.3305E+00,0.3666E+00,0.4065E+00,0.4508E+00,0.5000E+00,
84 +0.5321E+00,0.5643E+00,0.5964E+00,0.6286E+00,0.6607E+00,0.6929E+00,
85 +0.7250E+00,0.7571E+00,0.7893E+00,0.8214E+00,0.8536E+00,0.8857E+00,
86 +0.9179E+00,0.9500E+00/
87 DATA (XQDUM (I,1,1),I=1,104) /
88 +0.1154E-01,0.1220E-01,0.1290E-01,0.1363E-01,0.1441E-01,0.1523E-01,
89 +0.1610E-01,0.1702E-01,0.1799E-01,0.1901E-01,0.2010E-01,0.2124E-01,
90 +0.2245E-01,0.2373E-01,0.2509E-01,0.2652E-01,0.2803E-01,0.2962E-01,
91 +0.3131E-01,0.3309E-01,0.3498E-01,0.3697E-01,0.3908E-01,0.4130E-01,
92 +0.4365E-01,0.4613E-01,0.4876E-01,0.5153E-01,0.5445E-01,0.5755E-01,
93 +0.6082E-01,0.6427E-01,0.6791E-01,0.7176E-01,0.7583E-01,0.8012E-01,
94 +0.8465E-01,0.8943E-01,0.9448E-01,0.9981E-01,0.1054E+00,0.1114E+00,
95 +0.1176E+00,0.1242E+00,0.1311E+00,0.1385E+00,0.1462E+00,0.1543E+00,
96 +0.1628E+00,0.1718E+00,0.1812E+00,0.1912E+00,0.2016E+00,0.2125E+00,
97 +0.2239E+00,0.2359E+00,0.2484E+00,0.2615E+00,0.2751E+00,0.2893E+00,
98 +0.3040E+00,0.3193E+00,0.3350E+00,0.3513E+00,0.3679E+00,0.3850E+00,
99 +0.4023E+00,0.4198E+00,0.4373E+00,0.4548E+00,0.4719E+00,0.4886E+00,
100 +0.5045E+00,0.5193E+00,0.5326E+00,0.5440E+00,0.5530E+00,0.5591E+00,
101 +0.5617E+00,0.5601E+00,0.5538E+00,0.5421E+00,0.5243E+00,0.5002E+00,
102 +0.4693E+00,0.4318E+00,0.3881E+00,0.3390E+00,0.2860E+00,0.2312E+00,
103 +0.1982E+00,0.1679E+00,0.1404E+00,0.1157E+00,0.9371E-01,0.7442E-01,
104 +0.5769E-01,0.4337E-01,0.3133E-01,0.2144E-01,0.1357E-01,0.7621E-02,
105 +0.3496E-02,0.1057E-02/
106 DATA (XQDUM (I,1,2),I=1,104) /
107 +0.6591E-02,0.6967E-02,0.7364E-02,0.7784E-02,0.8228E-02,0.8697E-02,
108 +0.9193E-02,0.9717E-02,0.1027E-01,0.1086E-01,0.1147E-01,0.1213E-01,
109 +0.1282E-01,0.1355E-01,0.1432E-01,0.1514E-01,0.1600E-01,0.1691E-01,
110 +0.1787E-01,0.1889E-01,0.1997E-01,0.2110E-01,0.2230E-01,0.2357E-01,
111 +0.2491E-01,0.2632E-01,0.2782E-01,0.2940E-01,0.3107E-01,0.3283E-01,
112 +0.3469E-01,0.3665E-01,0.3872E-01,0.4091E-01,0.4322E-01,0.4566E-01,
113 +0.4823E-01,0.5095E-01,0.5381E-01,0.5683E-01,0.6001E-01,0.6336E-01,
114 +0.6689E-01,0.7061E-01,0.7453E-01,0.7864E-01,0.8297E-01,0.8752E-01,
115 +0.9230E-01,0.9732E-01,0.1026E+00,0.1081E+00,0.1138E+00,0.1199E+00,
116 +0.1262E+00,0.1327E+00,0.1395E+00,0.1466E+00,0.1539E+00,0.1615E+00,
117 +0.1693E+00,0.1773E+00,0.1855E+00,0.1938E+00,0.2022E+00,0.2106E+00,
118 +0.2191E+00,0.2274E+00,0.2355E+00,0.2433E+00,0.2506E+00,0.2573E+00,
119 +0.2633E+00,0.2682E+00,0.2719E+00,0.2741E+00,0.2746E+00,0.2731E+00,
120 +0.2694E+00,0.2630E+00,0.2539E+00,0.2419E+00,0.2269E+00,0.2088E+00,
121 +0.1881E+00,0.1651E+00,0.1404E+00,0.1149E+00,0.8969E-01,0.6600E-01,
122 +0.5296E-01,0.4178E-01,0.3235E-01,0.2453E-01,0.1816E-01,0.1305E-01,
123 +0.9059E-02,0.6015E-02,0.3770E-02,0.2186E-02,0.1134E-02,0.4973E-03,
124 +0.1640E-03,0.3020E-04/
125 DATA (XQDUM (I,1,3),I=1,104) /
126 +0.6312E+01,0.6233E+01,0.6156E+01,0.6079E+01,0.6004E+01,0.5930E+01,
127 +0.5857E+01,0.5785E+01,0.5714E+01,0.5645E+01,0.5576E+01,0.5509E+01,
128 +0.5443E+01,0.5377E+01,0.5314E+01,0.5251E+01,0.5189E+01,0.5128E+01,
129 +0.5069E+01,0.5011E+01,0.4954E+01,0.4898E+01,0.4843E+01,0.4789E+01,
130 +0.4737E+01,0.4686E+01,0.4636E+01,0.4587E+01,0.4539E+01,0.4493E+01,
131 +0.4448E+01,0.4404E+01,0.4361E+01,0.4320E+01,0.4279E+01,0.4240E+01,
132 +0.4202E+01,0.4165E+01,0.4129E+01,0.4095E+01,0.4061E+01,0.4028E+01,
133 +0.3996E+01,0.3964E+01,0.3933E+01,0.3903E+01,0.3873E+01,0.3843E+01,
134 +0.3813E+01,0.3783E+01,0.3752E+01,0.3721E+01,0.3688E+01,0.3654E+01,
135 +0.3618E+01,0.3580E+01,0.3540E+01,0.3496E+01,0.3449E+01,0.3398E+01,
136 +0.3342E+01,0.3282E+01,0.3216E+01,0.3144E+01,0.3066E+01,0.2981E+01,
137 +0.2888E+01,0.2788E+01,0.2681E+01,0.2565E+01,0.2442E+01,0.2311E+01,
138 +0.2173E+01,0.2028E+01,0.1877E+01,0.1722E+01,0.1563E+01,0.1402E+01,
139 +0.1241E+01,0.1083E+01,0.9280E+00,0.7799E+00,0.6405E+00,0.5121E+00,
140 +0.3967E+00,0.2959E+00,0.2109E+00,0.1420E+00,0.8915E-01,0.5107E-01,
141 +0.3451E-01,0.2273E-01,0.1453E-01,0.8970E-02,0.5311E-02,0.2990E-02,
142 +0.1582E-02,0.7746E-03,0.3430E-03,0.1327E-03,0.4251E-04,0.1023E-04,
143 +0.0000E+00,0.0000E+00/
144 DATA (XQDUM (I,1,4),I=1,104) /
145 +0.6996E+00,0.6995E+00,0.6994E+00,0.6994E+00,0.6994E+00,0.6993E+00,
146 +0.6992E+00,0.6991E+00,0.6990E+00,0.6989E+00,0.6988E+00,0.6987E+00,
147 +0.6985E+00,0.6983E+00,0.6981E+00,0.6980E+00,0.6977E+00,0.6974E+00,
148 +0.6972E+00,0.6969E+00,0.6965E+00,0.6961E+00,0.6957E+00,0.6952E+00,
149 +0.6947E+00,0.6941E+00,0.6935E+00,0.6928E+00,0.6920E+00,0.6911E+00,
150 +0.6902E+00,0.6891E+00,0.6879E+00,0.6866E+00,0.6852E+00,0.6836E+00,
151 +0.6818E+00,0.6799E+00,0.6777E+00,0.6754E+00,0.6727E+00,0.6698E+00,
152 +0.6666E+00,0.6631E+00,0.6592E+00,0.6549E+00,0.6502E+00,0.6450E+00,
153 +0.6393E+00,0.6331E+00,0.6262E+00,0.6187E+00,0.6105E+00,0.6015E+00,
154 +0.5917E+00,0.5811E+00,0.5695E+00,0.5570E+00,0.5435E+00,0.5290E+00,
155 +0.5134E+00,0.4966E+00,0.4788E+00,0.4599E+00,0.4400E+00,0.4190E+00,
156 +0.3971E+00,0.3744E+00,0.3510E+00,0.3271E+00,0.3028E+00,0.2785E+00,
157 +0.2543E+00,0.2305E+00,0.2073E+00,0.1850E+00,0.1638E+00,0.1438E+00,
158 +0.1252E+00,0.1079E+00,0.9189E-01,0.7717E-01,0.6363E-01,0.5119E-01,
159 +0.3985E-01,0.2967E-01,0.2082E-01,0.1351E-01,0.7893E-02,0.4007E-02,
160 +0.2439E-02,0.1414E-02,0.7767E-03,0.4008E-03,0.1924E-03,0.8481E-04,
161 +0.3374E-04,0.1183E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
162 +0.0000E+00,0.0000E+00/
163 DATA (XQDUM (I,1,5),I=1,104) /
164 +0.2915E+00,0.2915E+00,0.2914E+00,0.2914E+00,0.2914E+00,0.2914E+00,
165 +0.2913E+00,0.2913E+00,0.2912E+00,0.2912E+00,0.2912E+00,0.2911E+00,
166 +0.2910E+00,0.2910E+00,0.2909E+00,0.2908E+00,0.2907E+00,0.2906E+00,
167 +0.2905E+00,0.2904E+00,0.2902E+00,0.2901E+00,0.2899E+00,0.2897E+00,
168 +0.2895E+00,0.2892E+00,0.2890E+00,0.2887E+00,0.2883E+00,0.2880E+00,
169 +0.2876E+00,0.2871E+00,0.2866E+00,0.2861E+00,0.2855E+00,0.2848E+00,
170 +0.2841E+00,0.2833E+00,0.2824E+00,0.2814E+00,0.2803E+00,0.2791E+00,
171 +0.2778E+00,0.2763E+00,0.2747E+00,0.2729E+00,0.2709E+00,0.2688E+00,
172 +0.2664E+00,0.2638E+00,0.2609E+00,0.2578E+00,0.2544E+00,0.2506E+00,
173 +0.2466E+00,0.2421E+00,0.2373E+00,0.2321E+00,0.2265E+00,0.2204E+00,
174 +0.2139E+00,0.2069E+00,0.1995E+00,0.1916E+00,0.1833E+00,0.1746E+00,
175 +0.1655E+00,0.1560E+00,0.1462E+00,0.1363E+00,0.1262E+00,0.1160E+00,
176 +0.1060E+00,0.9604E-01,0.8639E-01,0.7710E-01,0.6826E-01,0.5993E-01,
177 +0.5215E-01,0.4494E-01,0.3829E-01,0.3216E-01,0.2651E-01,0.2133E-01,
178 +0.1660E-01,0.1236E-01,0.8676E-02,0.5628E-02,0.3289E-02,0.1670E-02,
179 +0.1016E-02,0.5893E-03,0.3236E-03,0.1670E-03,0.8017E-04,0.3534E-04,
180 +0.1406E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
181 +0.0000E+00,0.0000E+00/
182 DATA (XQDUM (I,1,6),I=1,104) /
183 +0.1166E+00,0.1166E+00,0.1166E+00,0.1166E+00,0.1166E+00,0.1165E+00,
184 +0.1165E+00,0.1165E+00,0.1165E+00,0.1165E+00,0.1165E+00,0.1164E+00,
185 +0.1164E+00,0.1164E+00,0.1164E+00,0.1163E+00,0.1163E+00,0.1162E+00,
186 +0.1162E+00,0.1161E+00,0.1161E+00,0.1160E+00,0.1159E+00,0.1159E+00,
187 +0.1158E+00,0.1157E+00,0.1156E+00,0.1155E+00,0.1153E+00,0.1152E+00,
188 +0.1150E+00,0.1149E+00,0.1147E+00,0.1144E+00,0.1142E+00,0.1139E+00,
189 +0.1136E+00,0.1133E+00,0.1130E+00,0.1126E+00,0.1121E+00,0.1116E+00,
190 +0.1111E+00,0.1105E+00,0.1099E+00,0.1092E+00,0.1084E+00,0.1075E+00,
191 +0.1066E+00,0.1055E+00,0.1044E+00,0.1031E+00,0.1017E+00,0.1002E+00,
192 +0.9862E-01,0.9685E-01,0.9492E-01,0.9284E-01,0.9059E-01,0.8816E-01,
193 +0.8556E-01,0.8277E-01,0.7980E-01,0.7665E-01,0.7333E-01,0.6983E-01,
194 +0.6618E-01,0.6240E-01,0.5850E-01,0.5451E-01,0.5047E-01,0.4642E-01,
195 +0.4238E-01,0.3842E-01,0.3456E-01,0.3084E-01,0.2730E-01,0.2397E-01,
196 +0.2086E-01,0.1798E-01,0.1531E-01,0.1286E-01,0.1061E-01,0.8532E-02,
197 +0.6641E-02,0.4945E-02,0.3470E-02,0.2251E-02,0.1315E-02,0.6679E-03,
198 +0.4064E-03,0.2357E-03,0.1295E-03,0.6681E-04,0.3207E-04,0.1414E-04,
199 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
200 +0.0000E+00,0.0000E+00/
201 DATA (XQDUM (I,1,7),I=1,104) /
202 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
203 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
204 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
205 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
206 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
207 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
208 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
209 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
210 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
211 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
212 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
213 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
214 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
215 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
216 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
217 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
218 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
219 +0.0000E+00,0.0000E+00/
220 DATA (XQDUM (I,1,8),I=1,104) /
221 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
222 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
223 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
224 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
225 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
226 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
227 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
228 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
229 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
230 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
231 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
232 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
233 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
234 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
235 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
236 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
237 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
238 +0.0000E+00,0.0000E+00/
239 DATA (XQDUM (I,1,9),I=1,104) /
240 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
241 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
242 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
243 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
244 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
245 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
246 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
247 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
248 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
249 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
250 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
251 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
252 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
253 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
254 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
255 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
256 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
257 +0.0000E+00,0.0000E+00/
258 DATA (XQDUM (I,2,1),I=1,104) /
259 +0.1277E-01,0.1350E-01,0.1427E-01,0.1508E-01,0.1593E-01,0.1684E-01,
260 +0.1780E-01,0.1881E-01,0.1987E-01,0.2100E-01,0.2219E-01,0.2345E-01,
261 +0.2478E-01,0.2618E-01,0.2766E-01,0.2923E-01,0.3088E-01,0.3263E-01,
262 +0.3448E-01,0.3642E-01,0.3848E-01,0.4065E-01,0.4295E-01,0.4537E-01,
263 +0.4793E-01,0.5062E-01,0.5347E-01,0.5648E-01,0.5965E-01,0.6300E-01,
264 +0.6653E-01,0.7025E-01,0.7418E-01,0.7833E-01,0.8270E-01,0.8730E-01,
265 +0.9216E-01,0.9727E-01,0.1027E+00,0.1083E+00,0.1143E+00,0.1206E+00,
266 +0.1272E+00,0.1342E+00,0.1415E+00,0.1492E+00,0.1573E+00,0.1658E+00,
267 +0.1747E+00,0.1840E+00,0.1938E+00,0.2041E+00,0.2148E+00,0.2260E+00,
268 +0.2377E+00,0.2498E+00,0.2625E+00,0.2757E+00,0.2893E+00,0.3035E+00,
269 +0.3180E+00,0.3331E+00,0.3485E+00,0.3642E+00,0.3802E+00,0.3965E+00,
270 +0.4128E+00,0.4291E+00,0.4453E+00,0.4611E+00,0.4764E+00,0.4908E+00,
271 +0.5043E+00,0.5163E+00,0.5266E+00,0.5347E+00,0.5402E+00,0.5426E+00,
272 +0.5413E+00,0.5358E+00,0.5255E+00,0.5101E+00,0.4890E+00,0.4620E+00,
273 +0.4291E+00,0.3905E+00,0.3468E+00,0.2991E+00,0.2488E+00,0.1980E+00,
274 +0.1681E+00,0.1409E+00,0.1165E+00,0.9488E-01,0.7593E-01,0.5950E-01,
275 +0.4546E-01,0.3363E-01,0.2385E-01,0.1597E-01,0.9851E-02,0.5362E-02,
276 +0.2361E-02,0.6710E-03/
277 DATA (XQDUM (I,2,2),I=1,104) /
278 +0.7290E-02,0.7704E-02,0.8141E-02,0.8604E-02,0.9092E-02,0.9608E-02,
279 +0.1015E-01,0.1073E-01,0.1134E-01,0.1198E-01,0.1266E-01,0.1337E-01,
280 +0.1413E-01,0.1493E-01,0.1578E-01,0.1667E-01,0.1761E-01,0.1860E-01,
281 +0.1965E-01,0.2076E-01,0.2193E-01,0.2317E-01,0.2447E-01,0.2585E-01,
282 +0.2730E-01,0.2884E-01,0.3046E-01,0.3216E-01,0.3396E-01,0.3586E-01,
283 +0.3786E-01,0.3998E-01,0.4220E-01,0.4455E-01,0.4702E-01,0.4962E-01,
284 +0.5237E-01,0.5525E-01,0.5829E-01,0.6149E-01,0.6485E-01,0.6839E-01,
285 +0.7210E-01,0.7601E-01,0.8010E-01,0.8440E-01,0.8891E-01,0.9363E-01,
286 +0.9857E-01,0.1037E+00,0.1091E+00,0.1148E+00,0.1206E+00,0.1267E+00,
287 +0.1331E+00,0.1397E+00,0.1465E+00,0.1535E+00,0.1607E+00,0.1681E+00,
288 +0.1757E+00,0.1834E+00,0.1913E+00,0.1992E+00,0.2070E+00,0.2149E+00,
289 +0.2226E+00,0.2301E+00,0.2372E+00,0.2439E+00,0.2500E+00,0.2554E+00,
290 +0.2599E+00,0.2632E+00,0.2652E+00,0.2657E+00,0.2644E+00,0.2611E+00,
291 +0.2555E+00,0.2475E+00,0.2369E+00,0.2236E+00,0.2077E+00,0.1893E+00,
292 +0.1686E+00,0.1462E+00,0.1228E+00,0.9910E-01,0.7622E-01,0.5515E-01,
293 +0.4377E-01,0.3414E-01,0.2613E-01,0.1957E-01,0.1430E-01,0.1014E-01,
294 +0.6929E-02,0.4523E-02,0.2782E-02,0.1578E-02,0.7980E-03,0.3389E-03,
295 +0.1072E-03,0.1858E-04/
296 DATA (XQDUM (I,2,3),I=1,104) /
297 +0.1706E+02,0.1672E+02,0.1638E+02,0.1604E+02,0.1571E+02,0.1539E+02,
298 +0.1507E+02,0.1476E+02,0.1445E+02,0.1414E+02,0.1385E+02,0.1355E+02,
299 +0.1327E+02,0.1298E+02,0.1270E+02,0.1243E+02,0.1216E+02,0.1190E+02,
300 +0.1164E+02,0.1138E+02,0.1113E+02,0.1088E+02,0.1064E+02,0.1040E+02,
301 +0.1017E+02,0.9939E+01,0.9713E+01,0.9492E+01,0.9275E+01,0.9061E+01,
302 +0.8852E+01,0.8647E+01,0.8446E+01,0.8248E+01,0.8054E+01,0.7864E+01,
303 +0.7678E+01,0.7495E+01,0.7315E+01,0.7139E+01,0.6967E+01,0.6797E+01,
304 +0.6631E+01,0.6468E+01,0.6307E+01,0.6149E+01,0.5994E+01,0.5841E+01,
305 +0.5691E+01,0.5542E+01,0.5395E+01,0.5250E+01,0.5106E+01,0.4963E+01,
306 +0.4821E+01,0.4679E+01,0.4537E+01,0.4395E+01,0.4252E+01,0.4109E+01,
307 +0.3964E+01,0.3818E+01,0.3669E+01,0.3519E+01,0.3366E+01,0.3210E+01,
308 +0.3052E+01,0.2891E+01,0.2728E+01,0.2561E+01,0.2393E+01,0.2222E+01,
309 +0.2050E+01,0.1878E+01,0.1706E+01,0.1535E+01,0.1367E+01,0.1203E+01,
310 +0.1045E+01,0.8930E+00,0.7501E+00,0.6173E+00,0.4962E+00,0.3880E+00,
311 +0.2938E+00,0.2140E+00,0.1487E+00,0.9767E-01,0.5970E-01,0.3331E-01,
312 +0.2217E-01,0.1441E-01,0.9120E-02,0.5593E-02,0.3307E-02,0.1874E-02,
313 +0.1010E-02,0.5125E-03,0.2418E-03,0.1041E-03,0.3988E-04,0.1295E-04,
314 +0.0000E+00,0.0000E+00/
315 DATA (XQDUM (I,2,4),I=1,104) /
316 +0.1310E+01,0.1299E+01,0.1288E+01,0.1278E+01,0.1267E+01,0.1257E+01,
317 +0.1247E+01,0.1237E+01,0.1227E+01,0.1217E+01,0.1207E+01,0.1198E+01,
318 +0.1189E+01,0.1179E+01,0.1170E+01,0.1161E+01,0.1152E+01,0.1144E+01,
319 +0.1135E+01,0.1127E+01,0.1118E+01,0.1110E+01,0.1101E+01,0.1093E+01,
320 +0.1085E+01,0.1077E+01,0.1068E+01,0.1060E+01,0.1052E+01,0.1044E+01,
321 +0.1036E+01,0.1028E+01,0.1020E+01,0.1011E+01,0.1003E+01,0.9944E+00,
322 +0.9858E+00,0.9770E+00,0.9680E+00,0.9587E+00,0.9492E+00,0.9395E+00,
323 +0.9294E+00,0.9189E+00,0.9081E+00,0.8968E+00,0.8850E+00,0.8727E+00,
324 +0.8597E+00,0.8462E+00,0.8319E+00,0.8170E+00,0.8012E+00,0.7845E+00,
325 +0.7670E+00,0.7485E+00,0.7291E+00,0.7086E+00,0.6870E+00,0.6644E+00,
326 +0.6407E+00,0.6159E+00,0.5900E+00,0.5630E+00,0.5351E+00,0.5063E+00,
327 +0.4768E+00,0.4466E+00,0.4160E+00,0.3851E+00,0.3542E+00,0.3235E+00,
328 +0.2933E+00,0.2639E+00,0.2355E+00,0.2084E+00,0.1828E+00,0.1587E+00,
329 +0.1365E+00,0.1160E+00,0.9725E-01,0.8023E-01,0.6486E-01,0.5107E-01,
330 +0.3885E-01,0.2825E-01,0.1935E-01,0.1225E-01,0.6991E-02,0.3470E-02,
331 +0.2085E-02,0.1196E-02,0.6514E-03,0.3342E-03,0.1601E-03,0.7082E-04,
332 +0.2850E-04,0.1025E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
333 +0.0000E+00,0.0000E+00/
334 DATA (XQDUM (I,2,5),I=1,104) /
335 +0.4289E+00,0.4264E+00,0.4240E+00,0.4217E+00,0.4193E+00,0.4170E+00,
336 +0.4147E+00,0.4125E+00,0.4102E+00,0.4080E+00,0.4059E+00,0.4038E+00,
337 +0.4016E+00,0.3995E+00,0.3975E+00,0.3954E+00,0.3934E+00,0.3914E+00,
338 +0.3894E+00,0.3874E+00,0.3854E+00,0.3834E+00,0.3815E+00,0.3795E+00,
339 +0.3776E+00,0.3756E+00,0.3736E+00,0.3716E+00,0.3696E+00,0.3676E+00,
340 +0.3656E+00,0.3635E+00,0.3614E+00,0.3592E+00,0.3570E+00,0.3547E+00,
341 +0.3524E+00,0.3499E+00,0.3474E+00,0.3448E+00,0.3421E+00,0.3393E+00,
342 +0.3363E+00,0.3331E+00,0.3298E+00,0.3263E+00,0.3227E+00,0.3187E+00,
343 +0.3146E+00,0.3102E+00,0.3055E+00,0.3005E+00,0.2953E+00,0.2896E+00,
344 +0.2836E+00,0.2773E+00,0.2705E+00,0.2633E+00,0.2557E+00,0.2476E+00,
345 +0.2391E+00,0.2302E+00,0.2208E+00,0.2110E+00,0.2009E+00,0.1903E+00,
346 +0.1794E+00,0.1683E+00,0.1569E+00,0.1454E+00,0.1339E+00,0.1225E+00,
347 +0.1112E+00,0.1002E+00,0.8955E-01,0.7939E-01,0.6977E-01,0.6075E-01,
348 +0.5238E-01,0.4467E-01,0.3760E-01,0.3115E-01,0.2530E-01,0.2001E-01,
349 +0.1529E-01,0.1117E-01,0.7676E-02,0.4874E-02,0.2786E-02,0.1383E-02,
350 +0.8306E-03,0.4757E-03,0.2583E-03,0.1320E-03,0.6288E-04,0.2758E-04,
351 +0.1097E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
352 +0.0000E+00,0.0000E+00/
353 DATA (XQDUM (I,2,6),I=1,104) /
354 +0.2541E+00,0.2516E+00,0.2492E+00,0.2469E+00,0.2446E+00,0.2423E+00,
355 +0.2400E+00,0.2378E+00,0.2356E+00,0.2335E+00,0.2313E+00,0.2293E+00,
356 +0.2272E+00,0.2251E+00,0.2231E+00,0.2212E+00,0.2192E+00,0.2173E+00,
357 +0.2154E+00,0.2135E+00,0.2116E+00,0.2098E+00,0.2079E+00,0.2061E+00,
358 +0.2043E+00,0.2026E+00,0.2008E+00,0.1990E+00,0.1973E+00,0.1955E+00,
359 +0.1938E+00,0.1921E+00,0.1903E+00,0.1885E+00,0.1868E+00,0.1850E+00,
360 +0.1832E+00,0.1813E+00,0.1795E+00,0.1776E+00,0.1756E+00,0.1736E+00,
361 +0.1716E+00,0.1695E+00,0.1673E+00,0.1650E+00,0.1627E+00,0.1603E+00,
362 +0.1577E+00,0.1551E+00,0.1523E+00,0.1494E+00,0.1464E+00,0.1432E+00,
363 +0.1399E+00,0.1364E+00,0.1327E+00,0.1288E+00,0.1248E+00,0.1206E+00,
364 +0.1162E+00,0.1116E+00,0.1068E+00,0.1018E+00,0.9671E-01,0.9144E-01,
365 +0.8604E-01,0.8053E-01,0.7495E-01,0.6934E-01,0.6372E-01,0.5816E-01,
366 +0.5269E-01,0.4736E-01,0.4222E-01,0.3731E-01,0.3267E-01,0.2833E-01,
367 +0.2430E-01,0.2060E-01,0.1722E-01,0.1417E-01,0.1141E-01,0.8955E-02,
368 +0.6790E-02,0.4921E-02,0.3361E-02,0.2124E-02,0.1210E-02,0.6004E-03,
369 +0.3610E-03,0.2074E-03,0.1132E-03,0.5825E-04,0.2803E-04,0.1247E-04,
370 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
371 +0.0000E+00,0.0000E+00/
372 DATA (XQDUM (I,2,7),I=1,104) /
373 +0.1375E+00,0.1351E+00,0.1327E+00,0.1304E+00,0.1281E+00,0.1258E+00,
374 +0.1236E+00,0.1214E+00,0.1192E+00,0.1171E+00,0.1150E+00,0.1129E+00,
375 +0.1109E+00,0.1089E+00,0.1069E+00,0.1050E+00,0.1031E+00,0.1012E+00,
376 +0.9936E-01,0.9755E-01,0.9576E-01,0.9400E-01,0.9227E-01,0.9056E-01,
377 +0.8888E-01,0.8723E-01,0.8560E-01,0.8399E-01,0.8240E-01,0.8084E-01,
378 +0.7929E-01,0.7776E-01,0.7625E-01,0.7476E-01,0.7328E-01,0.7181E-01,
379 +0.7036E-01,0.6891E-01,0.6747E-01,0.6604E-01,0.6462E-01,0.6319E-01,
380 +0.6177E-01,0.6034E-01,0.5892E-01,0.5748E-01,0.5604E-01,0.5459E-01,
381 +0.5313E-01,0.5166E-01,0.5017E-01,0.4866E-01,0.4714E-01,0.4560E-01,
382 +0.4403E-01,0.4245E-01,0.4084E-01,0.3921E-01,0.3756E-01,0.3589E-01,
383 +0.3420E-01,0.3249E-01,0.3077E-01,0.2903E-01,0.2729E-01,0.2554E-01,
384 +0.2379E-01,0.2205E-01,0.2032E-01,0.1861E-01,0.1693E-01,0.1528E-01,
385 +0.1369E-01,0.1214E-01,0.1066E-01,0.9259E-02,0.7937E-02,0.6708E-02,
386 +0.5577E-02,0.4553E-02,0.3640E-02,0.2841E-02,0.2157E-02,0.1585E-02,
387 +0.1121E-02,0.7577E-03,0.4847E-03,0.2899E-03,0.1593E-03,0.7850E-04,
388 +0.4797E-04,0.2850E-04,0.1638E-04,0.0000E+00,0.0000E+00,0.0000E+00,
389 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
390 +0.0000E+00,0.0000E+00/
391 DATA (XQDUM (I,2,8),I=1,104) /
392 +0.6049E-01,0.5928E-01,0.5811E-01,0.5694E-01,0.5580E-01,0.5468E-01,
393 +0.5358E-01,0.5249E-01,0.5142E-01,0.5036E-01,0.4933E-01,0.4831E-01,
394 +0.4730E-01,0.4631E-01,0.4534E-01,0.4438E-01,0.4344E-01,0.4252E-01,
395 +0.4161E-01,0.4072E-01,0.3984E-01,0.3897E-01,0.3812E-01,0.3729E-01,
396 +0.3646E-01,0.3566E-01,0.3486E-01,0.3407E-01,0.3330E-01,0.3254E-01,
397 +0.3179E-01,0.3105E-01,0.3033E-01,0.2961E-01,0.2890E-01,0.2820E-01,
398 +0.2751E-01,0.2683E-01,0.2615E-01,0.2548E-01,0.2482E-01,0.2417E-01,
399 +0.2351E-01,0.2287E-01,0.2222E-01,0.2158E-01,0.2095E-01,0.2031E-01,
400 +0.1967E-01,0.1904E-01,0.1841E-01,0.1777E-01,0.1714E-01,0.1650E-01,
401 +0.1586E-01,0.1522E-01,0.1458E-01,0.1394E-01,0.1329E-01,0.1265E-01,
402 +0.1200E-01,0.1135E-01,0.1070E-01,0.1006E-01,0.9416E-02,0.8777E-02,
403 +0.8143E-02,0.7517E-02,0.6900E-02,0.6296E-02,0.5705E-02,0.5132E-02,
404 +0.4578E-02,0.4046E-02,0.3540E-02,0.3063E-02,0.2616E-02,0.2202E-02,
405 +0.1824E-02,0.1484E-02,0.1182E-02,0.9191E-03,0.6950E-03,0.5089E-03,
406 +0.3586E-03,0.2415E-03,0.1540E-03,0.9179E-04,0.5033E-04,0.2477E-04,
407 +0.1514E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
408 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
409 +0.0000E+00,0.0000E+00/
410 DATA (XQDUM (I,2,9),I=1,104) /
411 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
412 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
413 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
414 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
415 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
416 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
417 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
418 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
419 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
420 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
421 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
422 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
423 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
424 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
425 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
426 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
427 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
428 +0.0000E+00,0.0000E+00/
429 DATA (XQDUM (I,3,1),I=1,104) /
430 +0.1402E-01,0.1481E-01,0.1565E-01,0.1654E-01,0.1747E-01,0.1846E-01,
431 +0.1950E-01,0.2060E-01,0.2177E-01,0.2299E-01,0.2429E-01,0.2566E-01,
432 +0.2710E-01,0.2863E-01,0.3024E-01,0.3194E-01,0.3373E-01,0.3563E-01,
433 +0.3762E-01,0.3973E-01,0.4196E-01,0.4431E-01,0.4678E-01,0.4939E-01,
434 +0.5215E-01,0.5505E-01,0.5812E-01,0.6134E-01,0.6475E-01,0.6833E-01,
435 +0.7211E-01,0.7610E-01,0.8029E-01,0.8471E-01,0.8936E-01,0.9426E-01,
436 +0.9941E-01,0.1048E+00,0.1105E+00,0.1165E+00,0.1228E+00,0.1294E+00,
437 +0.1364E+00,0.1437E+00,0.1513E+00,0.1593E+00,0.1678E+00,0.1766E+00,
438 +0.1858E+00,0.1954E+00,0.2054E+00,0.2159E+00,0.2269E+00,0.2382E+00,
439 +0.2501E+00,0.2624E+00,0.2751E+00,0.2883E+00,0.3018E+00,0.3158E+00,
440 +0.3301E+00,0.3448E+00,0.3598E+00,0.3749E+00,0.3902E+00,0.4056E+00,
441 +0.4208E+00,0.4359E+00,0.4506E+00,0.4648E+00,0.4782E+00,0.4906E+00,
442 +0.5017E+00,0.5112E+00,0.5187E+00,0.5238E+00,0.5262E+00,0.5252E+00,
443 +0.5206E+00,0.5118E+00,0.4983E+00,0.4799E+00,0.4563E+00,0.4273E+00,
444 +0.3932E+00,0.3542E+00,0.3111E+00,0.2652E+00,0.2178E+00,0.1708E+00,
445 +0.1436E+00,0.1192E+00,0.9757E-01,0.7862E-01,0.6219E-01,0.4814E-01,
446 +0.3628E-01,0.2643E-01,0.1842E-01,0.1209E-01,0.7286E-02,0.3852E-02,
447 +0.1632E-02,0.4382E-03/
448 DATA (XQDUM (I,3,2),I=1,104) /
449 +0.7995E-02,0.8447E-02,0.8924E-02,0.9429E-02,0.9961E-02,0.1052E-01,
450 +0.1112E-01,0.1174E-01,0.1241E-01,0.1310E-01,0.1384E-01,0.1462E-01,
451 +0.1544E-01,0.1631E-01,0.1723E-01,0.1819E-01,0.1921E-01,0.2029E-01,
452 +0.2142E-01,0.2262E-01,0.2388E-01,0.2521E-01,0.2662E-01,0.2810E-01,
453 +0.2966E-01,0.3130E-01,0.3304E-01,0.3487E-01,0.3679E-01,0.3882E-01,
454 +0.4095E-01,0.4320E-01,0.4557E-01,0.4806E-01,0.5068E-01,0.5343E-01,
455 +0.5633E-01,0.5937E-01,0.6257E-01,0.6593E-01,0.6945E-01,0.7315E-01,
456 +0.7702E-01,0.8108E-01,0.8533E-01,0.8978E-01,0.9443E-01,0.9928E-01,
457 +0.1043E+00,0.1096E+00,0.1151E+00,0.1208E+00,0.1268E+00,0.1329E+00,
458 +0.1392E+00,0.1458E+00,0.1525E+00,0.1595E+00,0.1665E+00,0.1738E+00,
459 +0.1811E+00,0.1885E+00,0.1959E+00,0.2034E+00,0.2107E+00,0.2179E+00,
460 +0.2249E+00,0.2315E+00,0.2377E+00,0.2434E+00,0.2484E+00,0.2525E+00,
461 +0.2556E+00,0.2575E+00,0.2581E+00,0.2570E+00,0.2541E+00,0.2493E+00,
462 +0.2423E+00,0.2329E+00,0.2212E+00,0.2071E+00,0.1906E+00,0.1721E+00,
463 +0.1517E+00,0.1302E+00,0.1080E+00,0.8609E-01,0.6530E-01,0.4653E-01,
464 +0.3655E-01,0.2821E-01,0.2136E-01,0.1582E-01,0.1141E-01,0.7987E-02,
465 +0.5383E-02,0.3460E-02,0.2090E-02,0.1162E-02,0.5736E-03,0.2365E-03,
466 +0.7197E-04,0.1179E-04/
467 DATA (XQDUM (I,3,3),I=1,104) /
468 +0.3175E+02,0.3093E+02,0.3012E+02,0.2934E+02,0.2856E+02,0.2781E+02,
469 +0.2707E+02,0.2635E+02,0.2564E+02,0.2495E+02,0.2427E+02,0.2360E+02,
470 +0.2296E+02,0.2232E+02,0.2170E+02,0.2109E+02,0.2050E+02,0.1991E+02,
471 +0.1935E+02,0.1879E+02,0.1825E+02,0.1771E+02,0.1720E+02,0.1669E+02,
472 +0.1619E+02,0.1571E+02,0.1523E+02,0.1477E+02,0.1432E+02,0.1388E+02,
473 +0.1345E+02,0.1303E+02,0.1261E+02,0.1221E+02,0.1182E+02,0.1144E+02,
474 +0.1107E+02,0.1070E+02,0.1035E+02,0.1000E+02,0.9666E+01,0.9337E+01,
475 +0.9016E+01,0.8703E+01,0.8397E+01,0.8099E+01,0.7808E+01,0.7524E+01,
476 +0.7247E+01,0.6976E+01,0.6711E+01,0.6452E+01,0.6198E+01,0.5950E+01,
477 +0.5706E+01,0.5468E+01,0.5233E+01,0.5003E+01,0.4776E+01,0.4553E+01,
478 +0.4333E+01,0.4115E+01,0.3901E+01,0.3688E+01,0.3478E+01,0.3270E+01,
479 +0.3064E+01,0.2861E+01,0.2660E+01,0.2461E+01,0.2265E+01,0.2072E+01,
480 +0.1883E+01,0.1698E+01,0.1519E+01,0.1346E+01,0.1179E+01,0.1021E+01,
481 +0.8718E+00,0.7327E+00,0.6048E+00,0.4890E+00,0.3860E+00,0.2962E+00,
482 +0.2199E+00,0.1570E+00,0.1070E+00,0.6879E-01,0.4121E-01,0.2256E-01,
483 +0.1487E-01,0.9593E-02,0.6043E-02,0.3705E-02,0.2201E-02,0.1262E-02,
484 +0.6934E-03,0.3625E-03,0.1783E-03,0.8099E-04,0.3300E-04,0.1139E-04,
485 +0.0000E+00,0.0000E+00/
486 DATA (XQDUM (I,3,4),I=1,104) /
487 +0.2577E+01,0.2535E+01,0.2494E+01,0.2453E+01,0.2413E+01,0.2374E+01,
488 +0.2335E+01,0.2298E+01,0.2260E+01,0.2224E+01,0.2188E+01,0.2153E+01,
489 +0.2119E+01,0.2085E+01,0.2052E+01,0.2019E+01,0.1987E+01,0.1955E+01,
490 +0.1925E+01,0.1894E+01,0.1864E+01,0.1835E+01,0.1806E+01,0.1778E+01,
491 +0.1750E+01,0.1722E+01,0.1695E+01,0.1668E+01,0.1642E+01,0.1616E+01,
492 +0.1590E+01,0.1565E+01,0.1539E+01,0.1514E+01,0.1490E+01,0.1465E+01,
493 +0.1441E+01,0.1417E+01,0.1392E+01,0.1368E+01,0.1344E+01,0.1319E+01,
494 +0.1295E+01,0.1270E+01,0.1246E+01,0.1221E+01,0.1195E+01,0.1170E+01,
495 +0.1143E+01,0.1117E+01,0.1090E+01,0.1062E+01,0.1034E+01,0.1005E+01,
496 +0.9747E+00,0.9441E+00,0.9127E+00,0.8805E+00,0.8474E+00,0.8135E+00,
497 +0.7786E+00,0.7430E+00,0.7066E+00,0.6694E+00,0.6316E+00,0.5934E+00,
498 +0.5547E+00,0.5158E+00,0.4770E+00,0.4384E+00,0.4003E+00,0.3629E+00,
499 +0.3265E+00,0.2915E+00,0.2580E+00,0.2263E+00,0.1966E+00,0.1690E+00,
500 +0.1436E+00,0.1205E+00,0.9968E-01,0.8098E-01,0.6437E-01,0.4977E-01,
501 +0.3714E-01,0.2647E-01,0.1776E-01,0.1101E-01,0.6154E-02,0.2994E-02,
502 +0.1779E-02,0.1011E-02,0.5464E-03,0.2790E-03,0.1335E-03,0.5932E-04,
503 +0.2419E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
504 +0.0000E+00,0.0000E+00/
505 DATA (XQDUM (I,3,5),I=1,104) /
506 +0.6821E+00,0.6733E+00,0.6648E+00,0.6564E+00,0.6482E+00,0.6401E+00,
507 +0.6322E+00,0.6244E+00,0.6167E+00,0.6091E+00,0.6017E+00,0.5945E+00,
508 +0.5873E+00,0.5803E+00,0.5733E+00,0.5666E+00,0.5599E+00,0.5533E+00,
509 +0.5468E+00,0.5404E+00,0.5341E+00,0.5279E+00,0.5219E+00,0.5158E+00,
510 +0.5099E+00,0.5040E+00,0.4982E+00,0.4924E+00,0.4867E+00,0.4811E+00,
511 +0.4755E+00,0.4699E+00,0.4643E+00,0.4588E+00,0.4532E+00,0.4477E+00,
512 +0.4421E+00,0.4365E+00,0.4308E+00,0.4251E+00,0.4193E+00,0.4135E+00,
513 +0.4075E+00,0.4014E+00,0.3952E+00,0.3888E+00,0.3823E+00,0.3756E+00,
514 +0.3686E+00,0.3615E+00,0.3541E+00,0.3464E+00,0.3384E+00,0.3301E+00,
515 +0.3215E+00,0.3125E+00,0.3032E+00,0.2935E+00,0.2835E+00,0.2730E+00,
516 +0.2622E+00,0.2510E+00,0.2394E+00,0.2275E+00,0.2153E+00,0.2029E+00,
517 +0.1902E+00,0.1773E+00,0.1644E+00,0.1515E+00,0.1387E+00,0.1261E+00,
518 +0.1138E+00,0.1019E+00,0.9052E-01,0.7971E-01,0.6954E-01,0.6008E-01,
519 +0.5136E-01,0.4338E-01,0.3613E-01,0.2958E-01,0.2370E-01,0.1848E-01,
520 +0.1390E-01,0.9979E-02,0.6739E-02,0.4200E-02,0.2354E-02,0.1146E-02,
521 +0.6796E-03,0.3848E-03,0.2068E-03,0.1047E-03,0.4954E-04,0.2164E-04,
522 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
523 +0.0000E+00,0.0000E+00/
524 DATA (XQDUM (I,3,6),I=1,104) /
525 +0.5073E+00,0.4986E+00,0.4901E+00,0.4818E+00,0.4736E+00,0.4655E+00,
526 +0.4576E+00,0.4498E+00,0.4422E+00,0.4347E+00,0.4273E+00,0.4201E+00,
527 +0.4130E+00,0.4061E+00,0.3992E+00,0.3925E+00,0.3859E+00,0.3795E+00,
528 +0.3731E+00,0.3669E+00,0.3607E+00,0.3547E+00,0.3488E+00,0.3429E+00,
529 +0.3372E+00,0.3315E+00,0.3260E+00,0.3205E+00,0.3151E+00,0.3098E+00,
530 +0.3045E+00,0.2993E+00,0.2942E+00,0.2891E+00,0.2841E+00,0.2791E+00,
531 +0.2742E+00,0.2692E+00,0.2643E+00,0.2595E+00,0.2546E+00,0.2497E+00,
532 +0.2448E+00,0.2399E+00,0.2349E+00,0.2299E+00,0.2249E+00,0.2198E+00,
533 +0.2147E+00,0.2094E+00,0.2041E+00,0.1987E+00,0.1931E+00,0.1875E+00,
534 +0.1817E+00,0.1758E+00,0.1698E+00,0.1636E+00,0.1573E+00,0.1508E+00,
535 +0.1442E+00,0.1375E+00,0.1306E+00,0.1236E+00,0.1165E+00,0.1094E+00,
536 +0.1021E+00,0.9489E-01,0.8766E-01,0.8049E-01,0.7342E-01,0.6649E-01,
537 +0.5977E-01,0.5328E-01,0.4710E-01,0.4124E-01,0.3576E-01,0.3068E-01,
538 +0.2601E-01,0.2177E-01,0.1794E-01,0.1452E-01,0.1150E-01,0.8856E-02,
539 +0.6583E-02,0.4673E-02,0.3125E-02,0.1933E-02,0.1079E-02,0.5246E-03,
540 +0.3120E-03,0.1776E-03,0.9627E-04,0.4936E-04,0.2376E-04,0.1064E-04,
541 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
542 +0.0000E+00,0.0000E+00/
543 DATA (XQDUM (I,3,7),I=1,104) /
544 +0.3908E+00,0.3821E+00,0.3736E+00,0.3653E+00,0.3571E+00,0.3491E+00,
545 +0.3412E+00,0.3334E+00,0.3259E+00,0.3184E+00,0.3111E+00,0.3039E+00,
546 +0.2969E+00,0.2900E+00,0.2832E+00,0.2765E+00,0.2700E+00,0.2636E+00,
547 +0.2573E+00,0.2512E+00,0.2451E+00,0.2392E+00,0.2334E+00,0.2277E+00,
548 +0.2221E+00,0.2166E+00,0.2112E+00,0.2059E+00,0.2007E+00,0.1956E+00,
549 +0.1906E+00,0.1857E+00,0.1808E+00,0.1761E+00,0.1714E+00,0.1668E+00,
550 +0.1622E+00,0.1578E+00,0.1534E+00,0.1490E+00,0.1447E+00,0.1405E+00,
551 +0.1363E+00,0.1322E+00,0.1281E+00,0.1240E+00,0.1200E+00,0.1160E+00,
552 +0.1120E+00,0.1081E+00,0.1041E+00,0.1002E+00,0.9632E-01,0.9243E-01,
553 +0.8856E-01,0.8470E-01,0.8086E-01,0.7702E-01,0.7319E-01,0.6938E-01,
554 +0.6558E-01,0.6181E-01,0.5806E-01,0.5434E-01,0.5066E-01,0.4702E-01,
555 +0.4344E-01,0.3992E-01,0.3648E-01,0.3313E-01,0.2987E-01,0.2673E-01,
556 +0.2372E-01,0.2086E-01,0.1814E-01,0.1560E-01,0.1324E-01,0.1108E-01,
557 +0.9115E-02,0.7361E-02,0.5819E-02,0.4488E-02,0.3365E-02,0.2442E-02,
558 +0.1704E-02,0.1136E-02,0.7159E-03,0.4216E-03,0.2280E-03,0.1106E-03,
559 +0.6699E-04,0.3949E-04,0.2256E-04,0.1243E-04,0.0000E+00,0.0000E+00,
560 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
561 +0.0000E+00,0.0000E+00/
562 DATA (XQDUM (I,3,8),I=1,104) /
563 +0.3150E+00,0.3075E+00,0.3002E+00,0.2930E+00,0.2860E+00,0.2791E+00,
564 +0.2723E+00,0.2656E+00,0.2591E+00,0.2527E+00,0.2464E+00,0.2403E+00,
565 +0.2343E+00,0.2284E+00,0.2226E+00,0.2169E+00,0.2113E+00,0.2059E+00,
566 +0.2005E+00,0.1953E+00,0.1901E+00,0.1851E+00,0.1801E+00,0.1753E+00,
567 +0.1705E+00,0.1659E+00,0.1613E+00,0.1568E+00,0.1524E+00,0.1481E+00,
568 +0.1439E+00,0.1398E+00,0.1357E+00,0.1317E+00,0.1278E+00,0.1240E+00,
569 +0.1202E+00,0.1165E+00,0.1129E+00,0.1093E+00,0.1058E+00,0.1023E+00,
570 +0.9894E-01,0.9559E-01,0.9228E-01,0.8902E-01,0.8581E-01,0.8264E-01,
571 +0.7950E-01,0.7641E-01,0.7335E-01,0.7032E-01,0.6733E-01,0.6436E-01,
572 +0.6143E-01,0.5852E-01,0.5565E-01,0.5280E-01,0.4998E-01,0.4720E-01,
573 +0.4445E-01,0.4173E-01,0.3905E-01,0.3641E-01,0.3381E-01,0.3127E-01,
574 +0.2878E-01,0.2635E-01,0.2399E-01,0.2171E-01,0.1950E-01,0.1739E-01,
575 +0.1538E-01,0.1347E-01,0.1168E-01,0.1000E-01,0.8461E-02,0.7052E-02,
576 +0.5781E-02,0.4652E-02,0.3664E-02,0.2815E-02,0.2103E-02,0.1520E-02,
577 +0.1057E-02,0.7021E-03,0.4412E-03,0.2591E-03,0.1399E-03,0.6783E-04,
578 +0.4112E-04,0.2430E-04,0.1394E-04,0.0000E+00,0.0000E+00,0.0000E+00,
579 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
580 +0.0000E+00,0.0000E+00/
581 DATA (XQDUM (I,3,9),I=1,104) /
582 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
583 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
584 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
585 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
586 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
587 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
588 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
589 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
590 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
591 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
592 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
593 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
594 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
595 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
596 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
597 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
598 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
599 +0.0000E+00,0.0000E+00/
600 DATA (XQDUM (I,4,1),I=1,104) /
601 +0.1617E-01,0.1708E-01,0.1804E-01,0.1905E-01,0.2012E-01,0.2124E-01,
602 +0.2243E-01,0.2369E-01,0.2501E-01,0.2641E-01,0.2788E-01,0.2943E-01,
603 +0.3107E-01,0.3280E-01,0.3462E-01,0.3654E-01,0.3857E-01,0.4070E-01,
604 +0.4295E-01,0.4533E-01,0.4782E-01,0.5046E-01,0.5323E-01,0.5615E-01,
605 +0.5922E-01,0.6246E-01,0.6586E-01,0.6945E-01,0.7322E-01,0.7719E-01,
606 +0.8136E-01,0.8574E-01,0.9035E-01,0.9519E-01,0.1003E+00,0.1056E+00,
607 +0.1112E+00,0.1171E+00,0.1233E+00,0.1297E+00,0.1365E+00,0.1436E+00,
608 +0.1510E+00,0.1588E+00,0.1669E+00,0.1753E+00,0.1842E+00,0.1934E+00,
609 +0.2030E+00,0.2130E+00,0.2233E+00,0.2341E+00,0.2452E+00,0.2568E+00,
610 +0.2687E+00,0.2810E+00,0.2936E+00,0.3066E+00,0.3198E+00,0.3333E+00,
611 +0.3471E+00,0.3610E+00,0.3750E+00,0.3890E+00,0.4029E+00,0.4166E+00,
612 +0.4300E+00,0.4429E+00,0.4552E+00,0.4666E+00,0.4770E+00,0.4860E+00,
613 +0.4935E+00,0.4990E+00,0.5023E+00,0.5029E+00,0.5007E+00,0.4951E+00,
614 +0.4858E+00,0.4725E+00,0.4549E+00,0.4329E+00,0.4063E+00,0.3754E+00,
615 +0.3404E+00,0.3019E+00,0.2607E+00,0.2182E+00,0.1756E+00,0.1347E+00,
616 +0.1115E+00,0.9116E-01,0.7343E-01,0.5817E-01,0.4520E-01,0.3431E-01,
617 +0.2531E-01,0.1800E-01,0.1221E-01,0.7771E-02,0.4511E-02,0.2278E-02,
618 +0.9087E-03,0.2233E-03/
619 DATA (XQDUM (I,4,2),I=1,104) /
620 +0.9211E-02,0.9727E-02,0.1027E-01,0.1085E-01,0.1145E-01,0.1209E-01,
621 +0.1277E-01,0.1348E-01,0.1423E-01,0.1503E-01,0.1586E-01,0.1674E-01,
622 +0.1767E-01,0.1865E-01,0.1968E-01,0.2077E-01,0.2192E-01,0.2313E-01,
623 +0.2440E-01,0.2574E-01,0.2715E-01,0.2864E-01,0.3020E-01,0.3185E-01,
624 +0.3359E-01,0.3541E-01,0.3733E-01,0.3935E-01,0.4147E-01,0.4370E-01,
625 +0.4604E-01,0.4850E-01,0.5108E-01,0.5379E-01,0.5663E-01,0.5962E-01,
626 +0.6274E-01,0.6601E-01,0.6944E-01,0.7303E-01,0.7678E-01,0.8070E-01,
627 +0.8480E-01,0.8907E-01,0.9352E-01,0.9816E-01,0.1030E+00,0.1080E+00,
628 +0.1132E+00,0.1186E+00,0.1242E+00,0.1299E+00,0.1359E+00,0.1420E+00,
629 +0.1483E+00,0.1547E+00,0.1613E+00,0.1679E+00,0.1747E+00,0.1815E+00,
630 +0.1883E+00,0.1951E+00,0.2018E+00,0.2084E+00,0.2147E+00,0.2208E+00,
631 +0.2266E+00,0.2319E+00,0.2366E+00,0.2406E+00,0.2438E+00,0.2460E+00,
632 +0.2471E+00,0.2469E+00,0.2452E+00,0.2420E+00,0.2370E+00,0.2301E+00,
633 +0.2212E+00,0.2103E+00,0.1973E+00,0.1823E+00,0.1655E+00,0.1472E+00,
634 +0.1278E+00,0.1078E+00,0.8786E-01,0.6866E-01,0.5096E-01,0.3545E-01,
635 +0.2740E-01,0.2081E-01,0.1549E-01,0.1126E-01,0.7977E-02,0.5470E-02,
636 +0.3605E-02,0.2261E-02,0.1329E-02,0.7153E-03,0.3401E-03,0.1339E-03,
637 +0.3836E-04,0.0000E+00/
638 DATA (XQDUM (I,4,3),I=1,104) /
639 +0.6492E+02,0.6277E+02,0.6068E+02,0.5865E+02,0.5667E+02,0.5475E+02,
640 +0.5289E+02,0.5107E+02,0.4931E+02,0.4760E+02,0.4593E+02,0.4432E+02,
641 +0.4275E+02,0.4122E+02,0.3974E+02,0.3831E+02,0.3691E+02,0.3556E+02,
642 +0.3424E+02,0.3297E+02,0.3173E+02,0.3054E+02,0.2937E+02,0.2825E+02,
643 +0.2716E+02,0.2610E+02,0.2507E+02,0.2408E+02,0.2311E+02,0.2218E+02,
644 +0.2128E+02,0.2041E+02,0.1956E+02,0.1874E+02,0.1795E+02,0.1719E+02,
645 +0.1644E+02,0.1573E+02,0.1504E+02,0.1437E+02,0.1372E+02,0.1310E+02,
646 +0.1249E+02,0.1191E+02,0.1135E+02,0.1081E+02,0.1028E+02,0.9778E+01,
647 +0.9291E+01,0.8820E+01,0.8366E+01,0.7928E+01,0.7505E+01,0.7097E+01,
648 +0.6703E+01,0.6323E+01,0.5957E+01,0.5603E+01,0.5262E+01,0.4932E+01,
649 +0.4614E+01,0.4307E+01,0.4011E+01,0.3725E+01,0.3449E+01,0.3183E+01,
650 +0.2927E+01,0.2681E+01,0.2444E+01,0.2217E+01,0.2000E+01,0.1793E+01,
651 +0.1596E+01,0.1409E+01,0.1234E+01,0.1069E+01,0.9166E+00,0.7757E+00,
652 +0.6472E+00,0.5313E+00,0.4281E+00,0.3376E+00,0.2598E+00,0.1943E+00,
653 +0.1406E+00,0.9774E-01,0.6486E-01,0.4067E-01,0.2380E-01,0.1278E-01,
654 +0.8359E-02,0.5373E-02,0.3389E-02,0.2091E-02,0.1257E-02,0.7340E-03,
655 +0.4133E-03,0.2224E-03,0.1128E-03,0.5271E-04,0.2189E-04,0.0000E+00,
656 +0.0000E+00,0.0000E+00/
657 DATA (XQDUM (I,4,4),I=1,104) /
658 +0.6202E+01,0.6045E+01,0.5891E+01,0.5740E+01,0.5594E+01,0.5451E+01,
659 +0.5311E+01,0.5175E+01,0.5041E+01,0.4912E+01,0.4785E+01,0.4661E+01,
660 +0.4541E+01,0.4423E+01,0.4308E+01,0.4196E+01,0.4087E+01,0.3980E+01,
661 +0.3876E+01,0.3775E+01,0.3676E+01,0.3579E+01,0.3485E+01,0.3393E+01,
662 +0.3304E+01,0.3216E+01,0.3131E+01,0.3047E+01,0.2966E+01,0.2886E+01,
663 +0.2809E+01,0.2733E+01,0.2658E+01,0.2586E+01,0.2515E+01,0.2445E+01,
664 +0.2377E+01,0.2310E+01,0.2245E+01,0.2181E+01,0.2117E+01,0.2055E+01,
665 +0.1994E+01,0.1934E+01,0.1874E+01,0.1815E+01,0.1757E+01,0.1700E+01,
666 +0.1643E+01,0.1586E+01,0.1530E+01,0.1474E+01,0.1418E+01,0.1363E+01,
667 +0.1307E+01,0.1252E+01,0.1197E+01,0.1141E+01,0.1086E+01,0.1031E+01,
668 +0.9755E+00,0.9204E+00,0.8655E+00,0.8108E+00,0.7565E+00,0.7027E+00,
669 +0.6496E+00,0.5973E+00,0.5461E+00,0.4962E+00,0.4479E+00,0.4013E+00,
670 +0.3569E+00,0.3147E+00,0.2750E+00,0.2381E+00,0.2039E+00,0.1727E+00,
671 +0.1445E+00,0.1192E+00,0.9669E-01,0.7695E-01,0.5981E-01,0.4515E-01,
672 +0.3283E-01,0.2277E-01,0.1485E-01,0.8945E-02,0.4854E-02,0.2294E-02,
673 +0.1341E-02,0.7512E-03,0.4014E-03,0.2034E-03,0.9713E-04,0.4341E-04,
674 +0.1801E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
675 +0.0000E+00,0.0000E+00/
676 DATA (XQDUM (I,4,5),I=1,104) /
677 +0.1407E+01,0.1375E+01,0.1344E+01,0.1313E+01,0.1284E+01,0.1255E+01,
678 +0.1227E+01,0.1199E+01,0.1172E+01,0.1146E+01,0.1120E+01,0.1095E+01,
679 +0.1071E+01,0.1047E+01,0.1024E+01,0.1001E+01,0.9791E+00,0.9575E+00,
680 +0.9363E+00,0.9157E+00,0.8956E+00,0.8759E+00,0.8567E+00,0.8379E+00,
681 +0.8196E+00,0.8017E+00,0.7841E+00,0.7670E+00,0.7502E+00,0.7338E+00,
682 +0.7177E+00,0.7019E+00,0.6864E+00,0.6712E+00,0.6563E+00,0.6416E+00,
683 +0.6271E+00,0.6129E+00,0.5988E+00,0.5849E+00,0.5712E+00,0.5576E+00,
684 +0.5441E+00,0.5307E+00,0.5173E+00,0.5040E+00,0.4907E+00,0.4774E+00,
685 +0.4640E+00,0.4506E+00,0.4371E+00,0.4236E+00,0.4099E+00,0.3961E+00,
686 +0.3821E+00,0.3679E+00,0.3536E+00,0.3391E+00,0.3244E+00,0.3095E+00,
687 +0.2945E+00,0.2793E+00,0.2639E+00,0.2485E+00,0.2329E+00,0.2174E+00,
688 +0.2019E+00,0.1865E+00,0.1713E+00,0.1564E+00,0.1418E+00,0.1277E+00,
689 +0.1141E+00,0.1011E+00,0.8890E-01,0.7743E-01,0.6679E-01,0.5700E-01,
690 +0.4809E-01,0.4003E-01,0.3282E-01,0.2640E-01,0.2076E-01,0.1585E-01,
691 +0.1166E-01,0.8166E-02,0.5373E-02,0.3257E-02,0.1774E-02,0.8379E-03,
692 +0.4880E-03,0.2717E-03,0.1438E-03,0.7184E-04,0.3363E-04,0.1462E-04,
693 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
694 +0.0000E+00,0.0000E+00/
695 DATA (XQDUM (I,4,6),I=1,104) /
696 +0.1232E+01,0.1200E+01,0.1169E+01,0.1139E+01,0.1109E+01,0.1081E+01,
697 +0.1052E+01,0.1025E+01,0.9981E+00,0.9719E+00,0.9464E+00,0.9215E+00,
698 +0.8971E+00,0.8734E+00,0.8503E+00,0.8277E+00,0.8057E+00,0.7842E+00,
699 +0.7632E+00,0.7428E+00,0.7229E+00,0.7034E+00,0.6844E+00,0.6659E+00,
700 +0.6479E+00,0.6302E+00,0.6130E+00,0.5962E+00,0.5798E+00,0.5638E+00,
701 +0.5482E+00,0.5329E+00,0.5180E+00,0.5034E+00,0.4891E+00,0.4752E+00,
702 +0.4615E+00,0.4481E+00,0.4349E+00,0.4221E+00,0.4094E+00,0.3970E+00,
703 +0.3847E+00,0.3727E+00,0.3608E+00,0.3491E+00,0.3376E+00,0.3262E+00,
704 +0.3149E+00,0.3037E+00,0.2925E+00,0.2815E+00,0.2705E+00,0.2596E+00,
705 +0.2488E+00,0.2380E+00,0.2272E+00,0.2164E+00,0.2057E+00,0.1950E+00,
706 +0.1843E+00,0.1737E+00,0.1631E+00,0.1527E+00,0.1423E+00,0.1320E+00,
707 +0.1219E+00,0.1119E+00,0.1022E+00,0.9279E-01,0.8365E-01,0.7486E-01,
708 +0.6647E-01,0.5853E-01,0.5107E-01,0.4412E-01,0.3772E-01,0.3187E-01,
709 +0.2658E-01,0.2185E-01,0.1767E-01,0.1401E-01,0.1084E-01,0.8146E-02,
710 +0.5899E-02,0.4074E-02,0.2648E-02,0.1591E-02,0.8618E-03,0.4075E-03,
711 +0.2385E-03,0.1339E-03,0.7183E-04,0.3659E-04,0.1760E-04,0.0000E+00,
712 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
713 +0.0000E+00,0.0000E+00/
714 DATA (XQDUM (I,4,7),I=1,104) /
715 +0.1116E+01,0.1084E+01,0.1053E+01,0.1023E+01,0.9931E+00,0.9643E+00,
716 +0.9361E+00,0.9087E+00,0.8819E+00,0.8558E+00,0.8303E+00,0.8055E+00,
717 +0.7812E+00,0.7576E+00,0.7345E+00,0.7120E+00,0.6901E+00,0.6687E+00,
718 +0.6479E+00,0.6275E+00,0.6077E+00,0.5884E+00,0.5696E+00,0.5512E+00,
719 +0.5334E+00,0.5159E+00,0.4990E+00,0.4824E+00,0.4663E+00,0.4505E+00,
720 +0.4352E+00,0.4203E+00,0.4057E+00,0.3915E+00,0.3777E+00,0.3642E+00,
721 +0.3511E+00,0.3382E+00,0.3257E+00,0.3135E+00,0.3015E+00,0.2899E+00,
722 +0.2785E+00,0.2674E+00,0.2565E+00,0.2459E+00,0.2355E+00,0.2254E+00,
723 +0.2154E+00,0.2057E+00,0.1962E+00,0.1868E+00,0.1777E+00,0.1687E+00,
724 +0.1599E+00,0.1513E+00,0.1429E+00,0.1346E+00,0.1265E+00,0.1186E+00,
725 +0.1109E+00,0.1033E+00,0.9596E-01,0.8879E-01,0.8182E-01,0.7506E-01,
726 +0.6853E-01,0.6223E-01,0.5617E-01,0.5038E-01,0.4487E-01,0.3964E-01,
727 +0.3472E-01,0.3012E-01,0.2585E-01,0.2192E-01,0.1834E-01,0.1511E-01,
728 +0.1225E-01,0.9734E-02,0.7569E-02,0.5739E-02,0.4228E-02,0.3011E-02,
729 +0.2061E-02,0.1346E-02,0.8313E-03,0.4792E-03,0.2536E-03,0.1205E-03,
730 +0.7212E-04,0.4210E-04,0.2388E-04,0.1310E-04,0.0000E+00,0.0000E+00,
731 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
732 +0.0000E+00,0.0000E+00/
733 DATA (XQDUM (I,4,8),I=1,104) /
734 +0.1042E+01,0.1011E+01,0.9811E+00,0.9521E+00,0.9237E+00,0.8960E+00,
735 +0.8689E+00,0.8426E+00,0.8168E+00,0.7918E+00,0.7673E+00,0.7434E+00,
736 +0.7202E+00,0.6975E+00,0.6754E+00,0.6539E+00,0.6329E+00,0.6124E+00,
737 +0.5925E+00,0.5730E+00,0.5541E+00,0.5357E+00,0.5177E+00,0.5002E+00,
738 +0.4832E+00,0.4666E+00,0.4504E+00,0.4347E+00,0.4193E+00,0.4044E+00,
739 +0.3899E+00,0.3757E+00,0.3620E+00,0.3486E+00,0.3355E+00,0.3228E+00,
740 +0.3104E+00,0.2983E+00,0.2866E+00,0.2752E+00,0.2640E+00,0.2531E+00,
741 +0.2426E+00,0.2323E+00,0.2222E+00,0.2124E+00,0.2028E+00,0.1935E+00,
742 +0.1844E+00,0.1756E+00,0.1669E+00,0.1585E+00,0.1503E+00,0.1422E+00,
743 +0.1344E+00,0.1267E+00,0.1193E+00,0.1120E+00,0.1049E+00,0.9805E-01,
744 +0.9136E-01,0.8485E-01,0.7854E-01,0.7242E-01,0.6651E-01,0.6081E-01,
745 +0.5533E-01,0.5007E-01,0.4505E-01,0.4027E-01,0.3574E-01,0.3147E-01,
746 +0.2747E-01,0.2375E-01,0.2031E-01,0.1716E-01,0.1431E-01,0.1175E-01,
747 +0.9487E-02,0.7513E-02,0.5821E-02,0.4398E-02,0.3228E-02,0.2291E-02,
748 +0.1563E-02,0.1018E-02,0.6267E-03,0.3605E-03,0.1906E-03,0.9064E-04,
749 +0.5436E-04,0.3185E-04,0.1816E-04,0.1004E-04,0.0000E+00,0.0000E+00,
750 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
751 +0.0000E+00,0.0000E+00/
752 DATA (XQDUM (I,4,9),I=1,104) /
753 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
754 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
755 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
756 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
757 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
758 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
759 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
760 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
761 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
762 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
763 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
764 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
765 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
766 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
767 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
768 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
769 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
770 +0.0000E+00,0.0000E+00/
771 DATA (XQDUM (I,5,1),I=1,104) /
772 +0.1809E-01,0.1910E-01,0.2017E-01,0.2129E-01,0.2247E-01,0.2372E-01,
773 +0.2504E-01,0.2642E-01,0.2789E-01,0.2943E-01,0.3105E-01,0.3277E-01,
774 +0.3457E-01,0.3647E-01,0.3847E-01,0.4058E-01,0.4280E-01,0.4514E-01,
775 +0.4761E-01,0.5020E-01,0.5292E-01,0.5579E-01,0.5881E-01,0.6199E-01,
776 +0.6532E-01,0.6883E-01,0.7252E-01,0.7639E-01,0.8046E-01,0.8473E-01,
777 +0.8922E-01,0.9392E-01,0.9886E-01,0.1040E+00,0.1095E+00,0.1151E+00,
778 +0.1211E+00,0.1273E+00,0.1338E+00,0.1406E+00,0.1478E+00,0.1552E+00,
779 +0.1629E+00,0.1710E+00,0.1795E+00,0.1882E+00,0.1973E+00,0.2068E+00,
780 +0.2166E+00,0.2268E+00,0.2373E+00,0.2482E+00,0.2594E+00,0.2709E+00,
781 +0.2828E+00,0.2949E+00,0.3073E+00,0.3199E+00,0.3328E+00,0.3457E+00,
782 +0.3588E+00,0.3719E+00,0.3849E+00,0.3978E+00,0.4104E+00,0.4227E+00,
783 +0.4344E+00,0.4454E+00,0.4556E+00,0.4647E+00,0.4726E+00,0.4789E+00,
784 +0.4834E+00,0.4858E+00,0.4859E+00,0.4833E+00,0.4777E+00,0.4688E+00,
785 +0.4563E+00,0.4401E+00,0.4199E+00,0.3958E+00,0.3677E+00,0.3361E+00,
786 +0.3012E+00,0.2638E+00,0.2248E+00,0.1854E+00,0.1468E+00,0.1106E+00,
787 +0.9048E-01,0.7304E-01,0.5807E-01,0.4538E-01,0.3474E-01,0.2596E-01,
788 +0.1882E-01,0.1313E-01,0.8717E-02,0.5408E-02,0.3047E-02,0.1483E-02,
789 +0.5636E-03,0.1290E-03/
790 DATA (XQDUM (I,5,2),I=1,104) /
791 +0.1029E-01,0.1087E-01,0.1147E-01,0.1211E-01,0.1278E-01,0.1349E-01,
792 +0.1423E-01,0.1502E-01,0.1585E-01,0.1672E-01,0.1764E-01,0.1861E-01,
793 +0.1963E-01,0.2070E-01,0.2183E-01,0.2302E-01,0.2428E-01,0.2560E-01,
794 +0.2698E-01,0.2844E-01,0.2998E-01,0.3160E-01,0.3329E-01,0.3508E-01,
795 +0.3695E-01,0.3892E-01,0.4099E-01,0.4316E-01,0.4543E-01,0.4782E-01,
796 +0.5033E-01,0.5295E-01,0.5570E-01,0.5858E-01,0.6160E-01,0.6475E-01,
797 +0.6805E-01,0.7149E-01,0.7509E-01,0.7884E-01,0.8275E-01,0.8683E-01,
798 +0.9107E-01,0.9548E-01,0.1001E+00,0.1048E+00,0.1097E+00,0.1148E+00,
799 +0.1201E+00,0.1255E+00,0.1311E+00,0.1369E+00,0.1428E+00,0.1488E+00,
800 +0.1549E+00,0.1612E+00,0.1675E+00,0.1738E+00,0.1802E+00,0.1866E+00,
801 +0.1929E+00,0.1991E+00,0.2052E+00,0.2110E+00,0.2165E+00,0.2217E+00,
802 +0.2264E+00,0.2305E+00,0.2340E+00,0.2367E+00,0.2384E+00,0.2392E+00,
803 +0.2387E+00,0.2370E+00,0.2338E+00,0.2290E+00,0.2225E+00,0.2143E+00,
804 +0.2043E+00,0.1924E+00,0.1788E+00,0.1635E+00,0.1469E+00,0.1291E+00,
805 +0.1107E+00,0.9214E-01,0.7401E-01,0.5693E-01,0.4154E-01,0.2834E-01,
806 +0.2163E-01,0.1621E-01,0.1190E-01,0.8531E-02,0.5949E-02,0.4013E-02,
807 +0.2598E-02,0.1597E-02,0.9179E-03,0.4817E-03,0.2222E-03,0.8429E-04,
808 +0.2300E-04,0.0000E+00/
809 DATA (XQDUM (I,5,3),I=1,104) /
810 +0.1004E+03,0.9655E+02,0.9284E+02,0.8926E+02,0.8580E+02,0.8245E+02,
811 +0.7921E+02,0.7608E+02,0.7306E+02,0.7013E+02,0.6731E+02,0.6458E+02,
812 +0.6194E+02,0.5939E+02,0.5693E+02,0.5456E+02,0.5227E+02,0.5006E+02,
813 +0.4792E+02,0.4586E+02,0.4388E+02,0.4196E+02,0.4012E+02,0.3834E+02,
814 +0.3663E+02,0.3498E+02,0.3338E+02,0.3185E+02,0.3038E+02,0.2896E+02,
815 +0.2760E+02,0.2628E+02,0.2502E+02,0.2380E+02,0.2264E+02,0.2152E+02,
816 +0.2044E+02,0.1940E+02,0.1841E+02,0.1746E+02,0.1654E+02,0.1567E+02,
817 +0.1483E+02,0.1402E+02,0.1325E+02,0.1251E+02,0.1180E+02,0.1112E+02,
818 +0.1047E+02,0.9851E+01,0.9257E+01,0.8689E+01,0.8146E+01,0.7627E+01,
819 +0.7132E+01,0.6658E+01,0.6207E+01,0.5776E+01,0.5364E+01,0.4972E+01,
820 +0.4598E+01,0.4243E+01,0.3904E+01,0.3581E+01,0.3275E+01,0.2985E+01,
821 +0.2709E+01,0.2449E+01,0.2203E+01,0.1971E+01,0.1753E+01,0.1549E+01,
822 +0.1359E+01,0.1182E+01,0.1019E+01,0.8701E+00,0.7341E+00,0.6114E+00,
823 +0.5019E+00,0.4052E+00,0.3210E+00,0.2489E+00,0.1883E+00,0.1384E+00,
824 +0.9840E-01,0.6730E-01,0.4395E-01,0.2717E-01,0.1572E-01,0.8383E-02,
825 +0.5473E-02,0.3523E-02,0.2230E-02,0.1384E-02,0.8393E-03,0.4944E-03,
826 +0.2808E-03,0.1522E-03,0.7742E-04,0.3608E-04,0.1480E-04,0.0000E+00,
827 +0.0000E+00,0.0000E+00/
828 DATA (XQDUM (I,5,4),I=1,104) /
829 +0.1141E+02,0.1105E+02,0.1071E+02,0.1037E+02,0.1004E+02,0.9724E+01,
830 +0.9415E+01,0.9115E+01,0.8823E+01,0.8540E+01,0.8265E+01,0.7998E+01,
831 +0.7739E+01,0.7488E+01,0.7244E+01,0.7007E+01,0.6777E+01,0.6554E+01,
832 +0.6337E+01,0.6127E+01,0.5924E+01,0.5726E+01,0.5534E+01,0.5348E+01,
833 +0.5168E+01,0.4993E+01,0.4823E+01,0.4659E+01,0.4499E+01,0.4344E+01,
834 +0.4194E+01,0.4048E+01,0.3906E+01,0.3769E+01,0.3635E+01,0.3506E+01,
835 +0.3380E+01,0.3258E+01,0.3139E+01,0.3023E+01,0.2911E+01,0.2801E+01,
836 +0.2695E+01,0.2591E+01,0.2489E+01,0.2391E+01,0.2294E+01,0.2199E+01,
837 +0.2107E+01,0.2017E+01,0.1928E+01,0.1841E+01,0.1756E+01,0.1672E+01,
838 +0.1590E+01,0.1510E+01,0.1430E+01,0.1352E+01,0.1275E+01,0.1200E+01,
839 +0.1125E+01,0.1052E+01,0.9807E+00,0.9106E+00,0.8421E+00,0.7752E+00,
840 +0.7102E+00,0.6472E+00,0.5864E+00,0.5280E+00,0.4722E+00,0.4192E+00,
841 +0.3692E+00,0.3224E+00,0.2790E+00,0.2390E+00,0.2025E+00,0.1696E+00,
842 +0.1402E+00,0.1141E+00,0.9129E-01,0.7156E-01,0.5473E-01,0.4059E-01,
843 +0.2898E-01,0.1971E-01,0.1259E-01,0.7423E-02,0.3942E-02,0.1824E-02,
844 +0.1053E-02,0.5841E-03,0.3096E-03,0.1561E-03,0.7452E-04,0.3347E-04,
845 +0.1408E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
846 +0.0000E+00,0.0000E+00/
847 DATA (XQDUM (I,5,5),I=1,104) /
848 +0.2355E+01,0.2286E+01,0.2220E+01,0.2156E+01,0.2094E+01,0.2033E+01,
849 +0.1974E+01,0.1916E+01,0.1861E+01,0.1807E+01,0.1754E+01,0.1703E+01,
850 +0.1653E+01,0.1605E+01,0.1558E+01,0.1513E+01,0.1469E+01,0.1426E+01,
851 +0.1384E+01,0.1344E+01,0.1304E+01,0.1266E+01,0.1229E+01,0.1193E+01,
852 +0.1158E+01,0.1125E+01,0.1092E+01,0.1060E+01,0.1028E+01,0.9982E+00,
853 +0.9687E+00,0.9401E+00,0.9122E+00,0.8851E+00,0.8587E+00,0.8330E+00,
854 +0.8079E+00,0.7834E+00,0.7594E+00,0.7360E+00,0.7132E+00,0.6908E+00,
855 +0.6688E+00,0.6472E+00,0.6261E+00,0.6052E+00,0.5847E+00,0.5645E+00,
856 +0.5445E+00,0.5247E+00,0.5051E+00,0.4857E+00,0.4664E+00,0.4473E+00,
857 +0.4282E+00,0.4093E+00,0.3904E+00,0.3715E+00,0.3528E+00,0.3341E+00,
858 +0.3154E+00,0.2969E+00,0.2785E+00,0.2602E+00,0.2421E+00,0.2243E+00,
859 +0.2067E+00,0.1895E+00,0.1728E+00,0.1565E+00,0.1408E+00,0.1258E+00,
860 +0.1115E+00,0.9808E-01,0.8549E-01,0.7382E-01,0.6310E-01,0.5335E-01,
861 +0.4455E-01,0.3668E-01,0.2971E-01,0.2359E-01,0.1828E-01,0.1374E-01,
862 +0.9938E-02,0.6837E-02,0.4411E-02,0.2619E-02,0.1395E-02,0.6442E-03,
863 +0.3700E-03,0.2033E-03,0.1063E-03,0.5261E-04,0.2445E-04,0.1060E-04,
864 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
865 +0.0000E+00,0.0000E+00/
866 DATA (XQDUM (I,5,6),I=1,104) /
867 +0.2180E+01,0.2112E+01,0.2046E+01,0.1982E+01,0.1919E+01,0.1859E+01,
868 +0.1800E+01,0.1742E+01,0.1687E+01,0.1633E+01,0.1580E+01,0.1529E+01,
869 +0.1480E+01,0.1432E+01,0.1385E+01,0.1340E+01,0.1296E+01,0.1253E+01,
870 +0.1212E+01,0.1171E+01,0.1132E+01,0.1095E+01,0.1058E+01,0.1022E+01,
871 +0.9876E+00,0.9541E+00,0.9215E+00,0.8899E+00,0.8593E+00,0.8295E+00,
872 +0.8006E+00,0.7726E+00,0.7454E+00,0.7190E+00,0.6934E+00,0.6685E+00,
873 +0.6443E+00,0.6207E+00,0.5979E+00,0.5756E+00,0.5540E+00,0.5329E+00,
874 +0.5124E+00,0.4924E+00,0.4729E+00,0.4539E+00,0.4353E+00,0.4172E+00,
875 +0.3994E+00,0.3821E+00,0.3650E+00,0.3484E+00,0.3320E+00,0.3160E+00,
876 +0.3003E+00,0.2848E+00,0.2696E+00,0.2547E+00,0.2400E+00,0.2256E+00,
877 +0.2115E+00,0.1976E+00,0.1840E+00,0.1707E+00,0.1578E+00,0.1451E+00,
878 +0.1328E+00,0.1209E+00,0.1095E+00,0.9848E-01,0.8799E-01,0.7803E-01,
879 +0.6865E-01,0.5988E-01,0.5173E-01,0.4425E-01,0.3742E-01,0.3127E-01,
880 +0.2577E-01,0.2092E-01,0.1668E-01,0.1303E-01,0.9926E-02,0.7333E-02,
881 +0.5214E-02,0.3532E-02,0.2250E-02,0.1323E-02,0.7019E-03,0.3249E-03,
882 +0.1879E-03,0.1045E-03,0.5560E-04,0.2819E-04,0.1355E-04,0.0000E+00,
883 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
884 +0.0000E+00,0.0000E+00/
885 DATA (XQDUM (I,5,7),I=1,104) /
886 +0.2064E+01,0.1996E+01,0.1930E+01,0.1866E+01,0.1803E+01,0.1742E+01,
887 +0.1684E+01,0.1626E+01,0.1571E+01,0.1517E+01,0.1464E+01,0.1414E+01,
888 +0.1364E+01,0.1316E+01,0.1270E+01,0.1224E+01,0.1181E+01,0.1138E+01,
889 +0.1097E+01,0.1057E+01,0.1018E+01,0.9801E+00,0.9435E+00,0.9081E+00,
890 +0.8737E+00,0.8404E+00,0.8081E+00,0.7768E+00,0.7465E+00,0.7171E+00,
891 +0.6886E+00,0.6610E+00,0.6342E+00,0.6083E+00,0.5831E+00,0.5588E+00,
892 +0.5352E+00,0.5123E+00,0.4902E+00,0.4687E+00,0.4479E+00,0.4277E+00,
893 +0.4082E+00,0.3892E+00,0.3708E+00,0.3530E+00,0.3357E+00,0.3190E+00,
894 +0.3027E+00,0.2870E+00,0.2717E+00,0.2568E+00,0.2424E+00,0.2285E+00,
895 +0.2149E+00,0.2018E+00,0.1891E+00,0.1768E+00,0.1649E+00,0.1533E+00,
896 +0.1422E+00,0.1314E+00,0.1211E+00,0.1111E+00,0.1015E+00,0.9232E-01,
897 +0.8356E-01,0.7521E-01,0.6729E-01,0.5980E-01,0.5276E-01,0.4618E-01,
898 +0.4006E-01,0.3441E-01,0.2923E-01,0.2453E-01,0.2030E-01,0.1655E-01,
899 +0.1326E-01,0.1041E-01,0.7998E-02,0.5989E-02,0.4354E-02,0.3059E-02,
900 +0.2065E-02,0.1329E-02,0.8085E-03,0.4590E-03,0.2393E-03,0.1121E-03,
901 +0.6654E-04,0.3859E-04,0.2178E-04,0.1191E-04,0.0000E+00,0.0000E+00,
902 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
903 +0.0000E+00,0.0000E+00/
904 DATA (XQDUM (I,5,8),I=1,104) /
905 +0.1991E+01,0.1924E+01,0.1859E+01,0.1796E+01,0.1735E+01,0.1676E+01,
906 +0.1618E+01,0.1562E+01,0.1507E+01,0.1454E+01,0.1403E+01,0.1353E+01,
907 +0.1304E+01,0.1257E+01,0.1212E+01,0.1167E+01,0.1124E+01,0.1083E+01,
908 +0.1042E+01,0.1003E+01,0.9653E+00,0.9284E+00,0.8927E+00,0.8582E+00,
909 +0.8246E+00,0.7921E+00,0.7607E+00,0.7302E+00,0.7006E+00,0.6720E+00,
910 +0.6443E+00,0.6175E+00,0.5915E+00,0.5664E+00,0.5420E+00,0.5184E+00,
911 +0.4956E+00,0.4736E+00,0.4522E+00,0.4315E+00,0.4115E+00,0.3921E+00,
912 +0.3734E+00,0.3552E+00,0.3377E+00,0.3207E+00,0.3043E+00,0.2884E+00,
913 +0.2730E+00,0.2581E+00,0.2437E+00,0.2298E+00,0.2163E+00,0.2033E+00,
914 +0.1907E+00,0.1785E+00,0.1668E+00,0.1555E+00,0.1446E+00,0.1340E+00,
915 +0.1239E+00,0.1142E+00,0.1049E+00,0.9592E-01,0.8737E-01,0.7922E-01,
916 +0.7147E-01,0.6412E-01,0.5718E-01,0.5066E-01,0.4455E-01,0.3886E-01,
917 +0.3360E-01,0.2876E-01,0.2435E-01,0.2036E-01,0.1680E-01,0.1364E-01,
918 +0.1089E-01,0.8526E-02,0.6527E-02,0.4870E-02,0.3528E-02,0.2471E-02,
919 +0.1663E-02,0.1067E-02,0.6476E-03,0.3671E-03,0.1914E-03,0.8979E-04,
920 +0.5347E-04,0.3114E-04,0.1768E-04,0.0000E+00,0.0000E+00,0.0000E+00,
921 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
922 +0.0000E+00,0.0000E+00/
923 DATA (XQDUM (I,5,9),I=1,104) /
924 +0.4670E+00,0.4488E+00,0.4312E+00,0.4142E+00,0.3978E+00,0.3818E+00,
925 +0.3665E+00,0.3516E+00,0.3372E+00,0.3234E+00,0.3100E+00,0.2970E+00,
926 +0.2845E+00,0.2725E+00,0.2608E+00,0.2496E+00,0.2388E+00,0.2283E+00,
927 +0.2182E+00,0.2085E+00,0.1992E+00,0.1901E+00,0.1814E+00,0.1731E+00,
928 +0.1650E+00,0.1572E+00,0.1498E+00,0.1426E+00,0.1357E+00,0.1290E+00,
929 +0.1226E+00,0.1165E+00,0.1106E+00,0.1049E+00,0.9944E-01,0.9421E-01,
930 +0.8919E-01,0.8438E-01,0.7976E-01,0.7533E-01,0.7109E-01,0.6703E-01,
931 +0.6314E-01,0.5941E-01,0.5585E-01,0.5244E-01,0.4918E-01,0.4607E-01,
932 +0.4309E-01,0.4026E-01,0.3755E-01,0.3496E-01,0.3250E-01,0.3016E-01,
933 +0.2793E-01,0.2581E-01,0.2380E-01,0.2189E-01,0.2008E-01,0.1837E-01,
934 +0.1675E-01,0.1523E-01,0.1379E-01,0.1244E-01,0.1117E-01,0.9987E-02,
935 +0.8883E-02,0.7857E-02,0.6908E-02,0.6032E-02,0.5229E-02,0.4496E-02,
936 +0.3832E-02,0.3233E-02,0.2698E-02,0.2224E-02,0.1809E-02,0.1448E-02,
937 +0.1140E-02,0.8802E-03,0.6647E-03,0.4896E-03,0.3504E-03,0.2427E-03,
938 +0.1617E-03,0.1031E-03,0.6231E-04,0.3537E-04,0.1860E-04,0.0000E+00,
939 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
940 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
941 +0.0000E+00,0.0000E+00/
942 DATA (XQDUM (I,6,1),I=1,104) /
943 +0.1986E-01,0.2096E-01,0.2212E-01,0.2334E-01,0.2463E-01,0.2599E-01,
944 +0.2742E-01,0.2892E-01,0.3051E-01,0.3218E-01,0.3394E-01,0.3579E-01,
945 +0.3774E-01,0.3980E-01,0.4196E-01,0.4423E-01,0.4663E-01,0.4914E-01,
946 +0.5179E-01,0.5457E-01,0.5750E-01,0.6057E-01,0.6380E-01,0.6720E-01,
947 +0.7076E-01,0.7450E-01,0.7842E-01,0.8254E-01,0.8686E-01,0.9139E-01,
948 +0.9613E-01,0.1011E+00,0.1063E+00,0.1118E+00,0.1175E+00,0.1234E+00,
949 +0.1296E+00,0.1362E+00,0.1429E+00,0.1500E+00,0.1574E+00,0.1651E+00,
950 +0.1731E+00,0.1814E+00,0.1901E+00,0.1990E+00,0.2083E+00,0.2179E+00,
951 +0.2279E+00,0.2381E+00,0.2487E+00,0.2596E+00,0.2708E+00,0.2822E+00,
952 +0.2939E+00,0.3058E+00,0.3179E+00,0.3302E+00,0.3425E+00,0.3549E+00,
953 +0.3673E+00,0.3796E+00,0.3917E+00,0.4035E+00,0.4149E+00,0.4258E+00,
954 +0.4360E+00,0.4454E+00,0.4538E+00,0.4609E+00,0.4666E+00,0.4707E+00,
955 +0.4728E+00,0.4728E+00,0.4703E+00,0.4651E+00,0.4569E+00,0.4456E+00,
956 +0.4308E+00,0.4126E+00,0.3907E+00,0.3653E+00,0.3365E+00,0.3047E+00,
957 +0.2704E+00,0.2344E+00,0.1975E+00,0.1609E+00,0.1257E+00,0.9324E-01,
958 +0.7551E-01,0.6031E-01,0.4743E-01,0.3663E-01,0.2770E-01,0.2042E-01,
959 +0.1459E-01,0.1001E-01,0.6525E-02,0.3963E-02,0.2177E-02,0.1027E-02,
960 +0.3747E-03,0.8079E-04/
961 DATA (XQDUM (I,6,2),I=1,104) /
962 +0.1129E-01,0.1191E-01,0.1257E-01,0.1326E-01,0.1399E-01,0.1475E-01,
963 +0.1556E-01,0.1641E-01,0.1731E-01,0.1826E-01,0.1925E-01,0.2029E-01,
964 +0.2140E-01,0.2255E-01,0.2377E-01,0.2505E-01,0.2640E-01,0.2781E-01,
965 +0.2930E-01,0.3086E-01,0.3251E-01,0.3423E-01,0.3604E-01,0.3794E-01,
966 +0.3993E-01,0.4202E-01,0.4422E-01,0.4651E-01,0.4892E-01,0.5144E-01,
967 +0.5408E-01,0.5684E-01,0.5972E-01,0.6274E-01,0.6589E-01,0.6918E-01,
968 +0.7261E-01,0.7619E-01,0.7991E-01,0.8379E-01,0.8782E-01,0.9201E-01,
969 +0.9635E-01,0.1009E+00,0.1055E+00,0.1103E+00,0.1153E+00,0.1205E+00,
970 +0.1257E+00,0.1312E+00,0.1367E+00,0.1424E+00,0.1482E+00,0.1541E+00,
971 +0.1601E+00,0.1661E+00,0.1721E+00,0.1782E+00,0.1842E+00,0.1902E+00,
972 +0.1960E+00,0.2017E+00,0.2071E+00,0.2123E+00,0.2170E+00,0.2214E+00,
973 +0.2252E+00,0.2283E+00,0.2308E+00,0.2323E+00,0.2330E+00,0.2325E+00,
974 +0.2309E+00,0.2279E+00,0.2235E+00,0.2176E+00,0.2101E+00,0.2010E+00,
975 +0.1902E+00,0.1777E+00,0.1638E+00,0.1485E+00,0.1322E+00,0.1151E+00,
976 +0.9766E-01,0.8037E-01,0.6378E-01,0.4842E-01,0.3481E-01,0.2337E-01,
977 +0.1764E-01,0.1307E-01,0.9487E-02,0.6720E-02,0.4626E-02,0.3077E-02,
978 +0.1962E-02,0.1186E-02,0.6690E-03,0.3436E-03,0.1545E-03,0.5679E-04,
979 +0.1487E-04,0.0000E+00/
980 DATA (XQDUM (I,6,3),I=1,104) /
981 +0.1356E+03,0.1299E+03,0.1245E+03,0.1192E+03,0.1141E+03,0.1092E+03,
982 +0.1045E+03,0.9992E+02,0.9554E+02,0.9133E+02,0.8727E+02,0.8337E+02,
983 +0.7962E+02,0.7601E+02,0.7254E+02,0.6921E+02,0.6601E+02,0.6293E+02,
984 +0.5997E+02,0.5713E+02,0.5440E+02,0.5178E+02,0.4927E+02,0.4686E+02,
985 +0.4455E+02,0.4234E+02,0.4021E+02,0.3818E+02,0.3623E+02,0.3436E+02,
986 +0.3257E+02,0.3086E+02,0.2922E+02,0.2765E+02,0.2615E+02,0.2472E+02,
987 +0.2335E+02,0.2205E+02,0.2080E+02,0.1961E+02,0.1847E+02,0.1739E+02,
988 +0.1635E+02,0.1537E+02,0.1443E+02,0.1354E+02,0.1269E+02,0.1188E+02,
989 +0.1111E+02,0.1038E+02,0.9684E+01,0.9025E+01,0.8400E+01,0.7806E+01,
990 +0.7243E+01,0.6710E+01,0.6205E+01,0.5728E+01,0.5276E+01,0.4849E+01,
991 +0.4446E+01,0.4065E+01,0.3707E+01,0.3370E+01,0.3053E+01,0.2755E+01,
992 +0.2476E+01,0.2216E+01,0.1973E+01,0.1747E+01,0.1537E+01,0.1344E+01,
993 +0.1166E+01,0.1003E+01,0.8548E+00,0.7211E+00,0.6012E+00,0.4947E+00,
994 +0.4012E+00,0.3199E+00,0.2503E+00,0.1917E+00,0.1432E+00,0.1040E+00,
995 +0.7310E-01,0.4945E-01,0.3198E-01,0.1961E-01,0.1128E-01,0.6002E-02,
996 +0.3921E-02,0.2528E-02,0.1605E-02,0.9998E-03,0.6082E-03,0.3592E-03,
997 +0.2042E-03,0.1104E-03,0.5583E-04,0.2572E-04,0.1036E-04,0.0000E+00,
998 +0.0000E+00,0.0000E+00/
999 DATA (XQDUM (I,6,4),I=1,104) /
1000 +0.1800E+02,0.1736E+02,0.1674E+02,0.1614E+02,0.1556E+02,0.1500E+02,
1001 +0.1446E+02,0.1393E+02,0.1342E+02,0.1293E+02,0.1245E+02,0.1199E+02,
1002 +0.1155E+02,0.1112E+02,0.1070E+02,0.1030E+02,0.9912E+01,0.9537E+01,
1003 +0.9174E+01,0.8824E+01,0.8485E+01,0.8158E+01,0.7842E+01,0.7537E+01,
1004 +0.7242E+01,0.6958E+01,0.6683E+01,0.6418E+01,0.6163E+01,0.5916E+01,
1005 +0.5677E+01,0.5447E+01,0.5225E+01,0.5010E+01,0.4803E+01,0.4603E+01,
1006 +0.4410E+01,0.4224E+01,0.4044E+01,0.3870E+01,0.3702E+01,0.3539E+01,
1007 +0.3382E+01,0.3230E+01,0.3083E+01,0.2940E+01,0.2802E+01,0.2669E+01,
1008 +0.2539E+01,0.2413E+01,0.2291E+01,0.2173E+01,0.2058E+01,0.1946E+01,
1009 +0.1837E+01,0.1731E+01,0.1629E+01,0.1529E+01,0.1431E+01,0.1337E+01,
1010 +0.1245E+01,0.1156E+01,0.1070E+01,0.9859E+00,0.9050E+00,0.8270E+00,
1011 +0.7521E+00,0.6803E+00,0.6118E+00,0.5467E+00,0.4852E+00,0.4274E+00,
1012 +0.3735E+00,0.3236E+00,0.2777E+00,0.2358E+00,0.1981E+00,0.1643E+00,
1013 +0.1345E+00,0.1083E+00,0.8570E-01,0.6638E-01,0.5012E-01,0.3666E-01,
1014 +0.2579E-01,0.1727E-01,0.1085E-01,0.6293E-02,0.3285E-02,0.1495E-02,
1015 +0.8553E-03,0.4706E-03,0.2480E-03,0.1247E-03,0.5953E-04,0.2686E-04,
1016 +0.1141E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1017 +0.0000E+00,0.0000E+00/
1018 DATA (XQDUM (I,6,5),I=1,104) /
1019 +0.3444E+01,0.3329E+01,0.3218E+01,0.3110E+01,0.3006E+01,0.2905E+01,
1020 +0.2807E+01,0.2712E+01,0.2620E+01,0.2531E+01,0.2446E+01,0.2362E+01,
1021 +0.2282E+01,0.2204E+01,0.2129E+01,0.2056E+01,0.1985E+01,0.1917E+01,
1022 +0.1851E+01,0.1788E+01,0.1726E+01,0.1666E+01,0.1609E+01,0.1553E+01,
1023 +0.1499E+01,0.1447E+01,0.1397E+01,0.1348E+01,0.1301E+01,0.1255E+01,
1024 +0.1211E+01,0.1168E+01,0.1127E+01,0.1087E+01,0.1048E+01,0.1011E+01,
1025 +0.9746E+00,0.9394E+00,0.9052E+00,0.8720E+00,0.8398E+00,0.8085E+00,
1026 +0.7780E+00,0.7483E+00,0.7194E+00,0.6913E+00,0.6637E+00,0.6368E+00,
1027 +0.6105E+00,0.5848E+00,0.5595E+00,0.5347E+00,0.5104E+00,0.4865E+00,
1028 +0.4629E+00,0.4397E+00,0.4169E+00,0.3943E+00,0.3721E+00,0.3503E+00,
1029 +0.3287E+00,0.3075E+00,0.2867E+00,0.2662E+00,0.2462E+00,0.2266E+00,
1030 +0.2076E+00,0.1892E+00,0.1714E+00,0.1542E+00,0.1379E+00,0.1224E+00,
1031 +0.1078E+00,0.9419E-01,0.8154E-01,0.6992E-01,0.5933E-01,0.4977E-01,
1032 +0.4121E-01,0.3363E-01,0.2698E-01,0.2120E-01,0.1625E-01,0.1206E-01,
1033 +0.8602E-02,0.5832E-02,0.3704E-02,0.2163E-02,0.1132E-02,0.5129E-03,
1034 +0.2912E-03,0.1584E-03,0.8204E-04,0.4027E-04,0.1861E-04,0.0000E+00,
1035 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1036 +0.0000E+00,0.0000E+00/
1037 DATA (XQDUM (I,6,6),I=1,104) /
1038 +0.3270E+01,0.3155E+01,0.3044E+01,0.2936E+01,0.2832E+01,0.2731E+01,
1039 +0.2633E+01,0.2538E+01,0.2447E+01,0.2358E+01,0.2272E+01,0.2189E+01,
1040 +0.2109E+01,0.2031E+01,0.1956E+01,0.1883E+01,0.1813E+01,0.1745E+01,
1041 +0.1679E+01,0.1616E+01,0.1555E+01,0.1495E+01,0.1438E+01,0.1383E+01,
1042 +0.1329E+01,0.1277E+01,0.1227E+01,0.1179E+01,0.1133E+01,0.1088E+01,
1043 +0.1044E+01,0.1002E+01,0.9617E+00,0.9226E+00,0.8847E+00,0.8482E+00,
1044 +0.8129E+00,0.7787E+00,0.7458E+00,0.7139E+00,0.6830E+00,0.6532E+00,
1045 +0.6243E+00,0.5964E+00,0.5693E+00,0.5431E+00,0.5177E+00,0.4930E+00,
1046 +0.4691E+00,0.4459E+00,0.4234E+00,0.4015E+00,0.3803E+00,0.3596E+00,
1047 +0.3395E+00,0.3200E+00,0.3009E+00,0.2824E+00,0.2644E+00,0.2469E+00,
1048 +0.2299E+00,0.2134E+00,0.1974E+00,0.1819E+00,0.1670E+00,0.1525E+00,
1049 +0.1387E+00,0.1254E+00,0.1127E+00,0.1007E+00,0.8930E-01,0.7862E-01,
1050 +0.6866E-01,0.5943E-01,0.5095E-01,0.4322E-01,0.3625E-01,0.3002E-01,
1051 +0.2452E-01,0.1970E-01,0.1555E-01,0.1201E-01,0.9034E-02,0.6587E-02,
1052 +0.4618E-02,0.3082E-02,0.1932E-02,0.1118E-02,0.5831E-03,0.2655E-03,
1053 +0.1521E-03,0.8389E-04,0.4436E-04,0.2240E-04,0.1075E-04,0.0000E+00,
1054 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1055 +0.0000E+00,0.0000E+00/
1056 DATA (XQDUM (I,6,7),I=1,104) /
1057 +0.3154E+01,0.3039E+01,0.2928E+01,0.2820E+01,0.2716E+01,0.2615E+01,
1058 +0.2517E+01,0.2422E+01,0.2331E+01,0.2242E+01,0.2156E+01,0.2074E+01,
1059 +0.1993E+01,0.1916E+01,0.1841E+01,0.1768E+01,0.1698E+01,0.1630E+01,
1060 +0.1565E+01,0.1501E+01,0.1440E+01,0.1381E+01,0.1324E+01,0.1269E+01,
1061 +0.1216E+01,0.1164E+01,0.1115E+01,0.1067E+01,0.1021E+01,0.9761E+00,
1062 +0.9330E+00,0.8915E+00,0.8515E+00,0.8129E+00,0.7756E+00,0.7397E+00,
1063 +0.7051E+00,0.6717E+00,0.6395E+00,0.6084E+00,0.5785E+00,0.5497E+00,
1064 +0.5218E+00,0.4950E+00,0.4692E+00,0.4443E+00,0.4203E+00,0.3972E+00,
1065 +0.3749E+00,0.3534E+00,0.3327E+00,0.3127E+00,0.2935E+00,0.2750E+00,
1066 +0.2572E+00,0.2401E+00,0.2236E+00,0.2078E+00,0.1926E+00,0.1780E+00,
1067 +0.1641E+00,0.1507E+00,0.1379E+00,0.1257E+00,0.1141E+00,0.1031E+00,
1068 +0.9269E-01,0.8286E-01,0.7361E-01,0.6495E-01,0.5689E-01,0.4942E-01,
1069 +0.4254E-01,0.3625E-01,0.3055E-01,0.2542E-01,0.2087E-01,0.1686E-01,
1070 +0.1338E-01,0.1042E-01,0.7924E-02,0.5874E-02,0.4227E-02,0.2938E-02,
1071 +0.1962E-02,0.1249E-02,0.7508E-03,0.4213E-03,0.2171E-03,0.1006E-03,
1072 +0.5935E-04,0.3424E-04,0.1924E-04,0.1049E-04,0.0000E+00,0.0000E+00,
1073 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1074 +0.0000E+00,0.0000E+00/
1075 DATA (XQDUM (I,6,8),I=1,104) /
1076 +0.3082E+01,0.2969E+01,0.2858E+01,0.2752E+01,0.2649E+01,0.2549E+01,
1077 +0.2452E+01,0.2359E+01,0.2268E+01,0.2180E+01,0.2096E+01,0.2014E+01,
1078 +0.1935E+01,0.1858E+01,0.1784E+01,0.1712E+01,0.1643E+01,0.1576E+01,
1079 +0.1511E+01,0.1449E+01,0.1389E+01,0.1330E+01,0.1274E+01,0.1220E+01,
1080 +0.1168E+01,0.1117E+01,0.1068E+01,0.1021E+01,0.9757E+00,0.9319E+00,
1081 +0.8897E+00,0.8490E+00,0.8097E+00,0.7719E+00,0.7354E+00,0.7003E+00,
1082 +0.6664E+00,0.6338E+00,0.6024E+00,0.5722E+00,0.5431E+00,0.5150E+00,
1083 +0.4880E+00,0.4620E+00,0.4370E+00,0.4130E+00,0.3898E+00,0.3675E+00,
1084 +0.3461E+00,0.3255E+00,0.3057E+00,0.2867E+00,0.2684E+00,0.2509E+00,
1085 +0.2341E+00,0.2179E+00,0.2024E+00,0.1876E+00,0.1734E+00,0.1598E+00,
1086 +0.1468E+00,0.1345E+00,0.1227E+00,0.1115E+00,0.1010E+00,0.9094E-01,
1087 +0.8149E-01,0.7262E-01,0.6431E-01,0.5657E-01,0.4939E-01,0.4277E-01,
1088 +0.3669E-01,0.3117E-01,0.2618E-01,0.2171E-01,0.1776E-01,0.1430E-01,
1089 +0.1132E-01,0.8777E-02,0.6654E-02,0.4917E-02,0.3526E-02,0.2444E-02,
1090 +0.1627E-02,0.1033E-02,0.6197E-03,0.3474E-03,0.1791E-03,0.8321E-04,
1091 +0.4928E-04,0.2857E-04,0.1616E-04,0.0000E+00,0.0000E+00,0.0000E+00,
1092 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1093 +0.0000E+00,0.0000E+00/
1094 DATA (XQDUM (I,6,9),I=1,104) /
1095 +0.1606E+01,0.1539E+01,0.1475E+01,0.1414E+01,0.1354E+01,0.1297E+01,
1096 +0.1241E+01,0.1188E+01,0.1136E+01,0.1087E+01,0.1039E+01,0.9931E+00,
1097 +0.9488E+00,0.9062E+00,0.8651E+00,0.8256E+00,0.7876E+00,0.7511E+00,
1098 +0.7159E+00,0.6821E+00,0.6496E+00,0.6184E+00,0.5884E+00,0.5596E+00,
1099 +0.5319E+00,0.5054E+00,0.4799E+00,0.4554E+00,0.4320E+00,0.4095E+00,
1100 +0.3880E+00,0.3674E+00,0.3476E+00,0.3287E+00,0.3106E+00,0.2932E+00,
1101 +0.2767E+00,0.2608E+00,0.2457E+00,0.2312E+00,0.2174E+00,0.2042E+00,
1102 +0.1916E+00,0.1796E+00,0.1682E+00,0.1573E+00,0.1469E+00,0.1371E+00,
1103 +0.1277E+00,0.1188E+00,0.1103E+00,0.1023E+00,0.9464E-01,0.8741E-01,
1104 +0.8057E-01,0.7411E-01,0.6799E-01,0.6223E-01,0.5680E-01,0.5168E-01,
1105 +0.4688E-01,0.4238E-01,0.3817E-01,0.3423E-01,0.3057E-01,0.2716E-01,
1106 +0.2401E-01,0.2111E-01,0.1844E-01,0.1599E-01,0.1377E-01,0.1176E-01,
1107 +0.9949E-02,0.8333E-02,0.6902E-02,0.5645E-02,0.4554E-02,0.3617E-02,
1108 +0.2823E-02,0.2161E-02,0.1618E-02,0.1181E-02,0.8373E-03,0.5744E-03,
1109 +0.3793E-03,0.2395E-03,0.1435E-03,0.8076E-04,0.4213E-04,0.2003E-04,
1110 +0.1211E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1111 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1112 +0.0000E+00,0.0000E+00/
1113 DATA (XQDUM (I,7,1),I=1,104) /
1114 +0.2150E-01,0.2269E-01,0.2393E-01,0.2524E-01,0.2663E-01,0.2808E-01,
1115 +0.2962E-01,0.3123E-01,0.3293E-01,0.3472E-01,0.3660E-01,0.3858E-01,
1116 +0.4066E-01,0.4285E-01,0.4516E-01,0.4758E-01,0.5012E-01,0.5280E-01,
1117 +0.5561E-01,0.5856E-01,0.6166E-01,0.6492E-01,0.6833E-01,0.7192E-01,
1118 +0.7567E-01,0.7962E-01,0.8375E-01,0.8808E-01,0.9261E-01,0.9736E-01,
1119 +0.1023E+00,0.1075E+00,0.1130E+00,0.1186E+00,0.1246E+00,0.1307E+00,
1120 +0.1372E+00,0.1439E+00,0.1509E+00,0.1582E+00,0.1658E+00,0.1737E+00,
1121 +0.1819E+00,0.1904E+00,0.1992E+00,0.2083E+00,0.2177E+00,0.2274E+00,
1122 +0.2374E+00,0.2477E+00,0.2583E+00,0.2691E+00,0.2802E+00,0.2915E+00,
1123 +0.3030E+00,0.3146E+00,0.3264E+00,0.3382E+00,0.3501E+00,0.3619E+00,
1124 +0.3736E+00,0.3851E+00,0.3964E+00,0.4072E+00,0.4175E+00,0.4271E+00,
1125 +0.4360E+00,0.4439E+00,0.4507E+00,0.4561E+00,0.4600E+00,0.4621E+00,
1126 +0.4622E+00,0.4602E+00,0.4556E+00,0.4484E+00,0.4382E+00,0.4250E+00,
1127 +0.4085E+00,0.3888E+00,0.3658E+00,0.3397E+00,0.3106E+00,0.2791E+00,
1128 +0.2456E+00,0.2109E+00,0.1760E+00,0.1418E+00,0.1095E+00,0.8017E-01,
1129 +0.6435E-01,0.5092E-01,0.3966E-01,0.3033E-01,0.2269E-01,0.1653E-01,
1130 +0.1166E-01,0.7889E-02,0.5059E-02,0.3016E-02,0.1621E-02,0.7440E-03,
1131 +0.2620E-03,0.5364E-04/
1132 DATA (XQDUM (I,7,2),I=1,104) /
1133 +0.1221E-01,0.1288E-01,0.1358E-01,0.1432E-01,0.1511E-01,0.1593E-01,
1134 +0.1679E-01,0.1770E-01,0.1866E-01,0.1967E-01,0.2073E-01,0.2184E-01,
1135 +0.2302E-01,0.2425E-01,0.2554E-01,0.2690E-01,0.2833E-01,0.2983E-01,
1136 +0.3141E-01,0.3306E-01,0.3480E-01,0.3662E-01,0.3852E-01,0.4052E-01,
1137 +0.4262E-01,0.4482E-01,0.4711E-01,0.4952E-01,0.5204E-01,0.5467E-01,
1138 +0.5742E-01,0.6029E-01,0.6329E-01,0.6642E-01,0.6968E-01,0.7307E-01,
1139 +0.7661E-01,0.8029E-01,0.8411E-01,0.8808E-01,0.9220E-01,0.9647E-01,
1140 +0.1009E+00,0.1055E+00,0.1102E+00,0.1150E+00,0.1200E+00,0.1252E+00,
1141 +0.1304E+00,0.1358E+00,0.1413E+00,0.1469E+00,0.1526E+00,0.1583E+00,
1142 +0.1641E+00,0.1699E+00,0.1757E+00,0.1815E+00,0.1872E+00,0.1927E+00,
1143 +0.1981E+00,0.2033E+00,0.2081E+00,0.2127E+00,0.2168E+00,0.2204E+00,
1144 +0.2234E+00,0.2257E+00,0.2272E+00,0.2279E+00,0.2276E+00,0.2261E+00,
1145 +0.2235E+00,0.2196E+00,0.2143E+00,0.2075E+00,0.1992E+00,0.1894E+00,
1146 +0.1781E+00,0.1654E+00,0.1514E+00,0.1363E+00,0.1203E+00,0.1039E+00,
1147 +0.8734E-01,0.7119E-01,0.5590E-01,0.4196E-01,0.2979E-01,0.1972E-01,
1148 +0.1475E-01,0.1082E-01,0.7775E-02,0.5449E-02,0.3709E-02,0.2438E-02,
1149 +0.1534E-02,0.9140E-03,0.5071E-03,0.2556E-03,0.1124E-03,0.4020E-04,
1150 +0.1016E-04,0.0000E+00/
1151 DATA (XQDUM (I,7,3),I=1,104) /
1152 +0.1703E+03,0.1626E+03,0.1553E+03,0.1482E+03,0.1414E+03,0.1349E+03,
1153 +0.1286E+03,0.1226E+03,0.1168E+03,0.1113E+03,0.1060E+03,0.1009E+03,
1154 +0.9600E+02,0.9132E+02,0.8684E+02,0.8255E+02,0.7844E+02,0.7451E+02,
1155 +0.7074E+02,0.6714E+02,0.6370E+02,0.6040E+02,0.5725E+02,0.5424E+02,
1156 +0.5136E+02,0.4861E+02,0.4599E+02,0.4349E+02,0.4110E+02,0.3881E+02,
1157 +0.3664E+02,0.3457E+02,0.3259E+02,0.3071E+02,0.2892E+02,0.2722E+02,
1158 +0.2559E+02,0.2405E+02,0.2259E+02,0.2119E+02,0.1987E+02,0.1861E+02,
1159 +0.1742E+02,0.1629E+02,0.1522E+02,0.1420E+02,0.1324E+02,0.1233E+02,
1160 +0.1147E+02,0.1066E+02,0.9888E+01,0.9162E+01,0.8477E+01,0.7831E+01,
1161 +0.7222E+01,0.6649E+01,0.6110E+01,0.5603E+01,0.5127E+01,0.4680E+01,
1162 +0.4261E+01,0.3869E+01,0.3503E+01,0.3161E+01,0.2842E+01,0.2545E+01,
1163 +0.2270E+01,0.2015E+01,0.1779E+01,0.1562E+01,0.1363E+01,0.1181E+01,
1164 +0.1016E+01,0.8662E+00,0.7317E+00,0.6116E+00,0.5052E+00,0.4118E+00,
1165 +0.3308E+00,0.2613E+00,0.2026E+00,0.1537E+00,0.1138E+00,0.8193E-01,
1166 +0.5712E-01,0.3835E-01,0.2465E-01,0.1505E-01,0.8631E-02,0.4588E-02,
1167 +0.2999E-02,0.1936E-02,0.1230E-02,0.7670E-03,0.4666E-03,0.2751E-03,
1168 +0.1559E-03,0.8377E-04,0.4196E-04,0.1907E-04,0.0000E+00,0.0000E+00,
1169 +0.0000E+00,0.0000E+00/
1170 DATA (XQDUM (I,7,4),I=1,104) /
1171 +0.2511E+02,0.2413E+02,0.2320E+02,0.2229E+02,0.2142E+02,0.2058E+02,
1172 +0.1976E+02,0.1898E+02,0.1822E+02,0.1749E+02,0.1679E+02,0.1611E+02,
1173 +0.1546E+02,0.1483E+02,0.1422E+02,0.1363E+02,0.1307E+02,0.1253E+02,
1174 +0.1200E+02,0.1150E+02,0.1101E+02,0.1055E+02,0.1010E+02,0.9666E+01,
1175 +0.9250E+01,0.8850E+01,0.8465E+01,0.8094E+01,0.7738E+01,0.7396E+01,
1176 +0.7066E+01,0.6750E+01,0.6445E+01,0.6152E+01,0.5871E+01,0.5600E+01,
1177 +0.5340E+01,0.5090E+01,0.4850E+01,0.4618E+01,0.4396E+01,0.4182E+01,
1178 +0.3976E+01,0.3778E+01,0.3588E+01,0.3405E+01,0.3228E+01,0.3058E+01,
1179 +0.2894E+01,0.2736E+01,0.2584E+01,0.2437E+01,0.2295E+01,0.2159E+01,
1180 +0.2027E+01,0.1900E+01,0.1777E+01,0.1659E+01,0.1544E+01,0.1434E+01,
1181 +0.1328E+01,0.1226E+01,0.1128E+01,0.1033E+01,0.9430E+00,0.8566E+00,
1182 +0.7744E+00,0.6963E+00,0.6223E+00,0.5527E+00,0.4875E+00,0.4268E+00,
1183 +0.3705E+00,0.3189E+00,0.2718E+00,0.2293E+00,0.1912E+00,0.1574E+00,
1184 +0.1278E+00,0.1021E+00,0.8003E-01,0.6139E-01,0.4587E-01,0.3319E-01,
1185 +0.2307E-01,0.1525E-01,0.9461E-02,0.5410E-02,0.2785E-02,0.1250E-02,
1186 +0.7098E-03,0.3880E-03,0.2035E-03,0.1020E-03,0.4870E-04,0.2204E-04,
1187 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1188 +0.0000E+00,0.0000E+00/
1189 DATA (XQDUM (I,7,5),I=1,104) /
1190 +0.4621E+01,0.4451E+01,0.4287E+01,0.4128E+01,0.3975E+01,0.3828E+01,
1191 +0.3685E+01,0.3547E+01,0.3414E+01,0.3286E+01,0.3162E+01,0.3043E+01,
1192 +0.2928E+01,0.2816E+01,0.2709E+01,0.2606E+01,0.2506E+01,0.2410E+01,
1193 +0.2318E+01,0.2229E+01,0.2143E+01,0.2060E+01,0.1980E+01,0.1903E+01,
1194 +0.1829E+01,0.1758E+01,0.1689E+01,0.1623E+01,0.1559E+01,0.1498E+01,
1195 +0.1438E+01,0.1381E+01,0.1326E+01,0.1273E+01,0.1222E+01,0.1173E+01,
1196 +0.1125E+01,0.1079E+01,0.1035E+01,0.9923E+00,0.9510E+00,0.9111E+00,
1197 +0.8724E+00,0.8350E+00,0.7988E+00,0.7638E+00,0.7297E+00,0.6967E+00,
1198 +0.6646E+00,0.6334E+00,0.6030E+00,0.5734E+00,0.5445E+00,0.5164E+00,
1199 +0.4889E+00,0.4621E+00,0.4359E+00,0.4102E+00,0.3852E+00,0.3607E+00,
1200 +0.3368E+00,0.3135E+00,0.2907E+00,0.2686E+00,0.2471E+00,0.2263E+00,
1201 +0.2063E+00,0.1870E+00,0.1685E+00,0.1509E+00,0.1342E+00,0.1185E+00,
1202 +0.1038E+00,0.9013E-01,0.7758E-01,0.6612E-01,0.5576E-01,0.4647E-01,
1203 +0.3822E-01,0.3096E-01,0.2463E-01,0.1919E-01,0.1456E-01,0.1070E-01,
1204 +0.7546E-02,0.5054E-02,0.3168E-02,0.1824E-02,0.9401E-03,0.4194E-03,
1205 +0.2359E-03,0.1271E-03,0.6534E-04,0.3186E-04,0.1465E-04,0.0000E+00,
1206 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1207 +0.0000E+00,0.0000E+00/
1208 DATA (XQDUM (I,7,6),I=1,104) /
1209 +0.4447E+01,0.4277E+01,0.4113E+01,0.3954E+01,0.3801E+01,0.3654E+01,
1210 +0.3511E+01,0.3374E+01,0.3241E+01,0.3113E+01,0.2989E+01,0.2870E+01,
1211 +0.2755E+01,0.2644E+01,0.2537E+01,0.2434E+01,0.2335E+01,0.2239E+01,
1212 +0.2147E+01,0.2058E+01,0.1972E+01,0.1890E+01,0.1810E+01,0.1734E+01,
1213 +0.1660E+01,0.1589E+01,0.1521E+01,0.1455E+01,0.1392E+01,0.1331E+01,
1214 +0.1273E+01,0.1216E+01,0.1162E+01,0.1110E+01,0.1060E+01,0.1012E+01,
1215 +0.9653E+00,0.9206E+00,0.8776E+00,0.8362E+00,0.7964E+00,0.7581E+00,
1216 +0.7212E+00,0.6856E+00,0.6514E+00,0.6184E+00,0.5866E+00,0.5560E+00,
1217 +0.5264E+00,0.4979E+00,0.4704E+00,0.4438E+00,0.4182E+00,0.3934E+00,
1218 +0.3695E+00,0.3464E+00,0.3241E+00,0.3026E+00,0.2818E+00,0.2618E+00,
1219 +0.2424E+00,0.2238E+00,0.2059E+00,0.1887E+00,0.1722E+00,0.1565E+00,
1220 +0.1414E+00,0.1272E+00,0.1137E+00,0.1009E+00,0.8900E-01,0.7789E-01,
1221 +0.6760E-01,0.5814E-01,0.4953E-01,0.4174E-01,0.3476E-01,0.2858E-01,
1222 +0.2316E-01,0.1847E-01,0.1445E-01,0.1105E-01,0.8234E-02,0.5940E-02,
1223 +0.4117E-02,0.2714E-02,0.1680E-02,0.9588E-03,0.4932E-03,0.2215E-03,
1224 +0.1259E-03,0.6898E-04,0.3629E-04,0.1826E-04,0.0000E+00,0.0000E+00,
1225 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1226 +0.0000E+00,0.0000E+00/
1227 DATA (XQDUM (I,7,7),I=1,104) /
1228 +0.4331E+01,0.4161E+01,0.3997E+01,0.3839E+01,0.3686E+01,0.3538E+01,
1229 +0.3395E+01,0.3258E+01,0.3125E+01,0.2997E+01,0.2874E+01,0.2754E+01,
1230 +0.2640E+01,0.2529E+01,0.2422E+01,0.2319E+01,0.2220E+01,0.2124E+01,
1231 +0.2032E+01,0.1944E+01,0.1858E+01,0.1776E+01,0.1697E+01,0.1621E+01,
1232 +0.1547E+01,0.1477E+01,0.1409E+01,0.1344E+01,0.1281E+01,0.1220E+01,
1233 +0.1162E+01,0.1107E+01,0.1053E+01,0.1001E+01,0.9519E+00,0.9043E+00,
1234 +0.8586E+00,0.8148E+00,0.7726E+00,0.7322E+00,0.6934E+00,0.6561E+00,
1235 +0.6204E+00,0.5860E+00,0.5531E+00,0.5215E+00,0.4912E+00,0.4622E+00,
1236 +0.4343E+00,0.4076E+00,0.3820E+00,0.3575E+00,0.3340E+00,0.3115E+00,
1237 +0.2899E+00,0.2694E+00,0.2497E+00,0.2309E+00,0.2129E+00,0.1958E+00,
1238 +0.1795E+00,0.1641E+00,0.1494E+00,0.1354E+00,0.1223E+00,0.1099E+00,
1239 +0.9822E-01,0.8730E-01,0.7711E-01,0.6764E-01,0.5889E-01,0.5084E-01,
1240 +0.4349E-01,0.3682E-01,0.3083E-01,0.2548E-01,0.2077E-01,0.1666E-01,
1241 +0.1313E-01,0.1014E-01,0.7652E-02,0.5627E-02,0.4015E-02,0.2767E-02,
1242 +0.1831E-02,0.1155E-02,0.6877E-03,0.3823E-03,0.1952E-03,0.8961E-04,
1243 +0.5261E-04,0.3022E-04,0.1692E-04,0.0000E+00,0.0000E+00,0.0000E+00,
1244 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1245 +0.0000E+00,0.0000E+00/
1246 DATA (XQDUM (I,7,8),I=1,104) /
1247 +0.4261E+01,0.4092E+01,0.3929E+01,0.3772E+01,0.3620E+01,0.3473E+01,
1248 +0.3332E+01,0.3195E+01,0.3063E+01,0.2936E+01,0.2814E+01,0.2696E+01,
1249 +0.2582E+01,0.2472E+01,0.2366E+01,0.2264E+01,0.2166E+01,0.2071E+01,
1250 +0.1980E+01,0.1892E+01,0.1807E+01,0.1726E+01,0.1648E+01,0.1572E+01,
1251 +0.1500E+01,0.1430E+01,0.1363E+01,0.1299E+01,0.1237E+01,0.1177E+01,
1252 +0.1120E+01,0.1065E+01,0.1012E+01,0.9612E+00,0.9125E+00,0.8657E+00,
1253 +0.8208E+00,0.7777E+00,0.7364E+00,0.6968E+00,0.6588E+00,0.6223E+00,
1254 +0.5874E+00,0.5539E+00,0.5218E+00,0.4911E+00,0.4616E+00,0.4334E+00,
1255 +0.4065E+00,0.3807E+00,0.3560E+00,0.3324E+00,0.3098E+00,0.2882E+00,
1256 +0.2677E+00,0.2481E+00,0.2293E+00,0.2115E+00,0.1946E+00,0.1785E+00,
1257 +0.1632E+00,0.1487E+00,0.1350E+00,0.1221E+00,0.1099E+00,0.9846E-01,
1258 +0.8775E-01,0.7776E-01,0.6848E-01,0.5988E-01,0.5197E-01,0.4473E-01,
1259 +0.3814E-01,0.3219E-01,0.2686E-01,0.2213E-01,0.1798E-01,0.1437E-01,
1260 +0.1129E-01,0.8689E-02,0.6537E-02,0.4791E-02,0.3408E-02,0.2341E-02,
1261 +0.1545E-02,0.9723E-03,0.5782E-03,0.3213E-03,0.1642E-03,0.7565E-04,
1262 +0.4460E-04,0.2575E-04,0.1452E-04,0.0000E+00,0.0000E+00,0.0000E+00,
1263 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1264 +0.0000E+00,0.0000E+00/
1265 DATA (XQDUM (I,7,9),I=1,104) /
1266 +0.2824E+01,0.2702E+01,0.2584E+01,0.2470E+01,0.2361E+01,0.2256E+01,
1267 +0.2155E+01,0.2058E+01,0.1964E+01,0.1874E+01,0.1788E+01,0.1705E+01,
1268 +0.1625E+01,0.1548E+01,0.1475E+01,0.1404E+01,0.1336E+01,0.1271E+01,
1269 +0.1208E+01,0.1149E+01,0.1091E+01,0.1036E+01,0.9834E+00,0.9329E+00,
1270 +0.8845E+00,0.8382E+00,0.7938E+00,0.7514E+00,0.7108E+00,0.6721E+00,
1271 +0.6350E+00,0.5995E+00,0.5657E+00,0.5334E+00,0.5026E+00,0.4732E+00,
1272 +0.4451E+00,0.4184E+00,0.3929E+00,0.3686E+00,0.3455E+00,0.3236E+00,
1273 +0.3027E+00,0.2828E+00,0.2639E+00,0.2460E+00,0.2290E+00,0.2129E+00,
1274 +0.1976E+00,0.1832E+00,0.1695E+00,0.1566E+00,0.1443E+00,0.1328E+00,
1275 +0.1219E+00,0.1117E+00,0.1021E+00,0.9304E-01,0.8456E-01,0.7661E-01,
1276 +0.6919E-01,0.6226E-01,0.5581E-01,0.4982E-01,0.4427E-01,0.3915E-01,
1277 +0.3444E-01,0.3011E-01,0.2616E-01,0.2257E-01,0.1933E-01,0.1641E-01,
1278 +0.1380E-01,0.1149E-01,0.9457E-02,0.7687E-02,0.6160E-02,0.4860E-02,
1279 +0.3768E-02,0.2863E-02,0.2128E-02,0.1542E-02,0.1086E-02,0.7393E-03,
1280 +0.4846E-03,0.3038E-03,0.1807E-03,0.1010E-03,0.5237E-04,0.2474E-04,
1281 +0.1491E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1282 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1283 +0.0000E+00,0.0000E+00/
1284 DATA (XQDUM (I,8,1),I=1,104) /
1285 +0.2304E-01,0.2430E-01,0.2563E-01,0.2702E-01,0.2849E-01,0.3004E-01,
1286 +0.3167E-01,0.3338E-01,0.3518E-01,0.3708E-01,0.3907E-01,0.4116E-01,
1287 +0.4337E-01,0.4568E-01,0.4811E-01,0.5067E-01,0.5335E-01,0.5617E-01,
1288 +0.5913E-01,0.6223E-01,0.6549E-01,0.6890E-01,0.7248E-01,0.7623E-01,
1289 +0.8017E-01,0.8428E-01,0.8860E-01,0.9311E-01,0.9783E-01,0.1028E+00,
1290 +0.1079E+00,0.1133E+00,0.1189E+00,0.1248E+00,0.1309E+00,0.1373E+00,
1291 +0.1439E+00,0.1509E+00,0.1580E+00,0.1655E+00,0.1733E+00,0.1813E+00,
1292 +0.1896E+00,0.1983E+00,0.2072E+00,0.2164E+00,0.2258E+00,0.2356E+00,
1293 +0.2456E+00,0.2559E+00,0.2664E+00,0.2772E+00,0.2881E+00,0.2992E+00,
1294 +0.3105E+00,0.3218E+00,0.3333E+00,0.3447E+00,0.3561E+00,0.3673E+00,
1295 +0.3784E+00,0.3891E+00,0.3995E+00,0.4094E+00,0.4187E+00,0.4272E+00,
1296 +0.4349E+00,0.4415E+00,0.4468E+00,0.4507E+00,0.4530E+00,0.4535E+00,
1297 +0.4520E+00,0.4482E+00,0.4419E+00,0.4330E+00,0.4213E+00,0.4066E+00,
1298 +0.3888E+00,0.3681E+00,0.3443E+00,0.3178E+00,0.2887E+00,0.2576E+00,
1299 +0.2250E+00,0.1917E+00,0.1586E+00,0.1266E+00,0.9675E-01,0.7000E-01,
1300 +0.5575E-01,0.4376E-01,0.3380E-01,0.2561E-01,0.1897E-01,0.1368E-01,
1301 +0.9541E-02,0.6376E-02,0.4030E-02,0.2363E-02,0.1246E-02,0.5583E-03,
1302 +0.1906E-03,0.3727E-04/
1303 DATA (XQDUM (I,8,2),I=1,104) /
1304 +0.1307E-01,0.1378E-01,0.1453E-01,0.1532E-01,0.1615E-01,0.1702E-01,
1305 +0.1794E-01,0.1890E-01,0.1991E-01,0.2098E-01,0.2210E-01,0.2328E-01,
1306 +0.2451E-01,0.2581E-01,0.2718E-01,0.2861E-01,0.3011E-01,0.3169E-01,
1307 +0.3334E-01,0.3507E-01,0.3689E-01,0.3880E-01,0.4079E-01,0.4288E-01,
1308 +0.4507E-01,0.4735E-01,0.4974E-01,0.5224E-01,0.5485E-01,0.5758E-01,
1309 +0.6042E-01,0.6339E-01,0.6648E-01,0.6970E-01,0.7306E-01,0.7654E-01,
1310 +0.8017E-01,0.8393E-01,0.8783E-01,0.9187E-01,0.9605E-01,0.1004E+00,
1311 +0.1048E+00,0.1095E+00,0.1142E+00,0.1191E+00,0.1241E+00,0.1292E+00,
1312 +0.1344E+00,0.1398E+00,0.1452E+00,0.1507E+00,0.1562E+00,0.1618E+00,
1313 +0.1674E+00,0.1730E+00,0.1785E+00,0.1840E+00,0.1893E+00,0.1945E+00,
1314 +0.1995E+00,0.2042E+00,0.2085E+00,0.2125E+00,0.2160E+00,0.2189E+00,
1315 +0.2213E+00,0.2228E+00,0.2236E+00,0.2235E+00,0.2224E+00,0.2201E+00,
1316 +0.2167E+00,0.2120E+00,0.2060E+00,0.1985E+00,0.1897E+00,0.1794E+00,
1317 +0.1678E+00,0.1549E+00,0.1409E+00,0.1260E+00,0.1105E+00,0.9467E-01,
1318 +0.7898E-01,0.6383E-01,0.4966E-01,0.3690E-01,0.2591E-01,0.1694E-01,
1319 +0.1256E-01,0.9142E-02,0.6509E-02,0.4520E-02,0.3046E-02,0.1981E-02,
1320 +0.1232E-02,0.7246E-03,0.3962E-03,0.1964E-03,0.8468E-04,0.2957E-04,
1321 +0.0000E+00,0.0000E+00/
1322 DATA (XQDUM (I,8,3),I=1,104) /
1323 +0.2038E+03,0.1940E+03,0.1847E+03,0.1758E+03,0.1673E+03,0.1591E+03,
1324 +0.1513E+03,0.1438E+03,0.1367E+03,0.1298E+03,0.1233E+03,0.1170E+03,
1325 +0.1110E+03,0.1053E+03,0.9982E+02,0.9460E+02,0.8962E+02,0.8487E+02,
1326 +0.8033E+02,0.7600E+02,0.7187E+02,0.6794E+02,0.6418E+02,0.6061E+02,
1327 +0.5721E+02,0.5397E+02,0.5088E+02,0.4795E+02,0.4516E+02,0.4251E+02,
1328 +0.3999E+02,0.3759E+02,0.3532E+02,0.3316E+02,0.3111E+02,0.2917E+02,
1329 +0.2733E+02,0.2558E+02,0.2393E+02,0.2236E+02,0.2089E+02,0.1949E+02,
1330 +0.1816E+02,0.1691E+02,0.1573E+02,0.1462E+02,0.1357E+02,0.1258E+02,
1331 +0.1165E+02,0.1078E+02,0.9952E+01,0.9178E+01,0.8450E+01,0.7768E+01,
1332 +0.7128E+01,0.6528E+01,0.5968E+01,0.5443E+01,0.4953E+01,0.4496E+01,
1333 +0.4071E+01,0.3675E+01,0.3307E+01,0.2966E+01,0.2650E+01,0.2359E+01,
1334 +0.2090E+01,0.1843E+01,0.1617E+01,0.1410E+01,0.1222E+01,0.1051E+01,
1335 +0.8977E+00,0.7599E+00,0.6372E+00,0.5287E+00,0.4335E+00,0.3508E+00,
1336 +0.2797E+00,0.2193E+00,0.1688E+00,0.1272E+00,0.9352E-01,0.6690E-01,
1337 +0.4637E-01,0.3098E-01,0.1983E-01,0.1207E-01,0.6909E-02,0.3671E-02,
1338 +0.2399E-02,0.1548E-02,0.9837E-03,0.6125E-03,0.3718E-03,0.2185E-03,
1339 +0.1231E-03,0.6565E-04,0.3255E-04,0.1459E-04,0.0000E+00,0.0000E+00,
1340 +0.0000E+00,0.0000E+00/
1341 DATA (XQDUM (I,8,4),I=1,104) /
1342 +0.3250E+02,0.3116E+02,0.2987E+02,0.2863E+02,0.2744E+02,0.2628E+02,
1343 +0.2518E+02,0.2411E+02,0.2308E+02,0.2210E+02,0.2115E+02,0.2023E+02,
1344 +0.1936E+02,0.1851E+02,0.1770E+02,0.1692E+02,0.1617E+02,0.1545E+02,
1345 +0.1476E+02,0.1410E+02,0.1346E+02,0.1285E+02,0.1226E+02,0.1170E+02,
1346 +0.1116E+02,0.1064E+02,0.1014E+02,0.9667E+01,0.9209E+01,0.8771E+01,
1347 +0.8351E+01,0.7948E+01,0.7562E+01,0.7193E+01,0.6838E+01,0.6499E+01,
1348 +0.6174E+01,0.5862E+01,0.5564E+01,0.5278E+01,0.5004E+01,0.4742E+01,
1349 +0.4490E+01,0.4249E+01,0.4018E+01,0.3797E+01,0.3585E+01,0.3382E+01,
1350 +0.3187E+01,0.3000E+01,0.2821E+01,0.2649E+01,0.2484E+01,0.2326E+01,
1351 +0.2174E+01,0.2028E+01,0.1889E+01,0.1754E+01,0.1626E+01,0.1503E+01,
1352 +0.1385E+01,0.1273E+01,0.1165E+01,0.1062E+01,0.9648E+00,0.8722E+00,
1353 +0.7845E+00,0.7018E+00,0.6242E+00,0.5515E+00,0.4839E+00,0.4214E+00,
1354 +0.3639E+00,0.3115E+00,0.2640E+00,0.2214E+00,0.1835E+00,0.1501E+00,
1355 +0.1210E+00,0.9601E-01,0.7471E-01,0.5685E-01,0.4211E-01,0.3018E-01,
1356 +0.2078E-01,0.1359E-01,0.8338E-02,0.4713E-02,0.2398E-02,0.1064E-02,
1357 +0.6000E-03,0.3262E-03,0.1704E-03,0.8519E-04,0.4063E-04,0.1842E-04,
1358 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1359 +0.0000E+00,0.0000E+00/
1360 DATA (XQDUM (I,8,5),I=1,104) /
1361 +0.5848E+01,0.5617E+01,0.5394E+01,0.5179E+01,0.4972E+01,0.4773E+01,
1362 +0.4582E+01,0.4397E+01,0.4219E+01,0.4048E+01,0.3884E+01,0.3725E+01,
1363 +0.3573E+01,0.3426E+01,0.3285E+01,0.3150E+01,0.3019E+01,0.2894E+01,
1364 +0.2773E+01,0.2658E+01,0.2546E+01,0.2440E+01,0.2337E+01,0.2238E+01,
1365 +0.2143E+01,0.2052E+01,0.1965E+01,0.1881E+01,0.1800E+01,0.1723E+01,
1366 +0.1649E+01,0.1577E+01,0.1509E+01,0.1443E+01,0.1379E+01,0.1319E+01,
1367 +0.1260E+01,0.1204E+01,0.1150E+01,0.1098E+01,0.1048E+01,0.1000E+01,
1368 +0.9539E+00,0.9093E+00,0.8663E+00,0.8248E+00,0.7848E+00,0.7462E+00,
1369 +0.7088E+00,0.6727E+00,0.6378E+00,0.6039E+00,0.5711E+00,0.5393E+00,
1370 +0.5085E+00,0.4785E+00,0.4495E+00,0.4212E+00,0.3938E+00,0.3672E+00,
1371 +0.3414E+00,0.3164E+00,0.2922E+00,0.2688E+00,0.2462E+00,0.2245E+00,
1372 +0.2037E+00,0.1838E+00,0.1649E+00,0.1470E+00,0.1301E+00,0.1143E+00,
1373 +0.9968E-01,0.8617E-01,0.7381E-01,0.6259E-01,0.5250E-01,0.4351E-01,
1374 +0.3557E-01,0.2863E-01,0.2262E-01,0.1749E-01,0.1317E-01,0.9588E-02,
1375 +0.6697E-02,0.4438E-02,0.2750E-02,0.1564E-02,0.7960E-03,0.3504E-03,
1376 +0.1954E-03,0.1045E-03,0.5336E-04,0.2587E-04,0.1185E-04,0.0000E+00,
1377 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1378 +0.0000E+00,0.0000E+00/
1379 DATA (XQDUM (I,8,6),I=1,104) /
1380 +0.5674E+01,0.5443E+01,0.5220E+01,0.5005E+01,0.4799E+01,0.4600E+01,
1381 +0.4408E+01,0.4224E+01,0.4046E+01,0.3875E+01,0.3711E+01,0.3552E+01,
1382 +0.3400E+01,0.3254E+01,0.3113E+01,0.2978E+01,0.2848E+01,0.2723E+01,
1383 +0.2603E+01,0.2487E+01,0.2376E+01,0.2270E+01,0.2167E+01,0.2069E+01,
1384 +0.1975E+01,0.1885E+01,0.1798E+01,0.1714E+01,0.1634E+01,0.1558E+01,
1385 +0.1484E+01,0.1414E+01,0.1346E+01,0.1281E+01,0.1219E+01,0.1159E+01,
1386 +0.1102E+01,0.1047E+01,0.9945E+00,0.9440E+00,0.8957E+00,0.8493E+00,
1387 +0.8049E+00,0.7622E+00,0.7213E+00,0.6821E+00,0.6444E+00,0.6083E+00,
1388 +0.5736E+00,0.5403E+00,0.5084E+00,0.4777E+00,0.4482E+00,0.4199E+00,
1389 +0.3927E+00,0.3665E+00,0.3415E+00,0.3174E+00,0.2943E+00,0.2721E+00,
1390 +0.2509E+00,0.2306E+00,0.2112E+00,0.1926E+00,0.1750E+00,0.1582E+00,
1391 +0.1423E+00,0.1274E+00,0.1133E+00,0.1001E+00,0.8783E-01,0.7647E-01,
1392 +0.6603E-01,0.5649E-01,0.4786E-01,0.4010E-01,0.3321E-01,0.2714E-01,
1393 +0.2185E-01,0.1730E-01,0.1344E-01,0.1020E-01,0.7536E-02,0.5387E-02,
1394 +0.3698E-02,0.2413E-02,0.1477E-02,0.8337E-03,0.4238E-03,0.1881E-03,
1395 +0.1062E-03,0.5786E-04,0.3030E-04,0.1520E-04,0.0000E+00,0.0000E+00,
1396 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1397 +0.0000E+00,0.0000E+00/
1398 DATA (XQDUM (I,8,7),I=1,104) /
1399 +0.5558E+01,0.5327E+01,0.5104E+01,0.4890E+01,0.4683E+01,0.4484E+01,
1400 +0.4292E+01,0.4108E+01,0.3931E+01,0.3760E+01,0.3595E+01,0.3437E+01,
1401 +0.3285E+01,0.3139E+01,0.2998E+01,0.2863E+01,0.2733E+01,0.2609E+01,
1402 +0.2489E+01,0.2373E+01,0.2263E+01,0.2157E+01,0.2055E+01,0.1957E+01,
1403 +0.1863E+01,0.1773E+01,0.1686E+01,0.1603E+01,0.1524E+01,0.1448E+01,
1404 +0.1375E+01,0.1305E+01,0.1237E+01,0.1173E+01,0.1112E+01,0.1053E+01,
1405 +0.9964E+00,0.9424E+00,0.8907E+00,0.8413E+00,0.7940E+00,0.7488E+00,
1406 +0.7055E+00,0.6642E+00,0.6247E+00,0.5869E+00,0.5508E+00,0.5164E+00,
1407 +0.4835E+00,0.4520E+00,0.4221E+00,0.3935E+00,0.3662E+00,0.3402E+00,
1408 +0.3154E+00,0.2919E+00,0.2694E+00,0.2481E+00,0.2279E+00,0.2087E+00,
1409 +0.1905E+00,0.1734E+00,0.1571E+00,0.1419E+00,0.1275E+00,0.1140E+00,
1410 +0.1015E+00,0.8975E-01,0.7889E-01,0.6886E-01,0.5965E-01,0.5123E-01,
1411 +0.4359E-01,0.3671E-01,0.3056E-01,0.2511E-01,0.2035E-01,0.1622E-01,
1412 +0.1270E-01,0.9748E-02,0.7309E-02,0.5338E-02,0.3782E-02,0.2587E-02,
1413 +0.1699E-02,0.1063E-02,0.6285E-03,0.3466E-03,0.1756E-03,0.8000E-04,
1414 +0.4677E-04,0.2676E-04,0.1493E-04,0.0000E+00,0.0000E+00,0.0000E+00,
1415 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1416 +0.0000E+00,0.0000E+00/
1417 DATA (XQDUM (I,8,8),I=1,104) /
1418 +0.5489E+01,0.5259E+01,0.5037E+01,0.4824E+01,0.4618E+01,0.4420E+01,
1419 +0.4229E+01,0.4046E+01,0.3870E+01,0.3700E+01,0.3536E+01,0.3379E+01,
1420 +0.3228E+01,0.3083E+01,0.2943E+01,0.2809E+01,0.2680E+01,0.2556E+01,
1421 +0.2437E+01,0.2323E+01,0.2213E+01,0.2107E+01,0.2006E+01,0.1909E+01,
1422 +0.1816E+01,0.1727E+01,0.1641E+01,0.1559E+01,0.1480E+01,0.1405E+01,
1423 +0.1333E+01,0.1263E+01,0.1197E+01,0.1134E+01,0.1073E+01,0.1015E+01,
1424 +0.9593E+00,0.9061E+00,0.8552E+00,0.8066E+00,0.7601E+00,0.7157E+00,
1425 +0.6733E+00,0.6328E+00,0.5941E+00,0.5572E+00,0.5220E+00,0.4884E+00,
1426 +0.4564E+00,0.4259E+00,0.3968E+00,0.3692E+00,0.3428E+00,0.3178E+00,
1427 +0.2940E+00,0.2714E+00,0.2499E+00,0.2296E+00,0.2103E+00,0.1921E+00,
1428 +0.1749E+00,0.1587E+00,0.1435E+00,0.1292E+00,0.1158E+00,0.1033E+00,
1429 +0.9162E-01,0.8080E-01,0.7081E-01,0.6162E-01,0.5321E-01,0.4556E-01,
1430 +0.3865E-01,0.3244E-01,0.2692E-01,0.2205E-01,0.1781E-01,0.1416E-01,
1431 +0.1105E-01,0.8451E-02,0.6316E-02,0.4598E-02,0.3248E-02,0.2216E-02,
1432 +0.1452E-02,0.9067E-03,0.5352E-03,0.2951E-03,0.1498E-03,0.6851E-04,
1433 +0.4022E-04,0.2314E-04,0.1300E-04,0.0000E+00,0.0000E+00,0.0000E+00,
1434 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1435 +0.0000E+00,0.0000E+00/
1436 DATA (XQDUM (I,8,9),I=1,104) /
1437 +0.4087E+01,0.3903E+01,0.3725E+01,0.3555E+01,0.3391E+01,0.3233E+01,
1438 +0.3082E+01,0.2937E+01,0.2798E+01,0.2665E+01,0.2537E+01,0.2414E+01,
1439 +0.2296E+01,0.2183E+01,0.2075E+01,0.1972E+01,0.1872E+01,0.1777E+01,
1440 +0.1686E+01,0.1599E+01,0.1516E+01,0.1437E+01,0.1360E+01,0.1288E+01,
1441 +0.1218E+01,0.1152E+01,0.1088E+01,0.1028E+01,0.9701E+00,0.9150E+00,
1442 +0.8625E+00,0.8124E+00,0.7647E+00,0.7192E+00,0.6760E+00,0.6348E+00,
1443 +0.5957E+00,0.5585E+00,0.5231E+00,0.4895E+00,0.4576E+00,0.4274E+00,
1444 +0.3987E+00,0.3715E+00,0.3457E+00,0.3213E+00,0.2982E+00,0.2764E+00,
1445 +0.2558E+00,0.2364E+00,0.2181E+00,0.2008E+00,0.1845E+00,0.1692E+00,
1446 +0.1549E+00,0.1414E+00,0.1287E+00,0.1169E+00,0.1059E+00,0.9558E-01,
1447 +0.8599E-01,0.7709E-01,0.6883E-01,0.6120E-01,0.5416E-01,0.4769E-01,
1448 +0.4177E-01,0.3636E-01,0.3145E-01,0.2701E-01,0.2302E-01,0.1945E-01,
1449 +0.1628E-01,0.1348E-01,0.1104E-01,0.8925E-02,0.7114E-02,0.5581E-02,
1450 +0.4302E-02,0.3251E-02,0.2402E-02,0.1730E-02,0.1210E-02,0.8192E-03,
1451 +0.5337E-03,0.3325E-03,0.1967E-03,0.1093E-03,0.5637E-04,0.2649E-04,
1452 +0.1591E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1453 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1454 +0.0000E+00,0.0000E+00/
1455 DATA (XQDUM (I,9,1),I=1,104) /
1456 +0.2449E-01,0.2582E-01,0.2722E-01,0.2870E-01,0.3025E-01,0.3188E-01,
1457 +0.3359E-01,0.3539E-01,0.3729E-01,0.3928E-01,0.4138E-01,0.4358E-01,
1458 +0.4589E-01,0.4832E-01,0.5087E-01,0.5354E-01,0.5635E-01,0.5930E-01,
1459 +0.6239E-01,0.6563E-01,0.6902E-01,0.7258E-01,0.7631E-01,0.8021E-01,
1460 +0.8430E-01,0.8858E-01,0.9305E-01,0.9772E-01,0.1026E+00,0.1077E+00,
1461 +0.1130E+00,0.1186E+00,0.1244E+00,0.1304E+00,0.1367E+00,0.1432E+00,
1462 +0.1500E+00,0.1571E+00,0.1644E+00,0.1720E+00,0.1799E+00,0.1881E+00,
1463 +0.1965E+00,0.2052E+00,0.2142E+00,0.2235E+00,0.2330E+00,0.2427E+00,
1464 +0.2528E+00,0.2630E+00,0.2734E+00,0.2841E+00,0.2948E+00,0.3058E+00,
1465 +0.3168E+00,0.3278E+00,0.3389E+00,0.3499E+00,0.3608E+00,0.3715E+00,
1466 +0.3819E+00,0.3920E+00,0.4016E+00,0.4106E+00,0.4190E+00,0.4265E+00,
1467 +0.4330E+00,0.4384E+00,0.4425E+00,0.4451E+00,0.4460E+00,0.4451E+00,
1468 +0.4421E+00,0.4368E+00,0.4291E+00,0.4189E+00,0.4059E+00,0.3900E+00,
1469 +0.3713E+00,0.3498E+00,0.3255E+00,0.2988E+00,0.2699E+00,0.2393E+00,
1470 +0.2077E+00,0.1757E+00,0.1442E+00,0.1142E+00,0.8644E-01,0.6189E-01,
1471 +0.4894E-01,0.3814E-01,0.2923E-01,0.2197E-01,0.1614E-01,0.1153E-01,
1472 +0.7959E-02,0.5258E-02,0.3282E-02,0.1896E-02,0.9823E-03,0.4309E-03,
1473 +0.1430E-03,0.2684E-04/
1474 DATA (XQDUM (I,9,2),I=1,104) /
1475 +0.1388E-01,0.1463E-01,0.1542E-01,0.1625E-01,0.1712E-01,0.1804E-01,
1476 +0.1900E-01,0.2002E-01,0.2108E-01,0.2220E-01,0.2338E-01,0.2461E-01,
1477 +0.2591E-01,0.2727E-01,0.2869E-01,0.3019E-01,0.3176E-01,0.3340E-01,
1478 +0.3513E-01,0.3693E-01,0.3883E-01,0.4080E-01,0.4288E-01,0.4504E-01,
1479 +0.4731E-01,0.4967E-01,0.5215E-01,0.5473E-01,0.5742E-01,0.6023E-01,
1480 +0.6316E-01,0.6620E-01,0.6938E-01,0.7267E-01,0.7610E-01,0.7966E-01,
1481 +0.8335E-01,0.8718E-01,0.9114E-01,0.9524E-01,0.9947E-01,0.1038E+00,
1482 +0.1083E+00,0.1130E+00,0.1177E+00,0.1226E+00,0.1276E+00,0.1327E+00,
1483 +0.1379E+00,0.1431E+00,0.1485E+00,0.1538E+00,0.1593E+00,0.1647E+00,
1484 +0.1701E+00,0.1755E+00,0.1808E+00,0.1859E+00,0.1910E+00,0.1958E+00,
1485 +0.2003E+00,0.2046E+00,0.2085E+00,0.2119E+00,0.2149E+00,0.2173E+00,
1486 +0.2190E+00,0.2199E+00,0.2200E+00,0.2192E+00,0.2174E+00,0.2145E+00,
1487 +0.2104E+00,0.2050E+00,0.1984E+00,0.1904E+00,0.1812E+00,0.1706E+00,
1488 +0.1587E+00,0.1458E+00,0.1319E+00,0.1173E+00,0.1022E+00,0.8699E-01,
1489 +0.7206E-01,0.5779E-01,0.4460E-01,0.3284E-01,0.2284E-01,0.1476E-01,
1490 +0.1087E-01,0.7848E-02,0.5543E-02,0.3817E-02,0.2550E-02,0.1642E-02,
1491 +0.1011E-02,0.5876E-03,0.3171E-03,0.1549E-03,0.6562E-04,0.2243E-04,
1492 +0.0000E+00,0.0000E+00/
1493 DATA (XQDUM (I,9,3),I=1,104) /
1494 +0.2357E+03,0.2239E+03,0.2127E+03,0.2020E+03,0.1917E+03,0.1819E+03,
1495 +0.1725E+03,0.1636E+03,0.1551E+03,0.1469E+03,0.1392E+03,0.1318E+03,
1496 +0.1247E+03,0.1180E+03,0.1116E+03,0.1055E+03,0.9965E+02,0.9411E+02,
1497 +0.8884E+02,0.8383E+02,0.7906E+02,0.7453E+02,0.7022E+02,0.6613E+02,
1498 +0.6224E+02,0.5854E+02,0.5504E+02,0.5172E+02,0.4856E+02,0.4558E+02,
1499 +0.4275E+02,0.4006E+02,0.3752E+02,0.3512E+02,0.3285E+02,0.3070E+02,
1500 +0.2867E+02,0.2675E+02,0.2494E+02,0.2323E+02,0.2162E+02,0.2011E+02,
1501 +0.1868E+02,0.1733E+02,0.1606E+02,0.1487E+02,0.1375E+02,0.1270E+02,
1502 +0.1172E+02,0.1080E+02,0.9930E+01,0.9120E+01,0.8363E+01,0.7655E+01,
1503 +0.6994E+01,0.6378E+01,0.5804E+01,0.5270E+01,0.4774E+01,0.4313E+01,
1504 +0.3886E+01,0.3491E+01,0.3126E+01,0.2789E+01,0.2479E+01,0.2195E+01,
1505 +0.1934E+01,0.1696E+01,0.1480E+01,0.1283E+01,0.1105E+01,0.9457E+00,
1506 +0.8027E+00,0.6755E+00,0.5631E+00,0.4644E+00,0.3785E+00,0.3044E+00,
1507 +0.2413E+00,0.1881E+00,0.1439E+00,0.1078E+00,0.7890E-01,0.5617E-01,
1508 +0.3876E-01,0.2580E-01,0.1647E-01,0.9998E-02,0.5717E-02,0.3034E-02,
1509 +0.1981E-02,0.1278E-02,0.8103E-03,0.5034E-03,0.3045E-03,0.1781E-03,
1510 +0.9970E-04,0.5274E-04,0.2588E-04,0.1146E-04,0.0000E+00,0.0000E+00,
1511 +0.0000E+00,0.0000E+00/
1512 DATA (XQDUM (I,9,4),I=1,104) /
1513 +0.4004E+02,0.3831E+02,0.3664E+02,0.3503E+02,0.3349E+02,0.3201E+02,
1514 +0.3059E+02,0.2923E+02,0.2792E+02,0.2666E+02,0.2545E+02,0.2430E+02,
1515 +0.2319E+02,0.2212E+02,0.2110E+02,0.2012E+02,0.1918E+02,0.1828E+02,
1516 +0.1742E+02,0.1659E+02,0.1580E+02,0.1504E+02,0.1432E+02,0.1362E+02,
1517 +0.1296E+02,0.1232E+02,0.1171E+02,0.1113E+02,0.1057E+02,0.1004E+02,
1518 +0.9532E+01,0.9045E+01,0.8581E+01,0.8136E+01,0.7712E+01,0.7306E+01,
1519 +0.6919E+01,0.6549E+01,0.6196E+01,0.5858E+01,0.5536E+01,0.5228E+01,
1520 +0.4935E+01,0.4654E+01,0.4386E+01,0.4130E+01,0.3886E+01,0.3653E+01,
1521 +0.3430E+01,0.3217E+01,0.3014E+01,0.2820E+01,0.2635E+01,0.2458E+01,
1522 +0.2288E+01,0.2127E+01,0.1973E+01,0.1826E+01,0.1685E+01,0.1552E+01,
1523 +0.1424E+01,0.1303E+01,0.1188E+01,0.1079E+01,0.9760E+00,0.8786E+00,
1524 +0.7869E+00,0.7010E+00,0.6207E+00,0.5461E+00,0.4770E+00,0.4135E+00,
1525 +0.3554E+00,0.3028E+00,0.2554E+00,0.2131E+00,0.1757E+00,0.1430E+00,
1526 +0.1146E+00,0.9036E-01,0.6987E-01,0.5280E-01,0.3882E-01,0.2760E-01,
1527 +0.1884E-01,0.1221E-01,0.7420E-02,0.4152E-02,0.2091E-02,0.9185E-03,
1528 +0.5150E-03,0.2787E-03,0.1450E-03,0.7233E-04,0.3447E-04,0.1563E-04,
1529 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1530 +0.0000E+00,0.0000E+00/
1531 DATA (XQDUM (I,9,5),I=1,104) /
1532 +0.7099E+01,0.6802E+01,0.6516E+01,0.6241E+01,0.5977E+01,0.5724E+01,
1533 +0.5480E+01,0.5246E+01,0.5021E+01,0.4805E+01,0.4597E+01,0.4398E+01,
1534 +0.4207E+01,0.4024E+01,0.3848E+01,0.3679E+01,0.3517E+01,0.3361E+01,
1535 +0.3212E+01,0.3070E+01,0.2933E+01,0.2801E+01,0.2676E+01,0.2555E+01,
1536 +0.2440E+01,0.2329E+01,0.2223E+01,0.2121E+01,0.2024E+01,0.1931E+01,
1537 +0.1842E+01,0.1757E+01,0.1675E+01,0.1597E+01,0.1522E+01,0.1450E+01,
1538 +0.1381E+01,0.1315E+01,0.1252E+01,0.1191E+01,0.1133E+01,0.1078E+01,
1539 +0.1024E+01,0.9729E+00,0.9237E+00,0.8764E+00,0.8310E+00,0.7873E+00,
1540 +0.7453E+00,0.7048E+00,0.6658E+00,0.6282E+00,0.5919E+00,0.5570E+00,
1541 +0.5232E+00,0.4906E+00,0.4591E+00,0.4287E+00,0.3993E+00,0.3710E+00,
1542 +0.3436E+00,0.3172E+00,0.2919E+00,0.2675E+00,0.2441E+00,0.2217E+00,
1543 +0.2004E+00,0.1801E+00,0.1609E+00,0.1429E+00,0.1260E+00,0.1103E+00,
1544 +0.9576E-01,0.8243E-01,0.7030E-01,0.5935E-01,0.4955E-01,0.4086E-01,
1545 +0.3323E-01,0.2660E-01,0.2089E-01,0.1605E-01,0.1199E-01,0.8666E-02,
1546 +0.6002E-02,0.3941E-02,0.2418E-02,0.1361E-02,0.6846E-03,0.2978E-03,
1547 +0.1649E-03,0.8762E-04,0.4447E-04,0.2146E-04,0.0000E+00,0.0000E+00,
1548 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1549 +0.0000E+00,0.0000E+00/
1550 DATA (XQDUM (I,9,6),I=1,104) /
1551 +0.6925E+01,0.6628E+01,0.6342E+01,0.6068E+01,0.5804E+01,0.5550E+01,
1552 +0.5307E+01,0.5073E+01,0.4848E+01,0.4632E+01,0.4425E+01,0.4226E+01,
1553 +0.4035E+01,0.3852E+01,0.3676E+01,0.3507E+01,0.3346E+01,0.3191E+01,
1554 +0.3042E+01,0.2900E+01,0.2763E+01,0.2632E+01,0.2507E+01,0.2387E+01,
1555 +0.2272E+01,0.2162E+01,0.2057E+01,0.1956E+01,0.1859E+01,0.1767E+01,
1556 +0.1679E+01,0.1594E+01,0.1513E+01,0.1436E+01,0.1362E+01,0.1292E+01,
1557 +0.1224E+01,0.1160E+01,0.1098E+01,0.1039E+01,0.9826E+00,0.9287E+00,
1558 +0.8773E+00,0.8281E+00,0.7810E+00,0.7361E+00,0.6931E+00,0.6520E+00,
1559 +0.6127E+00,0.5751E+00,0.5392E+00,0.5049E+00,0.4720E+00,0.4406E+00,
1560 +0.4106E+00,0.3818E+00,0.3544E+00,0.3282E+00,0.3031E+00,0.2792E+00,
1561 +0.2565E+00,0.2348E+00,0.2142E+00,0.1946E+00,0.1761E+00,0.1586E+00,
1562 +0.1421E+00,0.1266E+00,0.1121E+00,0.9866E-01,0.8619E-01,0.7472E-01,
1563 +0.6423E-01,0.5470E-01,0.4612E-01,0.3846E-01,0.3169E-01,0.2576E-01,
1564 +0.2062E-01,0.1623E-01,0.1253E-01,0.9447E-02,0.6930E-02,0.4916E-02,
1565 +0.3347E-02,0.2164E-02,0.1313E-02,0.7334E-03,0.3691E-03,0.1622E-03,
1566 +0.9105E-04,0.4935E-04,0.2573E-04,0.1287E-04,0.0000E+00,0.0000E+00,
1567 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1568 +0.0000E+00,0.0000E+00/
1569 DATA (XQDUM (I,9,7),I=1,104) /
1570 +0.6809E+01,0.6512E+01,0.6226E+01,0.5952E+01,0.5688E+01,0.5435E+01,
1571 +0.5191E+01,0.4957E+01,0.4733E+01,0.4517E+01,0.4310E+01,0.4111E+01,
1572 +0.3920E+01,0.3737E+01,0.3561E+01,0.3393E+01,0.3232E+01,0.3077E+01,
1573 +0.2928E+01,0.2786E+01,0.2650E+01,0.2519E+01,0.2394E+01,0.2275E+01,
1574 +0.2160E+01,0.2051E+01,0.1946E+01,0.1845E+01,0.1749E+01,0.1657E+01,
1575 +0.1570E+01,0.1486E+01,0.1406E+01,0.1329E+01,0.1256E+01,0.1186E+01,
1576 +0.1120E+01,0.1056E+01,0.9953E+00,0.9374E+00,0.8822E+00,0.8295E+00,
1577 +0.7793E+00,0.7315E+00,0.6859E+00,0.6425E+00,0.6011E+00,0.5618E+00,
1578 +0.5243E+00,0.4887E+00,0.4548E+00,0.4226E+00,0.3921E+00,0.3630E+00,
1579 +0.3355E+00,0.3093E+00,0.2846E+00,0.2612E+00,0.2390E+00,0.2181E+00,
1580 +0.1984E+00,0.1798E+00,0.1624E+00,0.1460E+00,0.1307E+00,0.1165E+00,
1581 +0.1032E+00,0.9093E-01,0.7959E-01,0.6918E-01,0.5966E-01,0.5101E-01,
1582 +0.4320E-01,0.3621E-01,0.3000E-01,0.2453E-01,0.1978E-01,0.1569E-01,
1583 +0.1222E-01,0.9324E-02,0.6951E-02,0.5046E-02,0.3554E-02,0.2416E-02,
1584 +0.1576E-02,0.9801E-03,0.5754E-03,0.3152E-03,0.1586E-03,0.7177E-04,
1585 +0.4180E-04,0.2383E-04,0.1325E-04,0.0000E+00,0.0000E+00,0.0000E+00,
1586 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1587 +0.0000E+00,0.0000E+00/
1588 DATA (XQDUM (I,9,8),I=1,104) /
1589 +0.6741E+01,0.6445E+01,0.6160E+01,0.5887E+01,0.5624E+01,0.5371E+01,
1590 +0.5129E+01,0.4896E+01,0.4672E+01,0.4457E+01,0.4251E+01,0.4054E+01,
1591 +0.3864E+01,0.3682E+01,0.3507E+01,0.3339E+01,0.3179E+01,0.3025E+01,
1592 +0.2877E+01,0.2736E+01,0.2601E+01,0.2471E+01,0.2347E+01,0.2228E+01,
1593 +0.2114E+01,0.2005E+01,0.1901E+01,0.1802E+01,0.1706E+01,0.1615E+01,
1594 +0.1529E+01,0.1445E+01,0.1366E+01,0.1290E+01,0.1218E+01,0.1149E+01,
1595 +0.1083E+01,0.1020E+01,0.9605E+00,0.9034E+00,0.8490E+00,0.7971E+00,
1596 +0.7478E+00,0.7008E+00,0.6560E+00,0.6135E+00,0.5730E+00,0.5346E+00,
1597 +0.4980E+00,0.4633E+00,0.4303E+00,0.3990E+00,0.3694E+00,0.3413E+00,
1598 +0.3147E+00,0.2895E+00,0.2657E+00,0.2433E+00,0.2221E+00,0.2022E+00,
1599 +0.1834E+00,0.1659E+00,0.1494E+00,0.1340E+00,0.1196E+00,0.1063E+00,
1600 +0.9390E-01,0.8248E-01,0.7199E-01,0.6238E-01,0.5364E-01,0.4572E-01,
1601 +0.3861E-01,0.3226E-01,0.2664E-01,0.2172E-01,0.1745E-01,0.1380E-01,
1602 +0.1071E-01,0.8150E-02,0.6057E-02,0.4384E-02,0.3078E-02,0.2087E-02,
1603 +0.1359E-02,0.8434E-03,0.4946E-03,0.2710E-03,0.1367E-03,0.6213E-04,
1604 +0.3634E-04,0.2084E-04,0.1167E-04,0.0000E+00,0.0000E+00,0.0000E+00,
1605 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1606 +0.0000E+00,0.0000E+00/
1607 DATA (XQDUM (I,9,9),I=1,104) /
1608 +0.5370E+01,0.5118E+01,0.4877E+01,0.4646E+01,0.4424E+01,0.4211E+01,
1609 +0.4008E+01,0.3812E+01,0.3625E+01,0.3446E+01,0.3275E+01,0.3111E+01,
1610 +0.2954E+01,0.2803E+01,0.2660E+01,0.2522E+01,0.2391E+01,0.2265E+01,
1611 +0.2145E+01,0.2031E+01,0.1921E+01,0.1817E+01,0.1717E+01,0.1622E+01,
1612 +0.1532E+01,0.1445E+01,0.1363E+01,0.1284E+01,0.1210E+01,0.1139E+01,
1613 +0.1071E+01,0.1007E+01,0.9456E+00,0.8875E+00,0.8323E+00,0.7799E+00,
1614 +0.7302E+00,0.6830E+00,0.6383E+00,0.5959E+00,0.5558E+00,0.5178E+00,
1615 +0.4819E+00,0.4479E+00,0.4158E+00,0.3855E+00,0.3570E+00,0.3300E+00,
1616 +0.3046E+00,0.2807E+00,0.2582E+00,0.2371E+00,0.2173E+00,0.1987E+00,
1617 +0.1813E+00,0.1651E+00,0.1499E+00,0.1357E+00,0.1225E+00,0.1102E+00,
1618 +0.9884E-01,0.8831E-01,0.7858E-01,0.6963E-01,0.6140E-01,0.5388E-01,
1619 +0.4701E-01,0.4077E-01,0.3513E-01,0.3005E-01,0.2550E-01,0.2146E-01,
1620 +0.1788E-01,0.1475E-01,0.1202E-01,0.9675E-02,0.7676E-02,0.5993E-02,
1621 +0.4597E-02,0.3456E-02,0.2541E-02,0.1821E-02,0.1267E-02,0.8534E-03,
1622 +0.5531E-03,0.3429E-03,0.2018E-03,0.1116E-03,0.5728E-04,0.2678E-04,
1623 +0.1603E-04,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1624 +0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,0.0000E+00,
1625 +0.0000E+00,0.0000E+00/
1626 DATA XMIN/5.E-05/,XMAX/.95/
1627 DATA ISTEP/0/
1628 IF(ISTEP.EQ.0) THEN
1629 DO 2 I=1,IX
1630 ENT(I)=LOG10(XCO(I))
1631 2 CONTINUE
1632 NENT(1)=IX
1633 NENT(2)=IQ
1634 DO 3 I=1,IQ
1635 ENT(IX+I)=LOG10(Q2(I))
1636 3 CONTINUE
1637 ISTEP=1
1638 ENDIF
1639 IF (STRFUN(1:2) .EQ. 'UP' ) THEN
1640 IFUN =1
1641 ELSE IF (STRFUN(1:2) .EQ. 'DO') THEN
1642 IFUN =2
1643 ELSE IF (STRFUN(1:2) .EQ. 'GL') THEN
1644 IFUN =3
1645 ELSE IF (STRFUN(1:2) .EQ. 'QB') THEN
1646 IFUN =4
1647 ELSE IF (STRFUN(1:2) .EQ. 'UB') THEN
1648 IFUN =5
1649 ELSE IF (STRFUN(1:2) .EQ. 'SB') THEN
1650 IFUN =6
1651 ELSE IF (STRFUN(1:2) .EQ. 'CB') THEN
1652 IFUN =7
1653 ELSE IF (STRFUN(1:2) .EQ. 'BB') THEN
1654 IFUN =8
1655 ELSE IF (STRFUN(1:2) .EQ. 'TB') THEN
1656 IFUN =9
1657 ENDIF
1658 FUNC=0.
1659C IF(X.GT.XMIN.AND.X.LT.XMAX) THEN
1660 IF(X.LT.XMAX) THEN
1661 ARG(1)=LOG10(X)
1662 ARG(2)=LOG10(QSTAR2)
1663 FUNC =FINT(NARG,ARG,NENT,ENT,XQDUM(1,1,IFUN))
1664 ENDIF
1665 IF (FUNC.LT.0.) FUNC=0.
1666 END