-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathopt_inj_thin.madx
2019 lines (1983 loc) · 86.8 KB
/
opt_inj_thin.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 = 1.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.6246248844e-03 ;
Kq4.L1B2 = -2.3829793477e-03 ;
Kq4.R1B1 = -2.5161856842e-03 ;
Kq4.R1B2 = 2.8816339056e-03 ;
Kq5.L1B1 = -4.3109919722e-03 ;
Kq5.L1B2 = 5.4870235450e-03 ;
Kq5.R1B1 = 4.9008316263e-03 ;
Kq5.R1B2 = -5.6236490710e-03 ;
Kq6.L1B1 = 4.5736720933e-03 ;
Kq6.L1B2 = -5.2302572676e-03 ;
Kq6.R1B1 = -5.1159563268e-03 ;
Kq6.R1B2 = 4.9385638827e-03 ;
Kq7.L1B1 = -5.3654810499e-03 ;
Kq7.L1B2 = 5.3077008562e-03 ;
Kq7.R1B1 = 5.2689242958e-03 ;
Kq7.R1B2 = -5.0535530222e-03 ;
Kq8.L1B1 = 7.7859294266e-03 ;
Kq8.L1B2 = -7.3982304829e-03 ;
Kq8.R1B1 = -6.6013952669e-03 ;
Kq8.R1B2 = 7.6328251477e-03 ;
Kq9.L1B1 = -7.4586314692e-03 ;
Kq9.L1B2 = 6.8276368786e-03 ;
Kq9.R1B1 = 6.7798613173e-03 ;
Kq9.R1B2 = -6.9664652235e-03 ;
Kq10.L1B1 = 7.3545080692e-03 ;
Kq10.L1B2 = -7.6024053295e-03 ;
Kq10.R1B1 = -6.7158249593e-03 ;
Kq10.R1B2 = 7.3480181137e-03 ;
Kqtl11.L1B1 = -2.6710865765e-03 ;
Kqtl11.L1B2 = 7.7960497697e-04 ;
Kqtl11.R1B1 = 4.3339350113e-04 ;
Kqtl11.R1B2 = -1.2036473464e-03 ;
Kqt12.L1B1 = 1.1155773989e-03 ;
Kqt12.L1B2 = -4.8077451618e-03 ;
Kqt12.R1B1 = -7.8365377155e-04 ;
Kqt12.R1B2 = -5.0208372073e-04 ;
Kqt13.L1B1 = -1.8002125228e-03 ;
Kqt13.L1B2 = -8.1104233152e-04 ;
Kqt13.R1B1 = 1.8280297694e-04 ;
Kqt13.R1B2 = 2.8780692265e-03 ;
!***IR1 X-scheme***
acbxh1.l1x = 2.0922419154e-05 ;
acbxh1.l1s = 3.9734059034e-06 ;
acbxh1.l1ox= 0.0000000000e+00 ;
acbxh1.l1os= 0.0000000000e+00 ;
acbxh1.l1 :=+on_x1 *cphi_ir1*( 2.0922419154e-05)
+on_sep1*sphi_ir1*( 3.9734059034e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv1.l1x = 2.0921515092e-05 ;
acbxv1.l1s = 3.9732188897e-06 ;
acbxv1.l1ox= 0.0000000000e+00 ;
acbxv1.l1os= 0.0000000000e+00 ;
acbxv1.l1 :=+on_x1 *sphi_ir1*( 2.0921515092e-05)
+on_sep1*cphi_ir1*( 3.9732188897e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh1.r1x = -1.8084929412e-05 ;
acbxh1.r1s = 3.3864443662e-06 ;
acbxh1.r1ox= 0.0000000000e+00 ;
acbxh1.r1os= 0.0000000000e+00 ;
acbxh1.r1 :=+on_x1 *cphi_ir1*( -1.8084929412e-05)
+on_sep1*sphi_ir1*( 3.3864443662e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv1.r1x = -1.8084036810e-05 ;
acbxv1.r1s = 3.3862597229e-06 ;
acbxv1.r1ox= 0.0000000000e+00 ;
acbxv1.r1os= 0.0000000000e+00 ;
acbxv1.r1 :=+on_x1 *sphi_ir1*( -1.8084036810e-05)
+on_sep1*cphi_ir1*( 3.3862597229e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh2.l1x = 2.0922419154e-05 ;
acbxh2.l1s = 3.9734059034e-06 ;
acbxh2.l1ox= 0.0000000000e+00 ;
acbxh2.l1os= 0.0000000000e+00 ;
acbxh2.l1 :=+on_x1 *cphi_ir1*( 2.0922419154e-05)
+on_sep1*sphi_ir1*( 3.9734059034e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv2.l1x = 2.0921515092e-05 ;
acbxv2.l1s = 3.9732188897e-06 ;
acbxv2.l1ox= 0.0000000000e+00 ;
acbxv2.l1os= 0.0000000000e+00 ;
acbxv2.l1 :=+on_x1 *sphi_ir1*( 2.0921515092e-05)
+on_sep1*cphi_ir1*( 3.9732188897e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh2.r1x = -1.8084929412e-05 ;
acbxh2.r1s = 3.3864443662e-06 ;
acbxh2.r1ox= 0.0000000000e+00 ;
acbxh2.r1os= 0.0000000000e+00 ;
acbxh2.r1 :=+on_x1 *cphi_ir1*( -1.8084929412e-05)
+on_sep1*sphi_ir1*( 3.3864443662e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv2.r1x = -1.8084036810e-05 ;
acbxv2.r1s = 3.3862597229e-06 ;
acbxv2.r1ox= 0.0000000000e+00 ;
acbxv2.r1os= 0.0000000000e+00 ;
acbxv2.r1 :=+on_x1 *sphi_ir1*( -1.8084036810e-05)
+on_sep1*cphi_ir1*( 3.3862597229e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh3.l1x = 4.1051804128e-05 ;
acbxh3.l1s = 3.1206246182e-05 ;
acbxh3.l1ox= 0.0000000000e+00 ;
acbxh3.l1os= 0.0000000000e+00 ;
acbxh3.l1 :=+on_x1 *cphi_ir1*( 4.1051804128e-05)
+on_sep1*sphi_ir1*( 3.1206246182e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv3.l1x = 4.1057209603e-05 ;
acbxv3.l1s = 3.1206486088e-05 ;
acbxv3.l1ox= 0.0000000000e+00 ;
acbxv3.l1os= 0.0000000000e+00 ;
acbxv3.l1 :=+on_x1 *sphi_ir1*( 4.1057209603e-05)
+on_sep1*cphi_ir1*( 3.1206486088e-05)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh3.r1x = -5.6605739907e-05 ;
acbxh3.r1s = 3.1984027245e-05 ;
acbxh3.r1ox= 0.0000000000e+00 ;
acbxh3.r1os= 0.0000000000e+00 ;
acbxh3.r1 :=+on_x1 *cphi_ir1*( -5.6605739907e-05)
+on_sep1*sphi_ir1*( 3.1984027245e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv3.r1x = -5.6611102941e-05 ;
acbxv3.r1s = 3.1984279691e-05 ;
acbxv3.r1ox= 0.0000000000e+00 ;
acbxv3.r1os= 0.0000000000e+00 ;
acbxv3.r1 :=+on_x1 *sphi_ir1*( -5.6611102941e-05)
+on_sep1*cphi_ir1*( 3.1984279691e-05)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.l1b1x = -5.0230024657e-05 ;
acbrdh4.l1b1s = 9.9252430655e-06 ;
acbrdh4.l1b1ox= 0.0000000000e+00 ;
acbrdh4.l1b1os= 0.0000000000e+00 ;
acbrdh4.l1b1 :=+on_x1 *cphi_ir1*( -5.0230024657e-05)
+on_sep1*sphi_ir1*( 9.9252430655e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.l1b1x = -8.9465948799e-05 ;
acbrdv4.l1b1s = 1.4715451021e-06 ;
acbrdv4.l1b1ox= 0.0000000000e+00 ;
acbrdv4.l1b1os= 0.0000000000e+00 ;
acbrdv4.l1b1 :=+on_x1 *sphi_ir1*( -8.9465948799e-05)
+on_sep1*cphi_ir1*( 1.4715451021e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.l1b2x = 9.1743777735e-05 ;
acbrdh4.l1b2s = -1.5064508842e-06 ;
acbrdh4.l1b2ox= 0.0000000000e+00 ;
acbrdh4.l1b2os= 0.0000000000e+00 ;
acbrdh4.l1b2 :=+on_x1 *cphi_ir1*( 9.1743777735e-05)
+on_sep1*sphi_ir1*( -1.5064508842e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.l1b2x = 4.9198596302e-05 ;
acbrdv4.l1b2s = -9.7681072453e-06 ;
acbrdv4.l1b2ox= 0.0000000000e+00 ;
acbrdv4.l1b2os= 0.0000000000e+00 ;
acbrdv4.l1b2 :=+on_x1 *sphi_ir1*( 4.9198596302e-05)
+on_sep1*cphi_ir1*( -9.7681072453e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.r1b1x = 1.1274843266e-04 ;
acbrdh4.r1b1s = 1.4855389062e-06 ;
acbrdh4.r1b1ox= 0.0000000000e+00 ;
acbrdh4.r1b1os= 0.0000000000e+00 ;
acbrdh4.r1b1 :=+on_x1 *cphi_ir1*( 1.1274843266e-04)
+on_sep1*sphi_ir1*( 1.4855389062e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.r1b1x = 6.0274106504e-05 ;
acbrdv4.r1b1s = 1.1029812507e-05 ;
acbrdv4.r1b1ox= 0.0000000000e+00 ;
acbrdv4.r1b1os= 0.0000000000e+00 ;
acbrdv4.r1b1 :=+on_x1 *sphi_ir1*( 6.0274106504e-05)
+on_sep1*cphi_ir1*( 1.1029812507e-05)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.r1b2x = -6.1306983217e-05 ;
acbrdh4.r1b2s = -1.1156362448e-05 ;
acbrdh4.r1b2ox= 0.0000000000e+00 ;
acbrdh4.r1b2os= 0.0000000000e+00 ;
acbrdh4.r1b2 :=+on_x1 *cphi_ir1*( -6.1306983217e-05)
+on_sep1*sphi_ir1*( -1.1156362448e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.r1b2x = -1.1017347743e-04 ;
acbrdv4.r1b2s = -1.4543178957e-06 ;
acbrdv4.r1b2ox= 0.0000000000e+00 ;
acbrdv4.r1b2os= 0.0000000000e+00 ;
acbrdv4.r1b2 :=+on_x1 *sphi_ir1*( -1.1017347743e-04)
+on_sep1*cphi_ir1*( -1.4543178957e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs4.l1b1x = -5.0230024657e-05 ;
acbyhs4.l1b1s = 9.9252430655e-06 ;
acbyhs4.l1b1ox= 0.0000000000e+00 ;
acbyhs4.l1b1os= 0.0000000000e+00 ;
acbyhs4.l1b1 :=+on_x1 *cphi_ir1*( -5.0230024657e-05)
+on_sep1*sphi_ir1*( 9.9252430655e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs4.l1b1x = -8.9465948799e-05 ;
acbyvs4.l1b1s = 1.4715451021e-06 ;
acbyvs4.l1b1ox= 0.0000000000e+00 ;
acbyvs4.l1b1os= 0.0000000000e+00 ;
acbyvs4.l1b1 :=+on_x1 *sphi_ir1*( -8.9465948799e-05)
+on_sep1*cphi_ir1*( 1.4715451021e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs4.l1b2x = 9.1743777735e-05 ;
acbyhs4.l1b2s = -1.5064508842e-06 ;
acbyhs4.l1b2ox= 0.0000000000e+00 ;
acbyhs4.l1b2os= 0.0000000000e+00 ;
acbyhs4.l1b2 :=+on_x1 *cphi_ir1*( 9.1743777735e-05)
+on_sep1*sphi_ir1*( -1.5064508842e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs4.l1b2x = 4.9198596302e-05 ;
acbyvs4.l1b2s = -9.7681072453e-06 ;
acbyvs4.l1b2ox= 0.0000000000e+00 ;
acbyvs4.l1b2os= 0.0000000000e+00 ;
acbyvs4.l1b2 :=+on_x1 *sphi_ir1*( 4.9198596302e-05)
+on_sep1*cphi_ir1*( -9.7681072453e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs4.r1b1x = 1.1274843266e-04 ;
acbyhs4.r1b1s = 1.4855389062e-06 ;
acbyhs4.r1b1ox= 0.0000000000e+00 ;
acbyhs4.r1b1os= 0.0000000000e+00 ;
acbyhs4.r1b1 :=+on_x1 *cphi_ir1*( 1.1274843266e-04)
+on_sep1*sphi_ir1*( 1.4855389062e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs4.r1b1x = 6.0274106504e-05 ;
acbyvs4.r1b1s = 1.1029812507e-05 ;
acbyvs4.r1b1ox= 0.0000000000e+00 ;
acbyvs4.r1b1os= 0.0000000000e+00 ;
acbyvs4.r1b1 :=+on_x1 *sphi_ir1*( 6.0274106504e-05)
+on_sep1*cphi_ir1*( 1.1029812507e-05)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs4.r1b2x = -6.1306983217e-05 ;
acbyhs4.r1b2s = -1.1156362448e-05 ;
acbyhs4.r1b2ox= 0.0000000000e+00 ;
acbyhs4.r1b2os= 0.0000000000e+00 ;
acbyhs4.r1b2 :=+on_x1 *cphi_ir1*( -6.1306983217e-05)
+on_sep1*sphi_ir1*( -1.1156362448e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs4.r1b2x = -1.1017347743e-04 ;
acbyvs4.r1b2s = -1.4543178957e-06 ;
acbyvs4.r1b2ox= 0.0000000000e+00 ;
acbyvs4.r1b2os= 0.0000000000e+00 ;
acbyvs4.r1b2 :=+on_x1 *sphi_ir1*( -1.1017347743e-04)
+on_sep1*cphi_ir1*( -1.4543178957e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs5.l1b1x = -8.6174065290e-07 ;
acbyhs5.l1b1s = -6.0794653654e-06 ;
acbyhs5.l1b1ox= 0.0000000000e+00 ;
acbyhs5.l1b1os= 0.0000000000e+00 ;
acbyhs5.l1b1 :=+on_x1 *cphi_ir1*( -8.6174065290e-07)
+on_sep1*sphi_ir1*( -6.0794653654e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.l1b1x = 1.1621031978e-05 ;
acbyvs5.l1b1s = -5.7619842540e-07 ;
acbyvs5.l1b1ox= 0.0000000000e+00 ;
acbyvs5.l1b1os= 0.0000000000e+00 ;
acbyvs5.l1b1 :=+on_x1 *sphi_ir1*( 1.1621031978e-05)
+on_sep1*cphi_ir1*( -5.7619842540e-07)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs5.l1b2x = -1.5525568289e-05 ;
acbyhs5.l1b2s = 6.4378232649e-07 ;
acbyhs5.l1b2ox= 0.0000000000e+00 ;
acbyhs5.l1b2os= 0.0000000000e+00 ;
acbyhs5.l1b2 :=+on_x1 *cphi_ir1*( -1.5525568289e-05)
+on_sep1*sphi_ir1*( 6.4378232649e-07)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.l1b2x = 3.4973592647e-06 ;
acbyvs5.l1b2s = 5.4964890486e-06 ;
acbyvs5.l1b2ox= 0.0000000000e+00 ;
acbyvs5.l1b2os= 0.0000000000e+00 ;
acbyvs5.l1b2 :=+on_x1 *sphi_ir1*( 3.4973592647e-06)
+on_sep1*cphi_ir1*( 5.4964890486e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs5.r1b1x = -3.8576847202e-05 ;
acbyhs5.r1b1s = -7.8997141791e-07 ;
acbyhs5.r1b1ox= 0.0000000000e+00 ;
acbyhs5.r1b1os= 0.0000000000e+00 ;
acbyhs5.r1b1 :=+on_x1 *cphi_ir1*( -3.8576847202e-05)
+on_sep1*sphi_ir1*( -7.8997141791e-07)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.r1b1x = -1.4501116342e-05 ;
acbyvs5.r1b1s = -7.9696030211e-06 ;
acbyvs5.r1b1ox= 0.0000000000e+00 ;
acbyvs5.r1b1os= 0.0000000000e+00 ;
acbyvs5.r1b1 :=+on_x1 *sphi_ir1*( -1.4501116342e-05)
+on_sep1*cphi_ir1*( -7.9696030211e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs5.r1b2x = 1.8018446747e-05 ;
acbyhs5.r1b2s = 8.6915120365e-06 ;
acbyhs5.r1b2ox= 0.0000000000e+00 ;
acbyhs5.r1b2os= 0.0000000000e+00 ;
acbyhs5.r1b2 :=+on_x1 *cphi_ir1*( 1.8018446747e-05)
+on_sep1*sphi_ir1*( 8.6915120365e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.r1b2x = 3.3478595135e-05 ;
acbyvs5.r1b2s = 7.1901651878e-07 ;
acbyvs5.r1b2ox= 0.0000000000e+00 ;
acbyvs5.r1b2os= 0.0000000000e+00 ;
acbyvs5.r1b2 :=+on_x1 *sphi_ir1*( 3.3478595135e-05)
+on_sep1*cphi_ir1*( 7.1901651878e-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.7823721319e-06 ;
ahcrab_l1b2 = 2.5656804468e-06 ;
avcrab_l1b1 = 2.4167495035e-06 ;
avcrab_l1b2 = 1.6894883049e-06 ;
ahcrab_r1b1 = 2.5659714124e-06 ;
ahcrab_r1b2 = 1.7816864093e-06 ;
avcrab_r1b1 = 1.6894881628e-06 ;
avcrab_r1b2 = 2.4167499240e-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.6246248844e-03 ;
Kq4.L5B2 = -2.3829793477e-03 ;
Kq4.R5B1 = -2.5161856842e-03 ;
Kq4.R5B2 = 2.8816339056e-03 ;
Kq5.L5B1 = -4.3109919722e-03 ;
Kq5.L5B2 = 5.4870235450e-03 ;
Kq5.R5B1 = 4.9008316263e-03 ;
Kq5.R5B2 = -5.6236490710e-03 ;
Kq6.L5B1 = 4.5736720933e-03 ;
Kq6.L5B2 = -5.2302572676e-03 ;
Kq6.R5B1 = -5.1159563268e-03 ;
Kq6.R5B2 = 4.9385638827e-03 ;
Kq7.L5B1 = -5.3654810499e-03 ;
Kq7.L5B2 = 5.3077008562e-03 ;
Kq7.R5B1 = 5.2689242958e-03 ;
Kq7.R5B2 = -5.0535530222e-03 ;
Kq8.L5B1 = 7.7859294266e-03 ;
Kq8.L5B2 = -7.3982304829e-03 ;
Kq8.R5B1 = -6.6013952669e-03 ;
Kq8.R5B2 = 7.6328251477e-03 ;
Kq9.L5B1 = -7.4586314692e-03 ;
Kq9.L5B2 = 6.8276368786e-03 ;
Kq9.R5B1 = 6.7798613173e-03 ;
Kq9.R5B2 = -6.9664652235e-03 ;
Kq10.L5B1 = 7.3545080692e-03 ;
Kq10.L5B2 = -7.6024053295e-03 ;
Kq10.R5B1 = -6.7158249593e-03 ;
Kq10.R5B2 = 7.3480181137e-03 ;
Kqtl11.L5B1 = -2.6710865765e-03 ;
Kqtl11.L5B2 = 7.7960497697e-04 ;
Kqtl11.R5B1 = 4.3339350113e-04 ;
Kqtl11.R5B2 = -1.2036473464e-03 ;
Kqt12.L5B1 = 1.1155773989e-03 ;
Kqt12.L5B2 = -4.8077451618e-03 ;
Kqt12.R5B1 = -7.8365377155e-04 ;
Kqt12.R5B2 = -5.0208372073e-04 ;
Kqt13.L5B1 = -1.8002125228e-03 ;
Kqt13.L5B2 = -8.1104233152e-04 ;
Kqt13.R5B1 = 1.8280297694e-04 ;
Kqt13.R5B2 = 2.8780692265e-03 ;
!***IR5 X-scheme***
acbxh1.l5x = 2.0922419154e-05 ;
acbxh1.l5s = 3.9734059034e-06 ;
acbxh1.l5ox= 0.0000000000e+00 ;
acbxh1.l5os= 0.0000000000e+00 ;
acbxh1.l5 :=+on_x5 *cphi_ir5*( 2.0922419154e-05)
+on_sep5*sphi_ir5*( 3.9734059034e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv1.l5x = 2.0921515092e-05 ;
acbxv1.l5s = 3.9732188897e-06 ;
acbxv1.l5ox= 0.0000000000e+00 ;
acbxv1.l5os= 0.0000000000e+00 ;
acbxv1.l5 :=+on_x5 *sphi_ir5*( 2.0921515092e-05)
+on_sep5*cphi_ir5*( 3.9732188897e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh1.r5x = -1.8084929412e-05 ;
acbxh1.r5s = 3.3864443662e-06 ;
acbxh1.r5ox= 0.0000000000e+00 ;
acbxh1.r5os= 0.0000000000e+00 ;
acbxh1.r5 :=+on_x5 *cphi_ir5*( -1.8084929412e-05)
+on_sep5*sphi_ir5*( 3.3864443662e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv1.r5x = -1.8084036810e-05 ;
acbxv1.r5s = 3.3862597229e-06 ;
acbxv1.r5ox= 0.0000000000e+00 ;
acbxv1.r5os= 0.0000000000e+00 ;
acbxv1.r5 :=+on_x5 *sphi_ir5*( -1.8084036810e-05)
+on_sep5*cphi_ir5*( 3.3862597229e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh2.l5x = 2.0922419154e-05 ;
acbxh2.l5s = 3.9734059034e-06 ;
acbxh2.l5ox= 0.0000000000e+00 ;
acbxh2.l5os= 0.0000000000e+00 ;
acbxh2.l5 :=+on_x5 *cphi_ir5*( 2.0922419154e-05)
+on_sep5*sphi_ir5*( 3.9734059034e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv2.l5x = 2.0921515092e-05 ;
acbxv2.l5s = 3.9732188897e-06 ;
acbxv2.l5ox= 0.0000000000e+00 ;
acbxv2.l5os= 0.0000000000e+00 ;
acbxv2.l5 :=+on_x5 *sphi_ir5*( 2.0921515092e-05)
+on_sep5*cphi_ir5*( 3.9732188897e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh2.r5x = -1.8084929412e-05 ;
acbxh2.r5s = 3.3864443662e-06 ;
acbxh2.r5ox= 0.0000000000e+00 ;
acbxh2.r5os= 0.0000000000e+00 ;
acbxh2.r5 :=+on_x5 *cphi_ir5*( -1.8084929412e-05)
+on_sep5*sphi_ir5*( 3.3864443662e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv2.r5x = -1.8084036810e-05 ;
acbxv2.r5s = 3.3862597229e-06 ;
acbxv2.r5ox= 0.0000000000e+00 ;
acbxv2.r5os= 0.0000000000e+00 ;
acbxv2.r5 :=+on_x5 *sphi_ir5*( -1.8084036810e-05)
+on_sep5*cphi_ir5*( 3.3862597229e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh3.l5x = 4.1051804128e-05 ;
acbxh3.l5s = 3.1206246182e-05 ;
acbxh3.l5ox= 0.0000000000e+00 ;
acbxh3.l5os= 0.0000000000e+00 ;
acbxh3.l5 :=+on_x5 *cphi_ir5*( 4.1051804128e-05)
+on_sep5*sphi_ir5*( 3.1206246182e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv3.l5x = 4.1057209603e-05 ;
acbxv3.l5s = 3.1206486088e-05 ;
acbxv3.l5ox= 0.0000000000e+00 ;
acbxv3.l5os= 0.0000000000e+00 ;
acbxv3.l5 :=+on_x5 *sphi_ir5*( 4.1057209603e-05)
+on_sep5*cphi_ir5*( 3.1206486088e-05)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh3.r5x = -5.6605739907e-05 ;
acbxh3.r5s = 3.1984027245e-05 ;
acbxh3.r5ox= 0.0000000000e+00 ;
acbxh3.r5os= 0.0000000000e+00 ;
acbxh3.r5 :=+on_x5 *cphi_ir5*( -5.6605739907e-05)
+on_sep5*sphi_ir5*( 3.1984027245e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv3.r5x = -5.6611102941e-05 ;
acbxv3.r5s = 3.1984279692e-05 ;
acbxv3.r5ox= 0.0000000000e+00 ;
acbxv3.r5os= 0.0000000000e+00 ;
acbxv3.r5 :=+on_x5 *sphi_ir5*( -5.6611102941e-05)
+on_sep5*cphi_ir5*( 3.1984279692e-05)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.l5b1x = -5.0230024657e-05 ;
acbrdh4.l5b1s = 9.9252430655e-06 ;
acbrdh4.l5b1ox= 0.0000000000e+00 ;
acbrdh4.l5b1os= 0.0000000000e+00 ;
acbrdh4.l5b1 :=+on_x5 *cphi_ir5*( -5.0230024657e-05)
+on_sep5*sphi_ir5*( 9.9252430655e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.l5b1x = -8.9465948799e-05 ;
acbrdv4.l5b1s = 1.4715451021e-06 ;
acbrdv4.l5b1ox= 0.0000000000e+00 ;
acbrdv4.l5b1os= 0.0000000000e+00 ;
acbrdv4.l5b1 :=+on_x5 *sphi_ir5*( -8.9465948799e-05)
+on_sep5*cphi_ir5*( 1.4715451021e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.l5b2x = 9.1743777735e-05 ;
acbrdh4.l5b2s = -1.5064508842e-06 ;
acbrdh4.l5b2ox= 0.0000000000e+00 ;
acbrdh4.l5b2os= 0.0000000000e+00 ;
acbrdh4.l5b2 :=+on_x5 *cphi_ir5*( 9.1743777735e-05)
+on_sep5*sphi_ir5*( -1.5064508842e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.l5b2x = 4.9198596302e-05 ;
acbrdv4.l5b2s = -9.7681072453e-06 ;
acbrdv4.l5b2ox= 0.0000000000e+00 ;
acbrdv4.l5b2os= 0.0000000000e+00 ;
acbrdv4.l5b2 :=+on_x5 *sphi_ir5*( 4.9198596302e-05)
+on_sep5*cphi_ir5*( -9.7681072453e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.r5b1x = 1.1274843266e-04 ;
acbrdh4.r5b1s = 1.4855389062e-06 ;
acbrdh4.r5b1ox= 0.0000000000e+00 ;
acbrdh4.r5b1os= 0.0000000000e+00 ;
acbrdh4.r5b1 :=+on_x5 *cphi_ir5*( 1.1274843266e-04)
+on_sep5*sphi_ir5*( 1.4855389062e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.r5b1x = 6.0274106504e-05 ;
acbrdv4.r5b1s = 1.1029812507e-05 ;
acbrdv4.r5b1ox= 0.0000000000e+00 ;
acbrdv4.r5b1os= 0.0000000000e+00 ;
acbrdv4.r5b1 :=+on_x5 *sphi_ir5*( 6.0274106504e-05)
+on_sep5*cphi_ir5*( 1.1029812507e-05)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.r5b2x = -6.1306983217e-05 ;
acbrdh4.r5b2s = -1.1156362448e-05 ;
acbrdh4.r5b2ox= 0.0000000000e+00 ;
acbrdh4.r5b2os= 0.0000000000e+00 ;
acbrdh4.r5b2 :=+on_x5 *cphi_ir5*( -6.1306983217e-05)
+on_sep5*sphi_ir5*( -1.1156362448e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.r5b2x = -1.1017347743e-04 ;
acbrdv4.r5b2s = -1.4543178957e-06 ;
acbrdv4.r5b2ox= 0.0000000000e+00 ;
acbrdv4.r5b2os= 0.0000000000e+00 ;
acbrdv4.r5b2 :=+on_x5 *sphi_ir5*( -1.1017347743e-04)
+on_sep5*cphi_ir5*( -1.4543178957e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs4.l5b1x = -5.0230024657e-05 ;
acbyhs4.l5b1s = 9.9252430655e-06 ;
acbyhs4.l5b1ox= 0.0000000000e+00 ;
acbyhs4.l5b1os= 0.0000000000e+00 ;
acbyhs4.l5b1 :=+on_x5 *cphi_ir5*( -5.0230024657e-05)
+on_sep5*sphi_ir5*( 9.9252430655e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs4.l5b1x = -8.9465948799e-05 ;
acbyvs4.l5b1s = 1.4715451021e-06 ;
acbyvs4.l5b1ox= 0.0000000000e+00 ;
acbyvs4.l5b1os= 0.0000000000e+00 ;
acbyvs4.l5b1 :=+on_x5 *sphi_ir5*( -8.9465948799e-05)
+on_sep5*cphi_ir5*( 1.4715451021e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs4.l5b2x = 9.1743777735e-05 ;
acbyhs4.l5b2s = -1.5064508842e-06 ;
acbyhs4.l5b2ox= 0.0000000000e+00 ;
acbyhs4.l5b2os= 0.0000000000e+00 ;
acbyhs4.l5b2 :=+on_x5 *cphi_ir5*( 9.1743777735e-05)
+on_sep5*sphi_ir5*( -1.5064508842e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs4.l5b2x = 4.9198596302e-05 ;
acbyvs4.l5b2s = -9.7681072453e-06 ;
acbyvs4.l5b2ox= 0.0000000000e+00 ;
acbyvs4.l5b2os= 0.0000000000e+00 ;
acbyvs4.l5b2 :=+on_x5 *sphi_ir5*( 4.9198596302e-05)
+on_sep5*cphi_ir5*( -9.7681072453e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs4.r5b1x = 1.1274843266e-04 ;
acbyhs4.r5b1s = 1.4855389062e-06 ;
acbyhs4.r5b1ox= 0.0000000000e+00 ;
acbyhs4.r5b1os= 0.0000000000e+00 ;
acbyhs4.r5b1 :=+on_x5 *cphi_ir5*( 1.1274843266e-04)
+on_sep5*sphi_ir5*( 1.4855389062e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs4.r5b1x = 6.0274106504e-05 ;
acbyvs4.r5b1s = 1.1029812507e-05 ;
acbyvs4.r5b1ox= 0.0000000000e+00 ;
acbyvs4.r5b1os= 0.0000000000e+00 ;
acbyvs4.r5b1 :=+on_x5 *sphi_ir5*( 6.0274106504e-05)
+on_sep5*cphi_ir5*( 1.1029812507e-05)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs4.r5b2x = -6.1306983217e-05 ;
acbyhs4.r5b2s = -1.1156362448e-05 ;
acbyhs4.r5b2ox= 0.0000000000e+00 ;
acbyhs4.r5b2os= 0.0000000000e+00 ;
acbyhs4.r5b2 :=+on_x5 *cphi_ir5*( -6.1306983217e-05)
+on_sep5*sphi_ir5*( -1.1156362448e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs4.r5b2x = -1.1017347743e-04 ;
acbyvs4.r5b2s = -1.4543178957e-06 ;
acbyvs4.r5b2ox= 0.0000000000e+00 ;
acbyvs4.r5b2os= 0.0000000000e+00 ;
acbyvs4.r5b2 :=+on_x5 *sphi_ir5*( -1.1017347743e-04)
+on_sep5*cphi_ir5*( -1.4543178957e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs5.l5b1x = -8.6174065291e-07 ;
acbyhs5.l5b1s = -6.0794653654e-06 ;
acbyhs5.l5b1ox= 0.0000000000e+00 ;
acbyhs5.l5b1os= 0.0000000000e+00 ;
acbyhs5.l5b1 :=+on_x5 *cphi_ir5*( -8.6174065291e-07)
+on_sep5*sphi_ir5*( -6.0794653654e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.l5b1x = 1.1621031978e-05 ;
acbyvs5.l5b1s = -5.7619842540e-07 ;
acbyvs5.l5b1ox= 0.0000000000e+00 ;
acbyvs5.l5b1os= 0.0000000000e+00 ;
acbyvs5.l5b1 :=+on_x5 *sphi_ir5*( 1.1621031978e-05)
+on_sep5*cphi_ir5*( -5.7619842540e-07)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs5.l5b2x = -1.5525568289e-05 ;
acbyhs5.l5b2s = 6.4378232649e-07 ;
acbyhs5.l5b2ox= 0.0000000000e+00 ;
acbyhs5.l5b2os= 0.0000000000e+00 ;
acbyhs5.l5b2 :=+on_x5 *cphi_ir5*( -1.5525568289e-05)
+on_sep5*sphi_ir5*( 6.4378232649e-07)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.l5b2x = 3.4973592647e-06 ;
acbyvs5.l5b2s = 5.4964890486e-06 ;
acbyvs5.l5b2ox= 0.0000000000e+00 ;
acbyvs5.l5b2os= 0.0000000000e+00 ;
acbyvs5.l5b2 :=+on_x5 *sphi_ir5*( 3.4973592647e-06)
+on_sep5*cphi_ir5*( 5.4964890486e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs5.r5b1x = -3.8576847202e-05 ;
acbyhs5.r5b1s = -7.8997141791e-07 ;
acbyhs5.r5b1ox= 0.0000000000e+00 ;
acbyhs5.r5b1os= 0.0000000000e+00 ;
acbyhs5.r5b1 :=+on_x5 *cphi_ir5*( -3.8576847202e-05)
+on_sep5*sphi_ir5*( -7.8997141791e-07)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.r5b1x = -1.4501116342e-05 ;
acbyvs5.r5b1s = -7.9696030211e-06 ;
acbyvs5.r5b1ox= 0.0000000000e+00 ;
acbyvs5.r5b1os= 0.0000000000e+00 ;
acbyvs5.r5b1 :=+on_x5 *sphi_ir5*( -1.4501116342e-05)
+on_sep5*cphi_ir5*( -7.9696030211e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs5.r5b2x = 1.8018446747e-05 ;
acbyhs5.r5b2s = 8.6915120365e-06 ;
acbyhs5.r5b2ox= 0.0000000000e+00 ;
acbyhs5.r5b2os= 0.0000000000e+00 ;
acbyhs5.r5b2 :=+on_x5 *cphi_ir5*( 1.8018446747e-05)
+on_sep5*sphi_ir5*( 8.6915120365e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.r5b2x = 3.3478595135e-05 ;
acbyvs5.r5b2s = 7.1901651877e-07 ;
acbyvs5.r5b2ox= 0.0000000000e+00 ;
acbyvs5.r5b2os= 0.0000000000e+00 ;
acbyvs5.r5b2 :=+on_x5 *sphi_ir5*( 3.3478595135e-05)
+on_sep5*cphi_ir5*( 7.1901651877e-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.7822154754e-06 ;
ahcrab_l5b2 = 2.5653816337e-06 ;
avcrab_l5b1 = 2.4167490382e-06 ;
avcrab_l5b2 = 1.6894884812e-06 ;
ahcrab_r5b1 = 2.5658214772e-06 ;
ahcrab_r5b2 = 1.7818808433e-06 ;
avcrab_r5b1 = 1.6894875625e-06 ;
avcrab_r5b2 = 2.4167497787e-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.5590153512e-03 ;
Kq4.R2B1 = 4.6536640776e-03 ;
Kq4.R2B2 = -5.0357734232e-03 ;
Kq5.L2B1 = 4.8267843830e-03 ;
Kq5.L2B2 = -4.0723820270e-03 ;
Kq5.R2B1 = -4.4405040936e-03 ;
Kq5.R2B2 = 4.5743209292e-03 ;
Kq6.L2B1 = -4.1135821703e-03 ;
Kq6.L2B2 = 4.0915808513e-03 ;
Kq6.R2B1 = 4.0011761371e-03 ;
Kq6.R2B2 = -3.9991856421e-03 ;
Kq7.L2B1 = 5.6595865916e-03 ;
Kq7.L2B2 = -6.5338025295e-03 ;
Kq7.R2B1 = -5.1325686440e-03 ;
Kq7.R2B2 = 5.8323860215e-03 ;
Kq8.L2B1 = -3.7108746479e-03 ;
Kq8.L2B2 = 6.3477301334e-03 ;
Kq8.R2B1 = 5.3565511834e-03 ;
Kq8.R2B2 = -4.1348577986e-03 ;
Kq9.L2B1 = 5.6776086459e-03 ;
Kq9.L2B2 = -6.7428561697e-03 ;
Kq9.R2B1 = -5.3666810583e-03 ;
Kq9.R2B2 = 6.0058822061e-03 ;
Kq10.L2B1 = -5.3982603571e-03 ;
Kq10.L2B2 = 7.2018068400e-03 ;
Kq10.R2B1 = 7.2601638414e-03 ;
Kq10.R2B2 = -5.3986965780e-03 ;
Kqtl11.L2B1 = 1.7989644756e-04 ;
Kqtl11.L2B2 = 2.6247103713e-03 ;
Kqtl11.R2B1 = -7.3427278222e-04 ;
Kqtl11.R2B2 = -8.3988745775e-06 ;
Kqt12.L2B1 = 3.4874965316e-03 ;
Kqt12.L2B2 = -5.0640944259e-03 ;
Kqt12.R2B1 = -2.0132157807e-03 ;
Kqt12.R2B2 = 4.1018592415e-03 ;
Kqt13.L2B1 = -3.7468717853e-03 ;
Kqt13.L2B2 = 5.0525211016e-03 ;
Kqt13.R2B1 = -8.8751065535e-04 ;
Kqt13.R2B2 = -1.6556334915e-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);