Warning, /include/geant321/s_csdat.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1995/10/24 10:20:42 cernlib
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_GEANT321_S_CSDAT_INC
0010 #define CERNLIB_GEANT321_S_CSDAT_INC
0011 *
0012 *
0013 * s_csdat.inc
0014 *
0015 C --- CROSS-SECTION DATA BY "PCSDAT" 01-FEB-1989 ---
0016 C
0017 DATA PLAB /
0018 $ 0.00000E+00, 0.10000 , 0.15000 , 0.20000 , 0.25000 ,
0019 $ 0.30000 , 0.35000 , 0.40000 , 0.45000 , 0.50000 ,
0020 $ 0.55000 , 0.60000 , 0.65000 , 0.70000 , 0.75000 ,
0021 $ 0.80000 , 0.85000 , 0.90000 , 0.95000 , 1.0000 ,
0022 $ 1.1000 , 1.2000 , 1.3000 , 1.4000 , 1.5000 ,
0023 $ 1.6000 , 1.8000 , 2.0000 , 2.2000 , 2.4000 ,
0024 $ 2.6000 , 2.8000 , 3.0000 , 4.0000 , 5.0000 ,
0025 $ 6.0000 , 8.0000 , 10.000 , 20.000 , 100.00 ,
0026 $ 1000.0 /
0027 DATA (CSEL( 1,J),J=1,41) /
0028 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0029 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0030 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0031 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0032 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0033 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0034 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0035 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0036 $ 0.00000E+00/
0037 DATA (CSEL( 2,J),J=1,41) /
0038 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0039 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0040 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0041 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0042 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0043 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0044 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0045 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0046 $ 0.00000E+00/
0047 DATA (CSEL( 3,J),J=1,41) /
0048 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0049 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0050 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0051 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0052 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0053 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0054 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0055 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0056 $ 0.00000E+00/
0057 DATA (CSEL( 4,J),J=1,41) /
0058 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0059 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0060 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0061 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0062 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0063 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0064 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0065 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0066 $ 0.00000E+00/
0067 DATA (CSEL( 5,J),J=1,41) /
0068 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0069 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0070 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0071 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0072 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0073 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0074 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0075 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0076 $ 0.00000E+00/
0077 DATA (CSEL( 6,J),J=1,41) /
0078 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0079 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0080 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0081 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0082 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0083 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0084 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0085 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0086 $ 0.00000E+00/
0087 DATA (CSEL( 7,J),J=1,41) /
0088 $ 0.00000E+00, 6.0000 , 20.000 , 71.000 , 155.00 ,
0089 $ 195.00 , 130.00 , 78.000 , 60.000 , 32.000 ,
0090 $ 23.500 , 18.500 , 15.000 , 12.500 , 10.000 ,
0091 $ 9.1000 , 8.6000 , 8.8000 , 9.5000 , 10.600 ,
0092 $ 13.000 , 15.500 , 17.100 , 17.200 , 16.200 ,
0093 $ 15.000 , 12.300 , 10.200 , 9.0000 , 8.0000 ,
0094 $ 7.3000 , 6.8000 , 6.5000 , 5.8000 , 5.4000 ,
0095 $ 5.2000 , 5.0000 , 4.9000 , 3.8000 , 3.2000 ,
0096 $ 3.5000 /
0097 DATA (CSEL( 8,J),J=1,41) /
0098 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0099 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0100 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0101 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0102 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0103 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0104 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0105 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0106 $ 0.00000E+00/
0107 DATA (CSEL( 9,J),J=1,41) /
0108 $ 0.00000E+00, 1.0000 , 3.0000 , 8.0000 , 18.000 ,
0109 $ 25.000 , 27.500 , 12.300 , 10.600 , 11.000 ,
0110 $ 12.500 , 14.500 , 17.000 , 19.400 , 19.800 ,
0111 $ 16.800 , 14.000 , 14.800 , 20.000 , 26.100 ,
0112 $ 19.500 , 15.000 , 12.800 , 11.500 , 10.500 ,
0113 $ 9.8000 , 8.8000 , 8.2000 , 7.8000 , 7.5000 ,
0114 $ 7.2000 , 7.0000 , 6.8000 , 6.1000 , 5.7000 ,
0115 $ 5.4000 , 4.9000 , 4.6000 , 4.0000 , 3.3000 ,
0116 $ 3.5000 /
0117 DATA (CSEL(10,J),J=1,41) /
0118 $ 10.000 , 11.200 , 11.300 , 11.400 , 11.500 ,
0119 $ 11.600 , 11.800 , 12.000 , 12.100 , 12.200 ,
0120 $ 12.300 , 12.400 , 12.500 , 12.500 , 12.500 ,
0121 $ 12.400 , 12.300 , 12.200 , 12.000 , 11.800 ,
0122 $ 11.200 , 11.500 , 9.9000 , 9.4000 , 8.8000 ,
0123 $ 8.4000 , 7.5000 , 6.9000 , 6.3000 , 5.9000 ,
0124 $ 5.5000 , 5.2000 , 5.0000 , 4.0000 , 3.5000 ,
0125 $ 3.3000 , 3.1000 , 3.1000 , 3.0000 , 2.5000 ,
0126 $ 3.0000 /
0127 DATA (CSEL(11,J),J=1,41) /
0128 $ 10.000 , 11.200 , 11.300 , 11.400 , 11.500 ,
0129 $ 11.600 , 11.800 , 12.000 , 12.100 , 12.200 ,
0130 $ 12.300 , 12.400 , 12.500 , 12.500 , 12.500 ,
0131 $ 12.400 , 12.300 , 12.200 , 12.000 , 11.800 ,
0132 $ 11.200 , 11.500 , 9.9000 , 9.4000 , 8.8000 ,
0133 $ 8.4000 , 7.5000 , 6.9000 , 6.3000 , 5.9000 ,
0134 $ 5.5000 , 5.2000 , 5.0000 , 4.0000 , 3.5000 ,
0135 $ 3.3000 , 3.1000 , 3.1000 , 3.0000 , 2.5000 ,
0136 $ 3.0000 /
0137 DATA (CSEL(12,J),J=1,41) /
0138 $ 160.83 , 82.800 , 58.575 , 43.683 , 34.792 ,
0139 $ 28.650 , 24.367 , 20.917 , 18.192 , 16.300 ,
0140 $ 14.608 , 13.017 , 12.250 , 11.700 , 12.017 ,
0141 $ 14.075 , 15.842 , 16.433 , 16.042 , 15.008 ,
0142 $ 12.575 , 10.708 , 9.2000 , 8.0167 , 7.2833 ,
0143 $ 7.0750 , 6.6333 , 6.1250 , 5.6583 , 5.2750 ,
0144 $ 4.9333 , 4.6250 , 4.4583 , 3.7333 , 3.3833 ,
0145 $ 3.1833 , 2.9833 , 2.7500 , 2.3667 , 2.2000 ,
0146 $ 2.6000 /
0147 DATA (CSEL(13,J),J=1,41) /
0148 $ 300.00 , 140.00 , 97.000 , 70.000 , 55.000 ,
0149 $ 45.000 , 37.000 , 31.000 , 26.000 , 23.000 ,
0150 $ 20.000 , 17.000 , 15.500 , 14.500 , 14.700 ,
0151 $ 18.500 , 22.000 , 23.000 , 22.500 , 20.700 ,
0152 $ 16.500 , 14.000 , 11.500 , 9.6000 , 8.6000 ,
0153 $ 8.5000 , 8.3000 , 7.6000 , 7.0000 , 6.4000 ,
0154 $ 5.9000 , 5.5000 , 5.3000 , 4.4000 , 4.1000 ,
0155 $ 3.9000 , 3.7000 , 3.3000 , 2.6000 , 2.5000 ,
0156 $ 3.0000 /
0157 DATA (CSEL(14,J),J=1,41) /
0158 $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
0159 $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
0160 $ 20.000 , 20.000 , 20.500 , 21.000 , 22.000 ,
0161 $ 23.000 , 24.000 , 24.000 , 24.400 , 24.500 ,
0162 $ 25.000 , 25.500 , 26.000 , 26.500 , 27.000 ,
0163 $ 27.000 , 26.000 , 23.000 , 21.500 , 20.000 ,
0164 $ 19.000 , 18.000 , 17.000 , 13.000 , 11.500 ,
0165 $ 10.300 , 9.4000 , 9.0000 , 8.8000 , 7.0000 ,
0166 $ 7.5000 /
0167 DATA (CSEL(15,J),J=1,41) /
0168 $ 200.00 , 163.00 , 141.00 , 120.00 , 111.00 ,
0169 $ 99.500 , 92.500 , 86.500 , 82.000 , 78.000 ,
0170 $ 74.000 , 71.000 , 67.500 , 65.000 , 62.500 ,
0171 $ 59.700 , 58.100 , 56.300 , 54.700 , 52.700 ,
0172 $ 50.000 , 48.400 , 47.000 , 46.000 , 45.200 ,
0173 $ 42.800 , 39.200 , 36.300 , 32.800 , 30.400 ,
0174 $ 28.100 , 26.300 , 24.500 , 19.250 , 16.840 ,
0175 $ 14.600 , 12.340 , 11.210 , 8.8500 , 7.5000 ,
0176 $ 7.5000 /
0177 DATA (CSEL(16,J),J=1,41) /
0178 $ 4200.0 , 440.00 , 420.00 , 400.00 , 230.00 ,
0179 $ 160.00 , 105.00 , 80.000 , 62.000 , 50.000 ,
0180 $ 45.000 , 41.000 , 38.000 , 36.000 , 35.000 ,
0181 $ 34.000 , 33.000 , 32.000 , 31.500 , 31.000 ,
0182 $ 30.500 , 30.000 , 29.500 , 29.000 , 28.500 ,
0183 $ 28.000 , 26.000 , 23.000 , 21.500 , 20.000 ,
0184 $ 19.000 , 18.000 , 17.000 , 13.000 , 11.500 ,
0185 $ 10.300 , 9.4000 , 9.0000 , 8.8000 , 7.0000 ,
0186 $ 7.5000 /
0187 DATA (CSEL(17,J),J=1,41) /
0188 $ 185.88 , 133.23 , 119.37 , 102.86 , 93.102 ,
0189 $ 82.752 , 76.205 , 71.008 , 67.366 , 64.096 ,
0190 $ 60.891 , 58.501 , 55.735 , 53.773 , 51.839 ,
0191 $ 49.671 , 48.485 , 47.045 , 45.803 , 44.306 ,
0192 $ 42.623 , 41.786 , 41.115 , 40.630 , 40.129 ,
0193 $ 38.242 , 35.233 , 32.662 , 29.639 , 27.573 ,
0194 $ 25.536 , 23.948 , 22.356 , 17.723 , 15.614 ,
0195 $ 13.653 , 11.675 , 10.653 , 8.6198 , 7.4464 ,
0196 $ 7.4821 /
0197 DATA (CSEL(18,J),J=1,41) /
0198 $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
0199 $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
0200 $ 20.000 , 19.067 , 19.333 , 19.500 , 19.833 ,
0201 $ 20.567 , 21.800 , 22.900 , 23.869 , 23.809 ,
0202 $ 22.161 , 21.488 , 19.732 , 19.433 , 19.345 ,
0203 $ 19.029 , 18.121 , 16.280 , 15.258 , 14.280 ,
0204 $ 13.644 , 12.963 , 12.316 , 9.5333 , 8.4333 ,
0205 $ 7.5728 , 6.9696 , 6.7518 , 6.6175 , 5.6000 ,
0206 $ 6.1145 /
0207 DATA (CSEL(19,J),J=1,41) /
0208 $ 157.65 , 73.701 , 76.096 , 68.571 , 57.305 ,
0209 $ 49.257 , 43.616 , 40.024 , 38.098 , 36.287 ,
0210 $ 34.674 , 33.105 , 31.712 , 30.685 , 29.613 ,
0211 $ 28.602 , 28.336 , 28.075 , 27.786 , 27.215 ,
0212 $ 26.380 , 26.146 , 25.108 , 24.783 , 24.360 ,
0213 $ 23.219 , 21.431 , 20.095 , 18.382 , 17.267 ,
0214 $ 16.100 , 15.175 , 14.271 , 11.573 , 10.305 ,
0215 $ 9.1471 , 8.0149 , 7.4349 , 6.2499 , 5.8928 ,
0216 $ 6.0774 /
0217 DATA (CSEL(20,J),J=1,41) /
0218 $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
0219 $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
0220 $ 20.000 , 19.067 , 19.333 , 19.500 , 19.833 ,
0221 $ 20.567 , 21.800 , 22.900 , 23.869 , 23.809 ,
0222 $ 22.161 , 21.488 , 19.732 , 19.433 , 19.345 ,
0223 $ 19.029 , 18.121 , 16.280 , 15.258 , 14.280 ,
0224 $ 13.644 , 12.963 , 12.316 , 9.5333 , 8.4333 ,
0225 $ 7.5728 , 6.9696 , 6.7518 , 6.6175 , 5.6000 ,
0226 $ 6.1145 /
0227 DATA (CSEL(21,J),J=1,41) /
0228 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0229 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0230 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0231 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0232 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0233 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0234 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0235 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0236 $ 0.00000E+00/
0237 DATA (CSEL(22,J),J=1,41) /
0238 $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
0239 $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
0240 $ 20.000 , 19.067 , 19.333 , 19.500 , 19.833 ,
0241 $ 20.567 , 21.800 , 22.900 , 23.869 , 23.809 ,
0242 $ 22.161 , 21.488 , 19.732 , 19.433 , 19.345 ,
0243 $ 19.029 , 18.121 , 16.280 , 15.258 , 14.280 ,
0244 $ 13.644 , 12.963 , 12.316 , 9.5333 , 8.4333 ,
0245 $ 7.5728 , 6.9696 , 6.7518 , 6.6175 , 5.6000 ,
0246 $ 6.1145 /
0247 DATA (CSEL(23,J),J=1,41) /
0248 $ 185.88 , 133.23 , 119.37 , 102.86 , 93.102 ,
0249 $ 82.752 , 76.205 , 71.008 , 67.366 , 64.096 ,
0250 $ 60.891 , 58.104 , 55.241 , 53.140 , 50.934 ,
0251 $ 48.660 , 47.566 , 46.585 , 45.581 , 44.003 ,
0252 $ 41.134 , 39.374 , 36.878 , 35.523 , 34.503 ,
0253 $ 32.334 , 29.365 , 27.370 , 24.705 , 22.921 ,
0254 $ 21.229 , 19.879 , 18.559 , 14.625 , 12.758 ,
0255 $ 11.041 , 9.3440 , 8.5484 , 6.7104 , 6.0000 ,
0256 $ 6.1131 /
0257 DATA (CSEL(24,J),J=1,41) /
0258 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0259 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0260 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0261 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0262 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0263 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0264 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0265 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0266 $ 0.00000E+00/
0267 DATA (CSEL(25,J),J=1,41) /
0268 $ 157.65 , 73.701 , 76.096 , 68.571 , 57.305 ,
0269 $ 49.257 , 43.616 , 40.024 , 38.098 , 36.287 ,
0270 $ 34.674 , 33.105 , 31.712 , 30.685 , 29.613 ,
0271 $ 28.602 , 28.336 , 28.075 , 27.786 , 27.215 ,
0272 $ 26.380 , 26.146 , 25.108 , 24.783 , 24.360 ,
0273 $ 23.219 , 21.431 , 20.095 , 18.382 , 17.267 ,
0274 $ 16.100 , 15.175 , 14.271 , 11.573 , 10.305 ,
0275 $ 9.1471 , 8.0149 , 7.4349 , 6.2499 , 5.8928 ,
0276 $ 6.0774 /
0277 DATA (CSEL(26,J),J=1,41) /
0278 $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
0279 $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
0280 $ 20.000 , 18.133 , 18.167 , 18.000 , 17.667 ,
0281 $ 18.133 , 19.600 , 21.800 , 23.338 , 23.118 ,
0282 $ 19.323 , 17.476 , 13.464 , 12.367 , 11.691 ,
0283 $ 11.057 , 10.242 , 9.5593 , 9.0151 , 8.5591 ,
0284 $ 8.2884 , 7.9253 , 7.6311 , 6.0667 , 5.3667 ,
0285 $ 4.8456 , 4.5392 , 4.5036 , 4.4351 , 4.2000 ,
0286 $ 4.7289 /
0287 DATA (CSEL(27,J),J=1,41) /
0288 $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
0289 $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
0290 $ 20.000 , 18.133 , 18.167 , 18.000 , 17.667 ,
0291 $ 18.133 , 19.600 , 21.800 , 23.338 , 23.118 ,
0292 $ 19.323 , 17.476 , 13.464 , 12.367 , 11.691 ,
0293 $ 11.057 , 10.242 , 9.5593 , 9.0151 , 8.5591 ,
0294 $ 8.2884 , 7.9253 , 7.6311 , 6.0667 , 5.3667 ,
0295 $ 4.8456 , 4.5392 , 4.5036 , 4.4351 , 4.2000 ,
0296 $ 4.7289 /
0297 DATA (CSEL(28,J),J=1,41) /
0298 $ 157.65 , 73.701 , 76.096 , 68.571 , 57.305 ,
0299 $ 49.257 , 43.616 , 40.024 , 38.098 , 36.287 ,
0300 $ 34.674 , 32.708 , 31.218 , 30.052 , 28.707 ,
0301 $ 27.591 , 27.417 , 27.615 , 27.564 , 26.913 ,
0302 $ 24.891 , 23.734 , 20.871 , 19.677 , 18.734 ,
0303 $ 17.311 , 15.563 , 14.803 , 13.448 , 12.615 ,
0304 $ 11.794 , 11.106 , 10.474 , 8.4745 , 7.4498 ,
0305 $ 6.5350 , 5.6835 , 5.3300 , 4.3406 , 4.4464 ,
0306 $ 4.7083 /
0307 DATA (CSEL(29,J),J=1,41) /
0308 $ 143.53 , 43.935 , 54.462 , 51.429 , 39.407 ,
0309 $ 32.510 , 27.321 , 24.532 , 23.465 , 22.383 ,
0310 $ 21.566 , 20.209 , 19.453 , 18.825 , 18.046 ,
0311 $ 17.562 , 17.802 , 18.360 , 18.667 , 18.519 ,
0312 $ 17.514 , 17.120 , 14.985 , 14.306 , 13.663 ,
0313 $ 12.753 , 11.596 , 11.165 , 10.287 , 9.7882 ,
0314 $ 9.2294 , 8.7539 , 8.3300 , 6.9480 , 6.2234 ,
0315 $ 5.5881 , 5.0189 , 4.7733 , 4.1104 , 4.3929 ,
0316 $ 4.6905 /
0317 DATA (CSEL(30,J),J=1,41) /
0318 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0319 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0320 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0321 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0322 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0323 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0324 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0325 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0326 $ 0.00000E+00/
0327 DATA (CSEL(31,J),J=1,41) /
0328 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0329 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0330 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0331 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0332 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0333 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0334 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0335 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0336 $ 0.00000E+00/
0337 DATA (CSEL(32,J),J=1,41) /
0338 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0339 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0340 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0341 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0342 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0343 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0344 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0345 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0346 $ 0.00000E+00/
0347 DATA (CSEL(33,J),J=1,41) /
0348 $ 1100.0 , 115.00 , 105.00 , 100.00 , 56.000 ,
0349 $ 40.000 , 27.000 , 22.000 , 21.000 , 20.000 ,
0350 $ 20.000 , 18.133 , 18.167 , 18.000 , 17.667 ,
0351 $ 18.133 , 19.600 , 21.800 , 23.338 , 23.118 ,
0352 $ 19.323 , 17.476 , 13.464 , 12.367 , 11.691 ,
0353 $ 11.057 , 10.242 , 9.5593 , 9.0151 , 8.5591 ,
0354 $ 8.2884 , 7.9253 , 7.6311 , 6.0667 , 5.3667 ,
0355 $ 4.8456 , 4.5392 , 4.5036 , 4.4351 , 4.2000 ,
0356 $ 4.7289 /
0357 DATA (CSEL(34,J),J=1,41) /
0358 $ 143.53 , 43.935 , 54.462 , 51.429 , 39.407 ,
0359 $ 32.510 , 27.321 , 24.532 , 23.465 , 22.383 ,
0360 $ 21.566 , 20.209 , 19.453 , 18.825 , 18.046 ,
0361 $ 17.562 , 17.802 , 18.360 , 18.667 , 18.519 ,
0362 $ 17.514 , 17.120 , 14.985 , 14.306 , 13.663 ,
0363 $ 12.753 , 11.596 , 11.165 , 10.287 , 9.7882 ,
0364 $ 9.2294 , 8.7539 , 8.3300 , 6.9480 , 6.2234 ,
0365 $ 5.5881 , 5.0189 , 4.7733 , 4.1104 , 4.3929 ,
0366 $ 4.6905 /
0367 DATA (CSEL(35,J),J=1,41) /
0368 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0369 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0370 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0371 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0372 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0373 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0374 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0375 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0376 $ 0.00000E+00/
0377 DATA (CSIN( 1,J),J=1,41) /
0378 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0379 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0380 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0381 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0382 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0383 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0384 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0385 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0386 $ 0.00000E+00/
0387 DATA (CSIN( 2,J),J=1,41) /
0388 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0389 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0390 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0391 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0392 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0393 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0394 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0395 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0396 $ 0.00000E+00/
0397 DATA (CSIN( 3,J),J=1,41) /
0398 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0399 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0400 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0401 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0402 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0403 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0404 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0405 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0406 $ 0.00000E+00/
0407 DATA (CSIN( 4,J),J=1,41) /
0408 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0409 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0410 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0411 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0412 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0413 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0414 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0415 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0416 $ 0.00000E+00/
0417 DATA (CSIN( 5,J),J=1,41) /
0418 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0419 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0420 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0421 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0422 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0423 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0424 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0425 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0426 $ 0.00000E+00/
0427 DATA (CSIN( 6,J),J=1,41) /
0428 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0429 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0430 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0431 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0432 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0433 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0434 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0435 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0436 $ 0.00000E+00/
0437 DATA (CSIN( 7,J),J=1,41) /
0438 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0439 $ 0.00000E+00, 0.00000E+00, 0.50000 , 1.2000 , 1.7000 ,
0440 $ 2.2500 , 3.0000 , 3.6000 , 4.5000 , 5.4000 ,
0441 $ 6.3000 , 8.6000 , 9.0000 , 10.000 , 11.500 ,
0442 $ 14.000 , 17.000 , 19.500 , 22.000 , 24.000 ,
0443 $ 21.500 , 18.500 , 19.000 , 20.500 , 22.200 ,
0444 $ 23.000 , 23.300 , 23.000 , 21.000 , 20.500 ,
0445 $ 20.200 , 20.100 , 20.000 , 20.000 , 20.000 ,
0446 $ 21.000 /
0447 DATA (CSIN( 8,J),J=1,41) /
0448 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0449 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0450 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0451 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0452 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0453 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0454 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0455 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0456 $ 0.00000E+00/
0457 DATA (CSIN( 9,J),J=1,41) /
0458 $ 0.00000E+00, 3.0000 , 9.2000 , 20.500 , 36.500 ,
0459 $ 45.000 , 28.000 , 19.500 , 15.500 , 14.200 ,
0460 $ 15.500 , 17.500 , 20.000 , 23.000 , 26.000 ,
0461 $ 20.000 , 23.000 , 26.500 , 32.000 , 35.000 ,
0462 $ 28.500 , 22.000 , 22.500 , 23.500 , 24.000 ,
0463 $ 24.500 , 26.000 , 27.500 , 27.500 , 27.000 ,
0464 $ 26.500 , 25.500 , 25.000 , 23.000 , 22.500 ,
0465 $ 22.200 , 22.000 , 22.000 , 21.200 , 20.700 ,
0466 $ 21.000 /
0467 DATA (CSIN(10,J),J=1,41) /
0468 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0469 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0470 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0471 $ 0.50000 , 1.5000 , 2.7000 , 3.8000 , 4.8000 ,
0472 $ 6.5000 , 7.6000 , 8.4000 , 9.0000 , 9.4000 ,
0473 $ 9.8000 , 10.500 , 11.000 , 11.500 , 11.800 ,
0474 $ 12.200 , 12.400 , 12.600 , 13.200 , 13.500 ,
0475 $ 13.700 , 14.000 , 14.200 , 14.500 , 16.400 ,
0476 $ 17.000 /
0477 DATA (CSIN(11,J),J=1,41) /
0478 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0479 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0480 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0481 $ 0.50000 , 1.5000 , 2.7000 , 3.8000 , 4.8000 ,
0482 $ 6.5000 , 7.6000 , 8.4000 , 9.0000 , 9.4000 ,
0483 $ 9.8000 , 10.500 , 11.000 , 11.500 , 11.800 ,
0484 $ 12.200 , 12.400 , 12.600 , 13.200 , 13.500 ,
0485 $ 13.700 , 14.000 , 14.200 , 14.500 , 16.400 ,
0486 $ 17.000 /
0487 DATA (CSIN(12,J),J=1,41) /
0488 $ 266.67 , 133.33 , 83.333 , 57.083 , 44.500 ,
0489 $ 33.250 , 24.583 , 20.833 , 18.333 , 16.083 ,
0490 $ 15.625 , 15.083 , 14.833 , 15.083 , 15.833 ,
0491 $ 17.042 , 18.958 , 20.758 , 22.533 , 22.825 ,
0492 $ 21.250 , 18.567 , 17.767 , 18.100 , 19.933 ,
0493 $ 20.783 , 21.225 , 21.000 , 20.558 , 20.258 ,
0494 $ 20.017 , 19.767 , 19.600 , 19.183 , 18.850 ,
0495 $ 18.575 , 18.350 , 18.175 , 17.808 , 17.558 ,
0496 $ 19.250 /
0497 DATA (CSIN(13,J),J=1,41) /
0498 $ 400.00 , 200.00 , 120.00 , 81.000 , 62.000 ,
0499 $ 47.000 , 35.000 , 28.000 , 24.000 , 21.000 ,
0500 $ 19.500 , 19.000 , 18.800 , 19.000 , 20.000 ,
0501 $ 21.000 , 23.000 , 25.000 , 27.000 , 27.500 ,
0502 $ 25.500 , 22.000 , 20.800 , 21.000 , 23.000 ,
0503 $ 24.000 , 24.000 , 23.800 , 23.000 , 22.500 ,
0504 $ 22.000 , 21.600 , 21.400 , 21.000 , 20.500 ,
0505 $ 20.200 , 19.800 , 19.500 , 18.600 , 17.500 ,
0506 $ 20.000 /
0507 DATA (CSIN(14,J),J=1,41) /
0508 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0509 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0510 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0511 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.10000 , 1.5000 ,
0512 $ 7.0000 , 12.000 , 17.000 , 19.500 , 20.500 ,
0513 $ 22.000 , 23.500 , 24.800 , 25.800 , 26.500 ,
0514 $ 27.000 , 27.500 , 28.000 , 30.000 , 31.000 ,
0515 $ 32.000 , 32.500 , 32.500 , 33.000 , 33.500 ,
0516 $ 34.000 /
0517 DATA (CSIN(15,J),J=1,41) /
0518 $ 1500.0 , 1160.0 , 310.00 , 230.00 , 178.00 ,
0519 $ 153.00 , 134.00 , 124.00 , 113.00 , 106.00 ,
0520 $ 101.00 , 96.000 , 92.000 , 89.000 , 87.000 ,
0521 $ 84.000 , 81.000 , 78.500 , 76.500 , 75.000 ,
0522 $ 72.000 , 70.000 , 68.000 , 64.500 , 63.000 ,
0523 $ 62.000 , 61.000 , 59.500 , 58.500 , 56.500 ,
0524 $ 56.500 , 56.000 , 55.500 , 52.000 , 50.000 ,
0525 $ 48.000 , 45.000 , 44.000 , 39.200 , 34.500 ,
0526 $ 34.500 /
0527 DATA (CSIN(16,J),J=1,41) /
0528 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0529 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0530 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0531 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.10000 , 1.5000 ,
0532 $ 7.0000 , 12.000 , 17.000 , 19.500 , 20.500 ,
0533 $ 22.000 , 23.500 , 24.800 , 25.800 , 26.500 ,
0534 $ 27.000 , 27.500 , 28.000 , 30.000 , 31.000 ,
0535 $ 32.000 , 32.500 , 32.500 , 33.000 , 33.500 ,
0536 $ 34.000 /
0537 DATA (CSIN(17,J),J=1,41) /
0538 $ 1394.1 , 948.17 , 262.43 , 197.14 , 149.30 ,
0539 $ 127.25 , 110.39 , 101.79 , 92.834 , 87.104 ,
0540 $ 83.109 , 79.099 , 75.965 , 73.627 , 72.161 ,
0541 $ 69.889 , 67.595 , 65.595 , 64.057 , 63.054 ,
0542 $ 61.377 , 60.434 , 59.485 , 56.970 , 55.931 ,
0543 $ 55.398 , 54.827 , 53.538 , 52.861 , 51.247 ,
0544 $ 51.344 , 50.992 , 50.644 , 47.876 , 46.358 ,
0545 $ 44.887 , 42.577 , 41.815 , 38.180 , 34.254 ,
0546 $ 34.418 /
0547 DATA (CSIN(18,J),J=1,41) /
0548 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0549 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0550 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0551 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.97815E-01, 1.4577 ,
0552 $ 6.2052 , 10.112 , 12.902 , 14.300 , 14.688 ,
0553 $ 15.505 , 16.379 , 17.554 , 18.309 , 18.920 ,
0554 $ 19.389 , 19.804 , 20.284 , 22.000 , 22.733 ,
0555 $ 23.527 , 24.097 , 24.382 , 24.816 , 26.800 ,
0556 $ 27.719 /
0557 DATA (CSIN(19,J),J=1,41) /
0558 $ 1182.4 , 524.50 , 167.30 , 131.43 , 91.895 ,
0559 $ 75.743 , 63.184 , 57.376 , 52.502 , 49.313 ,
0560 $ 47.326 , 44.762 , 43.222 , 42.015 , 41.221 ,
0561 $ 40.244 , 39.504 , 39.145 , 38.860 , 38.731 ,
0562 $ 37.987 , 37.814 , 36.326 , 34.750 , 33.953 ,
0563 $ 33.635 , 33.349 , 32.938 , 32.785 , 32.092 ,
0564 $ 32.373 , 32.312 , 32.329 , 31.261 , 30.597 ,
0565 $ 30.073 , 29.228 , 29.182 , 27.683 , 27.107 ,
0566 $ 27.956 /
0567 DATA (CSIN(20,J),J=1,41) /
0568 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0569 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0570 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0571 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.97815E-01, 1.4577 ,
0572 $ 6.2052 , 10.112 , 12.902 , 14.300 , 14.688 ,
0573 $ 15.505 , 16.379 , 17.554 , 18.309 , 18.920 ,
0574 $ 19.389 , 19.804 , 20.284 , 22.000 , 22.733 ,
0575 $ 23.527 , 24.097 , 24.382 , 24.816 , 26.800 ,
0576 $ 27.719 /
0577 DATA (CSIN(21,J),J=1,41) /
0578 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0579 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0580 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0581 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0582 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0583 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0584 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0585 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0586 $ 0.00000E+00/
0587 DATA (CSIN(22,J),J=1,41) /
0588 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0589 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0590 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0591 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.97815E-01, 1.4577 ,
0592 $ 6.2052 , 10.112 , 12.902 , 14.300 , 14.688 ,
0593 $ 15.505 , 16.379 , 17.554 , 18.309 , 18.920 ,
0594 $ 19.389 , 19.804 , 20.284 , 22.000 , 22.733 ,
0595 $ 23.527 , 24.097 , 24.382 , 24.816 , 26.800 ,
0596 $ 27.719 /
0597 DATA (CSIN(23,J),J=1,41) /
0598 $ 1394.1 , 948.17 , 262.43 , 197.14 , 149.30 ,
0599 $ 127.25 , 110.39 , 101.79 , 92.834 , 87.104 ,
0600 $ 83.109 , 78.563 , 75.292 , 72.760 , 70.900 ,
0601 $ 68.467 , 66.314 , 64.955 , 63.746 , 62.623 ,
0602 $ 59.233 , 56.946 , 53.355 , 49.810 , 48.090 ,
0603 $ 46.839 , 45.695 , 44.863 , 44.062 , 42.599 ,
0604 $ 42.684 , 42.328 , 42.041 , 39.508 , 37.880 ,
0605 $ 36.299 , 34.075 , 33.553 , 29.723 , 27.600 ,
0606 $ 28.120 /
0607 DATA (CSIN(24,J),J=1,41) /
0608 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0609 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0610 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0611 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0612 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0613 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0614 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0615 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0616 $ 0.00000E+00/
0617 DATA (CSIN(25,J),J=1,41) /
0618 $ 1182.4 , 524.50 , 167.30 , 131.43 , 91.895 ,
0619 $ 75.743 , 63.184 , 57.376 , 52.502 , 49.313 ,
0620 $ 47.326 , 44.762 , 43.222 , 42.015 , 41.221 ,
0621 $ 40.244 , 39.504 , 39.145 , 38.860 , 38.731 ,
0622 $ 37.987 , 37.814 , 36.326 , 34.750 , 33.953 ,
0623 $ 33.635 , 33.349 , 32.938 , 32.785 , 32.092 ,
0624 $ 32.373 , 32.312 , 32.329 , 31.261 , 30.597 ,
0625 $ 30.073 , 29.228 , 29.182 , 27.683 , 27.107 ,
0626 $ 27.956 /
0627 DATA (CSIN(26,J),J=1,41) /
0628 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0629 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0630 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0631 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.95639E-01, 1.4154 ,
0632 $ 5.4104 , 8.2240 , 8.8031 , 9.1000 , 8.8761 ,
0633 $ 9.0095 , 9.2576 , 10.307 , 10.818 , 11.341 ,
0634 $ 11.778 , 12.108 , 12.569 , 14.000 , 14.467 ,
0635 $ 15.054 , 15.694 , 16.263 , 16.632 , 20.100 ,
0636 $ 21.438 /
0637 DATA (CSIN(27,J),J=1,41) /
0638 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0639 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0640 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0641 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.95639E-01, 1.4154 ,
0642 $ 5.4104 , 8.2240 , 8.8031 , 9.1000 , 8.8761 ,
0643 $ 9.0095 , 9.2576 , 10.307 , 10.818 , 11.341 ,
0644 $ 11.778 , 12.108 , 12.569 , 14.000 , 14.467 ,
0645 $ 15.054 , 15.694 , 16.263 , 16.632 , 20.100 ,
0646 $ 21.438 /
0647 DATA (CSIN(28,J),J=1,41) /
0648 $ 1182.4 , 524.50 , 167.30 , 131.43 , 91.895 ,
0649 $ 75.743 , 63.184 , 57.376 , 52.502 , 49.313 ,
0650 $ 47.326 , 44.225 , 42.549 , 41.148 , 39.960 ,
0651 $ 38.822 , 38.223 , 38.505 , 38.549 , 38.301 ,
0652 $ 35.843 , 34.326 , 30.196 , 27.590 , 26.112 ,
0653 $ 25.076 , 24.217 , 24.264 , 23.985 , 23.445 ,
0654 $ 23.713 , 23.647 , 23.726 , 22.892 , 22.119 ,
0655 $ 21.485 , 20.726 , 20.921 , 19.226 , 20.454 ,
0656 $ 21.658 /
0657 DATA (CSIN(29,J),J=1,41) /
0658 $ 1076.5 , 312.66 , 119.74 , 98.571 , 63.193 ,
0659 $ 49.990 , 39.579 , 35.168 , 32.335 , 30.417 ,
0660 $ 29.434 , 27.325 , 26.514 , 25.775 , 25.120 ,
0661 $ 24.711 , 24.818 , 25.600 , 26.106 , 26.355 ,
0662 $ 25.220 , 24.760 , 21.681 , 20.060 , 19.044 ,
0663 $ 18.474 , 18.044 , 18.301 , 18.347 , 18.192 ,
0664 $ 18.557 , 18.639 , 18.870 , 18.769 , 18.478 ,
0665 $ 18.372 , 18.302 , 18.735 , 18.206 , 20.207 ,
0666 $ 21.576 /
0667 DATA (CSIN(30,J),J=1,41) /
0668 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0669 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0670 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0671 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0672 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0673 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0674 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0675 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0676 $ 0.00000E+00/
0677 DATA (CSIN(31,J),J=1,41) /
0678 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0679 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0680 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0681 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0682 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0683 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0684 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0685 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0686 $ 0.00000E+00/
0687 DATA (CSIN(32,J),J=1,41) /
0688 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0689 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0690 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0691 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0692 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0693 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0694 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0695 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0696 $ 0.00000E+00/
0697 DATA (CSIN(33,J),J=1,41) /
0698 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0699 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0700 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0701 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.95639E-01, 1.4154 ,
0702 $ 5.4104 , 8.2240 , 8.8031 , 9.1000 , 8.8761 ,
0703 $ 9.0095 , 9.2576 , 10.307 , 10.818 , 11.341 ,
0704 $ 11.778 , 12.108 , 12.569 , 14.000 , 14.467 ,
0705 $ 15.054 , 15.694 , 16.263 , 16.632 , 20.100 ,
0706 $ 21.438 /
0707 DATA (CSIN(34,J),J=1,41) /
0708 $ 1076.5 , 312.66 , 119.74 , 98.571 , 63.193 ,
0709 $ 49.990 , 39.579 , 35.168 , 32.335 , 30.417 ,
0710 $ 29.434 , 27.325 , 26.514 , 25.775 , 25.120 ,
0711 $ 24.711 , 24.818 , 25.600 , 26.106 , 26.355 ,
0712 $ 25.220 , 24.760 , 21.681 , 20.060 , 19.044 ,
0713 $ 18.474 , 18.044 , 18.301 , 18.347 , 18.192 ,
0714 $ 18.557 , 18.639 , 18.870 , 18.769 , 18.478 ,
0715 $ 18.372 , 18.302 , 18.735 , 18.206 , 20.207 ,
0716 $ 21.576 /
0717 DATA (CSIN(35,J),J=1,41) /
0718 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0719 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0720 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0721 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0722 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0723 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0724 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0725 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0726 $ 0.00000E+00/
0727 DATA (CSPIEL( 1,J),J=1,41) /
0728 $ 0.00000E+00, 350.00 , 580.00 , 600.00 , 550.00 ,
0729 $ 450.00 , 410.00 , 370.00 , 340.00 , 230.00 ,
0730 $ 220.00 , 205.00 , 180.00 , 155.00 , 145.00 ,
0731 $ 140.00 , 160.00 , 195.00 , 235.00 , 250.00 ,
0732 $ 270.00 , 280.00 , 300.00 , 300.00 , 290.00 ,
0733 $ 285.00 , 265.00 , 240.00 , 230.00 , 222.00 ,
0734 $ 204.00 , 196.00 , 190.00 , 170.00 , 170.00 ,
0735 $ 160.00 , 150.00 , 140.00 , 120.00 , 80.000 ,
0736 $ 80.000 /
0737 DATA (CSPIEL( 2,J),J=1,41) /
0738 $ 0.00000E+00, 700.00 , 1000.0 , 1200.0 , 1300.0 ,
0739 $ 1300.0 , 1250.0 , 1250.0 , 1100.0 , 1000.0 ,
0740 $ 940.00 , 740.00 , 700.00 , 670.00 , 660.00 ,
0741 $ 670.00 , 680.00 , 700.00 , 735.00 , 800.00 ,
0742 $ 810.00 , 820.00 , 820.00 , 810.00 , 800.00 ,
0743 $ 800.00 , 700.00 , 600.00 , 500.00 , 470.00 ,
0744 $ 440.00 , 410.00 , 380.00 , 330.00 , 330.00 ,
0745 $ 330.00 , 330.00 , 330.00 , 285.00 , 240.00 ,
0746 $ 240.00 /
0747 DATA (CSPIEL( 3,J),J=1,41) /
0748 $ 0.00000E+00, 1700.0 , 2200.0 , 2200.0 , 1800.0 ,
0749 $ 1300.0 , 1200.0 , 900.00 , 900.00 , 1000.0 ,
0750 $ 1100.0 , 1300.0 , 1400.0 , 1420.0 , 1490.0 ,
0751 $ 1560.0 , 1580.0 , 1690.0 , 1795.0 , 2000.0 ,
0752 $ 2070.0 , 2140.0 , 2050.0 , 2010.0 , 1970.0 ,
0753 $ 1880.0 , 1690.0 , 1500.0 , 1420.0 , 1390.0 ,
0754 $ 1350.0 , 1360.0 , 1370.0 , 1280.0 , 1290.0 ,
0755 $ 1295.0 , 1250.0 , 1200.0 , 1050.0 , 900.00 ,
0756 $ 900.00 /
0757 DATA (CSPIIN( 1,J),J=1,41) /
0758 $ 0.00000E+00, 200.00 , 320.00 , 500.00 , 600.00 ,
0759 $ 600.00 , 590.00 , 530.00 , 510.00 , 470.00 ,
0760 $ 430.00 , 425.00 , 420.00 , 425.00 , 425.00 ,
0761 $ 430.00 , 430.00 , 435.00 , 435.00 , 440.00 ,
0762 $ 430.00 , 430.00 , 420.00 , 420.00 , 420.00 ,
0763 $ 415.00 , 415.00 , 410.00 , 410.00 , 408.00 ,
0764 $ 406.00 , 404.00 , 400.00 , 380.00 , 340.00 ,
0765 $ 340.00 , 340.00 , 340.00 , 340.00 , 340.00 ,
0766 $ 340.00 /
0767 DATA (CSPIIN( 2,J),J=1,41) /
0768 $ 0.00000E+00, 400.00 , 800.00 , 1000.0 , 1100.0 ,
0769 $ 1200.0 , 1150.0 , 1050.0 , 1000.0 , 900.00 ,
0770 $ 860.00 , 860.00 , 850.00 , 850.00 , 840.00 ,
0771 $ 830.00 , 820.00 , 810.00 , 805.00 , 800.00 ,
0772 $ 800.00 , 800.00 , 800.00 , 800.00 , 800.00 ,
0773 $ 800.00 , 800.00 , 800.00 , 800.00 , 780.00 ,
0774 $ 760.00 , 740.00 , 720.00 , 720.00 , 700.00 ,
0775 $ 690.00 , 680.00 , 670.00 , 665.00 , 660.00 ,
0776 $ 660.00 /
0777 DATA (CSPIIN( 3,J),J=1,41) /
0778 $ 0.00000E+00, 1000.0 , 1900.0 , 2600.0 , 2900.0 ,
0779 $ 3000.0 , 2800.0 , 2600.0 , 2500.0 , 2300.0 ,
0780 $ 2200.0 , 2000.0 , 1900.0 , 1880.0 , 1860.0 ,
0781 $ 1840.0 , 1820.0 , 1810.0 , 1805.0 , 1800.0 ,
0782 $ 1780.0 , 1760.0 , 1750.0 , 1740.0 , 1730.0 ,
0783 $ 1720.0 , 1710.0 , 1700.0 , 1680.0 , 1660.0 ,
0784 $ 1650.0 , 1640.0 , 1630.0 , 1620.0 , 1610.0 ,
0785 $ 1605.0 , 1600.0 , 1600.0 , 1550.0 , 1500.0 ,
0786 $ 1500.0 /
0787 DATA (CSPNEL( 1,J),J=1,41) /
0788 $ 2100.0 , 1800.0 , 1500.0 , 1050.0 , 900.00 ,
0789 $ 950.00 , 800.00 , 650.00 , 570.00 , 390.00 ,
0790 $ 300.00 , 240.00 , 230.00 , 230.00 , 220.00 ,
0791 $ 220.00 , 225.00 , 225.00 , 240.00 , 240.00 ,
0792 $ 290.00 , 330.00 , 335.00 , 350.00 , 355.00 ,
0793 $ 370.00 , 350.00 , 330.00 , 310.00 , 290.00 ,
0794 $ 270.00 , 265.00 , 260.00 , 230.00 , 210.00 ,
0795 $ 210.00 , 200.00 , 200.00 , 190.00 , 180.00 ,
0796 $ 180.00 /
0797 DATA (CSPNEL( 2,J),J=1,41) /
0798 $ 3800.0 , 2900.0 , 1850.0 , 1550.0 , 1450.0 ,
0799 $ 1520.0 , 1460.0 , 1300.0 , 1140.0 , 880.00 ,
0800 $ 700.00 , 620.00 , 540.00 , 560.00 , 460.00 ,
0801 $ 460.00 , 470.00 , 470.00 , 480.00 , 480.00 ,
0802 $ 580.00 , 600.00 , 610.00 , 620.00 , 620.00 ,
0803 $ 620.00 , 590.00 , 580.00 , 460.00 , 440.00 ,
0804 $ 420.00 , 400.00 , 480.00 , 430.00 , 380.00 ,
0805 $ 380.00 , 380.00 , 380.00 , 380.00 , 380.00 ,
0806 $ 380.00 /
0807 DATA (CSPNEL( 3,J),J=1,41) /
0808 $ 7000.0 , 6000.0 , 4500.0 , 3350.0 , 2700.0 ,
0809 $ 3000.0 , 3550.0 , 3970.0 , 3280.0 , 2490.0 ,
0810 $ 2100.0 , 1510.0 , 1440.0 , 1370.0 , 1370.0 ,
0811 $ 1370.0 , 1400.0 , 1400.0 , 1420.0 , 1420.0 ,
0812 $ 1440.0 , 1460.0 , 1460.0 , 1450.0 , 1450.0 ,
0813 $ 1470.0 , 1400.0 , 1400.0 , 1380.0 , 1370.0 ,
0814 $ 1360.0 , 1350.0 , 1340.0 , 1330.0 , 1320.0 ,
0815 $ 1310.0 , 1305.0 , 1300.0 , 1300.0 , 1300.0 ,
0816 $ 1300.0 /
0817 DATA (CSPNIN( 1,J),J=1,41) /
0818 $ 0.00000E+00, 200.00 , 400.00 , 800.00 , 800.00 ,
0819 $ 550.00 , 500.00 , 450.00 , 430.00 , 410.00 ,
0820 $ 400.00 , 390.00 , 380.00 , 370.00 , 370.00 ,
0821 $ 370.00 , 365.00 , 365.00 , 360.00 , 360.00 ,
0822 $ 360.00 , 360.00 , 365.00 , 370.00 , 375.00 ,
0823 $ 380.00 , 400.00 , 410.00 , 420.00 , 430.00 ,
0824 $ 440.00 , 440.00 , 440.00 , 440.00 , 440.00 ,
0825 $ 440.00 , 440.00 , 440.00 , 440.00 , 440.00 ,
0826 $ 440.00 /
0827 DATA (CSPNIN( 2,J),J=1,41) /
0828 $ 0.00000E+00, 400.00 , 950.00 , 1050.0 , 1050.0 ,
0829 $ 980.00 , 940.00 , 900.00 , 860.00 , 820.00 ,
0830 $ 800.00 , 780.00 , 760.00 , 740.00 , 740.00 ,
0831 $ 740.00 , 730.00 , 730.00 , 720.00 , 720.00 ,
0832 $ 720.00 , 720.00 , 730.00 , 740.00 , 750.00 ,
0833 $ 760.00 , 800.00 , 820.00 , 820.00 , 820.00 ,
0834 $ 820.00 , 820.00 , 820.00 , 820.00 , 820.00 ,
0835 $ 820.00 , 820.00 , 820.00 , 820.00 , 820.00 ,
0836 $ 820.00 /
0837 DATA (CSPNIN( 3,J),J=1,41) /
0838 $ 0.00000E+00, 0.00000E+00, 500.00 , 1450.0 , 1700.0 ,
0839 $ 1800.0 , 1750.0 , 1730.0 , 1720.0 , 1710.0 ,
0840 $ 1700.0 , 1690.0 , 1660.0 , 1630.0 , 1630.0 ,
0841 $ 1630.0 , 1600.0 , 1600.0 , 1580.0 , 1580.0 ,
0842 $ 1580.0 , 1580.0 , 1600.0 , 1630.0 , 1650.0 ,
0843 $ 1670.0 , 1760.0 , 1800.0 , 1800.0 , 1800.0 ,
0844 $ 1800.0 , 1800.0 , 1800.0 , 1800.0 , 1800.0 ,
0845 $ 1800.0 , 1800.0 , 1800.0 , 1800.0 , 1800.0 ,
0846 $ 1800.0 /
0847 DATA ELAB /
0848 $ 0.10000E-03, 0.20000E-03, 0.30000E-03, 0.40000E-03, 0.50000E-03,
0849 $ 0.70000E-03, 0.10000E-02, 0.20000E-02, 0.30000E-02, 0.40000E-02,
0850 $ 0.50000E-02, 0.70000E-02, 0.10000E-01, 0.15000E-01, 0.20000E-01,
0851 $ 0.25000E-01, 0.32700E-01/
0852 DATA CNLWAT /
0853 $ 1.0000 , 16.000 , 27.000 , 56.000 , 59.000 ,
0854 $ 64.000 , 91.000 , 112.00 , 119.00 , 127.00 ,
0855 $ 137.00 , 181.00 , 207.00 , 209.00 , 238.00 /
0856 DATA (CNLWEL( 1,J),J=1,17) /
0857 $ 6000.0 , 5500.0 , 5200.0 , 4900.0 , 4800.0 ,
0858 $ 4400.0 , 4000.0 , 2900.0 , 2200.0 , 1800.0 ,
0859 $ 1400.0 , 1100.0 , 900.00 , 700.00 , 600.00 ,
0860 $ 560.00 , 520.00 /
0861 DATA (CNLWEL( 2,J),J=1,17) /
0862 $ 5400.0 , 5050.0 , 4800.0 , 4600.0 , 4399.0 ,
0863 $ 4090.0 , 3700.0 , 2600.0 , 1950.0 , 1600.0 ,
0864 $ 1300.0 , 900.00 , 700.00 , 800.00 , 1050.0 ,
0865 $ 1250.0 , 1320.0 /
0866 DATA (CNLWEL( 3,J),J=1,17) /
0867 $ 5500.0 , 5150.0 , 4900.0 , 4699.0 , 4490.0 ,
0868 $ 4150.0 , 3750.0 , 2790.0 , 2100.0 , 1650.0 ,
0869 $ 1300.0 , 950.00 , 800.00 , 860.00 , 1000.0 ,
0870 $ 1090.0 , 1080.0 /
0871 DATA (CNLWEL( 4,J),J=1,17) /
0872 $ 5499.0 , 4970.0 , 4450.0 , 4080.0 , 3750.0 ,
0873 $ 3380.0 , 2900.0 , 2400.0 , 2380.0 , 2350.0 ,
0874 $ 2300.0 , 2100.0 , 1720.0 , 1370.0 , 1200.0 ,
0875 $ 1060.0 , 870.00 /
0876 DATA (CNLWEL( 5,J),J=1,17) /
0877 $ 5399.0 , 4710.0 , 4180.0 , 3760.0 , 3460.0 ,
0878 $ 3150.0 , 2730.0 , 2270.0 , 1850.0 , 1850.0 ,
0879 $ 2130.0 , 2330.0 , 2120.0 , 1640.0 , 1310.0 ,
0880 $ 1100.0 , 1050.0 /
0881 DATA (CNLWEL( 6,J),J=1,17) /
0882 $ 5099.0 , 4405.0 , 3825.0 , 3455.0 , 3125.0 ,
0883 $ 2695.0 , 2350.0 , 1850.0 , 1580.0 , 1820.0 ,
0884 $ 2050.0 , 2210.0 , 2000.0 , 1590.0 , 1310.0 ,
0885 $ 1120.0 , 1040.0 /
0886 DATA (CNLWEL( 7,J),J=1,17) /
0887 $ 6290.0 , 5960.0 , 5640.0 , 5370.0 , 5150.0 ,
0888 $ 4800.0 , 4250.0 , 3150.0 , 2470.0 , 2100.0 ,
0889 $ 2230.0 , 2420.0 , 2450.0 , 2050.0 , 1760.0 ,
0890 $ 1550.0 , 1330.0 /
0891 DATA (CNLWEL( 8,J),J=1,17) /
0892 $ 6885.0 , 6650.0 , 6350.0 , 6150.0 , 6000.0 ,
0893 $ 5700.0 , 5360.0 , 4250.0 , 2800.0 , 1870.0 ,
0894 $ 1810.0 , 1820.0 , 2170.0 , 2450.0 , 2150.0 ,
0895 $ 1700.0 , 1390.0 /
0896 DATA (CNLWEL( 9,J),J=1,17) /
0897 $ 6600.0 , 6500.0 , 6400.0 , 6249.0 , 6190.0 ,
0898 $ 5950.0 , 5520.0 , 4250.0 , 2750.0 , 1900.0 ,
0899 $ 1850.0 , 1950.0 , 2340.0 , 2800.0 , 2540.0 ,
0900 $ 2100.0 , 1760.0 /
0901 DATA (CNLWEL(10,J),J=1,17) /
0902 $ 7400.0 , 7200.0 , 6999.0 , 6840.0 , 6655.0 ,
0903 $ 6320.0 , 5820.0 , 4400.0 , 2850.0 , 2000.0 ,
0904 $ 1800.0 , 1800.0 , 2150.0 , 2600.0 , 2350.0 ,
0905 $ 1950.0 , 2100.0 /
0906 DATA (CNLWEL(11,J),J=1,17) /
0907 $ 7900.0 , 7700.0 , 7499.0 , 7390.0 , 7202.0 ,
0908 $ 6810.0 , 6360.0 , 4920.0 , 3450.0 , 2600.0 ,
0909 $ 2200.0 , 1950.0 , 2300.0 , 2800.0 , 2650.0 ,
0910 $ 2250.0 , 2050.0 /
0911 DATA (CNLWEL(12,J),J=1,17) /
0912 $ 7900.0 , 7750.0 , 7699.0 , 7590.0 , 7450.0 ,
0913 $ 7200.0 , 6850.0 , 5650.0 , 4400.0 , 3700.0 ,
0914 $ 3400.0 , 2800.0 , 2700.0 , 3100.0 , 3250.0 ,
0915 $ 3100.0 , 2750.0 /
0916 DATA (CNLWEL(13,J),J=1,17) /
0917 $ 6100.0 , 5950.0 , 5750.0 , 5599.0 , 5440.0 ,
0918 $ 5200.0 , 4800.0 , 4300.0 , 5800.0 , 5750.0 ,
0919 $ 4800.0 , 3420.0 , 2650.0 , 3200.0 , 3650.0 ,
0920 $ 3500.0 , 2980.0 /
0921 DATA (CNLWEL(14,J),J=1,17) /
0922 $ 6100.0 , 5950.0 , 5750.0 , 5599.0 , 5440.0 ,
0923 $ 5200.0 , 4800.0 , 4300.0 , 5800.0 , 5750.0 ,
0924 $ 4800.0 , 3420.0 , 2650.0 , 3200.0 , 3650.0 ,
0925 $ 3500.0 , 2980.0 /
0926 DATA (CNLWEL(15,J),J=1,17) /
0927 $ 6600.0 , 6350.0 , 6100.0 , 5899.0 , 5690.0 ,
0928 $ 5300.0 , 4850.0 , 4450.0 , 5650.0 , 5700.0 ,
0929 $ 4950.0 , 3850.0 , 3050.0 , 3050.0 , 3460.0 ,
0930 $ 3650.0 , 3340.0 /
0931 DATA (CNLWIN( 1,J),J=1,17) /
0932 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0933 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0934 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,
0935 $ 0.00000E+00, 0.00000E+00/
0936 DATA (CNLWIN( 2,J),J=1,17) /
0937 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.0000 ,
0938 $ 10.000 , 50.000 , 100.00 , 200.00 , 300.00 ,
0939 $ 400.00 , 600.00 , 700.00 , 750.00 , 700.00 ,
0940 $ 700.00 , 680.00 /
0941 DATA (CNLWIN( 3,J),J=1,17) /
0942 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 ,
0943 $ 50.000 , 100.00 , 260.00 , 450.00 , 600.00 ,
0944 $ 700.00 , 800.00 , 900.00 , 940.00 , 900.00 ,
0945 $ 860.00 , 820.00 /
0946 DATA (CNLWIN( 4,J),J=1,17) /
0947 $ 1.0000 , 80.000 , 200.00 , 320.00 , 400.00 ,
0948 $ 520.00 , 700.00 , 1000.0 , 1120.0 , 1200.0 ,
0949 $ 1200.0 , 1200.0 , 1180.0 , 1130.0 , 1100.0 ,
0950 $ 1090.0 , 1080.0 /
0951 DATA (CNLWIN( 5,J),J=1,17) /
0952 $ 1.0000 , 90.000 , 220.00 , 340.00 , 420.00 ,
0953 $ 550.00 , 720.00 , 1080.0 , 1300.0 , 1400.0 ,
0954 $ 1420.0 , 1420.0 , 1380.0 , 1260.0 , 1190.0 ,
0955 $ 1150.0 , 1100.0 /
0956 DATA (CNLWIN( 6,J),J=1,17) /
0957 $ 1.0000 , 95.000 , 225.00 , 345.00 , 425.00 ,
0958 $ 555.00 , 750.00 , 1150.0 , 1500.0 , 1680.0 ,
0959 $ 1700.0 , 1690.0 , 1550.0 , 1360.0 , 1240.0 ,
0960 $ 1180.0 , 1120.0 /
0961 DATA (CNLWIN( 7,J),J=1,17) /
0962 $ 10.000 , 140.00 , 260.00 , 380.00 , 450.00 ,
0963 $ 600.00 , 750.00 , 1200.0 , 1580.0 , 1800.0 ,
0964 $ 1820.0 , 1830.0 , 1800.0 , 1750.0 , 1690.0 ,
0965 $ 1650.0 , 1620.0 /
0966 DATA (CNLWIN( 8,J),J=1,17) /
0967 $ 15.000 , 150.00 , 300.00 , 400.00 , 500.00 ,
0968 $ 650.00 , 840.00 , 1500.0 , 2100.0 , 2130.0 ,
0969 $ 2140.0 , 2130.0 , 2080.0 , 2000.0 , 1950.0 ,
0970 $ 1900.0 , 1860.0 /
0971 DATA (CNLWIN( 9,J),J=1,17) /
0972 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 ,
0973 $ 150.00 , 380.00 , 1000.0 , 1650.0 , 2100.0 ,
0974 $ 2100.0 , 2100.0 , 2060.0 , 1950.0 , 1860.0 ,
0975 $ 1800.0 , 1740.0 /
0976 DATA (CNLWIN(10,J),J=1,17) /
0977 $ 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 , 45.000 ,
0978 $ 180.00 , 380.00 , 1050.0 , 1900.0 , 2300.0 ,
0979 $ 2300.0 , 2200.0 , 2150.0 , 2000.0 , 1900.0 ,
0980 $ 1800.0 , 1750.0 /
0981 DATA (CNLWIN(11,J),J=1,17) /
0982 $ 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 , 48.000 ,
0983 $ 190.00 , 390.00 , 1080.0 , 2000.0 , 2400.0 ,
0984 $ 2400.0 , 2300.0 , 2200.0 , 2100.0 , 1950.0 ,
0985 $ 1850.0 , 1800.0 /
0986 DATA (CNLWIN(12,J),J=1,17) /
0987 $ 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 , 50.000 ,
0988 $ 200.00 , 400.00 , 1100.0 , 2100.0 , 2500.0 ,
0989 $ 2500.0 , 2450.0 , 2300.0 , 2100.0 , 2000.0 ,
0990 $ 1900.0 , 1850.0 /
0991 DATA (CNLWIN(13,J),J=1,17) /
0992 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 ,
0993 $ 100.00 , 350.00 , 900.00 , 1400.0 , 2000.0 ,
0994 $ 2300.0 , 2380.0 , 2400.0 , 2300.0 , 2250.0 ,
0995 $ 2200.0 , 2120.0 /
0996 DATA (CNLWIN(14,J),J=1,17) /
0997 $ 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.0000 , 10.000 ,
0998 $ 100.00 , 350.00 , 900.00 , 1400.0 , 2000.0 ,
0999 $ 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
