1 | // LHC V6.5 THIN Lens injection optics settings T.R. 11.05.2004 |
---|
2 | |
---|
3 | !title, "LHC THIN V6.5"; |
---|
4 | |
---|
5 | // Default switch settings: |
---|
6 | // crossing ANGLES ON at IP1/2/5/8 |
---|
7 | // parallel SEPARATIONS set ON |
---|
8 | // experimental MAGNET at IP8 |
---|
9 | |
---|
10 | on_x1 := 1; |
---|
11 | on_x2 := 1; |
---|
12 | on_x5 := 1; |
---|
13 | on_x8 := 1; |
---|
14 | |
---|
15 | !parallel separation |
---|
16 | on_sep1 := 1; |
---|
17 | on_sep2 := 1; |
---|
18 | on_sep5 := 1; |
---|
19 | on_sep8 := 1; |
---|
20 | |
---|
21 | !experimental magnets + compensators |
---|
22 | on_alice := 0 ; |
---|
23 | on_lhcb := 1 ; |
---|
24 | |
---|
25 | beta.ip1 := 17.0; |
---|
26 | beta.ip2 := 10.0; |
---|
27 | beta.ip5 := 17.0; |
---|
28 | beta.ip8 := 10.0; |
---|
29 | |
---|
30 | x.ip1 := -0.2500000000e-02*on_sep1 ; |
---|
31 | y.ip1 := 0.0000000000e+00 *on_x1 ; |
---|
32 | px.ip1 := 0.0000000000e+00 *on_x1 ; |
---|
33 | py.ip1 := 0.1600000000e-03 *on_x1 ; |
---|
34 | |
---|
35 | |
---|
36 | |
---|
37 | kb.a12 := ab.a12/l.mb; |
---|
38 | kb.a23 := ab.a23/l.mb; |
---|
39 | kb.a34 := ab.a34/l.mb; |
---|
40 | kb.a45 := ab.a45/l.mb ; |
---|
41 | kb.a56 := ab.a56/l.mb ; |
---|
42 | kb.a67 := ab.a67/l.mb ; |
---|
43 | kb.a78 := ab.a78/l.mb ; |
---|
44 | kb.a81 := ab.a81/l.mb ; |
---|
45 | kqd.a12 := kqd ; |
---|
46 | kqd.a23 := kqd ; |
---|
47 | kqd.a34 := kqd ; |
---|
48 | kqd.a45 := kqd ; |
---|
49 | kqd.a56 := kqd ; |
---|
50 | kqd.a67 := kqd ; |
---|
51 | kqd.a78 := kqd ; |
---|
52 | kqd.a81 := kqd ; |
---|
53 | |
---|
54 | |
---|
55 | |
---|
56 | kqf.a12 := kqf ; |
---|
57 | kqf.a23 := kqf ; |
---|
58 | kqf.a34 := kqf ; |
---|
59 | kqf.a45 := kqf ; |
---|
60 | kqf.a56 := kqf ; |
---|
61 | kqf.a67 := kqf ; |
---|
62 | kqf.a78 := kqf ; |
---|
63 | kqf.a81 := kqf ; |
---|
64 | kqtd.a12b1 := kqtd.b1 ; |
---|
65 | kqtd.a12b2 := kqtd.b2 ; |
---|
66 | kqtd.a23b1 := kqtd.b1 ; |
---|
67 | kqtd.a23b2 := kqtd.b2 ; |
---|
68 | kqtd.a34b1 := kqtd.b1 ; |
---|
69 | kqtd.a34b2 := kqtd.b2 ; |
---|
70 | kqtd.a45b1 := kqtd.b1 ; |
---|
71 | kqtd.a45b2 := kqtd.b2 ; |
---|
72 | kqtd.a56b1 := kqtd.b1 ; |
---|
73 | kqtd.a56b2 := kqtd.b2 ; |
---|
74 | kqtd.a67b1 := kqtd.b1 ; |
---|
75 | kqtd.a67b2 := kqtd.b2 ; |
---|
76 | kqtd.a78b1 := kqtd.b1 ; |
---|
77 | kqtd.a78b2 := kqtd.b2 ; |
---|
78 | kqtd.a81b1 := kqtd.b1 ; |
---|
79 | kqtd.a81b2 := kqtd.b2 ; |
---|
80 | kqtd.b1 := 0.0 ; |
---|
81 | kqtd.b2 := 0.0 ; |
---|
82 | kqtf.a12b1 := kqtf.b1 ; |
---|
83 | kqtf.a12b2 := kqtf.b2 ; |
---|
84 | kqtf.a23b1 := kqtf.b1 ; |
---|
85 | kqtf.a23b2 := kqtf.b2 ; |
---|
86 | kqtf.a34b1 := kqtf.b1 ; |
---|
87 | kqtf.a34b2 := kqtf.b2 ; |
---|
88 | kqtf.a45b1 := kqtf.b1 ; |
---|
89 | kqtf.a45b2 := kqtf.b2 ; |
---|
90 | kqtf.a56b1 := kqtf.b1 ; |
---|
91 | kqtf.a56b2 := kqtf.b2 ; |
---|
92 | kqtf.a67b1 := kqtf.b1 ; |
---|
93 | kqtf.a67b2 := kqtf.b2 ; |
---|
94 | kqtf.a78b1 := kqtf.b1 ; |
---|
95 | kqtf.a78b2 := kqtf.b2 ; |
---|
96 | kqtf.a81b1 := kqtf.b1 ; |
---|
97 | kqtf.a81b2 := kqtf.b2 ; |
---|
98 | kqtf.b1 := 0.0 ; |
---|
99 | kqtf.b2 := 0.0 ; |
---|
100 | ksd1.a12b1 := ksd.b1 ; |
---|
101 | ksd1.a12b2 := ksd.b2 ; |
---|
102 | ksd1.a23b1 := ksd.b1 ; |
---|
103 | ksd1.a23b2 := ksd.b2 ; |
---|
104 | ksd1.a34b1 := ksd.b1 ; |
---|
105 | ksd1.a34b2 := ksd.b2 ; |
---|
106 | ksd1.a45b1 := ksd.b1 ; |
---|
107 | ksd1.a45b2 := ksd.b2 ; |
---|
108 | ksd1.a56b1 := ksd.b1 ; |
---|
109 | ksd1.a56b2 := ksd.b2 ; |
---|
110 | ksd1.a67b1 := ksd.b1 ; |
---|
111 | ksd1.a67b2 := ksd.b2 ; |
---|
112 | ksd1.a78b1 := ksd.b1 ; |
---|
113 | ksd1.a78b2 := ksd.b2 ; |
---|
114 | ksd1.a81b1 := ksd.b1 ; |
---|
115 | ksd1.a81b2 := ksd.b2 ; |
---|
116 | ksd2.a12b1 := ksd.b1 ; |
---|
117 | ksd2.a12b2 := ksd.b2 ; |
---|
118 | ksd2.a23b1 := ksd.b1 ; |
---|
119 | ksd2.a23b2 := ksd.b2 ; |
---|
120 | ksd2.a34b1 := ksd.b1 ; |
---|
121 | ksd2.a34b2 := ksd.b2 ; |
---|
122 | ksd2.a45b1 := ksd.b1 ; |
---|
123 | ksd2.a45b2 := ksd.b2 ; |
---|
124 | ksd2.a56b1 := ksd.b1 ; |
---|
125 | ksd2.a56b2 := ksd.b2 ; |
---|
126 | ksd2.a67b1 := ksd.b1 ; |
---|
127 | ksd2.a67b2 := ksd.b2 ; |
---|
128 | ksd2.a78b1 := ksd.b1 ; |
---|
129 | ksd2.a78b2 := ksd.b2 ; |
---|
130 | ksd2.a81b1 := ksd.b1 ; |
---|
131 | ksd2.a81b2 := ksd.b2 ; |
---|
132 | |
---|
133 | |
---|
134 | ksf.b1 := 0.066983566369 ; |
---|
135 | ksd.b1 := -0.107932715595 ; |
---|
136 | ksf.b2 := 0.067181568925 ; |
---|
137 | ksd.b2 := -0.107606389855 ; |
---|
138 | |
---|
139 | ksf1.a12b1 := ksf.b1 ; |
---|
140 | ksf1.a12b2 := ksf.b2 ; |
---|
141 | ksf1.a23b1 := ksf.b1 ; |
---|
142 | ksf1.a23b2 := ksf.b2 ; |
---|
143 | ksf1.a34b1 := ksf.b1 ; |
---|
144 | ksf1.a34b2 := ksf.b2 ; |
---|
145 | ksf1.a45b1 := ksf.b1 ; |
---|
146 | ksf1.a45b2 := ksf.b2 ; |
---|
147 | ksf1.a56b1 := ksf.b1 ; |
---|
148 | ksf1.a56b2 := ksf.b2 ; |
---|
149 | ksf1.a67b1 := ksf.b1 ; |
---|
150 | ksf1.a67b2 := ksf.b2 ; |
---|
151 | ksf1.a78b1 := ksf.b1 ; |
---|
152 | ksf1.a78b2 := ksf.b2 ; |
---|
153 | ksf1.a81b1 := ksf.b1 ; |
---|
154 | ksf1.a81b2 := ksf.b2 ; |
---|
155 | ksf2.a12b1 := ksf.b1 ; |
---|
156 | ksf2.a12b2 := ksf.b2 ; |
---|
157 | ksf2.a23b1 := ksf.b1 ; |
---|
158 | ksf2.a23b2 := ksf.b2 ; |
---|
159 | ksf2.a34b1 := ksf.b1 ; |
---|
160 | ksf2.a34b2 := ksf.b2 ; |
---|
161 | ksf2.a45b1 := ksf.b1 ; |
---|
162 | ksf2.a45b2 := ksf.b2 ; |
---|
163 | ksf2.a56b1 := ksf.b1 ; |
---|
164 | ksf2.a56b2 := ksf.b2 ; |
---|
165 | ksf2.a67b1 := ksf.b1 ; |
---|
166 | ksf2.a67b2 := ksf.b2 ; |
---|
167 | ksf2.a78b1 := ksf.b1 ; |
---|
168 | ksf2.a78b2 := ksf.b2 ; |
---|
169 | ksf2.a81b1 := ksf.b1 ; |
---|
170 | ksf2.a81b2 := ksf.b2 ; |
---|
171 | |
---|
172 | kd1.lr1 := ad1.lr1/l.mbxw ; |
---|
173 | kd2.l1 := ad2.l5/l.mbrc ; |
---|
174 | kd2.r1 := ad2.r5/l.mbrc ; |
---|
175 | ktqx1.l1 := 0 ; |
---|
176 | ktqx1.r1 := 0 ; |
---|
177 | |
---|
178 | |
---|
179 | |
---|
180 | kd1.l2 := ad1.l2/l.mbx ; |
---|
181 | kd1.r2 := ad1.r2/l.mbx ; |
---|
182 | kd2.l2 := ad2.l2/l.mbrc ; |
---|
183 | kd2.r2 := ad2.r2/l.mbrc ; |
---|
184 | ktqx1.l2 := 0 ; |
---|
185 | ktqx1.r2 := 0 ; |
---|
186 | |
---|
187 | abxwt.l2 := -0.0000772587268993839836*on_alice ; |
---|
188 | abwmd.l2 := +0.000147258726899383984 *on_alice ; |
---|
189 | abaw.r2 := -0.0001335474860334838 *on_alice ; |
---|
190 | abxwt.r2 := +0.0000635474860334838004*on_alice ; |
---|
191 | |
---|
192 | |
---|
193 | kd3.lr3 := ad3.lr3/l.mbw ; |
---|
194 | kd4.lr3 := ad4.lr3/l.mbw ; |
---|
195 | |
---|
196 | kd3.l4 := ad3.l4/l.mbrs ; |
---|
197 | kd3.r4 := ad3.r4/l.mbrs ; |
---|
198 | kd4.l4 := ad4.l4/l.mbrb ; |
---|
199 | kd4.r4 := ad4.r4/l.mbrb ; |
---|
200 | |
---|
201 | |
---|
202 | kd1.lr5 := ad1.lr5/l.mbxw ; |
---|
203 | kd2.l5 := ad2.l5/l.mbrc ; |
---|
204 | kd2.r5 := ad2.r5/l.mbrc ; |
---|
205 | ktqx1.l5 := 0 ; |
---|
206 | ktqx1.r5 := 0 ; |
---|
207 | |
---|
208 | |
---|
209 | kd3.lr7 := ad3.lr7/l.mbw ; |
---|
210 | kd4.lr7 := ad4.lr7/l.mbw ; |
---|
211 | |
---|
212 | |
---|
213 | kd1.l8 := ad1.l8/l.mbx ; |
---|
214 | kd1.r8 := ad1.r8/l.mbx ; |
---|
215 | kd2.l8 := ad2.l8/l.mbrc ; |
---|
216 | kd2.r8 := ad2.r8/l.mbrc ; |
---|
217 | ktqx1.l8 := 0 ; |
---|
218 | ktqx1.r8 := 0 ; |
---|
219 | abxws.l8 := -0.000045681598453109894*on_lhcb ; |
---|
220 | abxwh.l8 := 0.000180681598453109894*on_lhcb ; |
---|
221 | ablw.r8 := -0.000180681598453109894*on_lhcb ; |
---|
222 | abxws.r8 := 0.000045681598453109894*on_lhcb ; |
---|
223 | |
---|
224 | |
---|
225 | kqx.r5 := -kqx.l5 ; |
---|
226 | kqx.r1 := -kqx.l1 ; |
---|
227 | kqx.r2 := -kqx.l2 ; |
---|
228 | kqx.r8 := -kqx.l8 ; |
---|
229 | |
---|
230 | |
---|
231 | kqf := 0.008815890403 ; |
---|
232 | kqd := -0.008430544103 ; |
---|
233 | |
---|
234 | |
---|
235 | kqt13.l1b1 := 0.004454059278 ; |
---|
236 | kqt12.l1b1 := -0.003112813558 ; |
---|
237 | kqtl11.l1b1 := -0.001722579444 ; |
---|
238 | kq10.l1b1 := 0.007221694200 ; |
---|
239 | kq9.l1b1 := -0.007417442641 ; |
---|
240 | kq8.l1b1 := 0.006586049212 ; |
---|
241 | kq7.l1b1 := -0.004222467831 ; |
---|
242 | kq6.l1b1 := 0.005034838523 ; |
---|
243 | kq5.l1b1 := -0.005840992365 ; |
---|
244 | kq4.l1b1 := 0.005128630877 ; |
---|
245 | kq4.r1b1 := -0.005128630877 ; |
---|
246 | kq5.r1b1 := 0.005840992365 ; |
---|
247 | kq6.r1b1 := -0.005035062548 ; |
---|
248 | kq7.r1b1 := 0.004054949478 ; |
---|
249 | kq8.r1b1 := -0.006396782052 ; |
---|
250 | kq9.r1b1 := 0.006852941661 ; |
---|
251 | kq10.r1b1 := -0.007305246648 ; |
---|
252 | kqtl11.r1b1 := 0.000299732392 ; |
---|
253 | kqt12.r1b1 := 0.000130900199 ; |
---|
254 | kqt13.r1b1 := -0.000066263856 ; |
---|
255 | |
---|
256 | kqt13.l1b2 := -0.000650368211 ; |
---|
257 | kqt12.l1b2 := -0.000683780690 ; |
---|
258 | kqtl11.l1b2 := 0.000249743091 ; |
---|
259 | kq10.l1b2 := -0.007131179917 ; |
---|
260 | kq9.l1b2 := 0.006804521572 ; |
---|
261 | kq8.l1b2 := -0.006284313203 ; |
---|
262 | kq7.l1b2 := 0.004031930130 ; |
---|
263 | kq6.l1b2 := -0.005123236202 ; |
---|
264 | kq5.l1b2 := 0.005961658519 ; |
---|
265 | kq4.l1b2 := -0.005188625760 ; |
---|
266 | kqx.l1 := -0.008337916236 ; |
---|
267 | kq4.r1b2 := 0.005188625760 ; |
---|
268 | kq5.r1b2 := -0.005961658519 ; |
---|
269 | kq6.r1b2 := 0.005123052673 ; |
---|
270 | kq7.r1b2 := -0.004009592575 ; |
---|
271 | kq8.r1b2 := 0.006335739144 ; |
---|
272 | kq9.r1b2 := -0.007083378481 ; |
---|
273 | kq10.r1b2 := 0.007211673849 ; |
---|
274 | kqtl11.r1b2 := -0.002327590533 ; |
---|
275 | kqt12.r1b2 := -0.001945497424 ; |
---|
276 | kqt13.r1b2 := -0.001611926662 ; |
---|
277 | |
---|
278 | acbxv1.l1 := 0.4491146818e-04 *on_x1 ; |
---|
279 | acbxv1.r1 := -0.4491146818e-04 *on_x1 ; |
---|
280 | acbxh1.l1 := -0.5101873129e-04*on_sep1 ; |
---|
281 | acbxh1.r1 := -0.5101873129e-04*on_sep1 ; |
---|
282 | acbyvs4.l1b1 := -0.4937288350e-04 *on_x1 ; |
---|
283 | acbyvs4.r1b1 := 0.2542662773e-04 *on_x1 ; |
---|
284 | acbyhs4.l1b1 := -0.7852901363e-05*on_sep1 ; |
---|
285 | acbyhs4.r1b1 := -0.1273862358e-03*on_sep1 ; |
---|
286 | acbch6.l1b1 := -0.1302009039e-04*on_sep1 ; |
---|
287 | acbcv5.l1b1 := -0.3360183347e-05 *on_x1 ; |
---|
288 | acbch5.r1b1 := 0.6342822915e-04*on_sep1 ; |
---|
289 | acbcv6.r1b1 := 0.1429348337e-04 *on_x1 ; |
---|
290 | acbch7.r1b1 := 0.0000000000e+00*on_sep1 ; |
---|
291 | |
---|
292 | acbyvs4.l1b2 := 0.2653896839e-04 *on_x1 ; |
---|
293 | acbyvs4.r1b2 := -0.4868091513e-04 *on_x1 ; |
---|
294 | acbyhs4.l1b2 := 0.1163502605e-03*on_sep1 ; |
---|
295 | acbyhs4.r1b2 := 0.7016122721e-05*on_sep1 ; |
---|
296 | acbcv6.l1b2 := 0.1346212251e-04 *on_x1 ; |
---|
297 | acbch5.l1b2 := -0.5616437988e-04*on_sep1 ; |
---|
298 | acbcv5.r1b2 := -0.3796130240e-05 *on_x1 ; |
---|
299 | acbch6.r1b2 := 0.1368676521e-04*on_sep1 ; |
---|
300 | acbch7.l1b2 := 0.0000000000e+00*on_sep1 ; |
---|
301 | |
---|
302 | |
---|
303 | kqt13.l2b1 := -0.004660141080 ; |
---|
304 | kqt12.l2b1 := 0.001009267278 ; |
---|
305 | kqtl11.l2b1 := -0.000196700974 ; |
---|
306 | kq10.l2b1 := -0.005255131190 ; |
---|
307 | kq9.l2b1 := 0.005662759249 ; |
---|
308 | kq8.l2b1 := -0.003627997319 ; |
---|
309 | kq7.l2b1 := 0.005678247197 ; |
---|
310 | kq6.l2b1 := -0.004095707854 ; |
---|
311 | kq5.l2b1 := 0.004791964748 ; |
---|
312 | kq4.l2b1 := -0.005481665214 ; |
---|
313 | kq4.r2b1 := 0.004910595267 ; |
---|
314 | kq5.r2b1 := -0.004849904286 ; |
---|
315 | kq6.r2b1 := 0.004294019975 ; |
---|
316 | kq7.r2b1 := -0.006120236440 ; |
---|
317 | kq8.r2b1 := 0.005392073287 ; |
---|
318 | kq9.r2b1 := -0.005310868058 ; |
---|
319 | kq10.r2b1 := 0.007074939374 ; |
---|
320 | kqtl11.r2b1 := -0.001268991917 ; |
---|
321 | kqt12.r2b1 := -0.002336012085 ; |
---|
322 | kqt13.r2b1 := -0.005137428571 ; |
---|
323 | |
---|
324 | kqt13.l2b2 := 0.000780761636 ; |
---|
325 | kqt12.l2b2 := -0.003586345226 ; |
---|
326 | kqtl11.l2b2 := -0.000547294666 ; |
---|
327 | kq10.l2b2 := 0.007167536395 ; |
---|
328 | kq9.l2b2 := -0.006692088164 ; |
---|
329 | kq8.l2b2 := 0.005969962187 ; |
---|
330 | kq7.l2b2 := -0.006404308884 ; |
---|
331 | kq6.l2b2 := 0.004123955172 ; |
---|
332 | kq5.l2b2 := -0.004320730393 ; |
---|
333 | kq4.l2b2 := 0.004604345465 ; |
---|
334 | kqx.l2 := 0.009422096694 ; |
---|
335 | kq4.r2b2 := -0.005133706433 ; |
---|
336 | kq5.r2b2 := 0.004364169573 ; |
---|
337 | kq6.r2b2 := -0.004298538818 ; |
---|
338 | kq7.r2b2 := 0.006169332048 ; |
---|
339 | kq8.r2b2 := -0.004002069606 ; |
---|
340 | kq9.r2b2 := 0.006490121529 ; |
---|
341 | kq10.r2b2 := -0.005816889014 ; |
---|
342 | kqtl11.r2b2 := 0.000196509505 ; |
---|
343 | kqt12.r2b2 := 0.002735214096 ; |
---|
344 | kqt13.r2b2 := 0.000257437245 ; |
---|
345 | |
---|
346 | acbxh1.l2 := 3.649738322e-005 * on_sep2 ; |
---|
347 | acbxh1.r2 := 3.609988655e-005 * on_sep2 ; |
---|
348 | acbyhs5.l2b1 := -4.042321919e-005 * on_sep2 ; |
---|
349 | acbyhs5.r2b1 := -5.887681295e-005 * on_sep2 ; |
---|
350 | acbyhs4.l2b1 := 0.0001180067839 * on_sep2 ; |
---|
351 | acbyhs4.r2b1 := 5.38801435e-005 * on_sep2 ; |
---|
352 | acbyhs4.l2b2 := -3.9131637e-005 * on_sep2 ; |
---|
353 | acbyhs4.r2b2 := -0.0001315904439 * on_sep2 ; |
---|
354 | acbyhs5.r2b2 := 5.055735094e-005 * on_sep2 ; |
---|
355 | acbyhs5.l2b2 := 3.97294232e-005 * on_sep2 ; |
---|
356 | acbxv1.l2 := 0 * on_x2 ; |
---|
357 | acbxv1.r2 := 0 * on_x2 ; |
---|
358 | acbyvs4.l2b1 := -0.00006693269113 * on_x2 ; |
---|
359 | acbyvs4.r2b1 := -0.00003286343062 * on_x2 ; |
---|
360 | acbyvs5.l2b1 := 0 * on_x2 ; |
---|
361 | acbyvs5.r2b1 := 0.00005745410680 * on_x2 ; |
---|
362 | acbyvs4.l2b2 := -0.00001353692099 * on_x2 ; |
---|
363 | acbyvs4.r2b2 := -0.00006699453287 * on_x2 ; |
---|
364 | acbyvs5.l2b2 := 0.00004649455154 * on_x2 ; |
---|
365 | acbyvs5.r2b2 := 0 * on_x2 ; |
---|
366 | acbcv6.l2b1 := -0.00000677992359 * on_x2 ; |
---|
367 | acbcv6.r2b2 := -0.00000767388676 * on_x2 ; |
---|
368 | |
---|
369 | |
---|
370 | kqt13.l3b1 := -0.000393844566 ; |
---|
371 | kqt12.l3b1 := 0.000810909350 ; |
---|
372 | kqtl11.l3b1 := 0.003149973866 ; |
---|
373 | kqtl10.l3b1 := -0.000768201141 ; |
---|
374 | kqtl9.l3b1 := -0.003508311067 ; |
---|
375 | kqtl8.l3b1 := 0.000041628214 ; |
---|
376 | kqtl7.l3b1 := -0.004656038825 ; |
---|
377 | kq6.l3b1 := 0.002676202957 ; |
---|
378 | kq6.r3b1 := -0.002428664192 ; |
---|
379 | kqtl7.r3b1 := 0.000744565656 ; |
---|
380 | kqtl8.r3b1 := 0.002499763747 ; |
---|
381 | kqtl9.r3b1 := -0.000338812432 ; |
---|
382 | kqtl10.r3b1 := 0.002470860635 ; |
---|
383 | kqtl11.r3b1 := -0.003845923507 ; |
---|
384 | kqt12.r3b1 := 0.000729991716 ; |
---|
385 | kqt13.r3b1 := -0.004683288641 ; |
---|
386 | |
---|
387 | kqt13.l3b2 := -0.004827335846 ; |
---|
388 | kqt12.l3b2 := -0.004178384270 ; |
---|
389 | kqtl11.l3b2 := -0.003571119118 ; |
---|
390 | kqtl10.l3b2 := 0.001666141837 ; |
---|
391 | kqtl9.l3b2 := -0.000434287207 ; |
---|
392 | kqtl8.l3b2 := 0.002930630298 ; |
---|
393 | kqtl7.l3b2 := 0.000081487282 ; |
---|
394 | kq6.l3b2 := -0.002390582267 ; |
---|
395 | kq4.lr3 := 0.001241283780 ; |
---|
396 | kqt4.lr3 := 0.000688712528 ; |
---|
397 | kq5.lr3 := -0.001303923550 ; |
---|
398 | kqt5.lr3 := 0.000972084452 ; |
---|
399 | kq6.r3b2 := 0.002677342871 ; |
---|
400 | kqtl7.r3b2 := -0.002188637920 ; |
---|
401 | kqtl8.r3b2 := -0.000983472958 ; |
---|
402 | kqtl9.r3b2 := -0.004361585529 ; |
---|
403 | kqtl10.r3b2 := 0.000835982321 ; |
---|
404 | kqtl11.r3b2 := 0.000043637650 ; |
---|
405 | kqt12.r3b2 := 0.002561367381 ; |
---|
406 | kqt13.r3b2 := -0.001468718515 ; |
---|
407 | |
---|
408 | |
---|
409 | kqt13.l4b1 := 0.001322817499 ; |
---|
410 | kqt12.l4b1 := -0.004084280700 ; |
---|
411 | kqtl11.l4b1 := 0.000583208651 ; |
---|
412 | kq10.l4b1 := -0.006622185018 ; |
---|
413 | kq9.l4b1 := 0.006734279039 ; |
---|
414 | kq8.l4b1 := -0.005600037439 ; |
---|
415 | kq7.l4b1 := 0.007421834270 ; |
---|
416 | kq6.l4b1 := -0.005612898164 ; |
---|
417 | kq5.l4b1 := 0.004778181317 ; |
---|
418 | kq5.r4b1 := -0.004807719745 ; |
---|
419 | kq6.r4b1 := 0.005687366579 ; |
---|
420 | kq7.r4b1 := -0.006414789880 ; |
---|
421 | kq8.r4b1 := 0.006612849403 ; |
---|
422 | kq9.r4b1 := -0.005453755334 ; |
---|
423 | kq10.r4b1 := 0.006974482119 ; |
---|
424 | kqtl11.r4b1 := 0.000481460517 ; |
---|
425 | kqt12.r4b1 := -0.004239741171 ; |
---|
426 | kqt13.r4b1 := 0.002342317400 ; |
---|
427 | |
---|
428 | kqt13.l4b2 := 0.004578878591 ; |
---|
429 | kqt12.l4b2 := -0.003249549220 ; |
---|
430 | kqtl11.l4b2 := 0.002079589703 ; |
---|
431 | kq10.l4b2 := 0.006965404311 ; |
---|
432 | kq9.l4b2 := -0.005737356488 ; |
---|
433 | kq8.l4b2 := 0.006743212137 ; |
---|
434 | kq7.l4b2 := -0.007018726785 ; |
---|
435 | kq6.l4b2 := 0.005689427337 ; |
---|
436 | kq5.l4b2 := -0.004796633451 ; |
---|
437 | kq5.r4b2 := 0.004548944287 ; |
---|
438 | kq6.r4b2 := -0.005606791941 ; |
---|
439 | kq7.r4b2 := 0.007352321063 ; |
---|
440 | kq8.r4b2 := -0.006639417086 ; |
---|
441 | kq9.r4b2 := 0.007056230310 ; |
---|
442 | kq10.r4b2 := -0.006435968901 ; |
---|
443 | kqtl11.r4b2 := 0.000599688522 ; |
---|
444 | kqt12.r4b2 := 0.002955989153 ; |
---|
445 | kqt13.r4b2 := 0.001681843037 ; |
---|
446 | |
---|
447 | |
---|
448 | kqt13.l5b1 := 0.004454059278 ; |
---|
449 | kqt12.l5b1 := -0.003112813558 ; |
---|
450 | kqtl11.l5b1 := -0.001722579444 ; |
---|
451 | kq10.l5b1 := 0.007221694200 ; |
---|
452 | kq9.l5b1 := -0.007417442641 ; |
---|
453 | kq8.l5b1 := 0.006586049212 ; |
---|
454 | kq7.l5b1 := -0.004222467831 ; |
---|
455 | kq6.l5b1 := 0.005034838523 ; |
---|
456 | kq5.l5b1 := -0.005840992365 ; |
---|
457 | kq4.l5b1 := 0.005128630877 ; |
---|
458 | kq4.r5b1 := -0.005128630877 ; |
---|
459 | kq5.r5b1 := 0.005840992365 ; |
---|
460 | kq6.r5b1 := -0.005035062548 ; |
---|
461 | kq7.r5b1 := 0.004054949478 ; |
---|
462 | kq8.r5b1 := -0.006396782052 ; |
---|
463 | kq9.r5b1 := 0.006852941661 ; |
---|
464 | kq10.r5b1 := -0.007305246648 ; |
---|
465 | kqtl11.r5b1 := 0.000299732392 ; |
---|
466 | kqt12.r5b1 := 0.000130900199 ; |
---|
467 | kqt13.r5b1 := -0.000066263856 ; |
---|
468 | |
---|
469 | kqt13.l5b2 := -0.000650368211 ; |
---|
470 | kqt12.l5b2 := -0.000683780690 ; |
---|
471 | kqtl11.l5b2 := 0.000249743091 ; |
---|
472 | kq10.l5b2 := -0.007131179917 ; |
---|
473 | kq9.l5b2 := 0.006804521572 ; |
---|
474 | kq8.l5b2 := -0.006284313203 ; |
---|
475 | kq7.l5b2 := 0.004031930130 ; |
---|
476 | kq6.l5b2 := -0.005123236202 ; |
---|
477 | kq5.l5b2 := 0.005961658519 ; |
---|
478 | kq4.l5b2 := -0.005188625760 ; |
---|
479 | kqx.l5 := -0.008337916236 ; |
---|
480 | kq4.r5b2 := 0.005188625760 ; |
---|
481 | kq5.r5b2 := -0.005961658519 ; |
---|
482 | kq6.r5b2 := 0.005123052673 ; |
---|
483 | kq7.r5b2 := -0.004009592575 ; |
---|
484 | kq8.r5b2 := 0.006335739144 ; |
---|
485 | kq9.r5b2 := -0.007083378481 ; |
---|
486 | kq10.r5b2 := 0.007211673849 ; |
---|
487 | kqtl11.r5b2 := -0.002327590533 ; |
---|
488 | kqt12.r5b2 := -0.001945497424 ; |
---|
489 | kqt13.r5b2 := -0.001611926662 ; |
---|
490 | |
---|
491 | acbxv1.l5 := 0.5404587441e-04*on_sep5 ; |
---|
492 | acbxv1.r5 := 0.5404587441e-04*on_sep5 ; |
---|
493 | acbxh1.l5 := 0.4544673326e-04 *on_x5 ; |
---|
494 | acbxh1.r5 := -0.4544673326e-04 *on_x5 ; |
---|
495 | acbyvs4.l5b1 := 0.1154694233e-03*on_sep5 ; |
---|
496 | acbyvs4.r5b1 := 0.2566255038e-05*on_sep5 ; |
---|
497 | acbyhs4.l5b1 := -0.2643058147e-04 *on_x5 ; |
---|
498 | acbyhs4.r5b1 := 0.5124312308e-04 *on_x5 ; |
---|
499 | acbch6.l5b1 := -0.1339410005e-04 *on_x5 ; |
---|
500 | acbcv5.l5b1 := -0.5585264181e-04*on_sep5 ; |
---|
501 | acbch5.r5b1 := 0.2174344359e-05 *on_x5 ; |
---|
502 | acbcv6.r5b1 := 0.1775294712e-04*on_sep5 ; |
---|
503 | acbch7.r5b1 := 0.0000000000e+00 *on_x5 ; |
---|
504 | |
---|
505 | acbyvs4.l5b2 := -0.1386339438e-05*on_sep5 ; |
---|
506 | acbyvs4.r5b2 := -0.1057515361e-03*on_sep5 ; |
---|
507 | acbyhs4.l5b2 := 0.5079535659e-04 *on_x5 ; |
---|
508 | acbyhs4.r5b2 := -0.2783369292e-04 *on_x5 ; |
---|
509 | acbcv6.l5b2 := -0.1874421542e-04*on_sep5 ; |
---|
510 | acbch5.l5b2 := 0.2456441664e-05 *on_x5 ; |
---|
511 | acbcv5.r5b2 := 0.4945635459e-04*on_sep5 ; |
---|
512 | acbch6.r5b2 := -0.1177026183e-04 *on_x5 ; |
---|
513 | acbch7.l5b2 := 0.0000000000e+00 *on_x5 ; |
---|
514 | |
---|
515 | |
---|
516 | kqt13.l6b1 := 0.000000000000 ; |
---|
517 | kqt12.l6b1 := -0.000549724316 ; |
---|
518 | kqtl11.l6b1 := 0.000678285834 ; |
---|
519 | kq10.l6b1 := -0.006163198444 ; |
---|
520 | kq9.l6b1 := 0.006801240377 ; |
---|
521 | kq8.l6b1 := -0.003525820226 ; |
---|
522 | kq5.l6b1 := 0.006436783969 ; |
---|
523 | kq4.l6b1 := -0.004885292740 ; |
---|
524 | kq4.r6b1 := 0.004907678794 ; |
---|
525 | kq5.r6b1 := -0.006528542662 ; |
---|
526 | kq8.r6b1 := 0.005095986430 ; |
---|
527 | kq9.r6b1 := -0.006108062328 ; |
---|
528 | kq10.r6b1 := 0.006931814450 ; |
---|
529 | kqtl11.r6b1 := 0.000857635538 ; |
---|
530 | kqt12.r6b1 := -0.005139542876 ; |
---|
531 | kqt13.r6b1 := 0.000000000000 ; |
---|
532 | |
---|
533 | kqt13.l6b2 := 0.000524110278 ; |
---|
534 | kqt12.l6b2 := -0.002836482951 ; |
---|
535 | kqtl11.l6b2 := -0.000546399723 ; |
---|
536 | kq10.l6b2 := 0.006809343750 ; |
---|
537 | kq9.l6b2 := -0.006441286297 ; |
---|
538 | kq8.l6b2 := 0.004703262486 ; |
---|
539 | kq5.l6b2 := -0.006581923578 ; |
---|
540 | kq4.l6b2 := 0.005026844197 ; |
---|
541 | kq4.r6b2 := -0.004791367397 ; |
---|
542 | kq5.r6b2 := 0.006471691810 ; |
---|
543 | kq8.r6b2 := -0.003137970222 ; |
---|
544 | kq9.r6b2 := 0.006856325617 ; |
---|
545 | kq10.r6b2 := -0.005897932727 ; |
---|
546 | kqtl11.r6b2 := 0.000643226717 ; |
---|
547 | kqt12.r6b2 := -0.002381607461 ; |
---|
548 | kqt13.r6b2 := -0.001578621173 ; |
---|
549 | |
---|
550 | |
---|
551 | kqt13.l7b1 := -0.000002313064 ; |
---|
552 | kqt12.l7b1 := 0.000102921458 ; |
---|
553 | kqtl11.l7b1 := 0.001005233286 ; |
---|
554 | kqtl10.l7b1 := 0.003796265532 ; |
---|
555 | kqtl9.l7b1 := -0.000033373994 ; |
---|
556 | kqtl8.l7b1 := -0.001800318068 ; |
---|
557 | kqtl7.l7b1 := 0.000713193158 ; |
---|
558 | kq6.l7b1 := 0.003275940113 ; |
---|
559 | kq6.r7b1 := -0.002704358705 ; |
---|
560 | kqtl7.r7b1 := -0.000752484500 ; |
---|
561 | kqtl8.r7b1 := 0.003415683085 ; |
---|
562 | kqtl9.r7b1 := 0.001684758419 ; |
---|
563 | kqtl10.r7b1 := 0.000074440353 ; |
---|
564 | kqtl11.r7b1 := -0.000511151850 ; |
---|
565 | kqt12.r7b1 := -0.001763083757 ; |
---|
566 | kqt13.r7b1 := -0.003169496499 ; |
---|
567 | |
---|
568 | kqt13.l7b2 := 0.000965029210 ; |
---|
569 | kqt12.l7b2 := 0.005137428571 ; |
---|
570 | kqtl11.l7b2 := -0.000447392147 ; |
---|
571 | kqtl10.l7b2 := 0.000134013915 ; |
---|
572 | kqtl9.l7b2 := 0.003332418885 ; |
---|
573 | kqtl8.l7b2 := 0.000836970715 ; |
---|
574 | kqtl7.l7b2 := 0.004343175077 ; |
---|
575 | kq6.l7b2 := -0.003103208003 ; |
---|
576 | kq4.lr7 := 0.001313827241 ; |
---|
577 | kqt4.lr7 := 0.000331689344 ; |
---|
578 | kq5.lr7 := -0.001335536573 ; |
---|
579 | kqt5.lr7 := -0.000032657706 ; |
---|
580 | kq6.r7b2 := 0.003356195659 ; |
---|
581 | kqtl7.r7b2 := -0.001777719496 ; |
---|
582 | kqtl8.r7b2 := 0.000323740152 ; |
---|
583 | kqtl9.r7b2 := -0.002345353400 ; |
---|
584 | kqtl10.r7b2 := 0.004378663619 ; |
---|
585 | kqtl11.r7b2 := -0.000524274612 ; |
---|
586 | kqt12.r7b2 := -0.001133358697 ; |
---|
587 | kqt13.r7b2 := 0.005130000000 ; |
---|
588 | |
---|
589 | |
---|
590 | kqt13.l8b1 := -0.000394433572 ; |
---|
591 | kqt12.l8b1 := 0.005139427959 ; |
---|
592 | kqtl11.l8b1 := 0.000191086765 ; |
---|
593 | kq10.l8b1 := -0.005993062178 ; |
---|
594 | kq9.l8b1 := 0.006440075481 ; |
---|
595 | kq8.l8b1 := -0.004590046072 ; |
---|
596 | kq7.l8b1 := 0.007545890851 ; |
---|
597 | kq6.l8b1 := -0.004639325567 ; |
---|
598 | kq5.l8b1 := 0.005323714992 ; |
---|
599 | kq4.l8b1 := -0.004314699693 ; |
---|
600 | kq4.r8b1 := 0.004852929858 ; |
---|
601 | kq5.r8b1 := -0.004627267275 ; |
---|
602 | kq6.r8b1 := 0.003560431945 ; |
---|
603 | kq7.r8b1 := -0.006048377240 ; |
---|
604 | kq8.r8b1 := 0.006405713103 ; |
---|
605 | kq9.r8b1 := -0.007176443717 ; |
---|
606 | kq10.r8b1 := 0.007305845994 ; |
---|
607 | kqtl11.r8b1 := -0.003489088232 ; |
---|
608 | kqt12.r8b1 := -0.002225006389 ; |
---|
609 | kqt13.r8b1 := -0.004689026440 ; |
---|
610 | |
---|
611 | kqt13.l8b2 := -0.005126642602 ; |
---|
612 | kqt12.l8b2 := -0.001412911307 ; |
---|
613 | kqtl11.l8b2 := -0.000374141457 ; |
---|
614 | kq10.l8b2 := 0.006959480232 ; |
---|
615 | kq9.l8b2 := -0.004767781414 ; |
---|
616 | kq8.l8b2 := 0.005626296969 ; |
---|
617 | kq7.l8b2 := -0.006350170647 ; |
---|
618 | kq6.l8b2 := 0.004428821404 ; |
---|
619 | kq5.l8b2 := -0.005569407299 ; |
---|
620 | kq4.l8b2 := 0.004760406256 ; |
---|
621 | kqx.l8 := 0.009509815813 ; |
---|
622 | kq4.r8b2 := -0.004473688996 ; |
---|
623 | kq5.r8b2 := 0.004256824734 ; |
---|
624 | kq6.r8b2 := -0.003496084478 ; |
---|
625 | kq7.r8b2 := 0.005671904180 ; |
---|
626 | kq8.r8b2 := -0.004510774607 ; |
---|
627 | kq9.r8b2 := 0.006727550257 ; |
---|
628 | kq10.r8b2 := -0.005790739613 ; |
---|
629 | kqtl11.r8b2 := -0.000073144464 ; |
---|
630 | kqt12.r8b2 := 0.005139426973 ; |
---|
631 | kqt13.r8b2 := 0.002117890602 ; |
---|
632 | |
---|
633 | acbxh1.l8 := -5.002806224e-006 * on_x8 ; |
---|
634 | acbxh1.r8 := 5.002806224e-006 * on_x8 ; |
---|
635 | acbyhs5.l8b1 := 3.436627146e-005 * on_x8 ; |
---|
636 | acbyhs5.r8b1 := 1.797637995e-006 * on_x8 ; |
---|
637 | acbyhs4.l8b1 := 1.216552785e-005 * on_x8 ; |
---|
638 | acbyhs4.r8b1 := -5.908963824e-005 * on_x8 ; |
---|
639 | acbyhs4.l8b2 := -5.938849871e-005 * on_x8 ; |
---|
640 | acbyhs4.r8b2 := 1.302465473e-005 * on_x8 ; |
---|
641 | acbyhs5.r8b2 := 3.313805051e-005 * on_x8 ; |
---|
642 | acbyhs5.l8b2 := -1.581046531e-006 * on_x8 ; |
---|
643 | |
---|
644 | acbxv1.l8 := 4.832373141e-005 * on_sep8 ; |
---|
645 | acbxv1.r8 := 4.832373141e-005 * on_sep8 ; |
---|
646 | acbyvs4.l8b1 := 2.636177275e-005 * on_sep8 ; |
---|
647 | acbyvs4.r8b1 := 8.640864939e-005 * on_sep8 ; |
---|
648 | acbyvs5.l8b1 := 0 * on_sep8 ; |
---|
649 | acbyvs5.r8b1 := -2.736857871e-005 * on_sep8 ; |
---|
650 | acbyvs4.l8b2 := -8.752173107e-005 * on_sep8 ; |
---|
651 | acbyvs4.r8b2 := -2.43158925e-005 * on_sep8 ; |
---|
652 | acbyvs5.l8b2 := 2.809018835e-005 * on_sep8 ; |
---|
653 | acbyvs5.r8b2 := 0 * on_sep8 ; |
---|
654 | acbcv6.l8b1 := -3.923701902e-006 * on_sep8 ; |
---|
655 | acbcv6.r8b2 := 3.872387157e-006 * on_sep8 ; |
---|
656 | |
---|
657 | return ; |
---|