/[PAMELA software]/gpamela/gcdes/s_csdat.inc
ViewVC logotype

Annotation of /gpamela/gcdes/s_csdat.inc

Parent Directory Parent Directory | Revision Log Revision Log


Revision 3.1 - (hide annotations) (download)
Fri Nov 3 11:22:44 2006 UTC (18 years, 1 month ago) by bottai
Branch: MAIN
CVS Tags: v4r8, v4r9, v4r14, v4r12, v4r13, v4r10, v4r11, HEAD
 needed by ghesig

1 bottai 3.1 *
2     * $Id: s_csdat.inc,v 1.1.1.1 1995/10/24 10:20:43 cernlib Exp $
3     *
4     * $Log: s_csdat.inc,v $
5     * Revision 1.1.1.1 1995/10/24 10:20:43 cernlib
6     * Geant
7     *
8     *
9     #ifndef CERNLIB_GEANT321_S_CSDAT_INC
10     #define CERNLIB_GEANT321_S_CSDAT_INC
11     *
12     *
13     * s_csdat.inc
14     *
15     C --- CROSS-SECTION DATA BY "PCSDAT" 01-FEB-1989 ---
16     C
17     DATA PLAB /
18     $ 0.00000E+00, 0.10000 , 0.15000 , 0.20000 , 0.25000 ,
19     $ 0.30000 , 0.35000 , 0.40000 , 0.45000 , 0.50000 ,
20     $ 0.55000 , 0.60000 , 0.65000 , 0.70000 , 0.75000 ,
21     $ 0.80000 , 0.85000 , 0.90000 , 0.95000 , 1.0000 ,
22     $ 1.1000 , 1.2000 , 1.3000 , 1.4000 , 1.5000 ,
23     $ 1.6000 , 1.8000 , 2.0000 , 2.2000 , 2.4000 ,
24     $ 2.6000 , 2.8000 , 3.0000 , 4.0000 , 5.0000 ,
25     $ 6.0000 , 8.0000 , 10.000 , 20.000 , 100.00 ,
26     $ 1000.0 /
27     DATA (CSEL( 1,J),J=1,41) /
28     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
29     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
30     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
31     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
32     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
33     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
34     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
35     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
36     $ 0.00000E+00/
37     DATA (CSEL( 2,J),J=1,41) /
38     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
39     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
40     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
41     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
42     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
43     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
44     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
45     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
46     $ 0.00000E+00/
47     DATA (CSEL( 3,J),J=1,41) /
48     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
49     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
50     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
51     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
52     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
53     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
54     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
55     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
56     $ 0.00000E+00/
57     DATA (CSEL( 4,J),J=1,41) /
58     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
59     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
60     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
61     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
62     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
63     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
64     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
65     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
66     $ 0.00000E+00/
67     DATA (CSEL( 5,J),J=1,41) /
68     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
69     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
70     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
71     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
72     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
73     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
74     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
75     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
76     $ 0.00000E+00/
77     DATA (CSEL( 6,J),J=1,41) /
78     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
79     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
80     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
81     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
82     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
83     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
84     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
85     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
86     $ 0.00000E+00/
87     DATA (CSEL( 7,J),J=1,41) /
88     $ 0.00000E+00, 6.0000 , 20.000 , 71.000 , 155.00 ,
89     $ 195.00 , 130.00 , 78.000 , 60.000 , 32.000 ,
90     $ 23.500 , 18.500 , 15.000 , 12.500 , 10.000 ,
91     $ 9.1000 , 8.6000 , 8.8000 , 9.5000 , 10.600 ,
92     $ 13.000 , 15.500 , 17.100 , 17.200 , 16.200 ,
93     $ 15.000 , 12.300 , 10.200 , 9.0000 , 8.0000 ,
94     $ 7.3000 , 6.8000 , 6.5000 , 5.8000 , 5.4000 ,
95     $ 5.2000 , 5.0000 , 4.9000 , 3.8000 , 3.2000 ,
96     $ 3.5000 /
97     DATA (CSEL( 8,J),J=1,41) /
98     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
99     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
100     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
101     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
102     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
103     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
104     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
105     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
106     $ 0.00000E+00/
107     DATA (CSEL( 9,J),J=1,41) /
108     $ 0.00000E+00, 1.0000 , 3.0000 , 8.0000 , 18.000 ,
109     $ 25.000 , 27.500 , 12.300 , 10.600 , 11.000 ,
110     $ 12.500 , 14.500 , 17.000 , 19.400 , 19.800 ,
111     $ 16.800 , 14.000 , 14.800 , 20.000 , 26.100 ,
112     $ 19.500 , 15.000 , 12.800 , 11.500 , 10.500 ,
113     $ 9.8000 , 8.8000 , 8.2000 , 7.8000 , 7.5000 ,
114     $ 7.2000 , 7.0000 , 6.8000 , 6.1000 , 5.7000 ,
115     $ 5.4000 , 4.9000 , 4.6000 , 4.0000 , 3.3000 ,
116     $ 3.5000 /
117     DATA (CSEL(10,J),J=1,41) /
118     $ 10.000 , 11.200 , 11.300 , 11.400 , 11.500 ,
119     $ 11.600 , 11.800 , 12.000 , 12.100 , 12.200 ,
120     $ 12.300 , 12.400 , 12.500 , 12.500 , 12.500 ,
121     $ 12.400 , 12.300 , 12.200 , 12.000 , 11.800 ,
122     $ 11.200 , 11.500 , 9.9000 , 9.4000 , 8.8000 ,
123     $ 8.4000 , 7.5000 , 6.9000 , 6.3000 , 5.9000 ,
124     $ 5.5000 , 5.2000 , 5.0000 , 4.0000 , 3.5000 ,
125     $ 3.3000 , 3.1000 , 3.1000 , 3.0000 , 2.5000 ,
126     $ 3.0000 /
127     DATA (CSEL(11,J),J=1,41) /
128     $ 10.000 , 11.200 , 11.300 , 11.400 , 11.500 ,
129     $ 11.600 , 11.800 , 12.000 , 12.100 , 12.200 ,
130     $ 12.300 , 12.400 , 12.500 , 12.500 , 12.500 ,
131     $ 12.400 , 12.300 , 12.200 , 12.000 , 11.800 ,
132     $ 11.200 , 11.500 , 9.9000 , 9.4000 , 8.8000 ,
133     $ 8.4000 , 7.5000 , 6.9000 , 6.3000 , 5.9000 ,
134     $ 5.5000 , 5.2000 , 5.0000 , 4.0000 , 3.5000 ,
135     $ 3.3000 , 3.1000 , 3.1000 , 3.0000 , 2.5000 ,
136     $ 3.0000 /
137     DATA (CSEL(12,J),J=1,41) /
138     $ 160.83 , 82.800 , 58.575 , 43.683 , 34.792 ,
139     $ 28.650 , 24.367 , 20.917 , 18.192 , 16.300 ,
140     $ 14.608 , 13.017 , 12.250 , 11.700 , 12.017 ,
141     $ 14.075 , 15.842 , 16.433 , 16.042 , 15.008 ,
142     $ 12.575 , 10.708 , 9.2000 , 8.0167 , 7.2833 ,
143     $ 7.0750 , 6.6333 , 6.1250 , 5.6583 , 5.2750 ,
144     $ 4.9333 , 4.6250 , 4.4583 , 3.7333 , 3.3833 ,
145     $ 3.1833 , 2.9833 , 2.7500 , 2.3667 , 2.2000 ,
146     $ 2.6000 /
147     DATA (CSEL(13,J),J=1,41) /
148     $ 300.00 , 140.00 , 97.000 , 70.000 , 55.000 ,
149     $ 45.000 , 37.000 , 31.000 , 26.000 , 23.000 ,
150     $ 20.000 , 17.000 , 15.500 , 14.500 , 14.700 ,
151     $ 18.500 , 22.000 , 23.000 , 22.500 , 20.700 ,
152     $ 16.500 , 14.000 , 11.500 , 9.6000 , 8.6000 ,
153     $ 8.5000 , 8.3000 , 7.6000 , 7.0000 , 6.4000 ,
154     $ 5.9000 , 5.5000 , 5.3000 , 4.4000 , 4.1000 ,
155     $ 3.9000 , 3.7000 , 3.3000 , 2.6000 , 2.5000 ,
156     $ 3.0000 /
157     DATA (CSEL(14,J),J=1,41) /
158     $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
159     $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
160     $ 20.000 , 20.000 , 20.500 , 21.000 , 22.000 ,
161     $ 23.000 , 24.000 , 24.000 , 24.400 , 24.500 ,
162     $ 25.000 , 25.500 , 26.000 , 26.500 , 27.000 ,
163     $ 27.000 , 26.000 , 23.000 , 21.500 , 20.000 ,
164     $ 19.000 , 18.000 , 17.000 , 13.000 , 11.500 ,
165     $ 10.300 , 9.4000 , 9.0000 , 8.8000 , 7.0000 ,
166     $ 7.5000 /
167     DATA (CSEL(15,J),J=1,41) /
168     $ 200.00 , 163.00 , 141.00 , 120.00 , 111.00 ,
169     $ 99.500 , 92.500 , 86.500 , 82.000 , 78.000 ,
170     $ 74.000 , 71.000 , 67.500 , 65.000 , 62.500 ,
171     $ 59.700 , 58.100 , 56.300 , 54.700 , 52.700 ,
172     $ 50.000 , 48.400 , 47.000 , 46.000 , 45.200 ,
173     $ 42.800 , 39.200 , 36.300 , 32.800 , 30.400 ,
174     $ 28.100 , 26.300 , 24.500 , 19.250 , 16.840 ,
175     $ 14.600 , 12.340 , 11.210 , 8.8500 , 7.5000 ,
176     $ 7.5000 /
177     DATA (CSEL(16,J),J=1,41) /
178     $ 4200.0 , 440.00 , 420.00 , 400.00 , 230.00 ,
179     $ 160.00 , 105.00 , 80.000 , 62.000 , 50.000 ,
180     $ 45.000 , 41.000 , 38.000 , 36.000 , 35.000 ,
181     $ 34.000 , 33.000 , 32.000 , 31.500 , 31.000 ,
182     $ 30.500 , 30.000 , 29.500 , 29.000 , 28.500 ,
183     $ 28.000 , 26.000 , 23.000 , 21.500 , 20.000 ,
184     $ 19.000 , 18.000 , 17.000 , 13.000 , 11.500 ,
185     $ 10.300 , 9.4000 , 9.0000 , 8.8000 , 7.0000 ,
186     $ 7.5000 /
187     DATA (CSEL(17,J),J=1,41) /
188     $ 185.88 , 133.23 , 119.37 , 102.86 , 93.102 ,
189     $ 82.752 , 76.205 , 71.008 , 67.366 , 64.096 ,
190     $ 60.891 , 58.501 , 55.735 , 53.773 , 51.839 ,
191     $ 49.671 , 48.485 , 47.045 , 45.803 , 44.306 ,
192     $ 42.623 , 41.786 , 41.115 , 40.630 , 40.129 ,
193     $ 38.242 , 35.233 , 32.662 , 29.639 , 27.573 ,
194     $ 25.536 , 23.948 , 22.356 , 17.723 , 15.614 ,
195     $ 13.653 , 11.675 , 10.653 , 8.6198 , 7.4464 ,
196     $ 7.4821 /
197     DATA (CSEL(18,J),J=1,41) /
198     $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
199     $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
200     $ 20.000 , 19.067 , 19.333 , 19.500 , 19.833 ,
201     $ 20.567 , 21.800 , 22.900 , 23.869 , 23.809 ,
202     $ 22.161 , 21.488 , 19.732 , 19.433 , 19.345 ,
203     $ 19.029 , 18.121 , 16.280 , 15.258 , 14.280 ,
204     $ 13.644 , 12.963 , 12.316 , 9.5333 , 8.4333 ,
205     $ 7.5728 , 6.9696 , 6.7518 , 6.6175 , 5.6000 ,
206     $ 6.1145 /
207     DATA (CSEL(19,J),J=1,41) /
208     $ 157.65 , 73.701 , 76.096 , 68.571 , 57.305 ,
209     $ 49.257 , 43.616 , 40.024 , 38.098 , 36.287 ,
210     $ 34.674 , 33.105 , 31.712 , 30.685 , 29.613 ,
211     $ 28.602 , 28.336 , 28.075 , 27.786 , 27.215 ,
212     $ 26.380 , 26.146 , 25.108 , 24.783 , 24.360 ,
213     $ 23.219 , 21.431 , 20.095 , 18.382 , 17.267 ,
214     $ 16.100 , 15.175 , 14.271 , 11.573 , 10.305 ,
215     $ 9.1471 , 8.0149 , 7.4349 , 6.2499 , 5.8928 ,
216     $ 6.0774 /
217     DATA (CSEL(20,J),J=1,41) /
218     $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
219     $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
220     $ 20.000 , 19.067 , 19.333 , 19.500 , 19.833 ,
221     $ 20.567 , 21.800 , 22.900 , 23.869 , 23.809 ,
222     $ 22.161 , 21.488 , 19.732 , 19.433 , 19.345 ,
223     $ 19.029 , 18.121 , 16.280 , 15.258 , 14.280 ,
224     $ 13.644 , 12.963 , 12.316 , 9.5333 , 8.4333 ,
225     $ 7.5728 , 6.9696 , 6.7518 , 6.6175 , 5.6000 ,
226     $ 6.1145 /
227     DATA (CSEL(21,J),J=1,41) /
228     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
229     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
230     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
231     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
232     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
233     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
234     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
235     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
236     $ 0.00000E+00/
237     DATA (CSEL(22,J),J=1,41) /
238     $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
239     $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
240     $ 20.000 , 19.067 , 19.333 , 19.500 , 19.833 ,
241     $ 20.567 , 21.800 , 22.900 , 23.869 , 23.809 ,
242     $ 22.161 , 21.488 , 19.732 , 19.433 , 19.345 ,
243     $ 19.029 , 18.121 , 16.280 , 15.258 , 14.280 ,
244     $ 13.644 , 12.963 , 12.316 , 9.5333 , 8.4333 ,
245     $ 7.5728 , 6.9696 , 6.7518 , 6.6175 , 5.6000 ,
246     $ 6.1145 /
247     DATA (CSEL(23,J),J=1,41) /
248     $ 185.88 , 133.23 , 119.37 , 102.86 , 93.102 ,
249     $ 82.752 , 76.205 , 71.008 , 67.366 , 64.096 ,
250     $ 60.891 , 58.104 , 55.241 , 53.140 , 50.934 ,
251     $ 48.660 , 47.566 , 46.585 , 45.581 , 44.003 ,
252     $ 41.134 , 39.374 , 36.878 , 35.523 , 34.503 ,
253     $ 32.334 , 29.365 , 27.370 , 24.705 , 22.921 ,
254     $ 21.229 , 19.879 , 18.559 , 14.625 , 12.758 ,
255     $ 11.041 , 9.3440 , 8.5484 , 6.7104 , 6.0000 ,
256     $ 6.1131 /
257     DATA (CSEL(24,J),J=1,41) /
258     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
259     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
260     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
261     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
262     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
263     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
264     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
265     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
266     $ 0.00000E+00/
267     DATA (CSEL(25,J),J=1,41) /
268     $ 157.65 , 73.701 , 76.096 , 68.571 , 57.305 ,
269     $ 49.257 , 43.616 , 40.024 , 38.098 , 36.287 ,
270     $ 34.674 , 33.105 , 31.712 , 30.685 , 29.613 ,
271     $ 28.602 , 28.336 , 28.075 , 27.786 , 27.215 ,
272     $ 26.380 , 26.146 , 25.108 , 24.783 , 24.360 ,
273     $ 23.219 , 21.431 , 20.095 , 18.382 , 17.267 ,
274     $ 16.100 , 15.175 , 14.271 , 11.573 , 10.305 ,
275     $ 9.1471 , 8.0149 , 7.4349 , 6.2499 , 5.8928 ,
276     $ 6.0774 /
277     DATA (CSEL(26,J),J=1,41) /
278     $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
279     $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
280     $ 20.000 , 18.133 , 18.167 , 18.000 , 17.667 ,
281     $ 18.133 , 19.600 , 21.800 , 23.338 , 23.118 ,
282     $ 19.323 , 17.476 , 13.464 , 12.367 , 11.691 ,
283     $ 11.057 , 10.242 , 9.5593 , 9.0151 , 8.5591 ,
284     $ 8.2884 , 7.9253 , 7.6311 , 6.0667 , 5.3667 ,
285     $ 4.8456 , 4.5392 , 4.5036 , 4.4351 , 4.2000 ,
286     $ 4.7289 /
287     DATA (CSEL(27,J),J=1,41) /
288     $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
289     $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
290     $ 20.000 , 18.133 , 18.167 , 18.000 , 17.667 ,
291     $ 18.133 , 19.600 , 21.800 , 23.338 , 23.118 ,
292     $ 19.323 , 17.476 , 13.464 , 12.367 , 11.691 ,
293     $ 11.057 , 10.242 , 9.5593 , 9.0151 , 8.5591 ,
294     $ 8.2884 , 7.9253 , 7.6311 , 6.0667 , 5.3667 ,
295     $ 4.8456 , 4.5392 , 4.5036 , 4.4351 , 4.2000 ,
296     $ 4.7289 /
297     DATA (CSEL(28,J),J=1,41) /
298     $ 157.65 , 73.701 , 76.096 , 68.571 , 57.305 ,
299     $ 49.257 , 43.616 , 40.024 , 38.098 , 36.287 ,
300     $ 34.674 , 32.708 , 31.218 , 30.052 , 28.707 ,
301     $ 27.591 , 27.417 , 27.615 , 27.564 , 26.913 ,
302     $ 24.891 , 23.734 , 20.871 , 19.677 , 18.734 ,
303     $ 17.311 , 15.563 , 14.803 , 13.448 , 12.615 ,
304     $ 11.794 , 11.106 , 10.474 , 8.4745 , 7.4498 ,
305     $ 6.5350 , 5.6835 , 5.3300 , 4.3406 , 4.4464 ,
306     $ 4.7083 /
307     DATA (CSEL(29,J),J=1,41) /
308     $ 143.53 , 43.935 , 54.462 , 51.429 , 39.407 ,
309     $ 32.510 , 27.321 , 24.532 , 23.465 , 22.383 ,
310     $ 21.566 , 20.209 , 19.453 , 18.825 , 18.046 ,
311     $ 17.562 , 17.802 , 18.360 , 18.667 , 18.519 ,
312     $ 17.514 , 17.120 , 14.985 , 14.306 , 13.663 ,
313     $ 12.753 , 11.596 , 11.165 , 10.287 , 9.7882 ,
314     $ 9.2294 , 8.7539 , 8.3300 , 6.9480 , 6.2234 ,
315     $ 5.5881 , 5.0189 , 4.7733 , 4.1104 , 4.3929 ,
316     $ 4.6905 /
317     DATA (CSEL(30,J),J=1,41) /
318     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
319     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
320     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
321     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
322     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
323     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
324     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
325     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
326     $ 0.00000E+00/
327     DATA (CSEL(31,J),J=1,41) /
328     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
329     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
330     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
331     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
332     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
333     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
334     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
335     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
336     $ 0.00000E+00/
337     DATA (CSEL(32,J),J=1,41) /
338     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
339     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
340     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
341     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
342     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
343     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
344     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
345     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
346     $ 0.00000E+00/
347     DATA (CSEL(33,J),J=1,41) /
348     $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
349     $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
350     $ 20.000 , 18.133 , 18.167 , 18.000 , 17.667 ,
351     $ 18.133 , 19.600 , 21.800 , 23.338 , 23.118 ,
352     $ 19.323 , 17.476 , 13.464 , 12.367 , 11.691 ,
353     $ 11.057 , 10.242 , 9.5593 , 9.0151 , 8.5591 ,
354     $ 8.2884 , 7.9253 , 7.6311 , 6.0667 , 5.3667 ,
355     $ 4.8456 , 4.5392 , 4.5036 , 4.4351 , 4.2000 ,
356     $ 4.7289 /
357     DATA (CSEL(34,J),J=1,41) /
358     $ 143.53 , 43.935 , 54.462 , 51.429 , 39.407 ,
359     $ 32.510 , 27.321 , 24.532 , 23.465 , 22.383 ,
360     $ 21.566 , 20.209 , 19.453 , 18.825 , 18.046 ,
361     $ 17.562 , 17.802 , 18.360 , 18.667 , 18.519 ,
362     $ 17.514 , 17.120 , 14.985 , 14.306 , 13.663 ,
363     $ 12.753 , 11.596 , 11.165 , 10.287 , 9.7882 ,
364     $ 9.2294 , 8.7539 , 8.3300 , 6.9480 , 6.2234 ,
365     $ 5.5881 , 5.0189 , 4.7733 , 4.1104 , 4.3929 ,
366     $ 4.6905 /
367     DATA (CSEL(35,J),J=1,41) /
368     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
369     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
370     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
371     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
372     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
373     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
374     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
375     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
376     $ 0.00000E+00/
377     DATA (CSIN( 1,J),J=1,41) /
378     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
379     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
380     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
381     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
382     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
383     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
384     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
385     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
386     $ 0.00000E+00/
387     DATA (CSIN( 2,J),J=1,41) /
388     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
389     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
390     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
391     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
392     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
393     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
394     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
395     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
396     $ 0.00000E+00/
397     DATA (CSIN( 3,J),J=1,41) /
398     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
399     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
400     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
401     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
402     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
403     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
404     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
405     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
406     $ 0.00000E+00/
407     DATA (CSIN( 4,J),J=1,41) /
408     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
409     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
410     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
411     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
412     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
413     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
414     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
415     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
416     $ 0.00000E+00/
417     DATA (CSIN( 5,J),J=1,41) /
418     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
419     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
420     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
421     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
422     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
423     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
424     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
425     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
426     $ 0.00000E+00/
427     DATA (CSIN( 6,J),J=1,41) /
428     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
429     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
430     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
431     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
432     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
433     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
434     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
435     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
436     $ 0.00000E+00/
437     DATA (CSIN( 7,J),J=1,41) /
438     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
439     $ 0.00000E+00, 0.00000E+00, 0.50000 , 1.2000 , 1.7000 ,
440     $ 2.2500 , 3.0000 , 3.6000 , 4.5000 , 5.4000 ,
441     $ 6.3000 , 8.6000 , 9.0000 , 10.000 , 11.500 ,
442     $ 14.000 , 17.000 , 19.500 , 22.000 , 24.000 ,
443     $ 21.500 , 18.500 , 19.000 , 20.500 , 22.200 ,
444     $ 23.000 , 23.300 , 23.000 , 21.000 , 20.500 ,
445     $ 20.200 , 20.100 , 20.000 , 20.000 , 20.000 ,
446     $ 21.000 /
447     DATA (CSIN( 8,J),J=1,41) /
448     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
449     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
450     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
451     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
452     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
453     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
454     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
455     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
456     $ 0.00000E+00/
457     DATA (CSIN( 9,J),J=1,41) /
458     $ 0.00000E+00, 3.0000 , 9.2000 , 20.500 , 36.500 ,
459     $ 45.000 , 28.000 , 19.500 , 15.500 , 14.200 ,
460     $ 15.500 , 17.500 , 20.000 , 23.000 , 26.000 ,
461     $ 20.000 , 23.000 , 26.500 , 32.000 , 35.000 ,
462     $ 28.500 , 22.000 , 22.500 , 23.500 , 24.000 ,
463     $ 24.500 , 26.000 , 27.500 , 27.500 , 27.000 ,
464     $ 26.500 , 25.500 , 25.000 , 23.000 , 22.500 ,
465     $ 22.200 , 22.000 , 22.000 , 21.200 , 20.700 ,
466     $ 21.000 /
467     DATA (CSIN(10,J),J=1,41) /
468     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
469     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
470     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
471     $ 0.50000 , 1.5000 , 2.7000 , 3.8000 , 4.8000 ,
472     $ 6.5000 , 7.6000 , 8.4000 , 9.0000 , 9.4000 ,
473     $ 9.8000 , 10.500 , 11.000 , 11.500 , 11.800 ,
474     $ 12.200 , 12.400 , 12.600 , 13.200 , 13.500 ,
475     $ 13.700 , 14.000 , 14.200 , 14.500 , 16.400 ,
476     $ 17.000 /
477     DATA (CSIN(11,J),J=1,41) /
478     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
479     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
480     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
481     $ 0.50000 , 1.5000 , 2.7000 , 3.8000 , 4.8000 ,
482     $ 6.5000 , 7.6000 , 8.4000 , 9.0000 , 9.4000 ,
483     $ 9.8000 , 10.500 , 11.000 , 11.500 , 11.800 ,
484     $ 12.200 , 12.400 , 12.600 , 13.200 , 13.500 ,
485     $ 13.700 , 14.000 , 14.200 , 14.500 , 16.400 ,
486     $ 17.000 /
487     DATA (CSIN(12,J),J=1,41) /
488     $ 266.67 , 133.33 , 83.333 , 57.083 , 44.500 ,
489     $ 33.250 , 24.583 , 20.833 , 18.333 , 16.083 ,
490     $ 15.625 , 15.083 , 14.833 , 15.083 , 15.833 ,
491     $ 17.042 , 18.958 , 20.758 , 22.533 , 22.825 ,
492     $ 21.250 , 18.567 , 17.767 , 18.100 , 19.933 ,
493     $ 20.783 , 21.225 , 21.000 , 20.558 , 20.258 ,
494     $ 20.017 , 19.767 , 19.600 , 19.183 , 18.850 ,
495     $ 18.575 , 18.350 , 18.175 , 17.808 , 17.558 ,
496     $ 19.250 /
497     DATA (CSIN(13,J),J=1,41) /
498     $ 400.00 , 200.00 , 120.00 , 81.000 , 62.000 ,
499     $ 47.000 , 35.000 , 28.000 , 24.000 , 21.000 ,
500     $ 19.500 , 19.000 , 18.800 , 19.000 , 20.000 ,
501     $ 21.000 , 23.000 , 25.000 , 27.000 , 27.500 ,
502     $ 25.500 , 22.000 , 20.800 , 21.000 , 23.000 ,
503     $ 24.000 , 24.000 , 23.800 , 23.000 , 22.500 ,
504     $ 22.000 , 21.600 , 21.400 , 21.000 , 20.500 ,
505     $ 20.200 , 19.800 , 19.500 , 18.600 , 17.500 ,
506     $ 20.000 /
507     DATA (CSIN(14,J),J=1,41) /
508     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
509     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
510     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
511     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.10000 , 1.5000 ,
512     $ 7.0000 , 12.000 , 17.000 , 19.500 , 20.500 ,
513     $ 22.000 , 23.500 , 24.800 , 25.800 , 26.500 ,
514     $ 27.000 , 27.500 , 28.000 , 30.000 , 31.000 ,
515     $ 32.000 , 32.500 , 32.500 , 33.000 , 33.500 ,
516     $ 34.000 /
517     DATA (CSIN(15,J),J=1,41) /
518     $ 1500.0 , 1160.0 , 310.00 , 230.00 , 178.00 ,
519     $ 153.00 , 134.00 , 124.00 , 113.00 , 106.00 ,
520     $ 101.00 , 96.000 , 92.000 , 89.000 , 87.000 ,
521     $ 84.000 , 81.000 , 78.500 , 76.500 , 75.000 ,
522     $ 72.000 , 70.000 , 68.000 , 64.500 , 63.000 ,
523     $ 62.000 , 61.000 , 59.500 , 58.500 , 56.500 ,
524     $ 56.500 , 56.000 , 55.500 , 52.000 , 50.000 ,
525     $ 48.000 , 45.000 , 44.000 , 39.200 , 34.500 ,
526     $ 34.500 /
527     DATA (CSIN(16,J),J=1,41) /
528     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
529     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
530     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
531     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.10000 , 1.5000 ,
532     $ 7.0000 , 12.000 , 17.000 , 19.500 , 20.500 ,
533     $ 22.000 , 23.500 , 24.800 , 25.800 , 26.500 ,
534     $ 27.000 , 27.500 , 28.000 , 30.000 , 31.000 ,
535     $ 32.000 , 32.500 , 32.500 , 33.000 , 33.500 ,
536     $ 34.000 /
537     DATA (CSIN(17,J),J=1,41) /
538     $ 1394.1 , 948.17 , 262.43 , 197.14 , 149.30 ,
539     $ 127.25 , 110.39 , 101.79 , 92.834 , 87.104 ,
540     $ 83.109 , 79.099 , 75.965 , 73.627 , 72.161 ,
541     $ 69.889 , 67.595 , 65.595 , 64.057 , 63.054 ,
542     $ 61.377 , 60.434 , 59.485 , 56.970 , 55.931 ,
543     $ 55.398 , 54.827 , 53.538 , 52.861 , 51.247 ,
544     $ 51.344 , 50.992 , 50.644 , 47.876 , 46.358 ,
545     $ 44.887 , 42.577 , 41.815 , 38.180 , 34.254 ,
546     $ 34.418 /
547     DATA (CSIN(18,J),J=1,41) /
548     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
549     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
550     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
551     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.97815E-01, 1.4577 ,
552     $ 6.2052 , 10.112 , 12.902 , 14.300 , 14.688 ,
553     $ 15.505 , 16.379 , 17.554 , 18.309 , 18.920 ,
554     $ 19.389 , 19.804 , 20.284 , 22.000 , 22.733 ,
555     $ 23.527 , 24.097 , 24.382 , 24.816 , 26.800 ,
556     $ 27.719 /
557     DATA (CSIN(19,J),J=1,41) /
558     $ 1182.4 , 524.50 , 167.30 , 131.43 , 91.895 ,
559     $ 75.743 , 63.184 , 57.376 , 52.502 , 49.313 ,
560     $ 47.326 , 44.762 , 43.222 , 42.015 , 41.221 ,
561     $ 40.244 , 39.504 , 39.145 , 38.860 , 38.731 ,
562     $ 37.987 , 37.814 , 36.326 , 34.750 , 33.953 ,
563     $ 33.635 , 33.349 , 32.938 , 32.785 , 32.092 ,
564     $ 32.373 , 32.312 , 32.329 , 31.261 , 30.597 ,
565     $ 30.073 , 29.228 , 29.182 , 27.683 , 27.107 ,
566     $ 27.956 /
567     DATA (CSIN(20,J),J=1,41) /
568     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
569     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
570     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
571     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.97815E-01, 1.4577 ,
572     $ 6.2052 , 10.112 , 12.902 , 14.300 , 14.688 ,
573     $ 15.505 , 16.379 , 17.554 , 18.309 , 18.920 ,
574     $ 19.389 , 19.804 , 20.284 , 22.000 , 22.733 ,
575     $ 23.527 , 24.097 , 24.382 , 24.816 , 26.800 ,
576     $ 27.719 /
577     DATA (CSIN(21,J),J=1,41) /
578     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
579     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
580     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
581     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
582     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
583     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
584     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
585     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
586     $ 0.00000E+00/
587     DATA (CSIN(22,J),J=1,41) /
588     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
589     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
590     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
591     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.97815E-01, 1.4577 ,
592     $ 6.2052 , 10.112 , 12.902 , 14.300 , 14.688 ,
593     $ 15.505 , 16.379 , 17.554 , 18.309 , 18.920 ,
594     $ 19.389 , 19.804 , 20.284 , 22.000 , 22.733 ,
595     $ 23.527 , 24.097 , 24.382 , 24.816 , 26.800 ,
596     $ 27.719 /
597     DATA (CSIN(23,J),J=1,41) /
598     $ 1394.1 , 948.17 , 262.43 , 197.14 , 149.30 ,
599     $ 127.25 , 110.39 , 101.79 , 92.834 , 87.104 ,
600     $ 83.109 , 78.563 , 75.292 , 72.760 , 70.900 ,
601     $ 68.467 , 66.314 , 64.955 , 63.746 , 62.623 ,
602     $ 59.233 , 56.946 , 53.355 , 49.810 , 48.090 ,
603     $ 46.839 , 45.695 , 44.863 , 44.062 , 42.599 ,
604     $ 42.684 , 42.328 , 42.041 , 39.508 , 37.880 ,
605     $ 36.299 , 34.075 , 33.553 , 29.723 , 27.600 ,
606     $ 28.120 /
607     DATA (CSIN(24,J),J=1,41) /
608     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
609     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
610     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
611     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
612     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
613     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
614     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
615     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
616     $ 0.00000E+00/
617     DATA (CSIN(25,J),J=1,41) /
618     $ 1182.4 , 524.50 , 167.30 , 131.43 , 91.895 ,
619     $ 75.743 , 63.184 , 57.376 , 52.502 , 49.313 ,
620     $ 47.326 , 44.762 , 43.222 , 42.015 , 41.221 ,
621     $ 40.244 , 39.504 , 39.145 , 38.860 , 38.731 ,
622     $ 37.987 , 37.814 , 36.326 , 34.750 , 33.953 ,
623     $ 33.635 , 33.349 , 32.938 , 32.785 , 32.092 ,
624     $ 32.373 , 32.312 , 32.329 , 31.261 , 30.597 ,
625     $ 30.073 , 29.228 , 29.182 , 27.683 , 27.107 ,
626     $ 27.956 /
627     DATA (CSIN(26,J),J=1,41) /
628     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
629     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
630     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
631     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.95639E-01, 1.4154 ,
632     $ 5.4104 , 8.2240 , 8.8031 , 9.1000 , 8.8761 ,
633     $ 9.0095 , 9.2576 , 10.307 , 10.818 , 11.341 ,
634     $ 11.778 , 12.108 , 12.569 , 14.000 , 14.467 ,
635     $ 15.054 , 15.694 , 16.263 , 16.632 , 20.100 ,
636     $ 21.438 /
637     DATA (CSIN(27,J),J=1,41) /
638     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
639     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
640     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
641     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.95639E-01, 1.4154 ,
642     $ 5.4104 , 8.2240 , 8.8031 , 9.1000 , 8.8761 ,
643     $ 9.0095 , 9.2576 , 10.307 , 10.818 , 11.341 ,
644     $ 11.778 , 12.108 , 12.569 , 14.000 , 14.467 ,
645     $ 15.054 , 15.694 , 16.263 , 16.632 , 20.100 ,
646     $ 21.438 /
647     DATA (CSIN(28,J),J=1,41) /
648     $ 1182.4 , 524.50 , 167.30 , 131.43 , 91.895 ,
649     $ 75.743 , 63.184 , 57.376 , 52.502 , 49.313 ,
650     $ 47.326 , 44.225 , 42.549 , 41.148 , 39.960 ,
651     $ 38.822 , 38.223 , 38.505 , 38.549 , 38.301 ,
652     $ 35.843 , 34.326 , 30.196 , 27.590 , 26.112 ,
653     $ 25.076 , 24.217 , 24.264 , 23.985 , 23.445 ,
654     $ 23.713 , 23.647 , 23.726 , 22.892 , 22.119 ,
655     $ 21.485 , 20.726 , 20.921 , 19.226 , 20.454 ,
656     $ 21.658 /
657     DATA (CSIN(29,J),J=1,41) /
658     $ 1076.5 , 312.66 , 119.74 , 98.571 , 63.193 ,
659     $ 49.990 , 39.579 , 35.168 , 32.335 , 30.417 ,
660     $ 29.434 , 27.325 , 26.514 , 25.775 , 25.120 ,
661     $ 24.711 , 24.818 , 25.600 , 26.106 , 26.355 ,
662     $ 25.220 , 24.760 , 21.681 , 20.060 , 19.044 ,
663     $ 18.474 , 18.044 , 18.301 , 18.347 , 18.192 ,
664     $ 18.557 , 18.639 , 18.870 , 18.769 , 18.478 ,
665     $ 18.372 , 18.302 , 18.735 , 18.206 , 20.207 ,
666     $ 21.576 /
667     DATA (CSIN(30,J),J=1,41) /
668     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
669     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
670     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
671     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
672     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
673     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
674     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
675     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
676     $ 0.00000E+00/
677     DATA (CSIN(31,J),J=1,41) /
678     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
679     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
680     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
681     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
682     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
683     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
684     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
685     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
686     $ 0.00000E+00/
687     DATA (CSIN(32,J),J=1,41) /
688     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
689     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
690     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
691     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
692     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
693     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
694     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
695     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
696     $ 0.00000E+00/
697     DATA (CSIN(33,J),J=1,41) /
698     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
699     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
700     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
701     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.95639E-01, 1.4154 ,
702     $ 5.4104 , 8.2240 , 8.8031 , 9.1000 , 8.8761 ,
703     $ 9.0095 , 9.2576 , 10.307 , 10.818 , 11.341 ,
704     $ 11.778 , 12.108 , 12.569 , 14.000 , 14.467 ,
705     $ 15.054 , 15.694 , 16.263 , 16.632 , 20.100 ,
706     $ 21.438 /
707     DATA (CSIN(34,J),J=1,41) /
708     $ 1076.5 , 312.66 , 119.74 , 98.571 , 63.193 ,
709     $ 49.990 , 39.579 , 35.168 , 32.335 , 30.417 ,
710     $ 29.434 , 27.325 , 26.514 , 25.775 , 25.120 ,
711     $ 24.711 , 24.818 , 25.600 , 26.106 , 26.355 ,
712     $ 25.220 , 24.760 , 21.681 , 20.060 , 19.044 ,
713     $ 18.474 , 18.044 , 18.301 , 18.347 , 18.192 ,
714     $ 18.557 , 18.639 , 18.870 , 18.769 , 18.478 ,
715     $ 18.372 , 18.302 , 18.735 , 18.206 , 20.207 ,
716     $ 21.576 /
717     DATA (CSIN(35,J),J=1,41) /
718     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
719     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
720     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
721     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
722     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
723     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
724     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
725     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
726     $ 0.00000E+00/
727     DATA (CSPIEL( 1,J),J=1,41) /
728     $ 0.00000E+00, 350.00 , 580.00 , 600.00 , 550.00 ,
729     $ 450.00 , 410.00 , 370.00 , 340.00 , 230.00 ,
730     $ 220.00 , 205.00 , 180.00 , 155.00 , 145.00 ,
731     $ 140.00 , 160.00 , 195.00 , 235.00 , 250.00 ,
732     $ 270.00 , 280.00 , 300.00 , 300.00 , 290.00 ,
733     $ 285.00 , 265.00 , 240.00 , 230.00 , 222.00 ,
734     $ 204.00 , 196.00 , 190.00 , 170.00 , 170.00 ,
735     $ 160.00 , 150.00 , 140.00 , 120.00 , 80.000 ,
736     $ 80.000 /
737     DATA (CSPIEL( 2,J),J=1,41) /
738     $ 0.00000E+00, 700.00 , 1000.0 , 1200.0 , 1300.0 ,
739     $ 1300.0 , 1250.0 , 1250.0 , 1100.0 , 1000.0 ,
740     $ 940.00 , 740.00 , 700.00 , 670.00 , 660.00 ,
741     $ 670.00 , 680.00 , 700.00 , 735.00 , 800.00 ,
742     $ 810.00 , 820.00 , 820.00 , 810.00 , 800.00 ,
743     $ 800.00 , 700.00 , 600.00 , 500.00 , 470.00 ,
744     $ 440.00 , 410.00 , 380.00 , 330.00 , 330.00 ,
745     $ 330.00 , 330.00 , 330.00 , 285.00 , 240.00 ,
746     $ 240.00 /
747     DATA (CSPIEL( 3,J),J=1,41) /
748     $ 0.00000E+00, 1700.0 , 2200.0 , 2200.0 , 1800.0 ,
749     $ 1300.0 , 1200.0 , 900.00 , 900.00 , 1000.0 ,
750     $ 1100.0 , 1300.0 , 1400.0 , 1420.0 , 1490.0 ,
751     $ 1560.0 , 1580.0 , 1690.0 , 1795.0 , 2000.0 ,
752     $ 2070.0 , 2140.0 , 2050.0 , 2010.0 , 1970.0 ,
753     $ 1880.0 , 1690.0 , 1500.0 , 1420.0 , 1390.0 ,
754     $ 1350.0 , 1360.0 , 1370.0 , 1280.0 , 1290.0 ,
755     $ 1295.0 , 1250.0 , 1200.0 , 1050.0 , 900.00 ,
756     $ 900.00 /
757     DATA (CSPIIN( 1,J),J=1,41) /
758     $ 0.00000E+00, 200.00 , 320.00 , 500.00 , 600.00 ,
759     $ 600.00 , 590.00 , 530.00 , 510.00 , 470.00 ,
760     $ 430.00 , 425.00 , 420.00 , 425.00 , 425.00 ,
761     $ 430.00 , 430.00 , 435.00 , 435.00 , 440.00 ,
762     $ 430.00 , 430.00 , 420.00 , 420.00 , 420.00 ,
763     $ 415.00 , 415.00 , 410.00 , 410.00 , 408.00 ,
764     $ 406.00 , 404.00 , 400.00 , 380.00 , 340.00 ,
765     $ 340.00 , 340.00 , 340.00 , 340.00 , 340.00 ,
766     $ 340.00 /
767     DATA (CSPIIN( 2,J),J=1,41) /
768     $ 0.00000E+00, 400.00 , 800.00 , 1000.0 , 1100.0 ,
769     $ 1200.0 , 1150.0 , 1050.0 , 1000.0 , 900.00 ,
770     $ 860.00 , 860.00 , 850.00 , 850.00 , 840.00 ,
771     $ 830.00 , 820.00 , 810.00 , 805.00 , 800.00 ,
772     $ 800.00 , 800.00 , 800.00 , 800.00 , 800.00 ,
773     $ 800.00 , 800.00 , 800.00 , 800.00 , 780.00 ,
774     $ 760.00 , 740.00 , 720.00 , 720.00 , 700.00 ,
775     $ 690.00 , 680.00 , 670.00 , 665.00 , 660.00 ,
776     $ 660.00 /
777     DATA (CSPIIN( 3,J),J=1,41) /
778     $ 0.00000E+00, 1000.0 , 1900.0 , 2600.0 , 2900.0 ,
779     $ 3000.0 , 2800.0 , 2600.0 , 2500.0 , 2300.0 ,
780     $ 2200.0 , 2000.0 , 1900.0 , 1880.0 , 1860.0 ,
781     $ 1840.0 , 1820.0 , 1810.0 , 1805.0 , 1800.0 ,
782     $ 1780.0 , 1760.0 , 1750.0 , 1740.0 , 1730.0 ,
783     $ 1720.0 , 1710.0 , 1700.0 , 1680.0 , 1660.0 ,
784     $ 1650.0 , 1640.0 , 1630.0 , 1620.0 , 1610.0 ,
785     $ 1605.0 , 1600.0 , 1600.0 , 1550.0 , 1500.0 ,
786     $ 1500.0 /
787     DATA (CSPNEL( 1,J),J=1,41) /
788     $ 2100.0 , 1800.0 , 1500.0 , 1050.0 , 900.00 ,
789     $ 950.00 , 800.00 , 650.00 , 570.00 , 390.00 ,
790     $ 300.00 , 240.00 , 230.00 , 230.00 , 220.00 ,
791     $ 220.00 , 225.00 , 225.00 , 240.00 , 240.00 ,
792     $ 290.00 , 330.00 , 335.00 , 350.00 , 355.00 ,
793     $ 370.00 , 350.00 , 330.00 , 310.00 , 290.00 ,
794     $ 270.00 , 265.00 , 260.00 , 230.00 , 210.00 ,
795     $ 210.00 , 200.00 , 200.00 , 190.00 , 180.00 ,
796     $ 180.00 /
797     DATA (CSPNEL( 2,J),J=1,41) /
798     $ 3800.0 , 2900.0 , 1850.0 , 1550.0 , 1450.0 ,
799     $ 1520.0 , 1460.0 , 1300.0 , 1140.0 , 880.00 ,
800     $ 700.00 , 620.00 , 540.00 , 560.00 , 460.00 ,
801     $ 460.00 , 470.00 , 470.00 , 480.00 , 480.00 ,
802     $ 580.00 , 600.00 , 610.00 , 620.00 , 620.00 ,
803     $ 620.00 , 590.00 , 580.00 , 460.00 , 440.00 ,
804     $ 420.00 , 400.00 , 480.00 , 430.00 , 380.00 ,
805     $ 380.00 , 380.00 , 380.00 , 380.00 , 380.00 ,
806     $ 380.00 /
807     DATA (CSPNEL( 3,J),J=1,41) /
808     $ 7000.0 , 6000.0 , 4500.0 , 3350.0 , 2700.0 ,
809     $ 3000.0 , 3550.0 , 3970.0 , 3280.0 , 2490.0 ,
810     $ 2100.0 , 1510.0 , 1440.0 , 1370.0 , 1370.0 ,
811     $ 1370.0 , 1400.0 , 1400.0 , 1420.0 , 1420.0 ,
812     $ 1440.0 , 1460.0 , 1460.0 , 1450.0 , 1450.0 ,
813     $ 1470.0 , 1400.0 , 1400.0 , 1380.0 , 1370.0 ,
814     $ 1360.0 , 1350.0 , 1340.0 , 1330.0 , 1320.0 ,
815     $ 1310.0 , 1305.0 , 1300.0 , 1300.0 , 1300.0 ,
816     $ 1300.0 /
817     DATA (CSPNIN( 1,J),J=1,41) /
818     $ 0.00000E+00, 200.00 , 400.00 , 800.00 , 800.00 ,
819     $ 550.00 , 500.00 , 450.00 , 430.00 , 410.00 ,
820     $ 400.00 , 390.00 , 380.00 , 370.00 , 370.00 ,
821     $ 370.00 , 365.00 , 365.00 , 360.00 , 360.00 ,
822     $ 360.00 , 360.00 , 365.00 , 370.00 , 375.00 ,
823     $ 380.00 , 400.00 , 410.00 , 420.00 , 430.00 ,
824     $ 440.00 , 440.00 , 440.00 , 440.00 , 440.00 ,
825     $ 440.00 , 440.00 , 440.00 , 440.00 , 440.00 ,
826     $ 440.00 /
827     DATA (CSPNIN( 2,J),J=1,41) /
828     $ 0.00000E+00, 400.00 , 950.00 , 1050.0 , 1050.0 ,
829     $ 980.00 , 940.00 , 900.00 , 860.00 , 820.00 ,
830     $ 800.00 , 780.00 , 760.00 , 740.00 , 740.00 ,
831     $ 740.00 , 730.00 , 730.00 , 720.00 , 720.00 ,
832     $ 720.00 , 720.00 , 730.00 , 740.00 , 750.00 ,
833     $ 760.00 , 800.00 , 820.00 , 820.00 , 820.00 ,
834     $ 820.00 , 820.00 , 820.00 , 820.00 , 820.00 ,
835     $ 820.00 , 820.00 , 820.00 , 820.00 , 820.00 ,
836     $ 820.00 /
837     DATA (CSPNIN( 3,J),J=1,41) /
838     $ 0.00000E+00, 0.00000E+00, 500.00 , 1450.0 , 1700.0 ,
839     $ 1800.0 , 1750.0 , 1730.0 , 1720.0 , 1710.0 ,
840     $ 1700.0 , 1690.0 , 1660.0 , 1630.0 , 1630.0 ,
841     $ 1630.0 , 1600.0 , 1600.0 , 1580.0 , 1580.0 ,
842     $ 1580.0 , 1580.0 , 1600.0 , 1630.0 , 1650.0 ,
843     $ 1670.0 , 1760.0 , 1800.0 , 1800.0 , 1800.0 ,
844     $ 1800.0 , 1800.0 , 1800.0 , 1800.0 , 1800.0 ,
845     $ 1800.0 , 1800.0 , 1800.0 , 1800.0 , 1800.0 ,
846     $ 1800.0 /
847     DATA ELAB /
848     $ 0.10000E-03, 0.20000E-03, 0.30000E-03, 0.40000E-03, 0.50000E-03,
849     $ 0.70000E-03, 0.10000E-02, 0.20000E-02, 0.30000E-02, 0.40000E-02,
850     $ 0.50000E-02, 0.70000E-02, 0.10000E-01, 0.15000E-01, 0.20000E-01,
851     $ 0.25000E-01, 0.32700E-01/
852     DATA CNLWAT /
853     $ 1.0000 , 16.000 , 27.000 , 56.000 , 59.000 ,
854     $ 64.000 , 91.000 , 112.00 , 119.00 , 127.00 ,
855     $ 137.00 , 181.00 , 207.00 , 209.00 , 238.00 /
856     DATA (CNLWEL( 1,J),J=1,17) /
857     $ 6000.0 , 5500.0 , 5200.0 , 4900.0 , 4800.0 ,
858     $ 4400.0 , 4000.0 , 2900.0 , 2200.0 , 1800.0 ,
859     $ 1400.0 , 1100.0 , 900.00 , 700.00 , 600.00 ,
860     $ 560.00 , 520.00 /
861     DATA (CNLWEL( 2,J),J=1,17) /
862     $ 5400.0 , 5050.0 , 4800.0 , 4600.0 , 4399.0 ,
863     $ 4090.0 , 3700.0 , 2600.0 , 1950.0 , 1600.0 ,
864     $ 1300.0 , 900.00 , 700.00 , 800.00 , 1050.0 ,
865     $ 1250.0 , 1320.0 /
866     DATA (CNLWEL( 3,J),J=1,17) /
867     $ 5500.0 , 5150.0 , 4900.0 , 4699.0 , 4490.0 ,
868     $ 4150.0 , 3750.0 , 2790.0 , 2100.0 , 1650.0 ,
869     $ 1300.0 , 950.00 , 800.00 , 860.00 , 1000.0 ,
870     $ 1090.0 , 1080.0 /
871     DATA (CNLWEL( 4,J),J=1,17) /
872     $ 5499.0 , 4970.0 , 4450.0 , 4080.0 , 3750.0 ,
873     $ 3380.0 , 2900.0 , 2400.0 , 2380.0 , 2350.0 ,
874     $ 2300.0 , 2100.0 , 1720.0 , 1370.0 , 1200.0 ,
875     $ 1060.0 , 870.00 /
876     DATA (CNLWEL( 5,J),J=1,17) /
877     $ 5399.0 , 4710.0 , 4180.0 , 3760.0 , 3460.0 ,
878     $ 3150.0 , 2730.0 , 2270.0 , 1850.0 , 1850.0 ,
879     $ 2130.0 , 2330.0 , 2120.0 , 1640.0 , 1310.0 ,
880     $ 1100.0 , 1050.0 /
881     DATA (CNLWEL( 6,J),J=1,17) /
882     $ 5099.0 , 4405.0 , 3825.0 , 3455.0 , 3125.0 ,
883     $ 2695.0 , 2350.0 , 1850.0 , 1580.0 , 1820.0 ,
884     $ 2050.0 , 2210.0 , 2000.0 , 1590.0 , 1310.0 ,
885     $ 1120.0 , 1040.0 /
886     DATA (CNLWEL( 7,J),J=1,17) /
887     $ 6290.0 , 5960.0 , 5640.0 , 5370.0 , 5150.0 ,
888     $ 4800.0 , 4250.0 , 3150.0 , 2470.0 , 2100.0 ,
889     $ 2230.0 , 2420.0 , 2450.0 , 2050.0 , 1760.0 ,
890     $ 1550.0 , 1330.0 /
891     DATA (CNLWEL( 8,J),J=1,17) /
892     $ 6885.0 , 6650.0 , 6350.0 , 6150.0 , 6000.0 ,
893     $ 5700.0 , 5360.0 , 4250.0 , 2800.0 , 1870.0 ,
894     $ 1810.0 , 1820.0 , 2170.0 , 2450.0 , 2150.0 ,
895     $ 1700.0 , 1390.0 /
896     DATA (CNLWEL( 9,J),J=1,17) /
897     $ 6600.0 , 6500.0 , 6400.0 , 6249.0 , 6190.0 ,
898     $ 5950.0 , 5520.0 , 4250.0 , 2750.0 , 1900.0 ,
899     $ 1850.0 , 1950.0 , 2340.0 , 2800.0 , 2540.0 ,
900     $ 2100.0 , 1760.0 /
901     DATA (CNLWEL(10,J),J=1,17) /
902     $ 7400.0 , 7200.0 , 6999.0 , 6840.0 , 6655.0 ,
903     $ 6320.0 , 5820.0 , 4400.0 , 2850.0 , 2000.0 ,
904     $ 1800.0 , 1800.0 , 2150.0 , 2600.0 , 2350.0 ,
905     $ 1950.0 , 2100.0 /
906     DATA (CNLWEL(11,J),J=1,17) /
907     $ 7900.0 , 7700.0 , 7499.0 , 7390.0 , 7202.0 ,
908     $ 6810.0 , 6360.0 , 4920.0 , 3450.0 , 2600.0 ,
909     $ 2200.0 , 1950.0 , 2300.0 , 2800.0 , 2650.0 ,
910     $ 2250.0 , 2050.0 /
911     DATA (CNLWEL(12,J),J=1,17) /
912     $ 7900.0 , 7750.0 , 7699.0 , 7590.0 , 7450.0 ,
913     $ 7200.0 , 6850.0 , 5650.0 , 4400.0 , 3700.0 ,
914     $ 3400.0 , 2800.0 , 2700.0 , 3100.0 , 3250.0 ,
915     $ 3100.0 , 2750.0 /
916     DATA (CNLWEL(13,J),J=1,17) /
917     $ 6100.0 , 5950.0 , 5750.0 , 5599.0 , 5440.0 ,
918     $ 5200.0 , 4800.0 , 4300.0 , 5800.0 , 5750.0 ,
919     $ 4800.0 , 3420.0 , 2650.0 , 3200.0 , 3650.0 ,
920     $ 3500.0 , 2980.0 /
921     DATA (CNLWEL(14,J),J=1,17) /
922     $ 6100.0 , 5950.0 , 5750.0 , 5599.0 , 5440.0 ,
923     $ 5200.0 , 4800.0 , 4300.0 , 5800.0 , 5750.0 ,
924     $ 4800.0 , 3420.0 , 2650.0 , 3200.0 , 3650.0 ,
925     $ 3500.0 , 2980.0 /
926     DATA (CNLWEL(15,J),J=1,17) /
927     $ 6600.0 , 6350.0 , 6100.0 , 5899.0 , 5690.0 ,
928     $ 5300.0 , 4850.0 , 4450.0 , 5650.0 , 5700.0 ,
929     $ 4950.0 , 3850.0 , 3050.0 , 3050.0 , 3460.0 ,
930     $ 3650.0 , 3340.0 /
931     DATA (CNLWIN( 1,J),J=1,17) /
932     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
933     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
934     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
935     $ 0.00000E+00, 0.00000E+00/
936     DATA (CNLWIN( 2,J),J=1,17) /
937     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.0000 ,
938     $ 10.000 , 50.000 , 100.00 , 200.00 , 300.00 ,
939     $ 400.00 , 600.00 , 700.00 , 750.00 , 700.00 ,
940     $ 700.00 , 680.00 /
941     DATA (CNLWIN( 3,J),J=1,17) /
942     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 ,
943     $ 50.000 , 100.00 , 260.00 , 450.00 , 600.00 ,
944     $ 700.00 , 800.00 , 900.00 , 940.00 , 900.00 ,
945     $ 860.00 , 820.00 /
946     DATA (CNLWIN( 4,J),J=1,17) /
947     $ 1.0000 , 80.000 , 200.00 , 320.00 , 400.00 ,
948     $ 520.00 , 700.00 , 1000.0 , 1120.0 , 1200.0 ,
949     $ 1200.0 , 1200.0 , 1180.0 , 1130.0 , 1100.0 ,
950     $ 1090.0 , 1080.0 /
951     DATA (CNLWIN( 5,J),J=1,17) /
952     $ 1.0000 , 90.000 , 220.00 , 340.00 , 420.00 ,
953     $ 550.00 , 720.00 , 1080.0 , 1300.0 , 1400.0 ,
954     $ 1420.0 , 1420.0 , 1380.0 , 1260.0 , 1190.0 ,
955     $ 1150.0 , 1100.0 /
956     DATA (CNLWIN( 6,J),J=1,17) /
957     $ 1.0000 , 95.000 , 225.00 , 345.00 , 425.00 ,
958     $ 555.00 , 750.00 , 1150.0 , 1500.0 , 1680.0 ,
959     $ 1700.0 , 1690.0 , 1550.0 , 1360.0 , 1240.0 ,
960     $ 1180.0 , 1120.0 /
961     DATA (CNLWIN( 7,J),J=1,17) /
962     $ 10.000 , 140.00 , 260.00 , 380.00 , 450.00 ,
963     $ 600.00 , 750.00 , 1200.0 , 1580.0 , 1800.0 ,
964     $ 1820.0 , 1830.0 , 1800.0 , 1750.0 , 1690.0 ,
965     $ 1650.0 , 1620.0 /
966     DATA (CNLWIN( 8,J),J=1,17) /
967     $ 15.000 , 150.00 , 300.00 , 400.00 , 500.00 ,
968     $ 650.00 , 840.00 , 1500.0 , 2100.0 , 2130.0 ,
969     $ 2140.0 , 2130.0 , 2080.0 , 2000.0 , 1950.0 ,
970     $ 1900.0 , 1860.0 /
971     DATA (CNLWIN( 9,J),J=1,17) /
972     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 ,
973     $ 150.00 , 380.00 , 1000.0 , 1650.0 , 2100.0 ,
974     $ 2100.0 , 2100.0 , 2060.0 , 1950.0 , 1860.0 ,
975     $ 1800.0 , 1740.0 /
976     DATA (CNLWIN(10,J),J=1,17) /
977     $ 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 , 45.000 ,
978     $ 180.00 , 380.00 , 1050.0 , 1900.0 , 2300.0 ,
979     $ 2300.0 , 2200.0 , 2150.0 , 2000.0 , 1900.0 ,
980     $ 1800.0 , 1750.0 /
981     DATA (CNLWIN(11,J),J=1,17) /
982     $ 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 , 48.000 ,
983     $ 190.00 , 390.00 , 1080.0 , 2000.0 , 2400.0 ,
984     $ 2400.0 , 2300.0 , 2200.0 , 2100.0 , 1950.0 ,
985     $ 1850.0 , 1800.0 /
986     DATA (CNLWIN(12,J),J=1,17) /
987     $ 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 , 50.000 ,
988     $ 200.00 , 400.00 , 1100.0 , 2100.0 , 2500.0 ,
989     $ 2500.0 , 2450.0 , 2300.0 , 2100.0 , 2000.0 ,
990     $ 1900.0 , 1850.0 /
991     DATA (CNLWIN(13,J),J=1,17) /
992     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 ,
993     $ 100.00 , 350.00 , 900.00 , 1400.0 , 2000.0 ,
994     $ 2300.0 , 2380.0 , 2400.0 , 2300.0 , 2250.0 ,
995     $ 2200.0 , 2120.0 /
996     DATA (CNLWIN(14,J),J=1,17) /
997     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 ,
998     $ 100.00 , 350.00 , 900.00 , 1400.0 , 2000.0 ,
999     $ 2300.0 , 2380.0 , 2400.0 , 2300.0 , 2250.0 ,
1000     $ 2200.0 , 2120.0 /
1001     DATA (CNLWIN(15,J),J=1,17) /
1002     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 ,
1003     $ 100.00 , 400.00 , 950.00 , 1600.0 , 2200.0 ,
1004     $ 2550.0 , 2750.0 , 2700.0 , 2600.0 , 2540.0 ,
1005     $ 2450.0 , 2360.0 /
1006     DATA (CSCAP(J),J=1,50) /
1007     $ 6.0000 , 5.7000 , 5.5000 , 5.3000 , 5.2000 ,
1008     $ 5.1000 , 5.0000 , 4.9000 , 4.8000 , 4.8000 ,
1009     $ 4.8000 , 4.8000 , 4.8000 , 4.8000 , 4.8000 ,
1010     $ 4.8000 , 4.9000 , 5.0000 , 5.2000 , 5.5000 ,
1011     $ 6.0000 , 6.7000 , 7.5000 , 8.5000 , 10.000 ,
1012     $ 12.000 , 14.500 , 19.000 , 26.500 , 40.000 ,
1013     $ 75.000 , 120.00 , 180.00 , 260.00 , 360.00 ,
1014     $ 330.00 , 60.000 , 7.0000 , 9.5000 , 20.000 ,
1015     $ 75.000 , 140.00 , 250.00 , 360.00 , 480.00 ,
1016     $ 580.00 , 590.00 , 500.00 , 300.00 , 100.00 /
1017     DATA (CSCAP(J),J=51,100) /
1018     $ 200.00 , 300.00 , 400.00 , 470.00 , 500.00 ,
1019     $ 430.00 , 100.00 , 20.000 , 22.000 , 40.000 ,
1020     $ 560.00 , 950.00 , 1000.0 , 1000.0 , 1000.0 ,
1021     $ 990.00 , 920.00 , 860.00 , 790.00 , 740.00 ,
1022     $ 650.00 , 600.00 , 540.00 , 470.00 , 440.00 ,
1023     $ 390.00 , 360.00 , 340.00 , 320.00 , 310.00 ,
1024     $ 280.00 , 2.0000 , 2.5000 , 6.0000 , 13.000 ,
1025     $ 38.000 , 65.000 , 140.00 , 280.00 , 300.00 ,
1026     $ 430.00 , 580.00 , 650.00 , 800.00 , 920.00 ,
1027     $ 1100.0 , 1250.0 , 1400.0 , 1550.0 , 1700.0 /
1028     DATA EKFISS /
1029     $ 0.10000E-03, 0.20000E-03, 0.30000E-03, 0.50000E-03, 0.70000E-03,
1030     $ 0.10000E-02, 0.15000E-02, 0.20000E-02, 0.30000E-02, 0.50000E-02,
1031     $ 0.70000E-02, 0.10000E-01, 0.15000E-01, 0.20000E-01, 0.50000E-01,
1032     $ 0.10000 , 0.20000 , 0.30000 , 0.40000 , 0.50000 ,
1033     $ 1000.0 /
1034     DATA (CSFISS( 1,J),J=1,21) /
1035     $ 2600.0 , 2300.0 , 2300.0 , 2100.0 , 2000.0 ,
1036     $ 1950.0 , 1930.0 , 1900.0 , 1800.0 , 1600.0 ,
1037     $ 2100.0 , 2300.0 , 0.00000E+00, 0.00000E+00, 0.00000E+00,
1038     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
1039     $ 0.00000E+00/
1040     DATA (CSFISS( 2,J),J=1,21) /
1041     $ 1850.0 , 1400.0 , 1300.0 , 1150.0 , 1100.0 ,
1042     $ 1200.0 , 1250.0 , 1300.0 , 1250.0 , 1150.0 ,
1043     $ 1600.0 , 1900.0 , 0.00000E+00, 0.00000E+00, 0.00000E+00,
1044     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
1045     $ 0.00000E+00/
1046     DATA (CSFISS( 3,J),J=1,21) /
1047     $ 1700.0 , 1650.0 , 1650.0 , 1700.0 , 1700.0 ,
1048     $ 1800.0 , 1900.0 , 2000.0 , 1950.0 , 1800.0 ,
1049     $ 2150.0 , 2450.0 , 0.00000E+00, 0.00000E+00, 0.00000E+00,
1050     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
1051     $ 0.00000E+00/
1052     DATA (CSFISS( 4,J),J=1,21) /
1053     $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
1054     $ 0.00000E+00, 250.00 , 550.00 , 550.00 , 550.00 ,
1055     $ 550.00 , 550.00 , 1000.0 , 1400.0 , 1600.0 ,
1056     $ 1500.0 , 1400.0 , 1300.0 , 1200.0 , 1100.0 ,
1057     $ 1000.0 /
1058     C --- END OF CROSS SECTION DATA STATEMENTS ---
1059     C
1060    
1061     #endif

  ViewVC Help
Powered by ViewVC 1.1.23