source: PSPA/madxPSPA/tests/share/LHC/LHCRing/V6.503/V6.5.thin.inj.str @ 430

Last change on this file since 430 was 430, checked in by touze, 11 years ago

import madx-5.01.00

File size: 31.4 KB
Line 
1// LHC V6.503 THIN  Lens injection optics settings
2lhc_strength_version := 6503 ;
3
4beta.ip1             :=  11.0 ;
5beta.ip2             :=  10.0 ;
6beta.ip5             :=  11.0 ;
7beta.ip8             :=  10.0 ;
8
9! saved on 01/07/09 10:33:50 by T.Risselada
10
11
12// Default switch settings:
13//    crossing ANGLES off
14//    parallel SEPARATIONS off
15//    experimental magnets off
16
17on_x1                :=  0 ;
18on_x2                :=  0 ;
19on_x5                :=  0 ;
20on_x8                :=  0 ;
21
22!parallel separation
23on_sep1              :=  0 ;
24on_sep2              :=  0 ;
25on_sep5              :=  0 ;
26on_sep8              :=  0 ;
27
28!experimental magnets + compensators
29on_atlas             :=  0 ;
30on_alice             :=  0 ;
31on_cms               :=  0 ;
32on_lhcb              :=  0 ;
33
34 ! Offset in the plane of the crossing angle
35on_o2                :=  0 ;
36on_o8                :=  0 ;
37
38
39! Angle in the same plane as the separation
40on_a2                :=  0 ;
41on_a8                :=  0 ;
42
43abas                 :=  2.0*clight/(7e12)*on_atlas ;
44abls                 :=  6.05/12.1*clight/(7E12)*on_sol_alice;
45abcs                 :=  4.0*clight/(7e12)*on_cms ;
46
47
48x.ip1                := -0.0020000000 *on_sep1 ;
49y.ip1                :=  0.0000000000          ;
50px.ip1               :=  0.0000000000          ;
51py.ip1               :=  0.0001700000   *on_x1 ;
52
53x.ip2                :=  0.0020000000 *on_sep2 ;
54y.ip2                :=  0.0005000000   *on_o2 ;
55px.ip2               :=  0.0000200000   *on_a2 ;
56py.ip2               :=  0.0001700000   *on_x2 ;
57
58x.ip5                :=  0.0000000000          ;
59y.ip5                :=  0.0020000000 *on_sep5 ;
60px.ip5               :=  0.0001700000   *on_x5 ;
61py.ip5               :=  0.0000000000          ;
62
63x.ip8                :=  0.0007000000   *on_o8 ;
64y.ip8                := -0.0020000000 *on_sep8 ;
65px.ip8               := -0.0001700000   *on_x8 ;
66py.ip8               := -0.0000150000   *on_a8 ;
67
68!Beta functions for ip3, ip4, ip6 and ip7 for beam 1 and beam 2
69betx.ip3.b1 := 121.566845;
70bety.ip3.b1 := 218.584997;
71betx.ip4.b1 := 216.916753;
72bety.ip4.b1 := 120.072764;
73betx.ip6.b1 := 187.297497;
74bety.ip6.b1 := 168.122917;
75betx.ip7.b1 := 120.813252;
76bety.ip7.b1 := 149.430517;
77
78betx.ip3.b2 := 121.567284;
79bety.ip3.b2 := 218.584477;
80betx.ip4.b2 := 164.254571;
81bety.ip4.b2 := 267.725857;
82betx.ip6.b2 := 187.749224;
83bety.ip6.b2 := 178.368556;
84betx.ip7.b2 := 120.813252;
85bety.ip7.b2 := 149.430470;
86
87
88muxip1b1             :=  2.618000 ;
89muxip2b1             :=  2.986000 ;
90muxip3b1             :=  2.260905 ;
91muxip4b1             :=  2.045047 ;
92muxip5b1             :=  2.618000 ;
93muxip6b1             :=  2.015000 ;
94muxip7b1             :=  2.450049 ;
95muxip8b1             :=  3.183000 ;
96
97muyip1b1             :=  2.644000 ;
98muyip2b1             :=  2.808600 ;
99muyip3b1             :=  1.905369 ;
100muyip4b1             :=  1.941411 ;
101muyip5b1             :=  2.644000 ;
102muyip6b1             :=  1.780000 ;
103muyip7b1             :=  1.923620 ;
104muyip8b1             :=  2.974000 ;
105
106muxip1b2             :=  2.618000 ;
107muxip2b2             :=  2.991000 ;
108muxip3b2             :=  2.260201 ;
109muxip4b2             :=  2.125374 ;
110muxip5b2             :=  2.618000 ;
111muxip6b2             :=  2.015000 ;
112muxip7b2             :=  2.489424 ;
113muxip8b2             :=  3.059000 ;
114
115muyip1b2             :=  2.644000 ;
116muyip2b2             :=  2.844000 ;
117muyip3b2             :=  1.989917 ;
118muyip4b2             :=  1.934101 ;
119muyip5b2             :=  2.644000 ;
120muyip6b2             :=  1.780000 ;
121muyip7b2             :=  2.002981 ;
122muyip8b2             :=  2.782000 ;
123
124
125qx1                  :=  64.280000 ;
126qy1                  :=  59.310000 ;
127
128qx2                  :=  64.280000 ;
129qy2                  :=  59.310000 ;
130
131qprime               :=  1.000000 ;
132
133
134kb.a12               :=  ab.a12/l.mb ;
135kb.a23               :=  ab.a23/l.mb ;
136kb.a34               :=  ab.a34/l.mb ;
137kb.a45               :=  ab.a45/l.mb ;
138kb.a56               :=  ab.a56/l.mb ;
139kb.a67               :=  ab.a67/l.mb ;
140kb.a78               :=  ab.a78/l.mb ;
141kb.a81               :=  ab.a81/l.mb ;
142kqd.a12              :=  kqd ;
143kqd.a23              :=  kqd ;
144kqd.a34              :=  kqd ;
145kqd.a45              :=  kqd ;
146kqd.a56              :=  kqd ;
147kqd.a67              :=  kqd ;
148kqd.a78              :=  kqd ;
149kqd.a81              :=  kqd ;
150
151
152
153kqf.a12              :=  kqf ;
154kqf.a23              :=  kqf ;
155kqf.a34              :=  kqf ;
156kqf.a45              :=  kqf ;
157kqf.a56              :=  kqf ;
158kqf.a67              :=  kqf ;
159kqf.a78              :=  kqf ;
160kqf.a81              :=  kqf ;
161kqtd.a12b1           :=  kqtd.b1 ;
162kqtd.a12b2           :=  kqtd.b2 ;
163kqtd.a23b1           :=  kqtd.b1 ;
164kqtd.a23b2           :=  kqtd.b2 ;
165kqtd.a34b1           :=  kqtd.b1 ;
166kqtd.a34b2           :=  kqtd.b2 ;
167kqtd.a45b1           :=  kqtd.b1 ;
168kqtd.a45b2           :=  kqtd.b2 ;
169kqtd.a56b1           :=  kqtd.b1 ;
170kqtd.a56b2           :=  kqtd.b2 ;
171kqtd.a67b1           :=  kqtd.b1 ;
172kqtd.a67b2           :=  kqtd.b2 ;
173kqtd.a78b1           :=  kqtd.b1 ;
174kqtd.a78b2           :=  kqtd.b2 ;
175kqtd.a81b1           :=  kqtd.b1 ;
176kqtd.a81b2           :=  kqtd.b2 ;
177kqtd.b1              :=  0.0 ;
178kqtd.b2              :=  0.0 ;
179kqtf.a12b1           :=  kqtf.b1 ;
180kqtf.a12b2           :=  kqtf.b2 ;
181kqtf.a23b1           :=  kqtf.b1 ;
182kqtf.a23b2           :=  kqtf.b2 ;
183kqtf.a34b1           :=  kqtf.b1 ;
184kqtf.a34b2           :=  kqtf.b2 ;
185kqtf.a45b1           :=  kqtf.b1 ;
186kqtf.a45b2           :=  kqtf.b2 ;
187kqtf.a56b1           :=  kqtf.b1 ;
188kqtf.a56b2           :=  kqtf.b2 ;
189kqtf.a67b1           :=  kqtf.b1 ;
190kqtf.a67b2           :=  kqtf.b2 ;
191kqtf.a78b1           :=  kqtf.b1 ;
192kqtf.a78b2           :=  kqtf.b2 ;
193kqtf.a81b1           :=  kqtf.b1 ;
194kqtf.a81b2           :=  kqtf.b2 ;
195kqtf.b1              :=  0.0 ;
196kqtf.b2              :=  0.0 ;
197ksd1.a12b1           :=  ksd.b1 ;
198ksd1.a12b2           :=  ksd.b2 ;
199ksd1.a23b1           :=  ksd.b1 ;
200ksd1.a23b2           :=  ksd.b2 ;
201ksd1.a34b1           :=  ksd.b1 ;
202ksd1.a34b2           :=  ksd.b2 ;
203ksd1.a45b1           :=  ksd.b1 ;
204ksd1.a45b2           :=  ksd.b2 ;
205ksd1.a56b1           :=  ksd.b1 ;
206ksd1.a56b2           :=  ksd.b2 ;
207ksd1.a67b1           :=  ksd.b1 ;
208ksd1.a67b2           :=  ksd.b2 ;
209ksd1.a78b1           :=  ksd.b1 ;
210ksd1.a78b2           :=  ksd.b2 ;
211ksd1.a81b1           :=  ksd.b1 ;
212ksd1.a81b2           :=  ksd.b2 ;
213ksd2.a12b1           :=  ksd.b1 ;
214ksd2.a12b2           :=  ksd.b2 ;
215ksd2.a23b1           :=  ksd.b1 ;
216ksd2.a23b2           :=  ksd.b2 ;
217ksd2.a34b1           :=  ksd.b1 ;
218ksd2.a34b2           :=  ksd.b2 ;
219ksd2.a45b1           :=  ksd.b1 ;
220ksd2.a45b2           :=  ksd.b2 ;
221ksd2.a56b1           :=  ksd.b1 ;
222ksd2.a56b2           :=  ksd.b2 ;
223ksd2.a67b1           :=  ksd.b1 ;
224ksd2.a67b2           :=  ksd.b2 ;
225ksd2.a78b1           :=  ksd.b1 ;
226ksd2.a78b2           :=  ksd.b2 ;
227ksd2.a81b1           :=  ksd.b1 ;
228ksd2.a81b2           :=  ksd.b2 ;
229
230
231
232
233 ksf.b1 =     0.067678410374 ; // dQ1=2 and dQ2=2 for beam 1
234 ksd.b1 =    -0.109226657233 ;
235
236 ksf.b2 =     0.068068604122 ; // dQ1=2 and dQ2=2 for beam 2
237 ksd.b2 =    -0.109478310241 ;
238
239
240
241
242ksf1.a12b1           :=  ksf.b1 ;
243ksf1.a12b2           :=  ksf.b2 ;
244ksf1.a23b1           :=  ksf.b1 ;
245ksf1.a23b2           :=  ksf.b2 ;
246ksf1.a34b1           :=  ksf.b1 ;
247ksf1.a34b2           :=  ksf.b2 ;
248ksf1.a45b1           :=  ksf.b1 ;
249ksf1.a45b2           :=  ksf.b2 ;
250ksf1.a56b1           :=  ksf.b1 ;
251ksf1.a56b2           :=  ksf.b2 ;
252ksf1.a67b1           :=  ksf.b1 ;
253ksf1.a67b2           :=  ksf.b2 ;
254ksf1.a78b1           :=  ksf.b1 ;
255ksf1.a78b2           :=  ksf.b2 ;
256ksf1.a81b1           :=  ksf.b1 ;
257ksf1.a81b2           :=  ksf.b2 ;
258ksf2.a12b1           :=  ksf.b1 ;
259ksf2.a12b2           :=  ksf.b2 ;
260ksf2.a23b1           :=  ksf.b1 ;
261ksf2.a23b2           :=  ksf.b2 ;
262ksf2.a34b1           :=  ksf.b1 ;
263ksf2.a34b2           :=  ksf.b2 ;
264ksf2.a45b1           :=  ksf.b1 ;
265ksf2.a45b2           :=  ksf.b2 ;
266ksf2.a56b1           :=  ksf.b1 ;
267ksf2.a56b2           :=  ksf.b2 ;
268ksf2.a67b1           :=  ksf.b1 ;
269ksf2.a67b2           :=  ksf.b2 ;
270ksf2.a78b1           :=  ksf.b1 ;
271ksf2.a78b2           :=  ksf.b2 ;
272ksf2.a81b1           :=  ksf.b1 ;
273ksf2.a81b2           :=  ksf.b2 ;
274
275kd1.lr1              :=  ad1.lr1/l.mbxw ;
276kd2.l1               :=  ad2.l1/l.mbrc ;
277kd2.r1               :=  ad2.r1/l.mbrc ;
278ktqx1.l1             :=  0 ;
279ktqx1.r1             :=  0 ;
280
281
282
283kd1.l2               :=  ad1.l2/l.mbx ;
284kd1.r2               :=  ad1.r2/l.mbx ;
285kd2.l2               :=  ad2.l2/l.mbrc ;
286kd2.r2               :=  ad2.r2/l.mbrc ;
287ktqx1.l2             :=  0 ;
288ktqx1.r2             :=  0 ;
289
290abxwt.l2             := -0.0000772587268993839836*on_alice ;
291abwmd.l2             := +0.000147258726899383984 *on_alice ;
292abaw.r2              := -0.0001335474860334838   *on_alice ;
293abxwt.r2             := +0.0000635474860334838004*on_alice ;
294
295
296kd3.lr3              :=  ad3.lr3/l.mbw ;
297kd4.lr3              :=  ad4.lr3/l.mbw ;
298
299kd3.l4               :=  ad3.l4/l.mbrs ;
300kd3.r4               :=  ad3.r4/l.mbrs ;
301kd4.l4               :=  ad4.l4/l.mbrb ;
302kd4.r4               :=  ad4.r4/l.mbrb ;
303
304
305kd1.lr5              :=  ad1.lr5/l.mbxw ;
306kd2.l5               :=  ad2.l5/l.mbrc ;
307kd2.r5               :=  ad2.r5/l.mbrc ;
308ktqx1.l5             :=  0 ;
309ktqx1.r5             :=  0 ;
310
311
312kd3.lr7              :=  ad3.lr7/l.mbw ;
313kd4.lr7              :=  ad4.lr7/l.mbw ;
314
315
316kd1.l8               :=  ad1.l8/l.mbx ;
317kd1.r8               :=  ad1.r8/l.mbx ;
318kd2.l8               :=  ad2.l8/l.mbrc ;
319kd2.r8               :=  ad2.r8/l.mbrc ;
320ktqx1.l8             :=  0 ;
321ktqx1.r8             :=  0 ;
322abxws.l8             := -0.000045681598453109894*on_lhcb ;
323abxwh.l8             :=  0.000180681598453109894*on_lhcb ;
324ablw.r8              := -0.000180681598453109894*on_lhcb ;
325abxws.r8             :=  0.000045681598453109894*on_lhcb ;
326
327
328kqx.r5               := -kqx.l5 ;
329kqx.r1               := -kqx.l1 ;
330kqx.r2               := -kqx.l2 ;
331kqx.r8               := -kqx.l8 ;
332
333
334kqf                  :=  0.008815890403 ;
335kqd                  := -0.008430544103 ;
336
337
338
339
340
341
342
343
344
345kqt13.l1b1           :=  0.000692494142774 ;  // 30/01/09 10:43
346kqt12.l1b1           := -0.001765502219460 ;
347kqtl11.l1b1          := -0.001442772609601 ;
348kq10.l1b1            :=  0.007356490903152 ;
349kq9.l1b1             := -0.006746380790331 ;
350kq8.l1b1             :=  0.007075642826717 ;
351kq7.l1b1             := -0.004202484531084 ;
352kq6.l1b1             :=  0.004978816936714 ;
353kq5.l1b1             := -0.005809956145860 ;
354kq4.l1b1             :=  0.005160072708597 ;
355kq4.r1b1             := -0.005160072708597 ;
356kq5.r1b1             :=  0.005809956145860 ;
357kq6.r1b1             := -0.004978816936714 ;
358kq7.r1b1             :=  0.003980080836095 ;
359kq8.r1b1             := -0.006959043727210 ;
360kq9.r1b1             :=  0.006610796131542 ;
361kq10.r1b1            := -0.007408173893441 ;
362kqtl11.r1b1          :=  0.000354659171234 ;
363kqt12.r1b1           := -0.000473356033842 ;
364kqt13.r1b1           := -0.003698366059293 ;
365
366kqt13.l1b2           := -0.004368147713380 ;  // 30/01/09 10:59
367kqt12.l1b2           :=  0.001109713912709 ;
368kqtl11.l1b2          :=  0.000196533654415 ;
369kq10.l1b2            := -0.007214367949029 ;
370kq9.l1b2             :=  0.006601217357303 ;
371kq8.l1b2             := -0.006831283297308 ;
372kq7.l1b2             :=  0.004069567068159 ;
373kq6.l1b2             := -0.005121717818741 ;
374kq5.l1b2             :=  0.005884759171854 ;
375kq4.l1b2             := -0.004950988727301 ;
376kqx.l1               := -0.008576824107000 ;
377kq4.r1b2             :=  0.004950988727301 ;
378kq5.r1b2             := -0.005884759171854 ;
379kq6.r1b2             :=  0.005121717818741 ;
380kq7.r1b2             := -0.003897914771557 ;
381kq8.r1b2             :=  0.006709587170993 ;
382kq9.r1b2             := -0.006622596702195 ;
383kq10.r1b2            :=  0.007406405625287 ;
384kqtl11.r1b2          := -0.003109040671853 ;
385kqt12.r1b2           := -0.000533887164340 ;
386kqt13.r1b2           := -0.003650136186311 ;
387
388
389 acbxh1.l1      :=    -0.000040000000000 * on_sep1 ;  // 18/11/09 13:04 O.B.
390 acbxh1.r1      :=    -0.000040000000000 * on_sep1 ;
391 acbyhs4.l1b1   :=    -0.000016092993103 * on_sep1 ;
392 acbch6.l1b1    :=    -0.000001736796798 * on_sep1 ;
393 acbyhs4.r1b1   :=    -0.000119410035988 * on_sep1 ;
394 acbch5.r1b1    :=     0.000061492116631 * on_sep1 ;
395 acbyhs4.l1b2   :=     0.000107536058038 * on_sep1 ;
396 acbch5.l1b2    :=    -0.000054552234188 * on_sep1 ;
397 acbyhs4.r1b2   :=     0.000015861283427 * on_sep1 ;
398 acbch6.r1b2    :=     0.000001823271262 * on_sep1 ;
399 acbxv1.l1      :=     0.000035000000000 * on_x1   ;
400 acbxv1.r1      :=    -0.000035000000000 * on_x1   ;
401 acbcv5.l1b1    :=    -0.000007903279749 * on_x1   ;
402 acbyvs4.l1b1   :=    -0.000047644262896 * on_x1   ;
403 acbyvs4.r1b1   :=     0.000026448479084 * on_x1   ;
404 acbcv6.r1b1    :=     0.000016255532334 * on_x1   ;
405 acbyvs4.l1b2   :=     0.000026651650734 * on_x1   ;
406 acbcv6.l1b2    :=     0.000015283072504 * on_x1   ;
407 acbyvs4.r1b2   :=    -0.000046180083455 * on_x1   ;
408 acbcv5.r1b2    :=    -0.000008958000777 * on_x1   ;
409
410 acbxh2.l1      :=    0.00000000000000 ;
411 acbxh2.r1      :=    0.00000000000000 ;
412 acbxh3.l1      :=    0.00000000000000 ;
413 acbxh3.r1      :=    0.00000000000000 ;
414 acbyh4.l1b1    :=    0.00000000000000 ;
415 acbyh4.r1b2    :=    0.00000000000000 ;
416 acbch7.l1b2    :=    0.00000000000000 ;
417 acbch7.r1b1    :=    0.00000000000000 ;
418
419 acbxv2.l1      :=    0.00000000000000 ;
420 acbxv2.r1      :=    0.00000000000000 ;
421 acbxv3.l1      :=    0.00000000000000 ;
422 acbxv3.r1      :=    0.00000000000000 ;
423 acbyv4.l1b2    :=    0.00000000000000 ;
424 acbyv4.r1b1    :=    0.00000000000000 ;
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454 kqt13.l2b1     :=    -0.003834445532494 ;  // 09/11/09 09:08 O.B.
455 kqt12.l2b1     :=    -0.000675483469249 ;
456 kqtl11.l2b1    :=    -0.000031558580384 ;
457 kq10.l2b1      :=    -0.005515654763629 ;
458 kq9.l2b1       :=     0.005907339487536 ;
459 kq8.l2b1       :=    -0.004009025431334 ;
460 kq7.l2b1       :=     0.005768691376913 ;
461 kq6.l2b1       :=    -0.004076753583097 ;
462 kq5.l2b1       :=     0.004791347272108 ;
463 kq4.l2b1       :=    -0.005493491150906 ;
464 kqx.l2         :=     0.009509815813000 ;
465 kq4.r2b1       :=     0.004859962449500 ;
466 kq5.r2b1       :=    -0.004751183492222 ;
467 kq6.r2b1       :=     0.004216635707371 ;
468 kq7.r2b1       :=    -0.005903162078608 ;
469 kq8.r2b1       :=     0.005542563742683 ;
470 kq9.r2b1       :=    -0.005438955209556 ;
471 kq10.r2b1      :=     0.007292498083412 ;
472 kqtl11.r2b1    :=    -0.001413900968159 ;
473 kqt12.r2b1     :=    -0.002174843534522 ;
474 kqt13.r2b1     :=    -0.006112154564964 ;
475
476
477 kqt13.l2b2     :=     0.000770569927627 ;  // 09/11/09 09:36 O.B.
478 kqt12.l2b2     :=    -0.005155288097897 ;
479 kqtl11.l2b2    :=     0.000506588061734 ;
480 kq10.l2b2      :=     0.007336950274898 ;
481 kq9.l2b2       :=    -0.006899019892616 ;
482 kq8.l2b2       :=     0.006372145186625 ;
483 kq7.l2b2       :=    -0.006453217973059 ;
484 kq6.l2b2       :=     0.004061767957629 ;
485 kq5.l2b2       :=    -0.004082207487026 ;
486 kq4.l2b2       :=     0.004558836536795 ;
487 kqx.l2         :=     0.009509815813000 ;
488 kq4.r2b2       :=    -0.005295484927284 ;
489 kq5.r2b2       :=     0.004217573729281 ;
490 kq6.r2b2       :=    -0.004210079402879 ;
491 kq7.r2b2       :=     0.006127503246832 ;
492 kq8.r2b2       :=    -0.004493399993305 ;
493 kq9.r2b2       :=     0.006915460029957 ;
494 kq10.r2b2      :=    -0.006072352218219 ;
495 kqtl11.r2b2    :=     0.000204542275601 ;
496 kqt12.r2b2     :=    -0.000003677835275 ;
497 kqt13.r2b2     :=     0.002381449968930 ;
498
499
500
501 acbxv1.l2      :=     0.000000000000000 *on_x2 ;                          // 14/07/09 13:58 O.B.
502 acbxv1.r2      :=     0.000000000000000 *on_x2 ;
503 acbyvs4.l2b1   :=    -0.000059571440823 *on_x2 +0.000011322427425 *on_o2 ;
504 acbyvs4.r2b1   :=    -0.000017017310777 *on_x2 +0.000061015852083 *on_o2 ;
505 acbyvs5.l2b1   :=    -0.000014802663614 *on_x2 -0.000034070613918 *on_o2 ;
506 acbcvs5.r2b1   :=     0.000050277455172 *on_x2 -0.000027330000332 *on_o2 ;
507 acbyvs4.l2b2   :=    -0.000000190825057 *on_x2 +0.000051869250312 *on_o2 ;
508 acbyvs4.r2b2   :=    -0.000052147952642 *on_x2 +0.000028408730691 *on_o2 ;
509 acbyvs5.l2b2   :=     0.000040290728152 *on_x2 -0.000021901379256 *on_o2 ;
510 acbcvs5.r2b2   :=    -0.000022462374544 *on_x2 -0.000051700620276 *on_o2 ;
511
512 acbxh1.l2      :=     0.000035000000000 *on_sep2 ;
513 acbxh1.r2      :=     0.000035000000000 *on_sep2 ;
514 acbxh2.l2      :=     0.000000000000000 *on_sep2 ;
515 acbxh2.r2      :=     0.000000000000000 *on_sep2 ;
516 acbyhs4.l2b1   :=     0.000125653094293 *on_sep2 +0.000000758264630 *on_a2 ;
517 acbyhs4.r2b1   :=     0.000060466479663 *on_sep2 +0.000005969202018 *on_a2 ;
518 acbyhs5.l2b1   :=    -0.000043815393173 *on_sep2 -0.000004752507806 *on_a2 ;
519 acbchs5.r2b1   :=    -0.000070845455520 *on_sep2 +0.000002598282194 *on_a2 ;
520 acbyhs4.l2b2   :=    -0.000043189299365 *on_sep2 -0.000006602848730 *on_a2 ;
521 acbyhs4.r2b2   :=    -0.000139999137713 *on_sep2 -0.000002314331538 *on_a2 ;
522 acbyhs5.l2b2   :=     0.000046590896723 *on_sep2 -0.000001708737653 *on_a2 ;
523 acbchs5.r2b2   :=     0.000053911446215 *on_sep2 +0.000005847592602 *on_a2 ;
524
525 acbcv6.l2b1    :=     0.000000000000000 ;
526 acbyh5.l2b1    :=     0.000000000000000 ;
527 acbyv4.l2b1    :=     0.000000000000000 ;
528 acbyh4.r2b1    :=     0.000000000000000 ;
529 acbcv5.r2b1    :=     0.000000000000000 ;
530 acbch6.r2b1    :=     0.000000000000000 ;
531 acbch6.l2b2    :=     0.000000000000000 ;
532 acbyv5.l2b2    :=     0.000000000000000 ;
533 acbyh4.l2b2    :=     0.000000000000000 ;
534 acbyv4.r2b2    :=     0.000000000000000 ;
535 acbch5.r2b2    :=     0.000000000000000 ;
536 acbcv6.r2b2    :=     0.000000000000000 ;
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553 kqt13.l3b1     :=     0.002036520647929 ;  // 20/11/09 15:22 O.B.
554 kqt12.l3b1     :=     0.001486876389933 ;
555 kqtl11.l3b1    :=     0.002685601001333 ;
556 kqtl10.l3b1    :=    -0.000224664044223 ;
557 kqtl9.l3b1     :=    -0.003727226865698 ;
558 kqtl8.l3b1     :=    -0.000131613139283 ;
559 kqtl7.l3b1     :=    -0.003645942560105 ;
560 kq6.l3b1       :=     0.002694026358358 ;
561 kq4.lr3        :=     0.001241283780000 ;
562 kqt4.lr3       :=     0.000688712528000 ;
563 kq5.lr3        :=    -0.001303923550000 ;
564 kqt5.lr3       :=     0.000972084452000 ;
565 kq6.r3b1       :=    -0.002427628814687 ;
566 kqtl7.r3b1     :=     0.000592425472364 ;
567 kqtl8.r3b1     :=     0.002609617820316 ;
568 kqtl9.r3b1     :=    -0.000440334667483 ;
569 kqtl10.r3b1    :=     0.003174241066863 ;
570 kqtl11.r3b1    :=    -0.004046844106047 ;
571 kqt12.r3b1     :=     0.003292045131046 ;
572 kqt13.r3b1     :=    -0.004758334191560 ;
573
574
575
576 kqt13.l3b2     :=    -0.005158726511512 ;  // 20/11/09 12:51 O.B.
577 kqt12.l3b2     :=    -0.004097472652915 ;
578 kqtl11.l3b2    :=    -0.003557397361305 ;
579 kqtl10.l3b2    :=     0.001498419008402 ;
580 kqtl9.l3b2     :=    -0.000336453249660 ;
581 kqtl8.l3b2     :=     0.002870555629933 ;
582 kqtl7.l3b2     :=     0.000179220417737 ;
583 kq6.l3b2       :=    -0.002409142492036 ;
584 kq4.lr3        :=     0.001241283780000 ;
585 kqt4.lr3       :=     0.000688712528000 ;
586 kq5.lr3        :=    -0.001303923550000 ;
587 kqt5.lr3       :=     0.000972084452000 ;
588 kq6.r3b2       :=     0.002705699094607 ;
589 kqtl7.r3b2     :=    -0.003420918632572 ;
590 kqtl8.r3b2     :=    -0.000702645914131 ;
591 kqtl9.r3b2     :=    -0.003841288748624 ;
592 kqtl10.r3b2    :=     0.000678411345668 ;
593 kqtl11.r3b2    :=     0.001406089391239 ;
594 kqt12.r3b2     :=     0.003088230795273 ;
595 kqt13.r3b2     :=    -0.001733738446726 ;
596
597
598
599
600
601
602
603
604
605
606
607
608  kqt13.l4b1     :=    -0.000781554013143 ;  // 25/11/09 14:06 O.B.
609  kqt12.l4b1     :=    -0.004269554980876 ;
610  kqtl11.l4b1    :=     0.000696130629672 ;
611  kq10.l4b1      :=    -0.007332191239827 ;
612  kq9.l4b1       :=     0.006783965655611 ;
613  kq8.l4b1       :=    -0.006782683968874 ;
614  kq7.l4b1       :=     0.007288569819626 ;
615  kq6.l4b1       :=    -0.005929845448542 ;
616  kq5.l4b1       :=     0.004719761431119 ;
617  kq5.r4b1       :=    -0.004952057346820 ;
618  kq6.r4b1       :=     0.005353960843991 ;
619  kq7.r4b1       :=    -0.004818731583334 ;
620  kq8.r4b1       :=     0.006175935809812 ;
621  kq9.r4b1       :=    -0.005078360857921 ;
622  kq10.r4b1      :=     0.007130646806898 ;
623  kqtl11.r4b1    :=     0.000861226398786 ;
624  kqt12.r4b1     :=    -0.004785873973034 ;
625  kqt13.r4b1     :=     0.001959565452707 ;
626
627
628  kqt13.l4b2     :=     0.004606872322845 ;  // 25/11/09 14:54 O.B.
629  kqt12.l4b2     :=    -0.003245892635437 ;
630  kqtl11.l4b2    :=     0.001895508750763 ;
631  kq10.l4b2      :=     0.007157286330298 ;
632  kq9.l4b2       :=    -0.005660039717707 ;
633  kq8.l4b2       :=     0.006758967466172 ;
634  kq7.l4b2       :=    -0.006210064091514 ;
635  kq6.l4b2       :=     0.005585580278508 ;
636  kq5.l4b2       :=    -0.004664898088299 ;
637  kq5.r4b2       :=     0.004583329168952 ;
638  kq6.r4b2       :=    -0.005878225327603 ;
639  kq7.r4b2       :=     0.007476408954166 ;
640  kq8.r4b2       :=    -0.008344171175226 ;
641  kq9.r4b2       :=     0.007209025674627 ;
642  kq10.r4b2      :=    -0.006903466808894 ;
643  kqtl11.r4b2    :=     0.000632448115655 ;
644  kqt12.r4b2     :=     0.003074037701361 ;
645  kqt13.r4b2     :=     0.001111775740587 ;
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689kqt13.l5b1           :=  0.000692494142774 ;  // 30/01/09 10:43
690kqt12.l5b1           := -0.001765502219460 ;
691kqtl11.l5b1          := -0.001442772609601 ;
692kq10.l5b1            :=  0.007356490903152 ;
693kq9.l5b1             := -0.006746380790331 ;
694kq8.l5b1             :=  0.007075642826717 ;
695kq7.l5b1             := -0.004202484531084 ;
696kq6.l5b1             :=  0.004978816936714 ;
697kq5.l5b1             := -0.005809956145860 ;
698kq4.l5b1             :=  0.005160072708597 ;
699kq4.r5b1             := -0.005160072708597 ;
700kq5.r5b1             :=  0.005809956145860 ;
701kq6.r5b1             := -0.004978816936714 ;
702kq7.r5b1             :=  0.003980080836095 ;
703kq8.r5b1             := -0.006959043727210 ;
704kq9.r5b1             :=  0.006610796131542 ;
705kq10.r5b1            := -0.007408173893441 ;
706kqtl11.r5b1          :=  0.000354659171234 ;
707kqt12.r5b1           := -0.000473356033842 ;
708kqt13.r5b1           := -0.003698366059293 ;
709
710
711
712kqt13.l5b2           := -0.004368147713380 ;  // 30/01/09 10:59
713kqt12.l5b2           :=  0.001109713912709 ;
714kqtl11.l5b2          :=  0.000196533654415 ;
715kq10.l5b2            := -0.007214367949029 ;
716kq9.l5b2             :=  0.006601217357303 ;
717kq8.l5b2             := -0.006831283297308 ;
718kq7.l5b2             :=  0.004069567068159 ;
719kq6.l5b2             := -0.005121717818741 ;
720kq5.l5b2             :=  0.005884759171854 ;
721kq4.l5b2             := -0.004950988727301 ;
722kqx.l5               := -0.008576824107000 ;
723kq4.r5b2             :=  0.004950988727301 ;
724kq5.r5b2             := -0.005884759171854 ;
725kq6.r5b2             :=  0.005121717818741 ;
726kq7.r5b2             := -0.003897914771557 ;
727kq8.r5b2             :=  0.006709587170993 ;
728kq9.r5b2             := -0.006622596702195 ;
729kq10.r5b2            :=  0.007406405625287 ;
730kqtl11.r5b2          := -0.003109040671853 ;
731kqt12.r5b2           := -0.000533887164340 ;
732kqt13.r5b2           := -0.003650136186311 ;
733
734
735 acbxh1.l5      :=     0.000035000000000 *   on_x5 ;  // 18/11/09 13:16 O.B.
736 acbxh1.r5      :=    -0.000035000000000 *   on_x5 ;
737 acbch6.l5b1    :=    -0.000016255192978 *   on_x5 ;
738 acbyhs4.l5b1   :=    -0.000026449122852 *   on_x5 ;
739 acbyhs4.r5b1   :=     0.000047646201276 *   on_x5 ;
740 acbch5.r5b1    :=     0.000007902228607 *   on_x5 ;
741 acbch5.l5b2    :=     0.000008956809357 *   on_x5 ;
742 acbyhs4.l5b2   :=     0.000046182216572 *   on_x5 ;
743 acbyhs4.r5b2   :=    -0.000026652290261 *   on_x5 ;
744 acbch6.r5b2    :=    -0.000015282753450 *   on_x5 ;
745 acbxv1.l5      :=     0.000040000000000 * on_sep5 ;
746 acbxv1.r5      :=     0.000040000000000 * on_sep5 ;
747 acbcv5.l5b1    :=    -0.000061491930260 * on_sep5 ;
748 acbyvs4.l5b1   :=     0.000119409905840 * on_sep5 ;
749 acbyvs4.r5b1   :=     0.000016092801457 * on_sep5 ;
750 acbcv6.r5b1    :=     0.000001736916259 * on_sep5 ;
751 acbcv6.l5b2    :=    -0.000001823396671 * on_sep5 ;
752 acbyvs4.l5b2   :=    -0.000015861075842 * on_sep5 ;
753 acbyvs4.r5b2   :=    -0.000107535963890 * on_sep5 ;
754 acbcv5.r5b2    :=     0.000054552068858 * on_sep5 ;
755
756 acbxh2.l5      :=    0.00000000000000 ;
757 acbxh2.r5      :=    0.00000000000000 ;
758 acbxh3.l5      :=    0.00000000000000 ;
759 acbxh3.r5      :=    0.00000000000000 ;
760 acbyh4.l5b1    :=    0.00000000000000 ;
761 acbyh4.r5b2    :=    0.00000000000000 ;
762 acbch7.l5b2    :=    0.00000000000000 ;
763 acbch7.r5b1    :=    0.00000000000000 ;
764
765 acbxv2.l5      :=    0.00000000000000 ;
766 acbxv2.r5      :=    0.00000000000000 ;
767 acbxv3.l5      :=    0.00000000000000 ;
768 acbxv3.r5      :=    0.00000000000000 ;
769 acbyv4.l5b2    :=    0.00000000000000 ;
770 acbyv4.r5b1    :=    0.00000000000000 ;
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830 kqt13.l6b1     :=    -0.000152481005160 ;  // 18/11/09 09:54 O.B.
831 kqt12.l6b1     :=    -0.000976106904634 ;
832 kqtl11.l6b1    :=     0.000770169734479 ;
833 kq10.l6b1      :=    -0.005913396105150 ;
834 kq9.l6b1       :=     0.006807381995326 ;
835 kq8.l6b1       :=    -0.003318493640454 ;
836 kq5.l6b1       :=     0.006409919552529 ;
837 kq4.l6b1       :=    -0.004805160125043 ;
838 kq4.r6b1       :=     0.004890426106637 ;
839 kq5.r6b1       :=    -0.006540815368167 ;
840 kq8.r6b1       :=     0.005098125526066 ;
841 kq9.r6b1       :=    -0.006605657959458 ;
842 kq10.r6b1      :=     0.007215119294521 ;
843 kqtl11.r6b1    :=    -0.000472878416455 ;
844 kqt12.r6b1     :=    -0.004423703445993 ;
845 kqt13.r6b1     :=     0.000550564280338 ;
846
847
848 kqt13.l6b2     :=     0.000941683878346 ;  // 18/11/09 11:26 O.B.
849 kqt12.l6b2     :=    -0.003745378953220 ;
850 kqtl11.l6b2    :=     0.000302312024878 ;
851 kq10.l6b2      :=     0.007075529178939 ;
852 kq9.l6b2       :=    -0.006417345844424 ;
853 kq8.l6b2       :=     0.004992060278516 ;
854 kq5.l6b2       :=    -0.006560197817052 ;
855 kq4.l6b2       :=     0.004910277571783 ;
856 kq4.r6b2       :=    -0.004795245981655 ;
857 kq5.r6b2       :=     0.006400423940447 ;
858 kq8.r6b2       :=    -0.003316678528981 ;
859 kq9.r6b2       :=     0.006918165406039 ;
860 kq10.r6b2      :=    -0.006191193540291 ;
861 kqtl11.r6b2    :=     0.001041009919233 ;
862 kqt12.r6b2     :=    -0.002588505431507 ;
863 kqt13.r6b2     :=    -0.000019601922694 ;
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906kqt13.l7b1           :=  0.002521586656390 ;  // 02/04/09 17:39
907kqt12.l7b1           := -0.000492946851368 ;
908kqtl11.l7b1          :=  0.001697568199267 ;
909kqtl10.l7b1          :=  0.003752530028870 ;
910kqtl9.l7b1           := -0.000020071665401 ;
911kqtl8.l7b1           := -0.001425927106568 ;
912kqtl7.l7b1           :=  0.000703547433981 ;
913kq6.l7b1             :=  0.003274586300008 ;
914kq6.r7b1             := -0.002778231370532 ;
915kqtl7.r7b1           :=  0.002429062336257 ;
916kqtl8.r7b1           :=  0.001742948213654 ;
917kqtl9.r7b1           :=  0.002727494109454 ;
918kqtl10.r7b1          :=  0.000371451007751 ;
919kqtl11.r7b1          := -0.000430192033109 ;
920kqt12.r7b1           :=  0.000447891800365 ;
921kqt13.r7b1           :=  0.000249603592607 ;
922
923
924
925 kqt13.l7b2     :=    -0.000557828985132 ;  // 20/11/09 14:30 O.B.
926 kqt12.l7b2     :=     0.003957839145390 ;
927 kqtl11.l7b2    :=     0.000046677812869 ;
928 kqtl10.l7b2    :=    -0.002158236685799 ;
929 kqtl9.l7b2     :=     0.004338026607829 ;
930 kqtl8.l7b2     :=    -0.002283465762536 ;
931 kqtl7.l7b2     :=     0.005253168167209 ;
932 kq6.l7b2       :=    -0.003333465725741 ;
933 kq4.lr7        :=     0.001313827241000 ;
934 kqt4.lr7       :=     0.000331689344000 ;
935 kq5.lr7        :=    -0.001335536573000 ;
936 kqt5.lr7       :=    -0.000032657706000 ;
937 kq6.r7b2       :=     0.003185522583183 ;
938 kqtl7.r7b2     :=     0.001651977979997 ;
939 kqtl8.r7b2     :=    -0.000365972932796 ;
940 kqtl9.r7b2     :=     0.000069882524316 ;
941 kqtl10.r7b2    :=     0.003983512564485 ;
942 kqtl11.r7b2    :=     0.002606114625878 ;
943 kqt12.r7b2     :=    -0.004560158171857 ;
944 kqt13.r7b2     :=     0.002067540746414 ;
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960 kqt13.l8b1     :=    -0.000412879562206 ;  // 18/11/09 10:00 O.B.
961 kqt12.l8b1     :=     0.005137066998017 ;
962 kqtl11.l8b1    :=     0.000263038695919 ;
963 kq10.l8b1      :=    -0.006064085962690 ;
964 kq9.l8b1       :=     0.006555184793096 ;
965 kq8.l8b1       :=    -0.004657783056267 ;
966 kq7.l8b1       :=     0.007609782647591 ;
967 kq6.l8b1       :=    -0.004677277606621 ;
968 kq5.l8b1       :=     0.005336954102212 ;
969 kq4.l8b1       :=    -0.004362045581901 ;
970 kqx.l8         :=     0.009509815813000 ;
971 kq4.r8b1       :=     0.004857300304125 ;
972 kq5.r8b1       :=    -0.004694372820386 ;
973 kq6.r8b1       :=     0.003606013636803 ;
974 kq7.r8b1       :=    -0.006191063400797 ;
975 kq8.r8b1       :=     0.006610218471348 ;
976 kq9.r8b1       :=    -0.007281805712812 ;
977 kq10.r8b1      :=     0.007530724419257 ;
978 kqtl11.r8b1    :=    -0.003507160418505 ;
979 kqt12.r8b1     :=    -0.002345138529189 ;
980 kqt13.r8b1     :=    -0.004736767935659 ;
981
982
983 kqt13.l8b2           := -0.005126582427786 ;  // 14/12/07 15:03
984 kqt12.l8b2           := -0.001389640810433 ;
985 kqtl11.l8b2          := -0.000456168263857 ;
986 kq10.l8b2            :=  0.007155221088798 ;
987 kq9.l8b2             := -0.004765788782470 ;
988 kq8.l8b2             :=  0.005695601672837 ;
989 kq7.l8b2             := -0.006341587514297 ;
990 kq6.l8b2             :=  0.004467903533715 ;
991 kq5.l8b2             := -0.005640962356988 ;
992 kq4.l8b2             :=  0.004712297211895 ;
993 kqx.l8               :=  0.009509815813000 ;
994 kq4.r8b2             := -0.004450308477194 ;
995 kq5.r8b2             :=  0.004276322651838 ;
996 kq6.r8b2             := -0.003542697497321 ;
997 kq7.r8b2             :=  0.005751664666923 ;
998 kq8.r8b2             := -0.004679209785411 ;
999 kq9.r8b2             :=  0.006862806823854 ;
1000 kq10.r8b2            := -0.006008483156260 ;
1001 kqtl11.r8b2          :=  0.000053385279351 ;
1002 kqt12.r8b2           :=  0.005144349455544 ;
1003 kqt13.r8b2           :=  0.002036734792697 ;
1004
1005 acbxh1.l8      :=    -0.000002500000000  *on_x8;  // 07/08/09 16:35 O.B.
1006 acbxh1.r8      :=     0.000002500000000  *on_x8;
1007 acbxh2.l8      :=    -0.000002500000000  *on_x8;
1008 acbxh2.r8      :=     0.000002500000000  *on_x8;
1009 acbyhs4.l8b1   :=     0.000011823428626  *on_x8  +0.000073167501723 *on_o8 ;
1010 acbyhs4.r8b1   :=    -0.000062072809022  *on_x8  +0.000023590521193 *on_o8 ;
1011 acbch5.l8b1    :=     0.000035818841424  *on_x8  -0.000032067316262 *on_o8 ;
1012 acbyhs5.r8b1   :=     0.000000365746194  *on_x8  -0.000046561042371 *on_o8 ;
1013 acbyhs4.l8b2   :=    -0.000062088629953  *on_x8  +0.000025604592954 *on_o8 ;
1014 acbyhs4.r8b2   :=     0.000013145460817  *on_x8  +0.000071983934008 *on_o8 ;
1015 acbchs5.l8b2   :=     0.000000354063976  *on_x8  -0.000045073846536 *on_o8 ;
1016 acbyhs5.r8b2   :=     0.000034623508624  *on_x8  -0.000030997177939 *on_o8 ;
1017
1018 acbxv1.l8      :=    -0.000030000000000 *on_sep8;
1019 acbxv1.r8      :=    -0.000030000000000 *on_sep8;
1020 acbxv2.l8      :=     0.000000000000000 *on_sep8;
1021 acbxv2.r8      :=     0.000000000000000 *on_sep8;
1022 acbyvs4.l8b1   :=    -0.000051374704440 *on_sep8 +0.000004879303153  *on_a8 ;
1023 acbyvs4.r8b1   :=    -0.000133879512267 *on_sep8 +0.000000184719248  *on_a8 ;
1024 acbcvs5.l8b1   :=     0.000056517512107 *on_sep8 +0.000001226967736  *on_a8 ;
1025 acbyvs5.r8b1   :=     0.000050801117015 *on_sep8 -0.000003614208497  *on_a8 ;
1026 acbyvs4.l8b2   :=     0.000132254060738 *on_sep8 -0.000000069077682  *on_a8 ;
1027 acbyvs4.r8b2   :=     0.000049684276850 *on_sep8 -0.000004916001515  *on_a8 ;
1028 acbcvs5.l8b2   :=    -0.000053104299880 *on_sep8 +0.000003778066765  *on_a8 ;
1029 acbyvs5.r8b2   :=    -0.000058441175335 *on_sep8 -0.000001268729530  *on_a8 ;
1030
1031 acbcv6.l8b1    :=     0.000000000000000 ;
1032 acbyh4.l8b2    :=     0.000000000000000 ;
1033 acbyv4.l8b1    :=     0.000000000000000 ;
1034 acbwh5.l8b1    :=     0.000000000000000 ;
1035 acbcv5.l8b2    :=     0.000000000000000 ;
1036 acbyh4.r8b1    :=     0.000000000000000 ;
1037 acbyh5.r8b2    :=     0.000000000000000 ;
1038 acbyv5.r8b1    :=     0.000000000000000 ;
1039 acbcv6.r8b2    :=     0.000000000000000 ;
1040 acbyv4.r8b2    :=     0.000000000000000 ;
1041
1042
1043
1044
1045
1046
1047kqt5.l3              :=  kqt5.lr3 ;
1048kqt4.l3              :=  kqt4.lr3 ;
1049kqt4.r3              :=  kqt4.lr3 ;
1050kqt5.r3              :=  kqt5.lr3 ;
1051kqt5.l7              :=  kqt5.lr7 ;
1052kqt4.l7              :=  kqt4.lr7 ;
1053kqt4.r7              :=  kqt4.lr7 ;
1054kqt5.r7              :=  kqt5.lr7 ;
1055
1056return ;
Note: See TracBrowser for help on using the repository browser.