-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathopt_inj.madx
2017 lines (1983 loc) · 86.8 KB
/
opt_inj.madx
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
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
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
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
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
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
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
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
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
ARC_SQUEEZE = 0.0 ;
!***LAYOUT***
l.MQXL = 8.000000 ;
l.MQX = 6.800000 ;
l.MQYY = 3.830000 ;
l.MBXF = 6.270000 ;
l.MBRD = 7.780000 ;
l.MCBXFA = 2.200000 ;
l.MCBXFB = 1.200000 ;
l.MCBRD = 1.500000 ;
l.MCBYY = 1.500000 ;
dq1q2a = 3.700000 ;
dq1aq1b = 0.500000 ;
dq2aq2b = 2.000000 ;
dq2bq3 = 3.700000 ;
deltaposD2 = -15.504000 ;
deltaposQ4 = 8.047000 ;
deltaposQ5 = 11.000000 ;
deltaposQ6 = 0.000000 ;
on_cutMS.10 = 0.000000 ;
on_cutMS.14 = 0.000000 ;
is_thin = 0.000000 ;
!***BETAS in IR1 and IR5***
betx_IP1 = 6.000000 ;
bety_IP1 = 6.000000 ;
betx_IP5 = 6.000000 ;
bety_IP5 = 6.000000 ;
betx0_IP1 = 6.000000 ;
bety0_IP1 = 6.000000 ;
betx0_IP5 = 6.000000 ;
bety0_IP5 = 6.000000 ;
!***Exp. configuration in IR1, IR2, IR5 and IR8***
on_sep1=0;on_x1=0;on_os1=0;on_ox1=0;phi_IR1=90;
on_sep2=0;on_x2=0;on_os2=0;on_ox2=0;phi_IR2=90;
on_sep5=0;on_x5=0;on_os5=0;on_ox5=0;phi_IR5=0;
on_sep8=0;on_x8=0;on_os8=0;on_ox8=0;phi_IR8=0;
cphi_IR1:=cos(phi_IR1*pi/180.);sphi_IR1:=sin(phi_IR1*pi/180.);
cphi_IR2:=cos(phi_IR2*pi/180.);sphi_IR2:=sin(phi_IR2*pi/180.);
cphi_IR5:=cos(phi_IR5*pi/180.);sphi_IR5:=sin(phi_IR5*pi/180.);
cphi_IR8:=cos(phi_IR8*pi/180.);sphi_IR8:=sin(phi_IR8*pi/180.);
on_disp=0;
on_sol_atlas=0;
on_alice=0; on_sol_alice=0;
on_sol_cms=0;
on_lhcb=0;
abas:= 12.00/ 6.0*clight/(7E12)*on_sol_atlas;
abls:= 6.05/12.1*clight/(7E12)*on_sol_alice ;
abcs:= 52.00/13.0*clight/(7E12)*on_sol_cms ;
abxwt.l2 := -0.0000772587268993839836*on_alice ;
abwmd.l2 := +0.0001472587268993839840*on_alice ;
abaw.r2 := -0.0001335474860334838000*on_alice ;
abxwt.r2 := +0.0000635474860334838004*on_alice ;
abxws.l8 := -0.000045681598453109894*on_lhcb ;
abxwh.l8 := +0.000180681598453109894*on_lhcb ;
ablw.r8 := -0.000180681598453109894*on_lhcb ;
abxws.r8 := +0.000045681598453109894*on_lhcb ;
!***Ring Geometry***
!Separation/recombination dipoles
kd1.lr1 := ad1.lr1/l.mbxf;
kd2.l1 := ad2.l5/l.mbrd ;
kd2.r1 := ad2.r5/l.mbrd ;
kd1.l2 := ad1.l2/l.mbx ;
kd1.r2 := ad1.r2/l.mbx ;
kd2.l2 := ad2.l2/l.mbrc ;
kd2.r2 := ad2.r2/l.mbrc ;
kd3.lr3 := ad3.lr3/l.mbw ;
kd4.lr3 := ad4.lr3/l.mbw ;
kd3.l4 := ad3.l4/l.mbrs ;
kd3.r4 := ad3.r4/l.mbrs ;
kd4.l4 := ad4.l4/l.mbrb ;
kd4.r4 := ad4.r4/l.mbrb ;
kd34.lr3 := ad3.lr3/l.mbw ;
kd34.lr7 := ad3.lr7/l.mbw ;
kd1.lr5 := ad1.lr5/l.mbxf;
kd2.l5 := ad2.l5/l.mbrd ;
kd2.r5 := ad2.r5/l.mbrd ;
kd3.lr7 := ad3.lr7/l.mbw ;
kd4.lr7 := ad4.lr7/l.mbw ;
kd1.l8 := ad1.l8/l.mbx ;
kd1.r8 := ad1.r8/l.mbx ;
kd2.l8 := ad2.l8/l.mbrc ;
kd2.r8 := ad2.r8/l.mbrc ;
ksumd2.l1b2 := kd2.l1 ;
ksumd2.l2b2 := kd2.l2 ;
ksumd2.l5b2 := kd2.l5 ;
ksumd2.l8b2 := kd2.l8 ;
ksumd2.r1b2 := kd2.l1 ;
ksumd2.r2b2 := kd2.l2 ;
ksumd2.r5b2 := kd2.l5 ;
ksumd2.r8b2 := kd2.l8 ;
!Main dipoles
kb.a12 := ab.a12/l.mb ;
kb.a23 := ab.a23/l.mb ;
kb.a34 := ab.a34/l.mb ;
kb.a45 := ab.a45/l.mb ;
kb.a56 := ab.a56/l.mb ;
kb.a67 := ab.a67/l.mb ;
kb.a78 := ab.a78/l.mb ;
kb.a81 := ab.a81/l.mb ;
!***IR1 Optics***
kqx1.l1 = -5.9958491600e-03;
kqx2a.l1 = -5.8898585423e-03;
kqx2b.l1 = -5.8898585423e-03;
kqx3.l1 = -5.9424239370e-03;
kqx1.r1 = 5.9958491600e-03;
kqx2a.r1 = 5.8898585423e-03;
kqx2b.r1 = 5.8898585423e-03;
kqx3.r1 = 5.9424239370e-03;
Kq4.L1B1 = 2.6442275151e-03 ;
Kq4.L1B2 = -2.3887709972e-03 ;
Kq4.R1B1 = -2.5161857041e-03 ;
Kq4.R1B2 = 2.9024332273e-03 ;
Kq5.L1B1 = -4.2704583205e-03 ;
Kq5.L1B2 = 5.4313501068e-03 ;
Kq5.R1B1 = 4.8510687268e-03 ;
Kq5.R1B2 = -5.5591373898e-03 ;
Kq6.L1B1 = 4.5324815716e-03 ;
Kq6.L1B2 = -5.1870349937e-03 ;
Kq6.R1B1 = -5.0854328519e-03 ;
Kq6.R1B2 = 4.8865201617e-03 ;
Kq7.L1B1 = -5.3576210119e-03 ;
Kq7.L1B2 = 5.3005014536e-03 ;
Kq7.R1B1 = 5.2650605354e-03 ;
Kq7.R1B2 = -5.0514521281e-03 ;
Kq8.L1B1 = 7.7994930017e-03 ;
Kq8.L1B2 = -7.4019188198e-03 ;
Kq8.R1B1 = -6.6112144392e-03 ;
Kq8.R1B2 = 7.6525332549e-03 ;
Kq9.L1B1 = -7.4686066458e-03 ;
Kq9.L1B2 = 6.8330571305e-03 ;
Kq9.R1B1 = 6.7856234160e-03 ;
Kq9.R1B2 = -6.9878384353e-03 ;
Kq10.L1B1 = 7.3567523502e-03 ;
Kq10.L1B2 = -7.6108090011e-03 ;
Kq10.R1B1 = -6.7241066251e-03 ;
Kq10.R1B2 = 7.3507611199e-03 ;
Kqtl11.L1B1 = -2.6951509967e-03 ;
Kqtl11.L1B2 = 7.8277052825e-04 ;
Kqtl11.R1B1 = 4.3617531174e-04 ;
Kqtl11.R1B2 = -1.2199088060e-03 ;
Kqt12.L1B1 = 1.1274906898e-03 ;
Kqt12.L1B2 = -4.8049391665e-03 ;
Kqt12.R1B1 = -7.8429278453e-04 ;
Kqt12.R1B2 = -4.9816735754e-04 ;
Kqt13.L1B1 = -1.7960818926e-03 ;
Kqt13.L1B2 = -7.8827902730e-04 ;
Kqt13.R1B1 = 2.0475749910e-04 ;
Kqt13.R1B2 = 2.8737875863e-03 ;
!***IR1 X-scheme***
acbxh1.l1x = 2.0727000337e-05 ;
acbxh1.l1s = 3.8442552519e-06 ;
acbxh1.l1ox= 0.0000000000e+00 ;
acbxh1.l1os= 0.0000000000e+00 ;
acbxh1.l1 :=+on_x1 *cphi_ir1*( 2.0727000337e-05)
+on_sep1*sphi_ir1*( 3.8442552519e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv1.l1x = 2.0727925451e-05 ;
acbxv1.l1s = 3.8444515171e-06 ;
acbxv1.l1ox= 0.0000000000e+00 ;
acbxv1.l1os= 0.0000000000e+00 ;
acbxv1.l1 :=+on_x1 *sphi_ir1*( 2.0727925451e-05)
+on_sep1*cphi_ir1*( 3.8444515171e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh1.r1x = -2.0472461510e-05 ;
acbxh1.r1s = 3.7915302758e-06 ;
acbxh1.r1ox= 0.0000000000e+00 ;
acbxh1.r1os= 0.0000000000e+00 ;
acbxh1.r1 :=+on_x1 *cphi_ir1*( -2.0472461510e-05)
+on_sep1*sphi_ir1*( 3.7915302758e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv1.r1x = -2.0473389672e-05 ;
acbxv1.r1s = 3.7917130588e-06 ;
acbxv1.r1ox= 0.0000000000e+00 ;
acbxv1.r1os= 0.0000000000e+00 ;
acbxv1.r1 :=+on_x1 *sphi_ir1*( -2.0473389672e-05)
+on_sep1*cphi_ir1*( 3.7917130588e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh2.l1x = 2.0727000337e-05 ;
acbxh2.l1s = 3.8442552519e-06 ;
acbxh2.l1ox= 0.0000000000e+00 ;
acbxh2.l1os= 0.0000000000e+00 ;
acbxh2.l1 :=+on_x1 *cphi_ir1*( 2.0727000337e-05)
+on_sep1*sphi_ir1*( 3.8442552519e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv2.l1x = 2.0727925451e-05 ;
acbxv2.l1s = 3.8444515171e-06 ;
acbxv2.l1ox= 0.0000000000e+00 ;
acbxv2.l1os= 0.0000000000e+00 ;
acbxv2.l1 :=+on_x1 *sphi_ir1*( 2.0727925451e-05)
+on_sep1*cphi_ir1*( 3.8444515171e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh2.r1x = -2.0472461510e-05 ;
acbxh2.r1s = 3.7915302758e-06 ;
acbxh2.r1ox= 0.0000000000e+00 ;
acbxh2.r1os= 0.0000000000e+00 ;
acbxh2.r1 :=+on_x1 *cphi_ir1*( -2.0472461510e-05)
+on_sep1*sphi_ir1*( 3.7915302758e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv2.r1x = -2.0473389672e-05 ;
acbxv2.r1s = 3.7917130588e-06 ;
acbxv2.r1ox= 0.0000000000e+00 ;
acbxv2.r1os= 0.0000000000e+00 ;
acbxv2.r1 :=+on_x1 *sphi_ir1*( -2.0473389672e-05)
+on_sep1*cphi_ir1*( 3.7917130588e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh3.l1x = 4.3040598894e-05 ;
acbxh3.l1s = 3.1371450199e-05 ;
acbxh3.l1ox= 0.0000000000e+00 ;
acbxh3.l1os= 0.0000000000e+00 ;
acbxh3.l1 :=+on_x1 *cphi_ir1*( 4.3040598894e-05)
+on_sep1*sphi_ir1*( 3.1371450199e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv3.l1x = 4.3035101222e-05 ;
acbxv3.l1s = 3.1371200041e-05 ;
acbxv3.l1ox= 0.0000000000e+00 ;
acbxv3.l1os= 0.0000000000e+00 ;
acbxv3.l1 :=+on_x1 *sphi_ir1*( 4.3035101222e-05)
+on_sep1*cphi_ir1*( 3.1371200041e-05)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh3.r1x = -4.4432272169e-05 ;
acbxh3.r1s = 3.1440068661e-05 ;
acbxh3.r1ox= 0.0000000000e+00 ;
acbxh3.r1os= 0.0000000000e+00 ;
acbxh3.r1 :=+on_x1 *cphi_ir1*( -4.4432272169e-05)
+on_sep1*sphi_ir1*( 3.1440068661e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv3.r1x = -4.4426765565e-05 ;
acbxv3.r1s = 3.1439825122e-05 ;
acbxv3.r1ox= 0.0000000000e+00 ;
acbxv3.r1os= 0.0000000000e+00 ;
acbxv3.r1 :=+on_x1 *sphi_ir1*( -4.4426765565e-05)
+on_sep1*cphi_ir1*( 3.1439825122e-05)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.l1b1x = -5.1747683802e-05 ;
acbrdh4.l1b1s = 1.0098574439e-05 ;
acbrdh4.l1b1ox= 0.0000000000e+00 ;
acbrdh4.l1b1os= 0.0000000000e+00 ;
acbrdh4.l1b1 :=+on_x1 *cphi_ir1*( -5.1747683802e-05)
+on_sep1*sphi_ir1*( 1.0098574439e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.l1b1x = -9.2234840198e-05 ;
acbrdv4.l1b1s = 1.4593728972e-06 ;
acbrdv4.l1b1ox= 0.0000000000e+00 ;
acbrdv4.l1b1os= 0.0000000000e+00 ;
acbrdv4.l1b1 :=+on_x1 *sphi_ir1*( -9.2234840198e-05)
+on_sep1*cphi_ir1*( 1.4593728972e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.l1b2x = 9.4559227955e-05 ;
acbrdh4.l1b2s = -1.4934301299e-06 ;
acbrdh4.l1b2ox= 0.0000000000e+00 ;
acbrdh4.l1b2os= 0.0000000000e+00 ;
acbrdh4.l1b2 :=+on_x1 *cphi_ir1*( 9.4559227955e-05)
+on_sep1*sphi_ir1*( -1.4934301299e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.l1b2x = 5.0705968593e-05 ;
acbrdv4.l1b2s = -9.9436041866e-06 ;
acbrdv4.l1b2ox= 0.0000000000e+00 ;
acbrdv4.l1b2os= 0.0000000000e+00 ;
acbrdv4.l1b2 :=+on_x1 *sphi_ir1*( 5.0705968593e-05)
+on_sep1*cphi_ir1*( -9.9436041866e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.r1b1x = 9.6498921302e-05 ;
acbrdh4.r1b1s = 1.4959580425e-06 ;
acbrdh4.r1b1ox= 0.0000000000e+00 ;
acbrdh4.r1b1os= 0.0000000000e+00 ;
acbrdh4.r1b1 :=+on_x1 *cphi_ir1*( 9.6498921302e-05)
+on_sep1*sphi_ir1*( 1.4959580425e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.r1b1x = 5.1697033014e-05 ;
acbrdv4.r1b1s = 1.0037739376e-05 ;
acbrdv4.r1b1ox= 0.0000000000e+00 ;
acbrdv4.r1b1os= 0.0000000000e+00 ;
acbrdv4.r1b1 :=+on_x1 *sphi_ir1*( 5.1697033014e-05)
+on_sep1*cphi_ir1*( 1.0037739376e-05)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.r1b2x = -5.2720221637e-05 ;
acbrdh4.r1b2s = -1.0161889187e-05 ;
acbrdh4.r1b2ox= 0.0000000000e+00 ;
acbrdh4.r1b2os= 0.0000000000e+00 ;
acbrdh4.r1b2 :=+on_x1 *cphi_ir1*( -5.2720221637e-05)
+on_sep1*sphi_ir1*( -1.0161889187e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.r1b2x = -9.4182382921e-05 ;
acbrdv4.r1b2s = -1.4638605943e-06 ;
acbrdv4.r1b2ox= 0.0000000000e+00 ;
acbrdv4.r1b2os= 0.0000000000e+00 ;
acbrdv4.r1b2 :=+on_x1 *sphi_ir1*( -9.4182382921e-05)
+on_sep1*cphi_ir1*( -1.4638605943e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs4.l1b1x = -5.1747683802e-05 ;
acbyhs4.l1b1s = 1.0098574439e-05 ;
acbyhs4.l1b1ox= 0.0000000000e+00 ;
acbyhs4.l1b1os= 0.0000000000e+00 ;
acbyhs4.l1b1 :=+on_x1 *cphi_ir1*( -5.1747683802e-05)
+on_sep1*sphi_ir1*( 1.0098574439e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs4.l1b1x = -9.2234840198e-05 ;
acbyvs4.l1b1s = 1.4593728972e-06 ;
acbyvs4.l1b1ox= 0.0000000000e+00 ;
acbyvs4.l1b1os= 0.0000000000e+00 ;
acbyvs4.l1b1 :=+on_x1 *sphi_ir1*( -9.2234840198e-05)
+on_sep1*cphi_ir1*( 1.4593728972e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs4.l1b2x = 9.4559227955e-05 ;
acbyhs4.l1b2s = -1.4934301299e-06 ;
acbyhs4.l1b2ox= 0.0000000000e+00 ;
acbyhs4.l1b2os= 0.0000000000e+00 ;
acbyhs4.l1b2 :=+on_x1 *cphi_ir1*( 9.4559227955e-05)
+on_sep1*sphi_ir1*( -1.4934301299e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs4.l1b2x = 5.0705968593e-05 ;
acbyvs4.l1b2s = -9.9436041866e-06 ;
acbyvs4.l1b2ox= 0.0000000000e+00 ;
acbyvs4.l1b2os= 0.0000000000e+00 ;
acbyvs4.l1b2 :=+on_x1 *sphi_ir1*( 5.0705968593e-05)
+on_sep1*cphi_ir1*( -9.9436041866e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs4.r1b1x = 9.6498921302e-05 ;
acbyhs4.r1b1s = 1.4959580425e-06 ;
acbyhs4.r1b1ox= 0.0000000000e+00 ;
acbyhs4.r1b1os= 0.0000000000e+00 ;
acbyhs4.r1b1 :=+on_x1 *cphi_ir1*( 9.6498921302e-05)
+on_sep1*sphi_ir1*( 1.4959580425e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs4.r1b1x = 5.1697033014e-05 ;
acbyvs4.r1b1s = 1.0037739376e-05 ;
acbyvs4.r1b1ox= 0.0000000000e+00 ;
acbyvs4.r1b1os= 0.0000000000e+00 ;
acbyvs4.r1b1 :=+on_x1 *sphi_ir1*( 5.1697033014e-05)
+on_sep1*cphi_ir1*( 1.0037739376e-05)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs4.r1b2x = -5.2720221637e-05 ;
acbyhs4.r1b2s = -1.0161889187e-05 ;
acbyhs4.r1b2ox= 0.0000000000e+00 ;
acbyhs4.r1b2os= 0.0000000000e+00 ;
acbyhs4.r1b2 :=+on_x1 *cphi_ir1*( -5.2720221637e-05)
+on_sep1*sphi_ir1*( -1.0161889187e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs4.r1b2x = -9.4182382921e-05 ;
acbyvs4.r1b2s = -1.4638605943e-06 ;
acbyvs4.r1b2ox= 0.0000000000e+00 ;
acbyvs4.r1b2os= 0.0000000000e+00 ;
acbyvs4.r1b2 :=+on_x1 *sphi_ir1*( -9.4182382921e-05)
+on_sep1*cphi_ir1*( -1.4638605943e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs5.l1b1x = 1.6865516646e-06 ;
acbyhs5.l1b1s = -6.4362136901e-06 ;
acbyhs5.l1b1ox= 0.0000000000e+00 ;
acbyhs5.l1b1os= 0.0000000000e+00 ;
acbyhs5.l1b1 :=+on_x1 *cphi_ir1*( 1.6865516646e-06)
+on_sep1*sphi_ir1*( -6.4362136901e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.l1b1x = 1.4633828868e-05 ;
acbyvs5.l1b1s = -5.9620031107e-07 ;
acbyvs5.l1b1ox= 0.0000000000e+00 ;
acbyvs5.l1b1os= 0.0000000000e+00 ;
acbyvs5.l1b1 :=+on_x1 *sphi_ir1*( 1.4633828868e-05)
+on_sep1*cphi_ir1*( -5.9620031107e-07)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs5.l1b2x = -1.8688207366e-05 ;
acbyhs5.l1b2s = 6.6364731568e-07 ;
acbyhs5.l1b2ox= 0.0000000000e+00 ;
acbyhs5.l1b2os= 0.0000000000e+00 ;
acbyhs5.l1b2 :=+on_x1 *cphi_ir1*( -1.8688207366e-05)
+on_sep1*sphi_ir1*( 6.6364731568e-07)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.l1b2x = 1.0557093223e-06 ;
acbyvs5.l1b2s = 5.8368579294e-06 ;
acbyvs5.l1b2ox= 0.0000000000e+00 ;
acbyvs5.l1b2os= 0.0000000000e+00 ;
acbyvs5.l1b2 :=+on_x1 *sphi_ir1*( 1.0557093223e-06)
+on_sep1*cphi_ir1*( 5.8368579294e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs5.r1b1x = -2.0670428490e-05 ;
acbyhs5.r1b1s = -6.7661153453e-07 ;
acbyhs5.r1b1ox= 0.0000000000e+00 ;
acbyhs5.r1b1os= 0.0000000000e+00 ;
acbyhs5.r1b1 :=+on_x1 *cphi_ir1*( -2.0670428490e-05)
+on_sep1*sphi_ir1*( -6.7661153453e-07)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.r1b1x = -5.4577428236e-07 ;
acbyvs5.r1b1s = -6.0903551513e-06 ;
acbyvs5.r1b1ox= 0.0000000000e+00 ;
acbyvs5.r1b1os= 0.0000000000e+00 ;
acbyvs5.r1b1 :=+on_x1 *sphi_ir1*( -5.4577428236e-07)
+on_sep1*cphi_ir1*( -6.0903551513e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs5.r1b2x = 3.3902988980e-06 ;
acbyhs5.r1b2s = 6.7357498171e-06 ;
acbyhs5.r1b2ox= 0.0000000000e+00 ;
acbyhs5.r1b2os= 0.0000000000e+00 ;
acbyhs5.r1b2 :=+on_x1 *cphi_ir1*( 3.3902988980e-06)
+on_sep1*sphi_ir1*( 6.7357498171e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.r1b2x = 1.6458570897e-05 ;
acbyvs5.r1b2s = 6.0635947001e-07 ;
acbyvs5.r1b2ox= 0.0000000000e+00 ;
acbyvs5.r1b2os= 0.0000000000e+00 ;
acbyvs5.r1b2 :=+on_x1 *sphi_ir1*( 1.6458570897e-05)
+on_sep1*cphi_ir1*( 6.0635947001e-07)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbch6.l1b1x = 0.0000000000e+00 ;
acbch6.l1b1s = 0.0000000000e+00 ;
acbch6.l1b1ox= 0.0000000000e+00 ;
acbch6.l1b1os= 0.0000000000e+00 ;
acbch6.l1b1 :=+on_x1 *cphi_ir1*( 0.0000000000e+00)
+on_sep1*sphi_ir1*( 0.0000000000e+00)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbcv6.l1b2x = 0.0000000000e+00 ;
acbcv6.l1b2s = 0.0000000000e+00 ;
acbcv6.l1b2ox= 0.0000000000e+00 ;
acbcv6.l1b2os= 0.0000000000e+00 ;
acbcv6.l1b2 :=+on_x1 *sphi_ir1*( 0.0000000000e+00)
+on_sep1*cphi_ir1*( 0.0000000000e+00)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbcv6.r1b1x = 0.0000000000e+00 ;
acbcv6.r1b1s = 0.0000000000e+00 ;
acbcv6.r1b1ox= 0.0000000000e+00 ;
acbcv6.r1b1os= 0.0000000000e+00 ;
acbcv6.r1b1 :=+on_x1 *sphi_ir1*( 0.0000000000e+00)
+on_sep1*cphi_ir1*( 0.0000000000e+00)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbch6.r1b2x = 0.0000000000e+00 ;
acbch6.r1b2s = 0.0000000000e+00 ;
acbch6.r1b2ox= 0.0000000000e+00 ;
acbch6.r1b2os= 0.0000000000e+00 ;
acbch6.r1b2 :=+on_x1 *cphi_ir1*( 0.0000000000e+00)
+on_sep1*sphi_ir1*( 0.0000000000e+00)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
!***IR1 Crab Cavities***
ahcrab_l1b1 = 1.7717322524e-06 ;
ahcrab_l1b2 = 2.5530338395e-06 ;
avcrab_l1b1 = 2.4060775466e-06 ;
avcrab_l1b2 = 1.6805974247e-06 ;
ahcrab_r1b1 = 2.5533037322e-06 ;
ahcrab_r1b2 = 1.7710618944e-06 ;
avcrab_r1b1 = 1.6805972356e-06 ;
avcrab_r1b2 = 2.4060780377e-06 ;
!***IR5 Optics***
kqx1.l5 = -5.9958491600e-03;
kqx2a.l5 = -5.8898585423e-03;
kqx2b.l5 = -5.8898585423e-03;
kqx3.l5 = -5.9424239370e-03;
kqx1.r5 = 5.9958491600e-03;
kqx2a.r5 = 5.8898585423e-03;
kqx2b.r5 = 5.8898585423e-03;
kqx3.r5 = 5.9424239370e-03;
Kq4.L5B1 = 2.6442275151e-03 ;
Kq4.L5B2 = -2.3887709972e-03 ;
Kq4.R5B1 = -2.5161857041e-03 ;
Kq4.R5B2 = 2.9024332273e-03 ;
Kq5.L5B1 = -4.2704583205e-03 ;
Kq5.L5B2 = 5.4313501068e-03 ;
Kq5.R5B1 = 4.8510687268e-03 ;
Kq5.R5B2 = -5.5591373898e-03 ;
Kq6.L5B1 = 4.5324815716e-03 ;
Kq6.L5B2 = -5.1870349937e-03 ;
Kq6.R5B1 = -5.0854328519e-03 ;
Kq6.R5B2 = 4.8865201617e-03 ;
Kq7.L5B1 = -5.3576210119e-03 ;
Kq7.L5B2 = 5.3005014536e-03 ;
Kq7.R5B1 = 5.2650605354e-03 ;
Kq7.R5B2 = -5.0514521281e-03 ;
Kq8.L5B1 = 7.7994930017e-03 ;
Kq8.L5B2 = -7.4019188198e-03 ;
Kq8.R5B1 = -6.6112144392e-03 ;
Kq8.R5B2 = 7.6525332549e-03 ;
Kq9.L5B1 = -7.4686066458e-03 ;
Kq9.L5B2 = 6.8330571305e-03 ;
Kq9.R5B1 = 6.7856234160e-03 ;
Kq9.R5B2 = -6.9878384353e-03 ;
Kq10.L5B1 = 7.3567523502e-03 ;
Kq10.L5B2 = -7.6108090011e-03 ;
Kq10.R5B1 = -6.7241066251e-03 ;
Kq10.R5B2 = 7.3507611199e-03 ;
Kqtl11.L5B1 = -2.6951509967e-03 ;
Kqtl11.L5B2 = 7.8277052825e-04 ;
Kqtl11.R5B1 = 4.3617531174e-04 ;
Kqtl11.R5B2 = -1.2199088060e-03 ;
Kqt12.L5B1 = 1.1274906898e-03 ;
Kqt12.L5B2 = -4.8049391665e-03 ;
Kqt12.R5B1 = -7.8429278453e-04 ;
Kqt12.R5B2 = -4.9816735754e-04 ;
Kqt13.L5B1 = -1.7960818926e-03 ;
Kqt13.L5B2 = -7.8827902730e-04 ;
Kqt13.R5B1 = 2.0475749910e-04 ;
Kqt13.R5B2 = 2.8737875863e-03 ;
!***IR5 X-scheme***
acbxh1.l5x = 2.0727000336e-05 ;
acbxh1.l5s = 3.8442552519e-06 ;
acbxh1.l5ox= 0.0000000000e+00 ;
acbxh1.l5os= 0.0000000000e+00 ;
acbxh1.l5 :=+on_x5 *cphi_ir5*( 2.0727000336e-05)
+on_sep5*sphi_ir5*( 3.8442552519e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv1.l5x = 2.0727925450e-05 ;
acbxv1.l5s = 3.8444515172e-06 ;
acbxv1.l5ox= 0.0000000000e+00 ;
acbxv1.l5os= 0.0000000000e+00 ;
acbxv1.l5 :=+on_x5 *sphi_ir5*( 2.0727925450e-05)
+on_sep5*cphi_ir5*( 3.8444515172e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh1.r5x = -2.0472461510e-05 ;
acbxh1.r5s = 3.7915302759e-06 ;
acbxh1.r5ox= 0.0000000000e+00 ;
acbxh1.r5os= 0.0000000000e+00 ;
acbxh1.r5 :=+on_x5 *cphi_ir5*( -2.0472461510e-05)
+on_sep5*sphi_ir5*( 3.7915302759e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv1.r5x = -2.0473389672e-05 ;
acbxv1.r5s = 3.7917130588e-06 ;
acbxv1.r5ox= 0.0000000000e+00 ;
acbxv1.r5os= 0.0000000000e+00 ;
acbxv1.r5 :=+on_x5 *sphi_ir5*( -2.0473389672e-05)
+on_sep5*cphi_ir5*( 3.7917130588e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh2.l5x = 2.0727000336e-05 ;
acbxh2.l5s = 3.8442552519e-06 ;
acbxh2.l5ox= 0.0000000000e+00 ;
acbxh2.l5os= 0.0000000000e+00 ;
acbxh2.l5 :=+on_x5 *cphi_ir5*( 2.0727000336e-05)
+on_sep5*sphi_ir5*( 3.8442552519e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv2.l5x = 2.0727925450e-05 ;
acbxv2.l5s = 3.8444515172e-06 ;
acbxv2.l5ox= 0.0000000000e+00 ;
acbxv2.l5os= 0.0000000000e+00 ;
acbxv2.l5 :=+on_x5 *sphi_ir5*( 2.0727925450e-05)
+on_sep5*cphi_ir5*( 3.8444515172e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh2.r5x = -2.0472461510e-05 ;
acbxh2.r5s = 3.7915302759e-06 ;
acbxh2.r5ox= 0.0000000000e+00 ;
acbxh2.r5os= 0.0000000000e+00 ;
acbxh2.r5 :=+on_x5 *cphi_ir5*( -2.0472461510e-05)
+on_sep5*sphi_ir5*( 3.7915302759e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv2.r5x = -2.0473389672e-05 ;
acbxv2.r5s = 3.7917130588e-06 ;
acbxv2.r5ox= 0.0000000000e+00 ;
acbxv2.r5os= 0.0000000000e+00 ;
acbxv2.r5 :=+on_x5 *sphi_ir5*( -2.0473389672e-05)
+on_sep5*cphi_ir5*( 3.7917130588e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh3.l5x = 4.3040598895e-05 ;
acbxh3.l5s = 3.1371450199e-05 ;
acbxh3.l5ox= 0.0000000000e+00 ;
acbxh3.l5os= 0.0000000000e+00 ;
acbxh3.l5 :=+on_x5 *cphi_ir5*( 4.3040598895e-05)
+on_sep5*sphi_ir5*( 3.1371450199e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv3.l5x = 4.3035101222e-05 ;
acbxv3.l5s = 3.1371200041e-05 ;
acbxv3.l5ox= 0.0000000000e+00 ;
acbxv3.l5os= 0.0000000000e+00 ;
acbxv3.l5 :=+on_x5 *sphi_ir5*( 4.3035101222e-05)
+on_sep5*cphi_ir5*( 3.1371200041e-05)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh3.r5x = -4.4432272169e-05 ;
acbxh3.r5s = 3.1440068661e-05 ;
acbxh3.r5ox= 0.0000000000e+00 ;
acbxh3.r5os= 0.0000000000e+00 ;
acbxh3.r5 :=+on_x5 *cphi_ir5*( -4.4432272169e-05)
+on_sep5*sphi_ir5*( 3.1440068661e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv3.r5x = -4.4426765565e-05 ;
acbxv3.r5s = 3.1439825122e-05 ;
acbxv3.r5ox= 0.0000000000e+00 ;
acbxv3.r5os= 0.0000000000e+00 ;
acbxv3.r5 :=+on_x5 *sphi_ir5*( -4.4426765565e-05)
+on_sep5*cphi_ir5*( 3.1439825122e-05)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.l5b1x = -5.1747683802e-05 ;
acbrdh4.l5b1s = 1.0098574439e-05 ;
acbrdh4.l5b1ox= 0.0000000000e+00 ;
acbrdh4.l5b1os= 0.0000000000e+00 ;
acbrdh4.l5b1 :=+on_x5 *cphi_ir5*( -5.1747683802e-05)
+on_sep5*sphi_ir5*( 1.0098574439e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.l5b1x = -9.2234840198e-05 ;
acbrdv4.l5b1s = 1.4593728972e-06 ;
acbrdv4.l5b1ox= 0.0000000000e+00 ;
acbrdv4.l5b1os= 0.0000000000e+00 ;
acbrdv4.l5b1 :=+on_x5 *sphi_ir5*( -9.2234840198e-05)
+on_sep5*cphi_ir5*( 1.4593728972e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.l5b2x = 9.4559227956e-05 ;
acbrdh4.l5b2s = -1.4934301299e-06 ;
acbrdh4.l5b2ox= 0.0000000000e+00 ;
acbrdh4.l5b2os= 0.0000000000e+00 ;
acbrdh4.l5b2 :=+on_x5 *cphi_ir5*( 9.4559227956e-05)
+on_sep5*sphi_ir5*( -1.4934301299e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.l5b2x = 5.0705968593e-05 ;
acbrdv4.l5b2s = -9.9436041866e-06 ;
acbrdv4.l5b2ox= 0.0000000000e+00 ;
acbrdv4.l5b2os= 0.0000000000e+00 ;
acbrdv4.l5b2 :=+on_x5 *sphi_ir5*( 5.0705968593e-05)
+on_sep5*cphi_ir5*( -9.9436041866e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.r5b1x = 9.6498921302e-05 ;
acbrdh4.r5b1s = 1.4959580425e-06 ;
acbrdh4.r5b1ox= 0.0000000000e+00 ;
acbrdh4.r5b1os= 0.0000000000e+00 ;
acbrdh4.r5b1 :=+on_x5 *cphi_ir5*( 9.6498921302e-05)
+on_sep5*sphi_ir5*( 1.4959580425e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.r5b1x = 5.1697033014e-05 ;
acbrdv4.r5b1s = 1.0037739376e-05 ;
acbrdv4.r5b1ox= 0.0000000000e+00 ;
acbrdv4.r5b1os= 0.0000000000e+00 ;
acbrdv4.r5b1 :=+on_x5 *sphi_ir5*( 5.1697033014e-05)
+on_sep5*cphi_ir5*( 1.0037739376e-05)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.r5b2x = -5.2720221637e-05 ;
acbrdh4.r5b2s = -1.0161889187e-05 ;
acbrdh4.r5b2ox= 0.0000000000e+00 ;
acbrdh4.r5b2os= 0.0000000000e+00 ;
acbrdh4.r5b2 :=+on_x5 *cphi_ir5*( -5.2720221637e-05)
+on_sep5*sphi_ir5*( -1.0161889187e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.r5b2x = -9.4182382922e-05 ;
acbrdv4.r5b2s = -1.4638605943e-06 ;
acbrdv4.r5b2ox= 0.0000000000e+00 ;
acbrdv4.r5b2os= 0.0000000000e+00 ;
acbrdv4.r5b2 :=+on_x5 *sphi_ir5*( -9.4182382922e-05)
+on_sep5*cphi_ir5*( -1.4638605943e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs4.l5b1x = -5.1747683802e-05 ;
acbyhs4.l5b1s = 1.0098574439e-05 ;
acbyhs4.l5b1ox= 0.0000000000e+00 ;
acbyhs4.l5b1os= 0.0000000000e+00 ;
acbyhs4.l5b1 :=+on_x5 *cphi_ir5*( -5.1747683802e-05)
+on_sep5*sphi_ir5*( 1.0098574439e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs4.l5b1x = -9.2234840198e-05 ;
acbyvs4.l5b1s = 1.4593728972e-06 ;
acbyvs4.l5b1ox= 0.0000000000e+00 ;
acbyvs4.l5b1os= 0.0000000000e+00 ;
acbyvs4.l5b1 :=+on_x5 *sphi_ir5*( -9.2234840198e-05)
+on_sep5*cphi_ir5*( 1.4593728972e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs4.l5b2x = 9.4559227956e-05 ;
acbyhs4.l5b2s = -1.4934301299e-06 ;
acbyhs4.l5b2ox= 0.0000000000e+00 ;
acbyhs4.l5b2os= 0.0000000000e+00 ;
acbyhs4.l5b2 :=+on_x5 *cphi_ir5*( 9.4559227956e-05)
+on_sep5*sphi_ir5*( -1.4934301299e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs4.l5b2x = 5.0705968593e-05 ;
acbyvs4.l5b2s = -9.9436041866e-06 ;
acbyvs4.l5b2ox= 0.0000000000e+00 ;
acbyvs4.l5b2os= 0.0000000000e+00 ;
acbyvs4.l5b2 :=+on_x5 *sphi_ir5*( 5.0705968593e-05)
+on_sep5*cphi_ir5*( -9.9436041866e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs4.r5b1x = 9.6498921302e-05 ;
acbyhs4.r5b1s = 1.4959580425e-06 ;
acbyhs4.r5b1ox= 0.0000000000e+00 ;
acbyhs4.r5b1os= 0.0000000000e+00 ;
acbyhs4.r5b1 :=+on_x5 *cphi_ir5*( 9.6498921302e-05)
+on_sep5*sphi_ir5*( 1.4959580425e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs4.r5b1x = 5.1697033014e-05 ;
acbyvs4.r5b1s = 1.0037739376e-05 ;
acbyvs4.r5b1ox= 0.0000000000e+00 ;
acbyvs4.r5b1os= 0.0000000000e+00 ;
acbyvs4.r5b1 :=+on_x5 *sphi_ir5*( 5.1697033014e-05)
+on_sep5*cphi_ir5*( 1.0037739376e-05)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs4.r5b2x = -5.2720221637e-05 ;
acbyhs4.r5b2s = -1.0161889187e-05 ;
acbyhs4.r5b2ox= 0.0000000000e+00 ;
acbyhs4.r5b2os= 0.0000000000e+00 ;
acbyhs4.r5b2 :=+on_x5 *cphi_ir5*( -5.2720221637e-05)
+on_sep5*sphi_ir5*( -1.0161889187e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs4.r5b2x = -9.4182382922e-05 ;
acbyvs4.r5b2s = -1.4638605943e-06 ;
acbyvs4.r5b2ox= 0.0000000000e+00 ;
acbyvs4.r5b2os= 0.0000000000e+00 ;
acbyvs4.r5b2 :=+on_x5 *sphi_ir5*( -9.4182382922e-05)
+on_sep5*cphi_ir5*( -1.4638605943e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs5.l5b1x = 1.6865516646e-06 ;
acbyhs5.l5b1s = -6.4362136901e-06 ;
acbyhs5.l5b1ox= 0.0000000000e+00 ;
acbyhs5.l5b1os= 0.0000000000e+00 ;
acbyhs5.l5b1 :=+on_x5 *cphi_ir5*( 1.6865516646e-06)
+on_sep5*sphi_ir5*( -6.4362136901e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.l5b1x = 1.4633828868e-05 ;
acbyvs5.l5b1s = -5.9620031107e-07 ;
acbyvs5.l5b1ox= 0.0000000000e+00 ;
acbyvs5.l5b1os= 0.0000000000e+00 ;
acbyvs5.l5b1 :=+on_x5 *sphi_ir5*( 1.4633828868e-05)
+on_sep5*cphi_ir5*( -5.9620031107e-07)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs5.l5b2x = -1.8688207366e-05 ;
acbyhs5.l5b2s = 6.6364731568e-07 ;
acbyhs5.l5b2ox= 0.0000000000e+00 ;
acbyhs5.l5b2os= 0.0000000000e+00 ;
acbyhs5.l5b2 :=+on_x5 *cphi_ir5*( -1.8688207366e-05)
+on_sep5*sphi_ir5*( 6.6364731568e-07)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.l5b2x = 1.0557093223e-06 ;
acbyvs5.l5b2s = 5.8368579294e-06 ;
acbyvs5.l5b2ox= 0.0000000000e+00 ;
acbyvs5.l5b2os= 0.0000000000e+00 ;
acbyvs5.l5b2 :=+on_x5 *sphi_ir5*( 1.0557093223e-06)
+on_sep5*cphi_ir5*( 5.8368579294e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs5.r5b1x = -2.0670428490e-05 ;
acbyhs5.r5b1s = -6.7661153453e-07 ;
acbyhs5.r5b1ox= 0.0000000000e+00 ;
acbyhs5.r5b1os= 0.0000000000e+00 ;
acbyhs5.r5b1 :=+on_x5 *cphi_ir5*( -2.0670428490e-05)
+on_sep5*sphi_ir5*( -6.7661153453e-07)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.r5b1x = -5.4577428239e-07 ;
acbyvs5.r5b1s = -6.0903551513e-06 ;
acbyvs5.r5b1ox= 0.0000000000e+00 ;
acbyvs5.r5b1os= 0.0000000000e+00 ;
acbyvs5.r5b1 :=+on_x5 *sphi_ir5*( -5.4577428239e-07)
+on_sep5*cphi_ir5*( -6.0903551513e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs5.r5b2x = 3.3902988980e-06 ;
acbyhs5.r5b2s = 6.7357498171e-06 ;
acbyhs5.r5b2ox= 0.0000000000e+00 ;
acbyhs5.r5b2os= 0.0000000000e+00 ;
acbyhs5.r5b2 :=+on_x5 *cphi_ir5*( 3.3902988980e-06)
+on_sep5*sphi_ir5*( 6.7357498171e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.r5b2x = 1.6458570897e-05 ;
acbyvs5.r5b2s = 6.0635947001e-07 ;
acbyvs5.r5b2ox= 0.0000000000e+00 ;
acbyvs5.r5b2os= 0.0000000000e+00 ;
acbyvs5.r5b2 :=+on_x5 *sphi_ir5*( 1.6458570897e-05)
+on_sep5*cphi_ir5*( 6.0635947001e-07)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbch6.l5b5x = 0.0000000000e+00 ;
acbch6.l5b5s = 0.0000000000e+00 ;
acbch6.l5b5ox= 0.0000000000e+00 ;
acbch6.l5b5os= 0.0000000000e+00 ;
acbch6.l5b5 :=+on_x5 *cphi_ir5*( 0.0000000000e+00)
+on_sep5*sphi_ir5*( 0.0000000000e+00)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbcv6.l5b2x = 0.0000000000e+00 ;
acbcv6.l5b2s = 0.0000000000e+00 ;
acbcv6.l5b2ox= 0.0000000000e+00 ;
acbcv6.l5b2os= 0.0000000000e+00 ;
acbcv6.l5b2 :=+on_x5 *sphi_ir5*( 0.0000000000e+00)
+on_sep5*cphi_ir5*( 0.0000000000e+00)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbcv6.r5b1x = 0.0000000000e+00 ;
acbcv6.r5b1s = 0.0000000000e+00 ;
acbcv6.r5b1ox= 0.0000000000e+00 ;
acbcv6.r5b1os= 0.0000000000e+00 ;
acbcv6.r5b1 :=+on_x5 *sphi_ir5*( 0.0000000000e+00)
+on_sep5*cphi_ir5*( 0.0000000000e+00)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbch6.r5b2x = 0.0000000000e+00 ;
acbch6.r5b2s = 0.0000000000e+00 ;
acbch6.r5b2ox= 0.0000000000e+00 ;
acbch6.r5b2os= 0.0000000000e+00 ;
acbch6.r5b2 :=+on_x5 *cphi_ir5*( 0.0000000000e+00)
+on_sep5*sphi_ir5*( 0.0000000000e+00)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
!***IR5 Crab Cavities***
ahcrab_l5b1 = 1.7715756363e-06 ;
ahcrab_l5b2 = 2.5527284011e-06 ;
avcrab_l5b1 = 2.4060771475e-06 ;
avcrab_l5b2 = 1.6805976327e-06 ;
ahcrab_r5b1 = 2.5531594712e-06 ;
ahcrab_r5b2 = 1.7712453947e-06 ;
avcrab_r5b1 = 1.6805966791e-06 ;
avcrab_r5b2 = 2.4060779436e-06 ;
!***IR2 Optics***
kqx.l2 = 9.5098158130e-03;
ktqx1.l2 = 0.0000000000e+00;
ktqx2.l2 = 0.0000000000e+00;
kqx.r2 = -9.5098158130e-03;
ktqx1.r2 = 0.0000000000e+00;
ktqx2.r2 = 0.0000000000e+00;
Kq4.L2B1 = -5.4927452290e-03 ;
Kq4.L2B2 = 4.5623827684e-03 ;
Kq4.R2B1 = 4.6536640776e-03 ;
Kq4.R2B2 = -5.0435784981e-03 ;
Kq5.L2B1 = 4.8267843830e-03 ;
Kq5.L2B2 = -4.0719109041e-03 ;
Kq5.R2B1 = -4.4405040936e-03 ;
Kq5.R2B2 = 4.5746996453e-03 ;
Kq6.L2B1 = -4.1167029815e-03 ;
Kq6.L2B2 = 4.0963825450e-03 ;
Kq6.R2B1 = 4.0069133950e-03 ;
Kq6.R2B2 = -4.0070235234e-03 ;
Kq7.L2B1 = 5.6686284025e-03 ;
Kq7.L2B2 = -6.5365472996e-03 ;
Kq7.R2B1 = -5.1442494016e-03 ;
Kq7.R2B2 = 5.8391711576e-03 ;
Kq8.L2B1 = -3.7087238238e-03 ;
Kq8.L2B2 = 6.3480452060e-03 ;
Kq8.R2B1 = 5.3610655533e-03 ;
Kq8.R2B2 = -4.1297341196e-03 ;
Kq9.L2B1 = 5.6761579788e-03 ;
Kq9.L2B2 = -6.7407995410e-03 ;
Kq9.R2B1 = -5.3767647796e-03 ;
Kq9.R2B2 = 6.0061698394e-03 ;
Kq10.L2B1 = -5.3914443055e-03 ;
Kq10.L2B2 = 7.2012005549e-03 ;
Kq10.R2B1 = 7.2611766126e-03 ;
Kq10.R2B2 = -5.3996533287e-03 ;
Kqtl11.L2B1 = 1.7867735865e-04 ;
Kqtl11.L2B2 = 2.6217562092e-03 ;
Kqtl11.R2B1 = -7.5478087785e-04 ;
Kqtl11.R2B2 = -6.7443158400e-06 ;
Kqt12.L2B1 = 3.4808672496e-03 ;
Kqt12.L2B2 = -5.0646501843e-03 ;
Kqt12.R2B1 = -2.0101070064e-03 ;
Kqt12.R2B2 = 4.1007106850e-03 ;
Kqt13.L2B1 = -3.7395197760e-03 ;
Kqt13.L2B2 = 5.0518312038e-03 ;
Kqt13.R2B1 = -8.8655729696e-04 ;
Kqt13.R2B2 = -1.6548861385e-03 ;
!***IR2 X-scheme***
acbxh1.l2x = 0.0000000000e+00 ;
acbxh1.l2s = 1.8000000000e-05 ;
acbxh1.l2ox= 0.0000000000e+00 ;
acbxh1.l2os= 0.0000000000e+00 ;
acbxh1.l2 :=+on_x2 *cphi_ir2*( 0.0000000000e+00)
+on_sep2*sphi_ir2*( 1.8000000000e-05)
+on_ox2 *cphi_ir2*( 0.0000000000e+00)
+on_os2 *sphi_ir2*( 0.0000000000e+00);
acbxv1.l2x = 1.0000000000e-06 ;
acbxv1.l2s = 0.0000000000e+00 ;
acbxv1.l2ox= 0.0000000000e+00 ;
acbxv1.l2os= 0.0000000000e+00 ;
acbxv1.l2 :=+on_x2 *sphi_ir2*( 1.0000000000e-06)
+on_sep2*cphi_ir2*( 0.0000000000e+00)
+on_ox2 *sphi_ir2*( 0.0000000000e+00)
+on_os2 *cphi_ir2*( 0.0000000000e+00);
acbxh1.r2x = 0.0000000000e+00 ;
acbxh1.r2s = 1.8000000000e-05 ;
acbxh1.r2ox= 0.0000000000e+00 ;
acbxh1.r2os= 0.0000000000e+00 ;
acbxh1.r2 :=+on_x2 *cphi_ir2*( 0.0000000000e+00)
+on_sep2*sphi_ir2*( 1.8000000000e-05)
+on_ox2 *cphi_ir2*( 0.0000000000e+00)
+on_os2 *sphi_ir2*( 0.0000000000e+00);
acbxv1.r2x = -1.0000000000e-06 ;
acbxv1.r2s = 0.0000000000e+00 ;
acbxv1.r2ox= 0.0000000000e+00 ;
acbxv1.r2os= 0.0000000000e+00 ;
acbxv1.r2 :=+on_x2 *sphi_ir2*( -1.0000000000e-06)
+on_sep2*cphi_ir2*( 0.0000000000e+00)
+on_ox2 *sphi_ir2*( 0.0000000000e+00)
+on_os2 *cphi_ir2*( 0.0000000000e+00);
acbxh2.l2x = 0.0000000000e+00 ;
acbxh2.l2s = 1.8000000000e-05 ;
acbxh2.l2ox= 0.0000000000e+00 ;
acbxh2.l2os= 0.0000000000e+00 ;
acbxh2.l2 :=+on_x2 *cphi_ir2*( 0.0000000000e+00)
+on_sep2*sphi_ir2*( 1.8000000000e-05)
+on_ox2 *cphi_ir2*( 0.0000000000e+00)
+on_os2 *sphi_ir2*( 0.0000000000e+00);
acbxv2.l2x = 1.0000000000e-06 ;
acbxv2.l2s = 0.0000000000e+00 ;
acbxv2.l2ox= 0.0000000000e+00 ;
acbxv2.l2os= 0.0000000000e+00 ;
acbxv2.l2 :=+on_x2 *sphi_ir2*( 1.0000000000e-06)
+on_sep2*cphi_ir2*( 0.0000000000e+00)
+on_ox2 *sphi_ir2*( 0.0000000000e+00)
+on_os2 *cphi_ir2*( 0.0000000000e+00);
acbxh2.r2x = 0.0000000000e+00 ;
acbxh2.r2s = 1.8000000000e-05 ;
acbxh2.r2ox= 0.0000000000e+00 ;
acbxh2.r2os= 0.0000000000e+00 ;
acbxh2.r2 :=+on_x2 *cphi_ir2*( 0.0000000000e+00)
+on_sep2*sphi_ir2*( 1.8000000000e-05)
+on_ox2 *cphi_ir2*( 0.0000000000e+00)
+on_os2 *sphi_ir2*( 0.0000000000e+00);
acbxv2.r2x = -1.0000000000e-06 ;
acbxv2.r2s = 0.0000000000e+00 ;
acbxv2.r2ox= 0.0000000000e+00 ;
acbxv2.r2os= 0.0000000000e+00 ;
acbxv2.r2 :=+on_x2 *sphi_ir2*( -1.0000000000e-06)
+on_sep2*cphi_ir2*( 0.0000000000e+00)
+on_ox2 *sphi_ir2*( 0.0000000000e+00)
+on_os2 *cphi_ir2*( 0.0000000000e+00);
acbxh3.l2x = 0.0000000000e+00 ;
acbxh3.l2s = 1.8000000000e-05 ;
acbxh3.l2ox= 0.0000000000e+00 ;
acbxh3.l2os= 0.0000000000e+00 ;
acbxh3.l2 :=+on_x2 *cphi_ir2*( 0.0000000000e+00)
+on_sep2*sphi_ir2*( 1.8000000000e-05)
+on_ox2 *cphi_ir2*( 0.0000000000e+00)
+on_os2 *sphi_ir2*( 0.0000000000e+00);
acbxv3.l2x = 1.0000000000e-06 ;
acbxv3.l2s = 0.0000000000e+00 ;
acbxv3.l2ox= 0.0000000000e+00 ;
acbxv3.l2os= 0.0000000000e+00 ;
acbxv3.l2 :=+on_x2 *sphi_ir2*( 1.0000000000e-06)
+on_sep2*cphi_ir2*( 0.0000000000e+00)
+on_ox2 *sphi_ir2*( 0.0000000000e+00)
+on_os2 *cphi_ir2*( 0.0000000000e+00);