File indexing completed on 2024-04-06 12:13:24
0001
0002
0003 REAL FUNCTION GR_PIP() ! auto. created by droll (10/6/2005)
0004
0005
0006
0007 IMPLICIT NONE
0008 #include "GeneratorInterface/BeamHaloGenerator/interface/bhgp_info.inc"
0009
0010 DOUBLE PRECISION LE_INC
0011 PARAMETER (LE_INC = 0.0001) ! ln(kinetic_E) inc. ln[GeV]
0012 INTEGER N_BIN, IBIN
0013 PARAMETER (N_BIN = 100) ! number of bins
0014 DOUBLE PRECISION R0_PIP(N_BIN),LOW,WID,LOG_EK,R_VAL,S_RATE
0015
0016 DATA R0_PIP /
0017 & 44507.9, 33951.6, 34764.9, 29954, 38856.2,
0018 & 36518, 25814.3, 58351.8, 43029.6, 49592.5,
0019 & 40926.3, 42601.2, 35461.4, 33313.8, 38918.9,
0020 & 43127.8, 28126, 29142.8, 29643.9, 28376.6,
0021 & 47631.3, 29954.6, 28846.3, 29294.4, 40831,
0022 & 33945.3, 23626.2, 33577.3, 18740.3, 31293.6,
0023 & 31690.7, 21793.2, 24124.1, 25305.6, 41014.7,
0024 & 27174.5, 27184, 26912.4, 24330.5, 22860.4,
0025 & 21498.5, 21228.8, 23276, 18260.9, 17414,
0026 & 13501.8, 14176.3, 14817.9, 17052.6, 16964.3,
0027 & 10987.8, 6393.23, 13483.6, 7799.76, 9291.8,
0028 & 7660.92, 10402, 9153.9, 9022.58, 9736.39,
0029 & 8370.17, 11286.1, 13373.9, 12010.9, 15214.3,
0030 & 18818.5, 16822.3, 17841.5, 20555.2, 23935.2,
0031 & 21663.4, 19795.6, 20171.1, 26102.3, 20380.3,
0032 & 18052.1, 22808.5, 23346.4, 22989, 24049,
0033 & 21698, 18892.5, 17146.9, 13629.6, 12599.7,
0034 & 9909.41, 9524.92, 8704.81, 5940.51, 6248.07,
0035 & 4696.1, 3819.87, 2742.07, 1825.46, 1630.36,
0036 & 943.719, 498.618, 227.152, 98.066, 15.7675
0037 & /
0038 LOW = 0
0039 WID = 0.088537
0040
0041 S_RATE = 0. ! initialize total sum of infinitesimal rate elements
0042 ! sum up all infinitesimal rate elements
0043 LOG_EK = DBLE(LOG(EPIMIN)) - 0.5*LE_INC ! start value of ln(kin_E)
0044 111 LOG_EK = LOG_EK + LE_INC
0045 IBIN = INT((LOG_EK-LOW)/WID) + 1
0046 R_VAL = 0.0
0047 IF(IBIN.GT.0.AND.IBIN.LE.N_BIN) R_VAL = R0_PIP(IBIN)
0048 S_RATE = S_RATE + R_VAL
0049 IF ((LOG_EK+LE_INC).LT.LOG(EPIMAX)) GOTO 111
0050 ! calculate the actual rate
0051 GR_PIP = REAL(S_RATE*LE_INC) ! total rate [Hz]
0052
0053 RETURN
0054
0055 END
0056
0057
0058 SUBROUTINE F66PIP ! automatically created by droll (10/6/2005)
0059
0060
0061
0062 IMPLICIT NONE
0063 #include "GeneratorInterface/BeamHaloGenerator/interface/bhgrhists.inc"
0064
0065 DATA H01PIP /
0066 & 0.0209389, 0.0159726, 0.0163552, 0.014092, 0.01828,
0067 & 0.01718, 0.0121444, 0.0274518, 0.0202434, 0.0233309,
0068 & 0.0192539, 0.0200419, 0.0166829, 0.0156726, 0.0183095,
0069 & 0.0202896, 0.013232, 0.0137103, 0.0139461, 0.0133499,
0070 & 0.0224083, 0.0140922, 0.0135708, 0.0137816, 0.0192091,
0071 & 0.0159696, 0.011115, 0.0157965, 0.00881642, 0.0147222,
0072 & 0.014909, 0.0102527, 0.0113493, 0.0119051, 0.0192955,
0073 & 0.0127843, 0.0127888, 0.012661, 0.0114464, 0.0107547,
0074 & 0.0101141, 0.00998715, 0.0109503, 0.00859087, 0.00819245,
0075 & 0.00635198, 0.00666929, 0.00697114, 0.00802245, 0.00798092,
0076 & 0.00516927, 0.00300771, 0.0063434, 0.00366942, 0.00437136,
0077 & 0.00360411, 0.00489363, 0.00430648, 0.0042447, 0.00458052,
0078 & 0.00393777, 0.00530959, 0.00629177, 0.00565058, 0.00715763,
0079 & 0.00885321, 0.0079141, 0.00839358, 0.00967026, 0.0112604,
0080 & 0.0101916, 0.0093129, 0.00948958, 0.0122799, 0.00958799,
0081 & 0.00849266, 0.0107303, 0.0109834, 0.0108152, 0.0113139,
0082 & 0.0102079, 0.00888804, 0.00806682, 0.00641207, 0.00592756,
0083 & 0.00466191, 0.00448103, 0.0040952, 0.00279473, 0.00293942,
0084 & 0.00220929, 0.00179707, 0.00129002, 0.000858795, 0.000767008,
0085 & 0.000443976, 0.000234576, 0.000106864, 4.61354e-05, 7.41788e-06
0086 & /
0087 L01PIP = 0
0088 W01PIP = 0.088537
0089
0090 DATA H11PIP /
0091 & 5.33113e-13, 0, 2.83716e-06, 0, 9.66523e-06,
0092 & 1.03652e-05, 1.08677e-05, 0.000117719, 0.000697829, 0.000348879,
0093 & 3.44783e-05, 0.000374304, 0.000215161, 0.00207609, 0.00168597,
0094 & 0.00332386, 0.000709265, 0.00268448, 0.00236645, 0.00152867,
0095 & 0.00173326, 0.00373986, 0.00333924, 0.00163364, 0.00152791,
0096 & 0.0017234, 0.00278988, 0.00447519, 0.00455486, 0.00298373,
0097 & 0.00118829, 0.000913156, 0.00220684, 0.00278482, 0.0221093,
0098 & 0.015162, 0.0169688, 0.0293492, 0.0125008, 0.0129483,
0099 & 0.0228637, 0.0129951, 0.0171873, 0.00809127, 0.0245021,
0100 & 0.0127751, 0.00926369, 0.0188683, 0.0088837, 0.0113599,
0101 & 0.00916915, 0.0221993, 0.0855953, 0.165229, 0.0606735,
0102 & 0.0092229, 0.0088328, 0.0200408, 0.0158931, 0.0124937,
0103 & 0.0165893, 0.0143928, 0.0104166, 0.00999168, 0.0220949,
0104 & 0.0321867, 0.0178989, 0.0138762, 0.0216627, 0.0583511,
0105 & 0.0127716, 0.0136221, 0.0265505, 0.00889986, 3.00881e-05,
0106 & 0.000916771, 0.00128923, 0.000705899, 0.000398539, 3.46806e-06,
0107 & 1.47919e-08, 0.000284208, 1.09732e-05, 3.59868e-09, 0,
0108 & 0, 0, 0, 0, 0,
0109 & 0, 0, 0, 0, 0,
0110 & 0, 0, 0, 0, 8.6477e-05
0111 & /
0112 L11PIP = -351.32
0113 W11PIP = 6.5698
0114
0115 DATA H12PIP /
0116 & 1.0654e-05, 8.0948e-06, 0, 0, 0,
0117 & 1.04201e-05, 1.32767e-05, 8.72615e-05, 0, 0.00032759,
0118 & 6.62489e-05, 0.000458022, 2.67734e-05, 3.08679e-05, 0.000406985,
0119 & 0.000119465, 8.12318e-05, 0.000315078, 0.000120396, 0.0032062,
0120 & 0.000339527, 0.00207842, 0.00013105, 0.000761955, 0.000532921,
0121 & 0.00116153, 0.000787987, 0.00094317, 0.00191637, 0.00211845,
0122 & 0.00150852, 0.00280968, 0.000619034, 0.00296141, 0.0012741,
0123 & 0.000497584, 0.000494573, 6.83578e-05, 0.0011124, 0.011549,
0124 & 0.0110228, 0.038561, 0.0219387, 0.0242722, 0.00837311,
0125 & 0.0164719, 0.0196938, 0.030935, 0.021377, 0.0245699,
0126 & 0.0183116, 0.0227022, 0.00939819, 0.0176613, 0.00816641,
0127 & 0.00667122, 0.00367635, 0.0147823, 0.00885708, 0.00611165,
0128 & 0.0135846, 0.0226814, 0.00581295, 0.00916744, 0.0896702,
0129 & 0.110059, 0.0528056, 0.0067003, 0.0185099, 0.00827425,
0130 & 0.004539, 0.0065992, 0.0108934, 0.00716736, 0.00931764,
0131 & 0.00730072, 0.00489178, 0.00719064, 0.0083024, 0.0163315,
0132 & 0.0170301, 0.00709818, 0.00844832, 0.0155328, 0.0169131,
0133 & 0.0113505, 0.0307901, 0.0335334, 0.0194657, 0.0203412,
0134 & 0.0158848, 0.00885054, 0.000221207, 7.26087e-06, 0.000167395,
0135 & 4.81084e-05, 5.27231e-07, 0, 3.52024e-05, 0.00197381
0136 & /
0137 L12PIP = -322.319
0138 W12PIP = 4.93108
0139
0140 DATA H13PIP /
0141 & 0.000310012, 5.40821e-05, 0, 0, 0.000353716,
0142 & 0.000436659, 0.00165439, 1.1487e-05, 0.000415032, 0,
0143 & 0.000987027, 0.000441375, 0.00115962, 0.000433986, 2.78603e-05,
0144 & 2.56581e-06, 1.18134e-05, 3.90798e-05, 0.000647728, 0.00039636,
0145 & 0.000488113, 0.000453221, 2.83241e-05, 0.00124356, 4.7898e-05,
0146 & 0.00179328, 0.00018784, 0.000598924, 0.000407481, 0.00120467,
0147 & 0.000850602, 0.000374841, 2.61002e-05, 0.000147083, 2.44628e-05,
0148 & 0.000881307, 0.0155929, 0.0195409, 0.0120419, 0.0174287,
0149 & 0.0370262, 0.0233855, 0.013874, 0.0341585, 0.0239351,
0150 & 0.0237525, 0.0348691, 0.0292253, 0.0292769, 0.015056,
0151 & 0.0201203, 0.0190767, 0.0251311, 0.0235859, 0.00982545,
0152 & 0.00917347, 0.010363, 0.00786145, 0.0173674, 0.00294907,
0153 & 0.00210077, 0.00204187, 0.00311355, 0.0020845, 0.00305026,
0154 & 0.0409822, 0.0868859, 0.0495863, 0.0030283, 0.00174327,
0155 & 0.000682221, 0.00204197, 0.00091821, 0.00130504, 0.000774014,
0156 & 0.00338104, 0.00126523, 0.00197955, 0.00958699, 0.00647541,
0157 & 0.00591911, 0.0101282, 0.02189, 0.0157605, 0.0211324,
0158 & 0.00942285, 0.0276158, 0.0102431, 0.0119338, 0.0299873,
0159 & 0.0172403, 0.0180265, 0.00757459, 0.015104, 0.00985159,
0160 & 0.0128346, 0.0404129, 0.000691739, 0, 0.000446395
0161 & /
0162 L13PIP = -282.57
0163 W13PIP = 4.23404
0164
0165 DATA H14PIP /
0166 & 2.29584e-05, 0, 0, 0, 0,
0167 & 2.32513e-05, 0, 0, 0.00126011, 0,
0168 & 1.73733e-05, 0, 0, 0, 0.000540727,
0169 & 0, 5.19404e-05, 0.00138925, 2.29278e-05, 0.000481245,
0170 & 7.17118e-05, 0, 0, 2.25705e-05, 0,
0171 & 1.9636e-05, 0, 0.00353336, 0.00705982, 0.0139233,
0172 & 0.0157968, 0.0135466, 0.0175213, 0.0289592, 0.038619,
0173 & 0.0313698, 0.0281606, 0.0244934, 0.0331813, 0.0361661,
0174 & 0.0309785, 0.0168464, 0.0176594, 0.0226654, 0.0195988,
0175 & 0.0152212, 0.0223367, 0.0161299, 0.0109783, 0.00288611,
0176 & 0.00761939, 0.0104571, 0.00404269, 0.00540237, 0.0137174,
0177 & 0.00207609, 0.00277996, 0.00151671, 0.00423609, 0.00529629,
0178 & 0.0379036, 0.0723185, 0.0259203, 0.00115837, 0.00269268,
0179 & 0.00223959, 0.00060991, 0.00970821, 0.00172158, 0.00273516,
0180 & 0.00475368, 0.00293239, 0.00301289, 0.00744784, 0.0085848,
0181 & 0.00558407, 0.0177777, 0.0143056, 0.0136371, 0.0167623,
0182 & 0.0169982, 0.0111679, 0.0215657, 0.0127491, 0.012487,
0183 & 0.0157764, 0.0213825, 0.0250225, 0.0132835, 0.0173019,
0184 & 0.0196315, 0.0061405, 0.0146683, 0.0061938, 0.00486222,
0185 & 0.000241493, 0, 0, 0, 2.21875e-05
0186 & /
0187 L14PIP = -232.588
0188 W14PIP = 3.80217
0189
0190 DATA H15PIP /
0191 & 0.000634152, 1.44403e-05, 0.000372091, 0.00598972, 0.000421085,
0192 & 0.00114549, 0.0045509, 0.000807313, 0.00716318, 0.00128207,
0193 & 0.0074748, 0.00523849, 0.000464371, 0.000975253, 0.0064183,
0194 & 0.00250317, 0.00736904, 0.00306794, 0.0117145, 0.0159397,
0195 & 0.0145629, 0.0118529, 0.00699298, 0.0118464, 0.00627574,
0196 & 0.00590872, 0.00823733, 0.0130178, 0.00695227, 0.00493675,
0197 & 0.00188163, 0.0052956, 0.00921775, 0.0144002, 0.00337183,
0198 & 0.00672707, 0.00553079, 0.00212723, 0.00628076, 0.0029888,
0199 & 0.00134376, 0.00137748, 0.000492401, 3.01768e-05, 5.49958e-05,
0200 & 0.000446173, 0.00494028, 0.00324178, 0.0736418, 0.114037,
0201 & 0.118867, 0.0380058, 0.00111624, 0.0016342, 0.00129093,
0202 & 0.000447238, 0.000640308, 0.00117184, 0.000321047, 0.00073503,
0203 & 0.00387093, 0.0119104, 0.00201602, 0.00352664, 0.00270712,
0204 & 0.00113564, 0.00052767, 0.00483383, 0.00101715, 0.0022072,
0205 & 0.00171, 0.0040411, 0.0031741, 0.00483984, 0.00140027,
0206 & 0.00162046, 0.00333865, 0.0124586, 0.0226273, 0.00859157,
0207 & 0.0230053, 0.0152241, 0.0171203, 0.0283448, 0.0195063,
0208 & 0.0261893, 0.0118142, 0.0125056, 0.0148478, 0.014118,
0209 & 0.0103067, 0.00549522, 0.0171441, 0.0189956, 0.019878,
0210 & 0.0154315, 0.00382841, 0.0172475, 0.0147403, 0.000916401
0211 & /
0212 L15PIP = -129.895
0213 W15PIP = 2.60096
0214
0215 DATA H16PIP /
0216 & 6.7971e-06, 3.01274e-06, 0, 0.00129956, 0,
0217 & 0.000271622, 8.26923e-05, 5.39106e-05, 6.01399e-06, 2.43287e-06,
0218 & 7.88295e-05, 3.7559e-05, 8.66536e-05, 0.000201543, 0.00179214,
0219 & 5.04746e-05, 0.000149904, 0.000183681, 0.000349176, 0.000608009,
0220 & 0.00150455, 0.000103156, 9.74479e-05, 0.000814623, 0.000161148,
0221 & 0.00290113, 0.000750103, 2.31375e-05, 0.000159454, 0.000165649,
0222 & 0.000153731, 3.21401e-05, 5.86141e-05, 0.00041467, 0.00165555,
0223 & 0.000277985, 0.000263332, 0.00142203, 0.000292073, 0,
0224 & 0, 0, 0, 0, 0,
0225 & 0, 1.01234e-05, 0.0654731, 0.457601, 0.120005,
0226 & 0.00440535, 0, 0, 0, 0,
0227 & 0, 0, 0, 0.000955635, 0.000119864,
0228 & 7.49476e-05, 1.63926e-05, 3.70977e-05, 0.000187335, 8.50817e-05,
0229 & 0.00113397, 0.000191324, 0.000111816, 1.86227e-05, 8.14771e-06,
0230 & 0.000180422, 0, 8.86878e-06, 2.10251e-05, 0.00016887,
0231 & 0.00018463, 0.00340725, 0.0112379, 0.018343, 0.0139495,
0232 & 0.0120172, 0.0240345, 0.0206841, 0.0190761, 0.0114656,
0233 & 0.0129129, 0.0160691, 0.0174703, 0.0129843, 0.0192155,
0234 & 0.0189283, 0.0142057, 0.0143604, 0.0113385, 0.0141372,
0235 & 0.013792, 0.00698127, 0.0112986, 0.00879474, 0.00578339
0236 & /
0237 L16PIP = -122.856
0238 W16PIP = 2.52641
0239
0240 DATA H17PIP /
0241 & 1.11898e-05, 2.87847e-05, 2.43455e-05, 0, 6.28702e-06,
0242 & 0.000585136, 0, 0.00014644, 0.000137975, 3.39792e-07,
0243 & 2.95295e-05, 0.000100641, 3.14584e-05, 2.9754e-06, 1.16329e-05,
0244 & 3.72721e-05, 8.2662e-05, 1.44343e-06, 1.44614e-06, 0,
0245 & 0, 0, 3.88282e-06, 2.64963e-05, 0.000833046,
0246 & 2.79771e-05, 2.51343e-05, 2.58417e-05, 5.29819e-06, 0.000243133,
0247 & 6.1886e-06, 0, 0, 0, 0,
0248 & 0, 0, 0, 0, 0.00836989,
0249 & 0.101087, 0.672209, 0.057397, 0.000615234, 0,
0250 & 0, 0, 0, 0, 0,
0251 & 0, 0, 2.02423e-05, 2.28592e-06, 1.54392e-05,
0252 & 0, 1.35571e-05, 0, 2.18217e-05, 2.89096e-07,
0253 & 1.49067e-05, 1.53079e-05, 0, 0, 0,
0254 & 0, 0, 0, 0, 0,
0255 & 0, 0, 0.000775777, 0.0168114, 0.01169,
0256 & 0.0179415, 0.0135197, 0.014845, 0.00864093, 0.0141509,
0257 & 0.00955823, 0.0108768, 0.00681651, 0.00868957, 0.0040554,
0258 & 0.00541674, 0.00271282, 0.00277466, 0.00232863, 0.00155673,
0259 & 0.00105471, 0.000776684, 0.000668267, 0.000399514, 0.00056125,
0260 & 0.000521595, 0.000281843, 0.00010287, 8.60263e-05, 0.000167689
0261 & /
0262 L17PIP = -91.6807
0263 W17PIP = 2.2174
0264
0265 DATA H18PIP /
0266 & 8.74515e-05, 0, 0, 0, 0,
0267 & 0, 0, 0, 0, 5.9248e-07,
0268 & 1.14786e-05, 8.42178e-07, 0, 0, 0,
0269 & 9.19037e-07, 0, 2.2951e-05, 0, 0,
0270 & 0, 0, 0, 0, 0,
0271 & 0, 0, 0, 0, 0,
0272 & 0, 0, 0, 0, 0,
0273 & 0, 0, 0, 0, 0,
0274 & 0, 0, 0, 0, 0,
0275 & 0, 0, 1.76373e-06, 0.00246469, 0.0147158,
0276 & 0.903448, 0.0716357, 0.00457964, 0.00165081, 0.00122157,
0277 & 0.000118245, 0, 0, 0, 0,
0278 & 0, 0, 0, 0, 0,
0279 & 0, 0, 0, 0, 0,
0280 & 0, 0, 0, 0, 0,
0281 & 0, 0, 0, 0, 0,
0282 & 0, 0, 0, 0, 0,
0283 & 0, 0, 0, 0, 0,
0284 & 0, 0, 0, 0, 0,
0285 & 0, 0, 0, 0, 3.95678e-05
0286 & /
0287 L18PIP = -38.3739
0288 W18PIP = 0.757227
0289
0290 DATA H21PIP /
0291 & 1.24499e-05, 0, 0, 0, 0,
0292 & 0, 0, 0, 0, 0,
0293 & 0, 0, 0, 0, 5.33113e-13,
0294 & 0, 9.22661e-09, 3.25917e-06, 2.98594e-11, 0.00029729,
0295 & 0.00180003, 0.00108058, 0.00446699, 0.00462489, 0.0064249,
0296 & 0.00766338, 0.00711616, 0.00552038, 0.00654624, 0.0235285,
0297 & 0.00753979, 0.00894942, 0.0105382, 0.0107301, 0.0426816,
0298 & 0.0123107, 0.00766936, 0.0113983, 0.0119821, 0.00969033,
0299 & 0.0215649, 0.0220866, 0.0165235, 0.0169058, 0.0242281,
0300 & 0.0892274, 0.224699, 0.0720402, 0.0352033, 0.0145885,
0301 & 0.0135497, 0.0210892, 0.0174985, 0.00957077, 0.0143121,
0302 & 0.0166563, 0.0180706, 0.00709623, 0.0128876, 0.0157655,
0303 & 0.0159355, 0.0167274, 0.00399354, 0.00850087, 0.005722,
0304 & 0.0104454, 0.0154387, 0.0068016, 0.00329413, 0.0106899,
0305 & 0.0041135, 0.0032934, 0.00095308, 0.00104362, 0.000323078,
0306 & 0.000143452, 0.000661197, 0.000498359, 0.000555052, 8.97538e-05,
0307 & 0.00116957, 0.00101443, 0.000116295, 4.69045e-05, 0.000522508,
0308 & 1.06665e-05, 0.000175137, 8.49495e-05, 2.75418e-05, 6.61382e-05,
0309 & 0.000153269, 7.54453e-05, 0.000549256, 6.46932e-05, 0.000197881,
0310 & 0.000326745, 1.71139e-05, 8.75438e-06, 9.72316e-06, 7.78273e-08
0311 & /
0312 L21PIP = -233.791
0313 W21PIP = 5.04482
0314
0315 DATA H22PIP /
0316 & 7.08316e-06, 0, 0, 1.37438e-05, 0,
0317 & 0, 0, 0.00156742, 0.00617852, 0.0040709,
0318 & 0.000731679, 0.00454595, 0.0327724, 0.00414136, 0.00447431,
0319 & 0.00434215, 0.00756351, 0.0214209, 0.00517579, 0.0100469,
0320 & 0.0177491, 0.0116227, 0.0121513, 0.00927092, 0.00798516,
0321 & 0.00817533, 0.00899092, 0.0101, 0.0129223, 0.0150802,
0322 & 0.0233626, 0.0135343, 0.0219158, 0.0171212, 0.0197701,
0323 & 0.0722747, 0.219766, 0.0731755, 0.0297602, 0.028741,
0324 & 0.020213, 0.0132795, 0.0256945, 0.0146538, 0.0116142,
0325 & 0.0130971, 0.0159855, 0.00532391, 0.012259, 0.00816045,
0326 & 0.00776793, 0.0114451, 0.00690639, 0.00980207, 0.00925963,
0327 & 0.00888912, 0.012625, 0.00911364, 0.00510311, 0.00422428,
0328 & 0.00553425, 0.0094148, 0.00691589, 0.00266256, 0.00196524,
0329 & 0.00111732, 0.00078692, 0.000346808, 8.34525e-05, 3.32677e-05,
0330 & 3.39221e-10, 0.00082605, 9.99705e-06, 0.000610111, 0.000769814,
0331 & 0.00034909, 4.9681e-05, 0.000784127, 0.000901422, 0.000476176,
0332 & 7.92977e-05, 0, 1.29623e-09, 1.89854e-05, 4.92113e-05,
0333 & 5.06098e-05, 1.1604e-05, 1.19333e-05, 1.33384e-05, 5.01709e-05,
0334 & 0, 0.000106114, 1.13685e-05, 0, 0,
0335 & 0, 0, 0, 1.19368e-05, 9.08825e-06
0336 & /
0337 L22PIP = -163.585
0338 W22PIP = 4.47615
0339
0340 DATA H23PIP /
0341 & 1.21665e-05, 0.000584345, 0.00123885, 0.00113967, 0.000910271,
0342 & 0.0013026, 0.00369245, 0.00730578, 0.00214106, 0.00306453,
0343 & 0.0103205, 0.0045115, 0.00561981, 0.00570045, 0.00394726,
0344 & 0.0111376, 0.00506751, 0.0101294, 0.00862129, 0.004646,
0345 & 0.00822931, 0.0118677, 0.00967557, 0.00662644, 0.0132282,
0346 & 0.016002, 0.0111102, 0.0242054, 0.0220567, 0.0390714,
0347 & 0.0356933, 0.0624498, 0.0796421, 0.205654, 0.0743523,
0348 & 0.0596956, 0.0451554, 0.0289786, 0.0102739, 0.0120995,
0349 & 0.00595321, 0.00323252, 0.0115545, 0.015578, 0.00571782,
0350 & 0.0055804, 0.00324562, 0.00429525, 0.00504112, 0.00458077,
0351 & 0.00261351, 0.0047216, 0.00293823, 0.00254585, 0.00384203,
0352 & 0.014821, 0.00134761, 0.00481391, 0.00793808, 0.00201766,
0353 & 0.00859462, 0.00291415, 0.00272756, 0.00356595, 0.000900677,
0354 & 0.001216, 0.000233361, 1.18341e-05, 1.20393e-05, 0,
0355 & 0, 2.40293e-05, 0, 0, 1.43355e-05,
0356 & 0, 0, 0, 1.48224e-05, 1.34953e-05,
0357 & 0, 0, 0, 0, 0,
0358 & 0, 6.65537e-05, 0, 0, 1.41686e-05,
0359 & 0, 0, 0.000115017, 0, 0,
0360 & 0, 0, 0, 0, 2.24414e-05
0361 & /
0362 L23PIP = -128.872
0363 W23PIP = 3.88154
0364
0365 DATA H24PIP /
0366 & 0.000311837, 0.00446498, 0.00289124, 0.00259707, 0.00201349,
0367 & 0.00543146, 0.00545922, 0.00117826, 0.0109708, 0.00716575,
0368 & 0.0123594, 0.0049786, 0.00625825, 0.00588438, 0.00234952,
0369 & 0.0133116, 0.00193849, 0.0160146, 0.00393, 0.0113437,
0370 & 0.0032592, 0.00357031, 0.00870625, 0.00280455, 0.00319542,
0371 & 0.00553435, 0.00716013, 0.0115591, 0.0131562, 0.0149962,
0372 & 0.0384392, 0.0433059, 0.0517587, 0.0910023, 0.175265,
0373 & 0.0956857, 0.0500386, 0.0401554, 0.017962, 0.0147156,
0374 & 0.016428, 0.00942572, 0.00352185, 0.00725293, 0.0143238,
0375 & 0.00600932, 0.00809748, 0.0107947, 0.00584364, 0.00753129,
0376 & 0.00492352, 0.00480419, 0.00483094, 0.00302921, 0.00877399,
0377 & 0.0101282, 0.00617114, 0.00517373, 0.00696767, 0.00485001,
0378 & 0.00787709, 0.00223682, 0.00726232, 0.0029128, 0.0110542,
0379 & 0.00135196, 0.00148019, 0.00217861, 0.000824032, 0.000154047,
0380 & 0.00015135, 0, 0, 1.904e-05, 0,
0381 & 0, 0, 1.93836e-05, 0, 0,
0382 & 0, 0.000437438, 0, 0, 0,
0383 & 0, 0, 0, 0, 0,
0384 & 0, 0, 0, 0, 0,
0385 & 1.9636e-05, 0, 0, 0, 1.66816e-05
0386 & /
0387 L24PIP = -122.919
0388 W24PIP = 3.58167
0389
0390 DATA H25PIP /
0391 & 3.08613e-05, 2.3775e-05, 3.31308e-05, 0.00172943, 2.5173e-05,
0392 & 2.53817e-05, 0.000379864, 0.00107328, 0.00141099, 0.000317165,
0393 & 0.00151919, 0.00222149, 0.00541066, 0.000101123, 0.000288772,
0394 & 0.000711627, 0.00931534, 0.00394902, 0.00158275, 0.00253355,
0395 & 0.00277531, 0.00329854, 0.00420593, 0.0032895, 0.0180799,
0396 & 0.00900933, 0.0110669, 0.000444264, 0.000593851, 0.0152901,
0397 & 0.000363287, 0.00104995, 0.000558568, 0.0020697, 0.00093785,
0398 & 0.000441557, 0.00517492, 0.0151616, 0.00518958, 0.0158878,
0399 & 0.00324517, 0.0110021, 0.0262855, 0.0081855, 0.00628305,
0400 & 0.0187747, 0.0273732, 0.0640964, 0.352619, 0.0680577,
0401 & 0.0332562, 0.0270636, 0.0266914, 0.0180726, 0.0157334,
0402 & 0.0147676, 0.00490606, 0.0157635, 0.0145518, 0.0198641,
0403 & 0.00444695, 0.00650925, 0.00278857, 0.00849149, 0.00431679,
0404 & 0.00897708, 0.00475489, 0.000160903, 0.000448345, 0.00212034,
0405 & 0.00105045, 0.00237049, 0.00203232, 0.00202296, 0.00232034,
0406 & 0.00218087, 0.00268235, 0.000809444, 0.00141758, 0.00260935,
0407 & 0.00160327, 0.00335068, 0.00117874, 0.000867483, 0.00142441,
0408 & 0.000471824, 0.000510839, 0.000538695, 0.000351824, 0.000129967,
0409 & 0.000177984, 0.000424432, 0.000176455, 0.000183713, 0.000319188,
0410 & 0.000240305, 0.00113176, 0, 0, 0.000243693
0411 & /
0412 L25PIP = -123.03
0413 W25PIP = 2.51637
0414
0415 DATA H26PIP /
0416 & 2.4521e-05, 0, 0, 0, 0,
0417 & 0.00119917, 4.40312e-06, 0, 0.00295916, 1.88719e-05,
0418 & 0.00115793, 0.00011599, 0.000766974, 0, 0.000746359,
0419 & 0, 0, 0, 0.000650065, 0.00430453,
0420 & 0.00322837, 0.00324985, 0.00287193, 0.00223117, 0.00261635,
0421 & 0.00340023, 0.00461937, 0.00551557, 0.00340553, 0.0074121,
0422 & 0.00780602, 0.00884254, 0.00847804, 0.0130245, 0.00897056,
0423 & 0.0120828, 0.0161812, 0.0306888, 0.0423262, 0.581011,
0424 & 0.0608386, 0.0254732, 0.0162222, 0.0112842, 0.00846502,
0425 & 0.0129803, 0.0106386, 0.00793811, 0.00695773, 0.00937925,
0426 & 0.0049649, 0.00350949, 0.00430532, 0.00208831, 0.00253026,
0427 & 0.00576843, 0.00296543, 0.00241021, 0.000739545, 0.00226987,
0428 & 0.00303522, 0.00236095, 0.00115835, 0.00269017, 0.00104449,
0429 & 0.001587, 0.00220075, 0, 0, 0,
0430 & 0.000752689, 0, 0.000989486, 0, 0,
0431 & 0.000852312, 0, 0, 1.12449e-05, 0,
0432 & 0, 0.00147333, 0.000189365, 0, 0,
0433 & 0, 0, 0, 0, 0,
0434 & 0, 0, 0, 0, 0,
0435 & 0, 0, 0, 0, 1.53022e-05
0436 & /
0437 L26PIP = -38.5658
0438 W26PIP = 0.97365
0439
0440 DATA H27PIP /
0441 & 1.60426e-05, 0, 0, 0.000592581, 0,
0442 & 0, 3.67547e-05, 0, 0, 0.000103593,
0443 & 1.31541e-05, 1.21189e-05, 0.000160236, 0.000689567, 0.000662996,
0444 & 0.000626592, 0.000177834, 0.000254555, 0.000617186, 0.000338572,
0445 & 9.48624e-05, 0.000734885, 0.000295448, 0.000971497, 0.00157463,
0446 & 0.00106084, 0.000291848, 0.00111911, 0.000933523, 0.00330945,
0447 & 0.000635218, 0.00155171, 0.00147312, 0.00148892, 0.00351518,
0448 & 0.00209544, 0.00249117, 0.00508019, 0.00162404, 0.00336915,
0449 & 0.00294014, 0.00329877, 0.00707486, 0.00560809, 0.0119778,
0450 & 0.022747, 0.0400217, 0.0812578, 0.265286, 0.309946,
0451 & 0.0775727, 0.0409609, 0.0252535, 0.0127548, 0.00601407,
0452 & 0.00461052, 0.00248568, 0.00494846, 0.00359106, 0.00405223,
0453 & 0.00163796, 0.00134051, 0.00203898, 0.001868, 0.000836511,
0454 & 0.00219768, 0.00108489, 0.00288126, 0.00158345, 0.00321088,
0455 & 0.00113011, 0.000225731, 0.00177876, 0.00117096, 0.00068002,
0456 & 0.000743821, 0.000353149, 0.000282057, 0.000396032, 0.000661008,
0457 & 0.000860054, 0.00130829, 8.06919e-05, 8.55036e-05, 0.000135121,
0458 & 7.72747e-05, 2.35359e-05, 9.22029e-05, 0.000101736, 0.000121441,
0459 & 1.07369e-05, 1.77419e-05, 0, 0.000543756, 0,
0460 & 0, 1.31641e-05, 0, 0, 1.2226e-05
0461 & /
0462 L27PIP = -20.4283
0463 W27PIP = 0.416322
0464
0465 DATA H28PIP /
0466 & 0.000806955, 0, 0, 0, 0,
0467 & 0, 0, 0, 4.79586e-05, 0,
0468 & 0, 5.18181e-05, 0, 4.80537e-05, 0,
0469 & 0, 0, 0.00207586, 4.68062e-05, 4.48167e-05,
0470 & 9.60901e-05, 4.79973e-05, 4.8069e-05, 7.41246e-05, 0.0012859,
0471 & 0.00106357, 0.00125006, 0.000908712, 0.00432513, 0.00474448,
0472 & 0.00491914, 0.00235676, 0.00357869, 0.00465614, 0.0122611,
0473 & 0.00566573, 0.0145555, 0.0139249, 0.0197937, 0.0114883,
0474 & 0.0176319, 0.017118, 0.0301752, 0.0254699, 0.0268255,
0475 & 0.0342418, 0.0541782, 0.0651573, 0.111995, 0.15187,
0476 & 0.0619188, 0.0407728, 0.0362754, 0.0342405, 0.0296624,
0477 & 0.0241963, 0.0162363, 0.0240553, 0.0101949, 0.0103208,
0478 & 0.00970691, 0.00878518, 0.00438486, 0.000991544, 0.00571476,
0479 & 0.00401078, 0.00485682, 0.00814876, 0.00133929, 0.000844935,
0480 & 0.00256597, 0.0020702, 0.00214425, 0.000804268, 0.00178353,
0481 & 0.0013444, 0.0013126, 0.00117207, 4.43966e-05, 0.00228745,
0482 & 6.97493e-05, 0.0010184, 4.50188e-05, 4.73003e-05, 0.000868372,
0483 & 0, 0, 0, 0, 6.77857e-06,
0484 & 2.53689e-05, 0, 0, 0, 4.50572e-05,
0485 & 0, 6.25734e-05, 0, 0, 0.000795594
0486 & /
0487 L28PIP = -2.91183
0488 W28PIP = 0.0592163
0489
0490 DATA H31PIP /
0491 & 1.28794e-10, 4.29349e-05, 2.95159e-06, 4.35906e-06, 1.74352e-05,
0492 & 0.000140797, 8.0488e-08, 0.000182465, 0.000158542, 5.07617e-05,
0493 & 0.000506308, 0.000202307, 9.44656e-05, 0.000523264, 0.000803045,
0494 & 0.00374257, 5.85455e-05, 0.000574009, 0.00326433, 0.00375907,
0495 & 0.00255214, 0.000760615, 0.00661568, 0.0135184, 0.00380813,
0496 & 0.00558576, 0.00409408, 0.00567706, 0.00583447, 0.00611012,
0497 & 0.0101142, 0.0125109, 0.010277, 0.00629738, 0.0127955,
0498 & 0.0204694, 0.00882161, 0.0158957, 0.0199407, 0.0377303,
0499 & 0.0323829, 0.0346142, 0.0413717, 0.0451508, 0.0409556,
0500 & 0.045016, 0.0633272, 0.0371606, 0.112646, 0.0356994,
0501 & 0.0284791, 0.0288539, 0.0264478, 0.0302748, 0.0352145,
0502 & 0.0300017, 0.0171916, 0.0107747, 0.0115944, 0.00968996,
0503 & 0.00610279, 0.00515107, 0.00579814, 0.00360386, 0.00298062,
0504 & 0.00119322, 0.00633918, 0.00325104, 0.00428859, 0.00107778,
0505 & 0.00109302, 0.00359229, 0.00143928, 0.00401823, 0.00239217,
0506 & 0.00281532, 0.000310152, 0.0010396, 0.000107218, 0.000913356,
0507 & 0.000568067, 0.000246301, 4.93317e-05, 0.000143489, 8.97809e-05,
0508 & 0.00052992, 5.83217e-05, 6.23938e-06, 0.000300814, 9.67648e-06,
0509 & 4.52452e-05, 0, 6.15634e-11, 3.68863e-06, 1.56664e-06,
0510 & 9.36341e-06, 0, 7.35527e-07, 0, 4.62094e-05
0511 & /
0512 L31PIP = -0.689192
0513 W31PIP = 0.0144891
0514
0515 DATA H32PIP /
0516 & 2.0661e-09, 5.17431e-06, 0, 0, 0,
0517 & 0, 2.17538e-09, 0, 0, 0,
0518 & 0.000195773, 8.82447e-06, 9.22747e-06, 4.85883e-09, 6.01971e-08,
0519 & 1.08997e-05, 1.10367e-07, 0.000859553, 0.000275485, 7.16774e-05,
0520 & 2.07681e-05, 0.0011083, 0.000309806, 0.000296728, 0.000693354,
0521 & 0.000400204, 0.000523841, 0.000489483, 0.000712496, 9.2805e-05,
0522 & 0.00104667, 0.000256216, 0.0038372, 0.00286395, 0.00086659,
0523 & 0.0062178, 0.00151287, 0.00663368, 0.00520896, 0.014148,
0524 & 0.0114697, 0.0129929, 0.0219428, 0.0155873, 0.0216692,
0525 & 0.0229147, 0.0211062, 0.045339, 0.045421, 0.0874331,
0526 & 0.0765928, 0.103529, 0.0835588, 0.0483317, 0.0481097,
0527 & 0.064725, 0.039975, 0.0279965, 0.0115384, 0.0170735,
0528 & 0.0148633, 0.0151424, 0.0113386, 0.00990759, 0.0160581,
0529 & 0.0115443, 0.00705588, 0.00326453, 0.0105802, 0.00843145,
0530 & 0.00318462, 0.00400778, 0.000999909, 0.000551292, 0.00113602,
0531 & 0.00157156, 0.000315473, 0.000769585, 0.000143276, 4.43216e-05,
0532 & 5.60396e-05, 2.72143e-05, 0.00131919, 0.000352846, 5.91917e-05,
0533 & 0.000559766, 3.6878e-06, 7.59175e-05, 0, 1.16646e-05,
0534 & 5.40041e-06, 0, 0, 1.85268e-05, 5.14758e-06,
0535 & 5.99645e-06, 0, 1.63374e-06, 0.000418494, 0.000186145
0536 & /
0537 L32PIP = -0.420724
0538 W32PIP = 0.00795474
0539
0540 DATA H33PIP /
0541 & 2.71362e-05, 0, 0, 1.01681e-05, 1.39776e-05,
0542 & 0, 0, 5.2797e-05, 0.000519822, 0.000346547,
0543 & 0.000692858, 0.000545854, 0.000354293, 0.00176475, 0.000292791,
0544 & 0.000122758, 0.0014593, 0.000388585, 0.00012397, 0.00182378,
0545 & 0.000725428, 0.00347942, 0.00311504, 0.00111084, 0.00181921,
0546 & 0.00242183, 0.00219594, 0.00456789, 0.00271807, 0.00821183,
0547 & 0.00551707, 0.0116062, 0.0233815, 0.0251755, 0.0359301,
0548 & 0.0266215, 0.0596189, 0.0438721, 0.0574053, 0.0539203,
0549 & 0.0829509, 0.0525141, 0.0300645, 0.0236688, 0.0132295,
0550 & 0.0375977, 0.0457821, 0.0505996, 0.0626144, 0.0348189,
0551 & 0.026336, 0.049698, 0.0286946, 0.022097, 0.0157245,
0552 & 0.00858574, 0.00288532, 0.00412126, 0.0029887, 0.00558716,
0553 & 0.00202055, 0.00131854, 0.000822525, 0.00120722, 0.00111908,
0554 & 0.000129909, 0.00123292, 0.00143372, 0.00094851, 0.00137501,
0555 & 0.00116737, 0.000409284, 0.00290592, 0.000119708, 1.93924e-05,
0556 & 0.000330044, 0.000286246, 0.000295407, 5.62705e-06, 5.58155e-05,
0557 & 0.000117239, 0, 1.73392e-05, 0, 0,
0558 & 8.07097e-05, 0, 1.09871e-05, 0, 0,
0559 & 0, 2.28838e-05, 1.74814e-05, 0, 0,
0560 & 0, 0, 0, 0, 1.81038e-05
0561 & /
0562 L33PIP = -0.120724
0563 W33PIP = 0.00275619
0564
0565 DATA H34PIP /
0566 & 7.99587e-05, 0, 0.000354492, 0.000224612, 0,
0567 & 0.000689408, 0.000233548, 2.57944e-05, 7.75077e-05, 0.000396437,
0568 & 4.42251e-05, 0.000554149, 0.00124161, 0.000742672, 0.000190144,
0569 & 0.00206378, 0.000321067, 0.000406244, 0.0055979, 0.00512566,
0570 & 0.00614435, 0.00617894, 0.0108186, 0.0195639, 0.00805201,
0571 & 0.0153466, 0.0197377, 0.0195504, 0.020018, 0.023119,
0572 & 0.0111326, 0.0202596, 0.015652, 0.00786615, 0.0125039,
0573 & 0.0147067, 0.0327006, 0.0216295, 0.0283346, 0.0380813,
0574 & 0.0368156, 0.0350314, 0.0295645, 0.0269304, 0.0258832,
0575 & 0.0257712, 0.0245514, 0.0194394, 0.0119366, 0.0198736,
0576 & 0.0214727, 0.017422, 0.0276843, 0.0349511, 0.0431459,
0577 & 0.0417523, 0.037938, 0.019027, 0.0200027, 0.0148423,
0578 & 0.0101149, 0.0150882, 0.0061691, 0.00512886, 0.0175173,
0579 & 0.00620951, 0.00168659, 0.00242407, 0.00215674, 0.00312956,
0580 & 0.00461509, 0.0022891, 0.0059655, 0.000718532, 0.00183711,
0581 & 0.00108625, 0.000657539, 0.000396869, 0.00157424, 0.000171215,
0582 & 0.000340018, 2.54917e-05, 0.00481639, 0.000150324, 0.000372375,
0583 & 0.000225013, 0, 0, 0, 6.34141e-05,
0584 & 0.00036455, 5.35571e-05, 0.000745224, 0, 8.12183e-05,
0585 & 0, 0, 0, 0, 2.50982e-05
0586 & /
0587 L34PIP = -0.050641
0588 W34PIP = 0.00106982
0589
0590 DATA H35PIP /
0591 & 5.35261e-05, 0, 0, 0.000436165, 0,
0592 & 0.000365103, 0, 4.55522e-05, 0, 2.33982e-05,
0593 & 0.000243452, 0.0015255, 0.000144004, 0.00213957, 0.000210969,
0594 & 0.00060538, 0.00167152, 0.000287396, 0.0013186, 0.00212773,
0595 & 0.0121448, 0.00275012, 0.00563258, 0.00715298, 0.0119922,
0596 & 0.00922834, 0.00723663, 0.00982466, 0.00266575, 0.0112884,
0597 & 0.00603036, 0.00605013, 0.00805954, 0.013829, 0.00902096,
0598 & 0.00830491, 0.00989806, 0.0060158, 0.00997639, 0.0245136,
0599 & 0.0128573, 0.0103468, 0.0311747, 0.0132113, 0.0184835,
0600 & 0.0255605, 0.0149908, 0.012473, 0.0114126, 0.0138825,
0601 & 0.019067, 0.0148666, 0.0220874, 0.0199646, 0.0255158,
0602 & 0.0140664, 0.0136795, 0.0269275, 0.0209593, 0.0159863,
0603 & 0.00798243, 0.0118761, 0.0180555, 0.051509, 0.0619272,
0604 & 0.0464918, 0.0452716, 0.0442871, 0.0484327, 0.0424279,
0605 & 0.00850538, 0.00180157, 0.00983661, 0.00282007, 0.00292321,
0606 & 0.00173022, 0.00943142, 0.000278791, 0.00600116, 0.00308312,
0607 & 0.000432189, 0.00567291, 0.00015195, 0.00023455, 0.00927934,
0608 & 0.0014893, 0.00359559, 0.00292326, 0.000511223, 0,
0609 & 0, 0, 0, 9.83013e-05, 0.000417227,
0610 & 0, 5.05413e-05, 2.6856e-05, 6.58568e-05, 5.17121e-05
0611 & /
0612 L35PIP = -0.0301681
0613 W35PIP = 0.000579994
0614
0615 DATA H36PIP /
0616 & 0.00159298, 0, 1.01234e-05, 0.000484149, 1.32841e-05,
0617 & 0, 0.00144427, 0.00227121, 0.00173618, 0.00139741,
0618 & 0.000695295, 9.2873e-05, 0.00166886, 0.00108113, 0.00242136,
0619 & 0.000142523, 0.00186032, 0.000123161, 0.0013415, 0.00192481,
0620 & 0.00300558, 0.00387274, 0.00459359, 0.00759813, 0.00393002,
0621 & 0.00178347, 0.00348823, 0.00206297, 0.00479786, 0.00794942,
0622 & 0.00262232, 0.010522, 0.0117119, 0.00732612, 0.00583473,
0623 & 0.00796447, 0.00698693, 0.0167263, 0.00751639, 0.0139822,
0624 & 0.00949443, 0.0124952, 0.0154004, 0.0143687, 0.0217848,
0625 & 0.025943, 0.0251584, 0.0296014, 0.053718, 0.0402889,
0626 & 0.0289051, 0.0233588, 0.0175512, 0.0198013, 0.0129637,
0627 & 0.0116138, 0.0112649, 0.0103107, 0.0100616, 0.0099542,
0628 & 0.00625278, 0.0035849, 0.0101271, 0.0061698, 0.0144702,
0629 & 0.00457895, 0.0155086, 0.0353881, 0.0321253, 0.0378383,
0630 & 0.0415999, 0.0297897, 0.0296744, 0.0341135, 0.0358265,
0631 & 0.0225124, 0.0292567, 0.0146062, 0.0215979, 0.00317606,
0632 & 0.000133971, 0.00206779, 0.000181619, 2.23945e-05, 2.91215e-05,
0633 & 0.00153234, 0.00222115, 9.65401e-05, 0.00158258, 6.08592e-05,
0634 & 0.00119254, 0.0010705, 0.00182816, 0.000556997, 4.45912e-05,
0635 & 3.0413e-05, 0.000496812, 0, 0, 3.91319e-05
0636 & /
0637 L36PIP = -0.0166924
0638 W36PIP = 0.000341853
0639
0640 DATA H37PIP /
0641 & 0.0012297, 0, 0, 0.000573245, 0,
0642 & 0.00183527, 0.000880925, 0.00051746, 0.00274355, 0.00120438,
0643 & 0.00226004, 0.000867543, 0.00229952, 0.00219255, 0.00351109,
0644 & 0.00252371, 0.00225901, 0.00266526, 0.00431971, 0.00189202,
0645 & 0.00266717, 0.00314091, 0.00183742, 0.00205811, 0.00280869,
0646 & 0.00267329, 0.00264961, 0.00453073, 0.00410943, 0.00300021,
0647 & 0.00499862, 0.0081051, 0.00525802, 0.00651257, 0.00814132,
0648 & 0.00711212, 0.012918, 0.0139406, 0.0187187, 0.0139834,
0649 & 0.025749, 0.0252569, 0.0358428, 0.0410837, 0.0660987,
0650 & 0.102705, 0.0709452, 0.0523164, 0.0336205, 0.0281069,
0651 & 0.0217868, 0.0199769, 0.0147701, 0.0143804, 0.0100903,
0652 & 0.00677257, 0.0118054, 0.00949159, 0.00848774, 0.00508739,
0653 & 0.0042584, 0.00517, 0.00447889, 0.0054893, 0.00261635,
0654 & 0.00298829, 0.00510355, 0.00310483, 0.00435912, 0.00400809,
0655 & 0.00314713, 0.00193429, 0.00210328, 0.00325468, 0.00299429,
0656 & 0.0014399, 0.0134655, 0.0196879, 0.0188646, 0.0173608,
0657 & 0.0172784, 0.0145814, 0.0134852, 0.0124369, 0.0118326,
0658 & 0.0108067, 0.00688096, 0.00434847, 0.004419, 0.00254565,
0659 & 0.00173855, 0.00113189, 0.0014457, 0.000797456, 0.00177448,
0660 & 0.000260217, 0.000524396, 0.000264337, 0.000156408, 0.000148264
0661 & /
0662 L37PIP = -0.00880208
0663 W37PIP = 0.000192613
0664
0665 DATA H38PIP /
0666 & 0.0011731, 0.0011731, 0, 0.000110686, 0,
0667 & 0, 0, 0, 0, 0,
0668 & 8.74515e-05, 0, 0.000523211, 0, 0.00112026,
0669 & 0.00120244, 0.00123438, 0.00122206, 0.00165685, 0.0037999,
0670 & 0.00638222, 0.00622376, 0.0073643, 0.00735365, 0.0146963,
0671 & 0.0128307, 0.0235382, 0.0421516, 0.085103, 0.202054,
0672 & 0.310699, 0.0842951, 0.0458487, 0.0273146, 0.0224679,
0673 & 0.0119801, 0.0103097, 0.0105407, 0.00538071, 0.00925804,
0674 & 0.00371115, 0.00120743, 0.00466223, 0.00363172, 0.00248122,
0675 & 0.00152084, 0.0014371, 0.00203384, 0.000646645, 0.00238731,
0676 & 0.00217952, 0.000361746, 0.000882348, 0.00146813, 0.00102953,
0677 & 0.00111919, 0.00161294, 0.000416765, 0.000288231, 0.00188129,
0678 & 0.00017985, 0.000253361, 0.000851044, 0.000847027, 0.000204251,
0679 & 0.000326698, 9.58335e-05, 0.000282528, 0.00014911, 0.000115656,
0680 & 0.00017614, 6.63742e-05, 3.61042e-05, 0, 7.20094e-05,
0681 & 0.0001011, 0.000184583, 0.000149835, 0.000187802, 0.000145535,
0682 & 0.000193256, 7.78497e-05, 7.27695e-05, 0.000222794, 0.000114395,
0683 & 7.74734e-05, 7.5978e-05, 7.11435e-05, 0, 4.01955e-05,
0684 & 3.92497e-05, 0.000114905, 0.000150017, 0.00015123, 0,
0685 & 0, 7.91518e-05, 0, 0, 3.90932e-05
0686 & /
0687 L38PIP = -0.00310403
0688 W38PIP = 0.000103209
0689
0690 DATA H41PIP /
0691 & 7.12406e-06, 0, 0, 0, 0,
0692 & 0, 0, 0, 3.99872e-06, 9.03899e-06,
0693 & 2.84439e-05, 1.36255e-07, 0.000654702, 9.37806e-06, 0.00013462,
0694 & 8.75297e-05, 0.000171742, 0.000500422, 3.56214e-05, 0.00140794,
0695 & 0.000219579, 0.000690999, 0.000774512, 0.000835473, 0.000954492,
0696 & 0.000128619, 0.00247162, 0.000171227, 0.00122601, 0.00189569,
0697 & 0.000971313, 0.00519108, 0.00358931, 0.00369466, 0.00433597,
0698 & 0.00289273, 0.00543281, 0.00538684, 0.0088355, 0.00917464,
0699 & 0.01451, 0.0155693, 0.00799665, 0.0186751, 0.014417,
0700 & 0.0188647, 0.0290173, 0.0280542, 0.0346627, 0.0235838,
0701 & 0.0379886, 0.0337501, 0.0825815, 0.0975631, 0.0614075,
0702 & 0.0549235, 0.0532828, 0.0398725, 0.0399209, 0.0233768,
0703 & 0.0294152, 0.0256782, 0.0301227, 0.0181028, 0.00881476,
0704 & 0.0151506, 0.0136324, 0.00790882, 0.00715734, 0.00848573,
0705 & 0.00646705, 0.0109798, 0.00283884, 0.00176032, 0.00313786,
0706 & 0.00134873, 0.00295594, 0.00393538, 0.00218707, 0.000939617,
0707 & 0.000742913, 0.000781287, 0.0017082, 0.000200387, 9.71578e-05,
0708 & 2.00303e-05, 3.49761e-05, 0.000120509, 0.000289781, 1.96833e-05,
0709 & 2.95511e-05, 0.00101516, 0.00136115, 0.000424682, 0.000170289,
0710 & 6.75586e-06, 1.45908e-05, 1.39361e-06, 1.44318e-07, 3.70778e-07
0711 & /
0712 L41PIP = -0.780116
0713 W41PIP = 0.0146565
0714
0715 DATA H42PIP /
0716 & 0.00038781, 9.06944e-06, 0, 0, 0,
0717 & 1.64771e-05, 0.000365398, 2.80174e-07, 7.70234e-05, 0.000591257,
0718 & 2.46092e-05, 1.54001e-05, 7.83468e-06, 0.000110317, 3.50895e-05,
0719 & 1.65329e-05, 0.000611361, 0.000816823, 0.000137558, 0.00011028,
0720 & 0.00031805, 0.000162401, 0.00123622, 0.00194586, 0.00225018,
0721 & 0.00335713, 0.00180732, 0.00437586, 0.00650185, 0.00338413,
0722 & 0.00415838, 0.0204328, 0.0112302, 0.00936382, 0.0121223,
0723 & 0.00788422, 0.0112914, 0.0181425, 0.0232887, 0.0277924,
0724 & 0.0335685, 0.0276137, 0.0537282, 0.0924036, 0.21226,
0725 & 0.0991985, 0.0450569, 0.0344461, 0.0283617, 0.0272219,
0726 & 0.015298, 0.0108333, 0.0231932, 0.014706, 0.0217707,
0727 & 0.0156771, 0.0163718, 0.0130608, 0.00475403, 0.0099842,
0728 & 0.0120839, 0.00235043, 0.00428238, 0.00260995, 0.000554187,
0729 & 0.00057149, 0.000220071, 0.000674093, 0.000915675, 3.48323e-05,
0730 & 0.000697384, 0.000278475, 0.000328687, 3.22593e-05, 5.65186e-05,
0731 & 1.10695e-06, 6.56808e-06, 0.00015288, 0.0002197, 8.71195e-06,
0732 & 0, 0, 0, 0, 0,
0733 & 3.3375e-05, 0, 0, 0, 0,
0734 & 0, 0, 0, 0, 3.03936e-14,
0735 & 0, 0, 0, 0, 7.66099e-09
0736 & /
0737 L42PIP = -0.37189
0738 W42PIP = 0.00834686
0739
0740 DATA H43PIP /
0741 & 0.000723493, 0, 0.000846544, 0, 0,
0742 & 0.000637549, 2.41319e-05, 0, 0, 3.39353e-05,
0743 & 5.87368e-05, 0.000304917, 1.37719e-05, 0.000952755, 3.66594e-05,
0744 & 0.000544509, 0, 0.000328171, 0.00342121, 0.000205468,
0745 & 0.000215236, 0.000692082, 0.00201273, 0.00139119, 0.000589925,
0746 & 0.00388414, 0.00203774, 0.00329297, 0.000208189, 0.00378725,
0747 & 0.00538812, 0.0103019, 0.00237444, 0.00263076, 0.00438182,
0748 & 0.000472045, 0.00477061, 0.00330789, 0.0024474, 0.00325797,
0749 & 0.00430463, 0.0113602, 0.0143636, 0.00477236, 0.0273281,
0750 & 0.0117543, 0.0431649, 0.0701595, 0.0957315, 0.180583,
0751 & 0.145802, 0.127456, 0.0344768, 0.0485002, 0.015786,
0752 & 0.0122722, 0.0104621, 0.00497085, 0.0032341, 0.00524109,
0753 & 0.00807538, 0.00627746, 0.00315039, 0.00430491, 0.00195062,
0754 & 0.00251297, 0.0029868, 0.00343575, 0.00156345, 0.00193995,
0755 & 0.00189451, 0.00243643, 0.00267833, 0.00172628, 0.00438196,
0756 & 0.000681001, 0.000459057, 0.000594888, 0.00156496, 0.00133181,
0757 & 0.00226148, 0.00362721, 5.04333e-05, 6.75148e-06, 0.00221623,
0758 & 9.02317e-05, 6.67287e-06, 3.23188e-05, 7.74145e-05, 0,
0759 & 0.00036123, 0, 0, 1.37937e-05, 0,
0760 & 0, 0, 0, 0, 9.34078e-06
0761 & /
0762 L43PIP = -0.128575
0763 W43PIP = 0.00256316
0764
0765 DATA H44PIP /
0766 & 4.0445e-05, 0, 0, 0, 0.000591049,
0767 & 6.34163e-06, 0.000259383, 1.90751e-05, 0, 0,
0768 & 0, 0.00413748, 0.00127308, 0.000262633, 0.00176226,
0769 & 2.23706e-05, 1.15524e-05, 0.00215622, 0.00128739, 0.000156873,
0770 & 0.00019596, 2.34358e-05, 0.00197386, 0.000728255, 0.000929693,
0771 & 0, 0.00116116, 6.7711e-05, 0.00185521, 0.0020505,
0772 & 0.00340586, 0.00406331, 0.00232836, 0.0040342, 0.0053157,
0773 & 0.0120484, 0.00492319, 0.0148237, 0.0133845, 0.0331181,
0774 & 0.0276242, 0.0373833, 0.0388445, 0.0625208, 0.0915496,
0775 & 0.11652, 0.146603, 0.0740006, 0.0508302, 0.0428585,
0776 & 0.0343455, 0.0363163, 0.0197064, 0.0269142, 0.01312,
0777 & 0.0131264, 0.00511452, 0.00709826, 0.00216825, 0.00434649,
0778 & 0.000657621, 0.000168079, 0, 0.000918203, 0.00132351,
0779 & 0, 0.00301724, 4.23175e-05, 0.00121588, 0.000425125,
0780 & 4.48013e-05, 0.000665258, 0.0017137, 0.00228416, 0.00301833,
0781 & 0.0042711, 0.00067952, 2.59915e-05, 0.00075808, 3.99737e-05,
0782 & 0.00197934, 7.74009e-05, 8.20369e-05, 0.00616621, 4.82159e-05,
0783 & 5.33311e-05, 0.000643396, 0, 0.000211318, 0,
0784 & 0, 0, 0, 0, 0,
0785 & 0, 0, 0, 0, 6.10432e-05
0786 & /
0787 L44PIP = -0.0491158
0788 W44PIP = 0.00107098
0789
0790 DATA H45PIP /
0791 & 4.52946e-05, 0, 0, 0.00102335, 2.71368e-06,
0792 & 0, 2.59857e-05, 0, 0, 0,
0793 & 0, 0, 0.000545824, 0, 0,
0794 & 0.00132595, 0.000424949, 5.78925e-05, 0.00045429, 5.21142e-06,
0795 & 0, 0, 0.00012985, 0.00121624, 0.0035221,
0796 & 4.73452e-05, 7.52486e-05, 4.55522e-05, 0.000219817, 0.00131957,
0797 & 0.00239708, 0.00261906, 0.00144914, 0.00254368, 0.00580738,
0798 & 0.00537364, 0.0139752, 0.0089963, 0.0215118, 0.0227525,
0799 & 0.0119947, 0.0205214, 0.0100061, 0.00704807, 0.0420086,
0800 & 0.064295, 0.0754608, 0.0854809, 0.170355, 0.116397,
0801 & 0.0764914, 0.050816, 0.058068, 0.020608, 0.0213869,
0802 & 0.00925749, 0.0119685, 0.00523379, 0.0042687, 0.00591503,
0803 & 0.00297464, 0.00190569, 0.00521057, 0.00306685, 0.000510461,
0804 & 0.00340575, 0.000994478, 0.0011526, 0.00010926, 0.000193566,
0805 & 0.000179241, 8.57584e-05, 0.00263892, 7.26815e-05, 0.00148858,
0806 & 0.00074199, 0, 6.22959e-05, 0.000510933, 0.000473547,
0807 & 0, 0, 0, 0.000232842, 3.28861e-05,
0808 & 0.00253442, 0, 4.28641e-05, 0.000149788, 2.23307e-05,
0809 & 0.00433239, 0, 0, 0, 0.00128667,
0810 & 0, 0, 2.04368e-05, 3.58233e-05, 3.79604e-05
0811 & /
0812 L45PIP = -0.0255363
0813 W45PIP = 0.000526824
0814
0815 DATA H46PIP /
0816 & 2.43158e-05, 0, 1.13823e-05, 0, 0,
0817 & 0, 0, 1.99866e-05, 3.95629e-05, 0.000462071,
0818 & 6.19793e-05, 0.000926578, 0.00236606, 0.00019593, 6.95311e-05,
0819 & 0.00139975, 0.00205997, 0.000954279, 0.00258564, 0.00442554,
0820 & 0.00347299, 0.0021803, 0.00304223, 0.000710685, 0.00249227,
0821 & 0.00342753, 0.00358398, 0.00878728, 0.0037929, 0.00232249,
0822 & 0.00263183, 0.00381849, 0.00193612, 0.000275914, 0.00105218,
0823 & 0.00604021, 0.00836814, 0.00388987, 0.00797988, 0.0119332,
0824 & 0.0158339, 0.0142281, 0.028249, 0.0353936, 0.0542958,
0825 & 0.0664097, 0.139036, 0.159277, 0.0988978, 0.0729982,
0826 & 0.0372809, 0.0226715, 0.0236881, 0.0156798, 0.00835428,
0827 & 0.00650202, 0.0073657, 0.0071501, 0.00430246, 0.00619613,
0828 & 0.0058693, 0.00233525, 0.00440155, 0.00412688, 0.00240868,
0829 & 0.00157336, 0.0058661, 0.00259296, 0.00245107, 0.00405134,
0830 & 0.00388192, 0.00604871, 0.000176252, 0.00451304, 0.00278752,
0831 & 0.00346503, 0.00232354, 0.0025038, 0.00604981, 8.37323e-05,
0832 & 0.00150235, 0.00191919, 0.00121787, 0.002275, 0.00292564,
0833 & 0.000405691, 6.63827e-06, 0, 9.13327e-05, 0,
0834 & 0, 0, 0, 0, 0,
0835 & 0, 0, 0, 0, 0.000995514
0836 & /
0837 L46PIP = -0.0134759
0838 W46PIP = 0.000285687
0839
0840 DATA H47PIP /
0841 & 0.000583364, 0, 3.18472e-05, 2.22539e-05, 0.00112824,
0842 & 0.000624322, 0.00052484, 0.00108922, 0.000538889, 0.00114111,
0843 & 8.20473e-05, 0.00050719, 0.00247393, 4.35558e-05, 0.00102014,
0844 & 0.000970968, 0.00171391, 0.00231858, 0.000482992, 0.000758906,
0845 & 0.00230343, 0.0009979, 0.00228749, 0.00451668, 0.00401417,
0846 & 0.0037, 0.00364166, 0.00195473, 0.00315055, 0.00435633,
0847 & 0.0052553, 0.00307438, 0.00496635, 0.00430735, 0.00424869,
0848 & 0.00711633, 0.00553745, 0.00746007, 0.00775828, 0.00987737,
0849 & 0.0106903, 0.0186919, 0.0194545, 0.0297973, 0.0373728,
0850 & 0.0495226, 0.0929865, 0.231313, 0.0900601, 0.0577917,
0851 & 0.0399622, 0.0353516, 0.021065, 0.0197042, 0.0156238,
0852 & 0.0175304, 0.00996172, 0.00730945, 0.00497925, 0.00885665,
0853 & 0.00538077, 0.00488113, 0.00424929, 0.0051909, 0.00459112,
0854 & 0.00453653, 0.00345578, 0.00243792, 0.0043103, 0.00353284,
0855 & 0.00371006, 0.00240933, 0.00237947, 0.00204199, 0.00123051,
0856 & 0.00246701, 0.00166042, 0.00046848, 0.00221535, 0.00333648,
0857 & 0.00142997, 0.000487034, 0.000876026, 0.000508571, 0.000951146,
0858 & 0.000630485, 0.000526598, 0.00117375, 0.00160345, 4.33224e-05,
0859 & 2.12237e-05, 0.000617723, 0.00125366, 0.000679048, 4.63154e-05,
0860 & 2.40386e-05, 2.35987e-05, 0, 0, 1.23684e-05
0861 & /
0862 L47PIP = -0.00784467
0863 W47PIP = 0.000165027
0864
0865 DATA H48PIP /
0866 & 4.50572e-05, 0, 0, 0, 0,
0867 & 0, 0, 0, 4.73003e-05, 0,
0868 & 0, 0, 4.46997e-05, 0.00248714, 4.50622e-05,
0869 & 4.61158e-05, 9.67819e-05, 0.00247106, 4.43966e-05, 0,
0870 & 4.65763e-05, 0, 8.18287e-05, 0.00216733, 0.00351634,
0871 & 0.00217242, 0.00119683, 0.000220306, 0.000167133, 0.000103756,
0872 & 0.00122722, 0.00244535, 0.00787574, 0.00248168, 0.00467959,
0873 & 0.00424434, 0.0023466, 0.0125901, 0.0077035, 0.0090252,
0874 & 0.0107532, 0.0178783, 0.00942449, 0.0274577, 0.0319077,
0875 & 0.0289353, 0.0460652, 0.0640977, 0.163025, 0.179096,
0876 & 0.0746281, 0.0405926, 0.0412833, 0.0251807, 0.0260858,
0877 & 0.0287994, 0.0156376, 0.0156831, 0.0134519, 0.00617041,
0878 & 0.0078427, 0.00683389, 0.0102203, 0.00556003, 0.00593055,
0879 & 0.00250598, 0.00456737, 0.00232922, 0.00241795, 0.00244437,
0880 & 0.00335388, 0, 0.00355917, 0.00131402, 0,
0881 & 0.00121403, 0.00122358, 9.36304e-05, 0, 0.00123685,
0882 & 0, 0, 4.8069e-05, 9.56076e-05, 9.5286e-05,
0883 & 0, 0, 0.00124419, 0, 0,
0884 & 0, 0, 4.80537e-05, 0, 0,
0885 & 0, 0, 0, 0, 4.79586e-05
0886 & /
0887 L48PIP = -0.00176303
0888 W48PIP = 3.59236e-05
0889
0890 RETURN
0891
0892 END