-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathopt_vdm30.madx
2210 lines (2178 loc) · 95.4 KB
/
opt_vdm30.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 = 30.000000 ;
bety_IP1 = 30.000000 ;
betx_IP5 = 30.000000 ;
bety_IP5 = 30.000000 ;
betx0_IP1 = 30.000000 ;
bety0_IP1 = 30.000000 ;
betx0_IP5 = 30.000000 ;
bety0_IP5 = 30.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.l1/l.mbrd ;
kd2.r1 := ad2.r1/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.9735907421e-03;
kqx2a.l1 = -5.7650583537e-03;
kqx2b.l1 = -5.7650583537e-03;
kqx3.l1 = -5.9515441006e-03;
kqx1.r1 = 5.9735907421e-03;
kqx2a.r1 = 5.7650583537e-03;
kqx2b.r1 = 5.7650583537e-03;
kqx3.r1 = 5.9515441006e-03;
Kq4.L1B1 = 3.1309838696e-03 ;
Kq4.L1B2 = -3.2015593125e-03 ;
Kq4.R1B1 = -2.9925985158e-03 ;
Kq4.R1B2 = 3.5681993591e-03 ;
Kq5.L1B1 = -7.7817752554e-03 ;
Kq5.L1B2 = 8.4800564070e-03 ;
Kq5.R1B1 = 7.7649678779e-03 ;
Kq5.R1B2 = -8.1794386171e-03 ;
Kq6.L1B1 = 6.4098401011e-03 ;
Kq6.L1B2 = -6.1680390542e-03 ;
Kq6.R1B1 = -6.0276891697e-03 ;
Kq6.R1B2 = 6.4300288052e-03 ;
Kq7.L1B1 = -4.7000978627e-03 ;
Kq7.L1B2 = 4.4186434946e-03 ;
Kq7.R1B1 = 4.6463182321e-03 ;
Kq7.R1B2 = -4.7898640812e-03 ;
Kq8.L1B1 = 6.2765418061e-03 ;
Kq8.L1B2 = -6.6221637730e-03 ;
Kq8.R1B1 = -6.7598194265e-03 ;
Kq8.R1B2 = 6.1931221037e-03 ;
Kq9.L1B1 = -8.3085810732e-03 ;
Kq9.L1B2 = 7.4881041569e-03 ;
Kq9.R1B1 = 7.6063661383e-03 ;
Kq9.R1B2 = -7.3192219954e-03 ;
Kq10.L1B1 = 7.3271345297e-03 ;
Kq10.L1B2 = -8.4501018880e-03 ;
Kq10.R1B1 = -8.0705008407e-03 ;
Kq10.R1B2 = 7.1862421685e-03 ;
Kqtl11.L1B1 = 5.7204720616e-05 ;
Kqtl11.L1B2 = 1.0926891161e-03 ;
Kqtl11.R1B1 = 5.8942926889e-04 ;
Kqtl11.R1B2 = 2.7455893041e-03 ;
Kqt12.L1B1 = -3.7539559887e-03 ;
Kqt12.L1B2 = -3.6007273869e-03 ;
Kqt12.R1B1 = 4.8919486559e-03 ;
Kqt12.R1B2 = -4.6370435868e-03 ;
Kqt13.L1B1 = 4.8340691374e-03 ;
Kqt13.L1B2 = 4.3754381802e-03 ;
Kqt13.R1B1 = 4.9479644425e-03 ;
Kqt13.R1B2 = 1.7161007190e-03 ;
!***IR1 X-scheme***
acbxh1.l1x = 5.1793245525e-05 ;
acbxh1.l1s = -1.5888468651e-06 ;
acbxh1.l1ox= 0.0000000000e+00 ;
acbxh1.l1os= 0.0000000000e+00 ;
acbxh1.l1 :=+on_x1 *cphi_ir1*( 5.1793245525e-05)
+on_sep1*sphi_ir1*( -1.5888468651e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv1.l1x = 5.1295207777e-05 ;
acbxv1.l1s = -1.6578974959e-06 ;
acbxv1.l1ox= 0.0000000000e+00 ;
acbxv1.l1os= 0.0000000000e+00 ;
acbxv1.l1 :=+on_x1 *sphi_ir1*( 5.1295207777e-05)
+on_sep1*cphi_ir1*( -1.6578974959e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh1.r1x = -5.1489949626e-05 ;
acbxh1.r1s = -1.6228617188e-06 ;
acbxh1.r1ox= 0.0000000000e+00 ;
acbxh1.r1os= 0.0000000000e+00 ;
acbxh1.r1 :=+on_x1 *cphi_ir1*( -5.1489949626e-05)
+on_sep1*sphi_ir1*( -1.6228617188e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv1.r1x = -5.0999026686e-05 ;
acbxv1.r1s = -1.6922450708e-06 ;
acbxv1.r1ox= 0.0000000000e+00 ;
acbxv1.r1os= 0.0000000000e+00 ;
acbxv1.r1 :=+on_x1 *sphi_ir1*( -5.0999026686e-05)
+on_sep1*cphi_ir1*( -1.6922450708e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh2.l1x = 5.1793245525e-05 ;
acbxh2.l1s = -1.5888468651e-06 ;
acbxh2.l1ox= 0.0000000000e+00 ;
acbxh2.l1os= 0.0000000000e+00 ;
acbxh2.l1 :=+on_x1 *cphi_ir1*( 5.1793245525e-05)
+on_sep1*sphi_ir1*( -1.5888468651e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv2.l1x = 5.1295207777e-05 ;
acbxv2.l1s = -1.6578974959e-06 ;
acbxv2.l1ox= 0.0000000000e+00 ;
acbxv2.l1os= 0.0000000000e+00 ;
acbxv2.l1 :=+on_x1 *sphi_ir1*( 5.1295207777e-05)
+on_sep1*cphi_ir1*( -1.6578974959e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh2.r1x = -5.1489949626e-05 ;
acbxh2.r1s = -1.6228617188e-06 ;
acbxh2.r1ox= 0.0000000000e+00 ;
acbxh2.r1os= 0.0000000000e+00 ;
acbxh2.r1 :=+on_x1 *cphi_ir1*( -5.1489949626e-05)
+on_sep1*sphi_ir1*( -1.6228617188e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv2.r1x = -5.0999026686e-05 ;
acbxv2.r1s = -1.6922450708e-06 ;
acbxv2.r1ox= 0.0000000000e+00 ;
acbxv2.r1os= 0.0000000000e+00 ;
acbxv2.r1 :=+on_x1 *sphi_ir1*( -5.0999026686e-05)
+on_sep1*cphi_ir1*( -1.6922450708e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh3.l1x = 6.8321175140e-06 ;
acbxh3.l1s = 1.6808827693e-05 ;
acbxh3.l1ox= 0.0000000000e+00 ;
acbxh3.l1os= 0.0000000000e+00 ;
acbxh3.l1 :=+on_x1 *cphi_ir1*( 6.8321175140e-06)
+on_sep1*sphi_ir1*( 1.6808827693e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv3.l1x = 9.5094422089e-06 ;
acbxv3.l1s = 1.6936060008e-05 ;
acbxv3.l1ox= 0.0000000000e+00 ;
acbxv3.l1os= 0.0000000000e+00 ;
acbxv3.l1 :=+on_x1 *sphi_ir1*( 9.5094422089e-06)
+on_sep1*cphi_ir1*( 1.6936060008e-05)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbxh3.r1x = -8.5757581936e-06 ;
acbxh3.r1s = 1.6870344420e-05 ;
acbxh3.r1ox= 0.0000000000e+00 ;
acbxh3.r1os= 0.0000000000e+00 ;
acbxh3.r1 :=+on_x1 *cphi_ir1*( -8.5757581936e-06)
+on_sep1*sphi_ir1*( 1.6870344420e-05)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbxv3.r1x = -1.1261676934e-05 ;
acbxv3.r1s = 1.6998068188e-05 ;
acbxv3.r1ox= 0.0000000000e+00 ;
acbxv3.r1os= 0.0000000000e+00 ;
acbxv3.r1 :=+on_x1 *sphi_ir1*( -1.1261676934e-05)
+on_sep1*cphi_ir1*( 1.6998068188e-05)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.l1b1x = -1.0481563136e-04 ;
acbrdh4.l1b1s = 7.2726729008e-06 ;
acbrdh4.l1b1ox= 0.0000000000e+00 ;
acbrdh4.l1b1os= 0.0000000000e+00 ;
acbrdh4.l1b1 :=+on_x1 *cphi_ir1*( -1.0481563136e-04)
+on_sep1*sphi_ir1*( 7.2726729008e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.l1b1x = -1.7721041216e-04 ;
acbrdv4.l1b1s = -1.5943396032e-06 ;
acbrdv4.l1b1ox= 0.0000000000e+00 ;
acbrdv4.l1b1os= 0.0000000000e+00 ;
acbrdv4.l1b1 :=+on_x1 *sphi_ir1*( -1.7721041216e-04)
+on_sep1*cphi_ir1*( -1.5943396032e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.l1b2x = 1.7899535178e-04 ;
acbrdh4.l1b2s = 1.5569859345e-06 ;
acbrdh4.l1b2ox= 0.0000000000e+00 ;
acbrdh4.l1b2os= 0.0000000000e+00 ;
acbrdh4.l1b2 :=+on_x1 *cphi_ir1*( 1.7899535178e-04)
+on_sep1*sphi_ir1*( 1.5569859345e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.l1b2x = 1.0449377982e-04 ;
acbrdv4.l1b2s = -7.1991883400e-06 ;
acbrdv4.l1b2ox= 0.0000000000e+00 ;
acbrdv4.l1b2os= 0.0000000000e+00 ;
acbrdv4.l1b2 :=+on_x1 *sphi_ir1*( 1.0449377982e-04)
+on_sep1*cphi_ir1*( -7.1991883400e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.r1b1x = 1.8258725517e-04 ;
acbrdh4.r1b1s = -1.6028851791e-06 ;
acbrdh4.r1b1ox= 0.0000000000e+00 ;
acbrdh4.r1b1os= 0.0000000000e+00 ;
acbrdh4.r1b1 :=+on_x1 *cphi_ir1*( 1.8258725517e-04)
+on_sep1*sphi_ir1*( -1.6028851791e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.r1b1x = 1.0649102408e-04 ;
acbrdv4.r1b1s = 7.3005769204e-06 ;
acbrdv4.r1b1ox= 0.0000000000e+00 ;
acbrdv4.r1b1os= 0.0000000000e+00 ;
acbrdv4.r1b1 :=+on_x1 *sphi_ir1*( 1.0649102408e-04)
+on_sep1*cphi_ir1*( 7.3005769204e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbrdh4.r1b2x = -1.0689077922e-04 ;
acbrdh4.r1b2s = -7.3008657740e-06 ;
acbrdh4.r1b2ox= 0.0000000000e+00 ;
acbrdh4.r1b2os= 0.0000000000e+00 ;
acbrdh4.r1b2 :=+on_x1 *cphi_ir1*( -1.0689077922e-04)
+on_sep1*sphi_ir1*( -7.3008657740e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbrdv4.r1b2x = -1.8096219909e-04 ;
acbrdv4.r1b2s = 1.6443494661e-06 ;
acbrdv4.r1b2ox= 0.0000000000e+00 ;
acbrdv4.r1b2os= 0.0000000000e+00 ;
acbrdv4.r1b2 :=+on_x1 *sphi_ir1*( -1.8096219909e-04)
+on_sep1*cphi_ir1*( 1.6443494661e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs4.l1b1x = 0.0000000000e+00 ;
acbyhs4.l1b1s = 0.0000000000e+00 ;
acbyhs4.l1b1ox= 0.0000000000e+00 ;
acbyhs4.l1b1os= 0.0000000000e+00 ;
acbyhs4.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);
acbyvs4.l1b1x = 0.0000000000e+00 ;
acbyvs4.l1b1s = 0.0000000000e+00 ;
acbyvs4.l1b1ox= 0.0000000000e+00 ;
acbyvs4.l1b1os= 0.0000000000e+00 ;
acbyvs4.l1b1 :=+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);
acbyhs4.l1b2x = 0.0000000000e+00 ;
acbyhs4.l1b2s = 0.0000000000e+00 ;
acbyhs4.l1b2ox= 0.0000000000e+00 ;
acbyhs4.l1b2os= 0.0000000000e+00 ;
acbyhs4.l1b2 :=+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);
acbyvs4.l1b2x = 0.0000000000e+00 ;
acbyvs4.l1b2s = 0.0000000000e+00 ;
acbyvs4.l1b2ox= 0.0000000000e+00 ;
acbyvs4.l1b2os= 0.0000000000e+00 ;
acbyvs4.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);
acbyhs4.r1b1x = 0.0000000000e+00 ;
acbyhs4.r1b1s = 0.0000000000e+00 ;
acbyhs4.r1b1ox= 0.0000000000e+00 ;
acbyhs4.r1b1os= 0.0000000000e+00 ;
acbyhs4.r1b1 :=+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);
acbyvs4.r1b1x = 0.0000000000e+00 ;
acbyvs4.r1b1s = 0.0000000000e+00 ;
acbyvs4.r1b1ox= 0.0000000000e+00 ;
acbyvs4.r1b1os= 0.0000000000e+00 ;
acbyvs4.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);
acbyhs4.r1b2x = 0.0000000000e+00 ;
acbyhs4.r1b2s = 0.0000000000e+00 ;
acbyhs4.r1b2ox= 0.0000000000e+00 ;
acbyhs4.r1b2os= 0.0000000000e+00 ;
acbyhs4.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);
acbyvs4.r1b2x = 0.0000000000e+00 ;
acbyvs4.r1b2s = 0.0000000000e+00 ;
acbyvs4.r1b2ox= 0.0000000000e+00 ;
acbyvs4.r1b2os= 0.0000000000e+00 ;
acbyvs4.r1b2 :=+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);
acbyhs5.l1b1x = -2.9610861676e-06 ;
acbyhs5.l1b1s = -2.1890347631e-06 ;
acbyhs5.l1b1ox= 0.0000000000e+00 ;
acbyhs5.l1b1os= 0.0000000000e+00 ;
acbyhs5.l1b1 :=+on_x1 *cphi_ir1*( -2.9610861676e-06)
+on_sep1*sphi_ir1*( -2.1890347631e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.l1b1x = 7.4806434358e-06 ;
acbyvs5.l1b1s = 2.0554618660e-07 ;
acbyvs5.l1b1ox= 0.0000000000e+00 ;
acbyvs5.l1b1os= 0.0000000000e+00 ;
acbyvs5.l1b1 :=+on_x1 *sphi_ir1*( 7.4806434358e-06)
+on_sep1*cphi_ir1*( 2.0554618660e-07)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs5.l1b2x = -1.0473036855e-05 ;
acbyhs5.l1b2s = -2.2456765426e-07 ;
acbyhs5.l1b2ox= 0.0000000000e+00 ;
acbyhs5.l1b2os= 0.0000000000e+00 ;
acbyhs5.l1b2 :=+on_x1 *cphi_ir1*( -1.0473036855e-05)
+on_sep1*sphi_ir1*( -2.2456765426e-07)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.l1b2x = 5.4688335449e-06 ;
acbyvs5.l1b2s = 2.0344369145e-06 ;
acbyvs5.l1b2ox= 0.0000000000e+00 ;
acbyvs5.l1b2os= 0.0000000000e+00 ;
acbyvs5.l1b2 :=+on_x1 *sphi_ir1*( 5.4688335449e-06)
+on_sep1*cphi_ir1*( 2.0344369145e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs5.r1b1x = -1.2277860072e-05 ;
acbyhs5.r1b1s = 2.4018088243e-07 ;
acbyhs5.r1b1ox= 0.0000000000e+00 ;
acbyhs5.r1b1os= 0.0000000000e+00 ;
acbyhs5.r1b1 :=+on_x1 *cphi_ir1*( -1.2277860072e-05)
+on_sep1*sphi_ir1*( 2.4018088243e-07)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.r1b1x = 3.9268573100e-06 ;
acbyvs5.r1b1s = -2.0846517978e-06 ;
acbyvs5.r1b1ox= 0.0000000000e+00 ;
acbyvs5.r1b1os= 0.0000000000e+00 ;
acbyvs5.r1b1 :=+on_x1 *sphi_ir1*( 3.9268573100e-06)
+on_sep1*cphi_ir1*( -2.0846517978e-06)
+on_ox1 *sphi_ir1*( 0.0000000000e+00)
+on_os1 *cphi_ir1*( 0.0000000000e+00);
acbyhs5.r1b2x = -1.4796849008e-06 ;
acbyhs5.r1b2s = 2.3280880865e-06 ;
acbyhs5.r1b2ox= 0.0000000000e+00 ;
acbyhs5.r1b2os= 0.0000000000e+00 ;
acbyhs5.r1b2 :=+on_x1 *cphi_ir1*( -1.4796849008e-06)
+on_sep1*sphi_ir1*( 2.3280880865e-06)
+on_ox1 *cphi_ir1*( 0.0000000000e+00)
+on_os1 *sphi_ir1*( 0.0000000000e+00);
acbyvs5.r1b2x = 8.9073011897e-06 ;
acbyvs5.r1b2s = -2.1317163597e-07 ;
acbyvs5.r1b2ox= 0.0000000000e+00 ;
acbyvs5.r1b2os= 0.0000000000e+00 ;
acbyvs5.r1b2 :=+on_x1 *sphi_ir1*( 8.9073011897e-06)
+on_sep1*cphi_ir1*( -2.1317163597e-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 = -8.8344323474e-06 ;
ahcrab_l1b2 = -1.1355755152e-05 ;
avcrab_l1b1 = -2.2876071282e-05 ;
avcrab_l1b2 = -1.8462220515e-05 ;
ahcrab_r1b1 = -1.1635379110e-05 ;
ahcrab_r1b2 = -8.6445115562e-06 ;
avcrab_r1b1 = -1.8561185819e-05 ;
avcrab_r1b2 = -2.2756364950e-05 ;
!***IR5 Optics***
kqx1.l5 = -5.9735907421e-03;
kqx2a.l5 = -5.7650583537e-03;
kqx2b.l5 = -5.7650583537e-03;
kqx3.l5 = -5.9515441006e-03;
kqx1.r5 = 5.9735907421e-03;
kqx2a.r5 = 5.7650583537e-03;
kqx2b.r5 = 5.7650583537e-03;
kqx3.r5 = 5.9515441006e-03;
Kq4.L5B1 = 3.1309838696e-03 ;
Kq4.L5B2 = -3.2015593125e-03 ;
Kq4.R5B1 = -2.9925985158e-03 ;
Kq4.R5B2 = 3.5681993591e-03 ;
Kq5.L5B1 = -7.7817752554e-03 ;
Kq5.L5B2 = 8.4800564070e-03 ;
Kq5.R5B1 = 7.7649678779e-03 ;
Kq5.R5B2 = -8.1794386171e-03 ;
Kq6.L5B1 = 6.4098401011e-03 ;
Kq6.L5B2 = -6.1680390542e-03 ;
Kq6.R5B1 = -6.0276891697e-03 ;
Kq6.R5B2 = 6.4300288052e-03 ;
Kq7.L5B1 = -4.7000978627e-03 ;
Kq7.L5B2 = 4.4186434946e-03 ;
Kq7.R5B1 = 4.6463182321e-03 ;
Kq7.R5B2 = -4.7898640812e-03 ;
Kq8.L5B1 = 6.2765418061e-03 ;
Kq8.L5B2 = -6.6221637730e-03 ;
Kq8.R5B1 = -6.7598194265e-03 ;
Kq8.R5B2 = 6.1931221037e-03 ;
Kq9.L5B1 = -8.3085810732e-03 ;
Kq9.L5B2 = 7.4881041569e-03 ;
Kq9.R5B1 = 7.6063661383e-03 ;
Kq9.R5B2 = -7.3192219954e-03 ;
Kq10.L5B1 = 7.3271345297e-03 ;
Kq10.L5B2 = -8.4501018880e-03 ;
Kq10.R5B1 = -8.0705008407e-03 ;
Kq10.R5B2 = 7.1862421685e-03 ;
Kqtl11.L5B1 = 5.7204720616e-05 ;
Kqtl11.L5B2 = 1.0926891161e-03 ;
Kqtl11.R5B1 = 5.8942926889e-04 ;
Kqtl11.R5B2 = 2.7455893041e-03 ;
Kqt12.L5B1 = -3.7539559887e-03 ;
Kqt12.L5B2 = -3.6007273869e-03 ;
Kqt12.R5B1 = 4.8919486559e-03 ;
Kqt12.R5B2 = -4.6370435868e-03 ;
Kqt13.L5B1 = 4.8340691374e-03 ;
Kqt13.L5B2 = 4.3754381802e-03 ;
Kqt13.R5B1 = 4.9479644425e-03 ;
Kqt13.R5B2 = 1.7161007190e-03 ;
!***IR5 X-scheme***
acbxh1.l5x = 5.1793245525e-05 ;
acbxh1.l5s = -1.5888468651e-06 ;
acbxh1.l5ox= 0.0000000000e+00 ;
acbxh1.l5os= 0.0000000000e+00 ;
acbxh1.l5 :=+on_x5 *cphi_ir5*( 5.1793245525e-05)
+on_sep5*sphi_ir5*( -1.5888468651e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv1.l5x = 5.1295207777e-05 ;
acbxv1.l5s = -1.6578974959e-06 ;
acbxv1.l5ox= 0.0000000000e+00 ;
acbxv1.l5os= 0.0000000000e+00 ;
acbxv1.l5 :=+on_x5 *sphi_ir5*( 5.1295207777e-05)
+on_sep5*cphi_ir5*( -1.6578974959e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh1.r5x = -5.1489949626e-05 ;
acbxh1.r5s = -1.6228617188e-06 ;
acbxh1.r5ox= 0.0000000000e+00 ;
acbxh1.r5os= 0.0000000000e+00 ;
acbxh1.r5 :=+on_x5 *cphi_ir5*( -5.1489949626e-05)
+on_sep5*sphi_ir5*( -1.6228617188e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv1.r5x = -5.0999026686e-05 ;
acbxv1.r5s = -1.6922450707e-06 ;
acbxv1.r5ox= 0.0000000000e+00 ;
acbxv1.r5os= 0.0000000000e+00 ;
acbxv1.r5 :=+on_x5 *sphi_ir5*( -5.0999026686e-05)
+on_sep5*cphi_ir5*( -1.6922450707e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh2.l5x = 5.1793245525e-05 ;
acbxh2.l5s = -1.5888468651e-06 ;
acbxh2.l5ox= 0.0000000000e+00 ;
acbxh2.l5os= 0.0000000000e+00 ;
acbxh2.l5 :=+on_x5 *cphi_ir5*( 5.1793245525e-05)
+on_sep5*sphi_ir5*( -1.5888468651e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv2.l5x = 5.1295207777e-05 ;
acbxv2.l5s = -1.6578974959e-06 ;
acbxv2.l5ox= 0.0000000000e+00 ;
acbxv2.l5os= 0.0000000000e+00 ;
acbxv2.l5 :=+on_x5 *sphi_ir5*( 5.1295207777e-05)
+on_sep5*cphi_ir5*( -1.6578974959e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh2.r5x = -5.1489949626e-05 ;
acbxh2.r5s = -1.6228617188e-06 ;
acbxh2.r5ox= 0.0000000000e+00 ;
acbxh2.r5os= 0.0000000000e+00 ;
acbxh2.r5 :=+on_x5 *cphi_ir5*( -5.1489949626e-05)
+on_sep5*sphi_ir5*( -1.6228617188e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv2.r5x = -5.0999026686e-05 ;
acbxv2.r5s = -1.6922450707e-06 ;
acbxv2.r5ox= 0.0000000000e+00 ;
acbxv2.r5os= 0.0000000000e+00 ;
acbxv2.r5 :=+on_x5 *sphi_ir5*( -5.0999026686e-05)
+on_sep5*cphi_ir5*( -1.6922450707e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh3.l5x = 6.8321175141e-06 ;
acbxh3.l5s = 1.6808827693e-05 ;
acbxh3.l5ox= 0.0000000000e+00 ;
acbxh3.l5os= 0.0000000000e+00 ;
acbxh3.l5 :=+on_x5 *cphi_ir5*( 6.8321175141e-06)
+on_sep5*sphi_ir5*( 1.6808827693e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv3.l5x = 9.5094422091e-06 ;
acbxv3.l5s = 1.6936060008e-05 ;
acbxv3.l5ox= 0.0000000000e+00 ;
acbxv3.l5os= 0.0000000000e+00 ;
acbxv3.l5 :=+on_x5 *sphi_ir5*( 9.5094422091e-06)
+on_sep5*cphi_ir5*( 1.6936060008e-05)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbxh3.r5x = -8.5757581937e-06 ;
acbxh3.r5s = 1.6870344420e-05 ;
acbxh3.r5ox= 0.0000000000e+00 ;
acbxh3.r5os= 0.0000000000e+00 ;
acbxh3.r5 :=+on_x5 *cphi_ir5*( -8.5757581937e-06)
+on_sep5*sphi_ir5*( 1.6870344420e-05)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbxv3.r5x = -1.1261676934e-05 ;
acbxv3.r5s = 1.6998068188e-05 ;
acbxv3.r5ox= 0.0000000000e+00 ;
acbxv3.r5os= 0.0000000000e+00 ;
acbxv3.r5 :=+on_x5 *sphi_ir5*( -1.1261676934e-05)
+on_sep5*cphi_ir5*( 1.6998068188e-05)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.l5b1x = -1.0481563136e-04 ;
acbrdh4.l5b1s = 7.2726729008e-06 ;
acbrdh4.l5b1ox= 0.0000000000e+00 ;
acbrdh4.l5b1os= 0.0000000000e+00 ;
acbrdh4.l5b1 :=+on_x5 *cphi_ir5*( -1.0481563136e-04)
+on_sep5*sphi_ir5*( 7.2726729008e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.l5b1x = -1.7721041216e-04 ;
acbrdv4.l5b1s = -1.5943396032e-06 ;
acbrdv4.l5b1ox= 0.0000000000e+00 ;
acbrdv4.l5b1os= 0.0000000000e+00 ;
acbrdv4.l5b1 :=+on_x5 *sphi_ir5*( -1.7721041216e-04)
+on_sep5*cphi_ir5*( -1.5943396032e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.l5b2x = 1.7899535178e-04 ;
acbrdh4.l5b2s = 1.5569859345e-06 ;
acbrdh4.l5b2ox= 0.0000000000e+00 ;
acbrdh4.l5b2os= 0.0000000000e+00 ;
acbrdh4.l5b2 :=+on_x5 *cphi_ir5*( 1.7899535178e-04)
+on_sep5*sphi_ir5*( 1.5569859345e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.l5b2x = 1.0449377982e-04 ;
acbrdv4.l5b2s = -7.1991883400e-06 ;
acbrdv4.l5b2ox= 0.0000000000e+00 ;
acbrdv4.l5b2os= 0.0000000000e+00 ;
acbrdv4.l5b2 :=+on_x5 *sphi_ir5*( 1.0449377982e-04)
+on_sep5*cphi_ir5*( -7.1991883400e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.r5b1x = 1.8258725517e-04 ;
acbrdh4.r5b1s = -1.6028851791e-06 ;
acbrdh4.r5b1ox= 0.0000000000e+00 ;
acbrdh4.r5b1os= 0.0000000000e+00 ;
acbrdh4.r5b1 :=+on_x5 *cphi_ir5*( 1.8258725517e-04)
+on_sep5*sphi_ir5*( -1.6028851791e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.r5b1x = 1.0649102408e-04 ;
acbrdv4.r5b1s = 7.3005769204e-06 ;
acbrdv4.r5b1ox= 0.0000000000e+00 ;
acbrdv4.r5b1os= 0.0000000000e+00 ;
acbrdv4.r5b1 :=+on_x5 *sphi_ir5*( 1.0649102408e-04)
+on_sep5*cphi_ir5*( 7.3005769204e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbrdh4.r5b2x = -1.0689077922e-04 ;
acbrdh4.r5b2s = -7.3008657740e-06 ;
acbrdh4.r5b2ox= 0.0000000000e+00 ;
acbrdh4.r5b2os= 0.0000000000e+00 ;
acbrdh4.r5b2 :=+on_x5 *cphi_ir5*( -1.0689077922e-04)
+on_sep5*sphi_ir5*( -7.3008657740e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbrdv4.r5b2x = -1.8096219909e-04 ;
acbrdv4.r5b2s = 1.6443494661e-06 ;
acbrdv4.r5b2ox= 0.0000000000e+00 ;
acbrdv4.r5b2os= 0.0000000000e+00 ;
acbrdv4.r5b2 :=+on_x5 *sphi_ir5*( -1.8096219909e-04)
+on_sep5*cphi_ir5*( 1.6443494661e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs4.l5b1x = 0.0000000000e+00 ;
acbyhs4.l5b1s = 0.0000000000e+00 ;
acbyhs4.l5b1ox= 0.0000000000e+00 ;
acbyhs4.l5b1os= 0.0000000000e+00 ;
acbyhs4.l5b1 :=+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);
acbyvs4.l5b1x = 0.0000000000e+00 ;
acbyvs4.l5b1s = 0.0000000000e+00 ;
acbyvs4.l5b1ox= 0.0000000000e+00 ;
acbyvs4.l5b1os= 0.0000000000e+00 ;
acbyvs4.l5b1 :=+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);
acbyhs4.l5b2x = 0.0000000000e+00 ;
acbyhs4.l5b2s = 0.0000000000e+00 ;
acbyhs4.l5b2ox= 0.0000000000e+00 ;
acbyhs4.l5b2os= 0.0000000000e+00 ;
acbyhs4.l5b2 :=+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);
acbyvs4.l5b2x = 0.0000000000e+00 ;
acbyvs4.l5b2s = 0.0000000000e+00 ;
acbyvs4.l5b2ox= 0.0000000000e+00 ;
acbyvs4.l5b2os= 0.0000000000e+00 ;
acbyvs4.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);
acbyhs4.r5b1x = 0.0000000000e+00 ;
acbyhs4.r5b1s = 0.0000000000e+00 ;
acbyhs4.r5b1ox= 0.0000000000e+00 ;
acbyhs4.r5b1os= 0.0000000000e+00 ;
acbyhs4.r5b1 :=+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);
acbyvs4.r5b1x = 0.0000000000e+00 ;
acbyvs4.r5b1s = 0.0000000000e+00 ;
acbyvs4.r5b1ox= 0.0000000000e+00 ;
acbyvs4.r5b1os= 0.0000000000e+00 ;
acbyvs4.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);
acbyhs4.r5b2x = 0.0000000000e+00 ;
acbyhs4.r5b2s = 0.0000000000e+00 ;
acbyhs4.r5b2ox= 0.0000000000e+00 ;
acbyhs4.r5b2os= 0.0000000000e+00 ;
acbyhs4.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);
acbyvs4.r5b2x = 0.0000000000e+00 ;
acbyvs4.r5b2s = 0.0000000000e+00 ;
acbyvs4.r5b2ox= 0.0000000000e+00 ;
acbyvs4.r5b2os= 0.0000000000e+00 ;
acbyvs4.r5b2 :=+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);
acbyhs5.l5b1x = -2.9610861676e-06 ;
acbyhs5.l5b1s = -2.1890347631e-06 ;
acbyhs5.l5b1ox= 0.0000000000e+00 ;
acbyhs5.l5b1os= 0.0000000000e+00 ;
acbyhs5.l5b1 :=+on_x5 *cphi_ir5*( -2.9610861676e-06)
+on_sep5*sphi_ir5*( -2.1890347631e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.l5b1x = 7.4806434358e-06 ;
acbyvs5.l5b1s = 2.0554618660e-07 ;
acbyvs5.l5b1ox= 0.0000000000e+00 ;
acbyvs5.l5b1os= 0.0000000000e+00 ;
acbyvs5.l5b1 :=+on_x5 *sphi_ir5*( 7.4806434358e-06)
+on_sep5*cphi_ir5*( 2.0554618660e-07)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs5.l5b2x = -1.0473036855e-05 ;
acbyhs5.l5b2s = -2.2456765426e-07 ;
acbyhs5.l5b2ox= 0.0000000000e+00 ;
acbyhs5.l5b2os= 0.0000000000e+00 ;
acbyhs5.l5b2 :=+on_x5 *cphi_ir5*( -1.0473036855e-05)
+on_sep5*sphi_ir5*( -2.2456765426e-07)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.l5b2x = 5.4688335448e-06 ;
acbyvs5.l5b2s = 2.0344369145e-06 ;
acbyvs5.l5b2ox= 0.0000000000e+00 ;
acbyvs5.l5b2os= 0.0000000000e+00 ;
acbyvs5.l5b2 :=+on_x5 *sphi_ir5*( 5.4688335448e-06)
+on_sep5*cphi_ir5*( 2.0344369145e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs5.r5b1x = -1.2277860072e-05 ;
acbyhs5.r5b1s = 2.4018088243e-07 ;
acbyhs5.r5b1ox= 0.0000000000e+00 ;
acbyhs5.r5b1os= 0.0000000000e+00 ;
acbyhs5.r5b1 :=+on_x5 *cphi_ir5*( -1.2277860072e-05)
+on_sep5*sphi_ir5*( 2.4018088243e-07)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.r5b1x = 3.9268573100e-06 ;
acbyvs5.r5b1s = -2.0846517978e-06 ;
acbyvs5.r5b1ox= 0.0000000000e+00 ;
acbyvs5.r5b1os= 0.0000000000e+00 ;
acbyvs5.r5b1 :=+on_x5 *sphi_ir5*( 3.9268573100e-06)
+on_sep5*cphi_ir5*( -2.0846517978e-06)
+on_ox5 *sphi_ir5*( 0.0000000000e+00)
+on_os5 *cphi_ir5*( 0.0000000000e+00);
acbyhs5.r5b2x = -1.4796849008e-06 ;
acbyhs5.r5b2s = 2.3280880865e-06 ;
acbyhs5.r5b2ox= 0.0000000000e+00 ;
acbyhs5.r5b2os= 0.0000000000e+00 ;
acbyhs5.r5b2 :=+on_x5 *cphi_ir5*( -1.4796849008e-06)
+on_sep5*sphi_ir5*( 2.3280880865e-06)
+on_ox5 *cphi_ir5*( 0.0000000000e+00)
+on_os5 *sphi_ir5*( 0.0000000000e+00);
acbyvs5.r5b2x = 8.9073011897e-06 ;
acbyvs5.r5b2s = -2.1317163597e-07 ;
acbyvs5.r5b2ox= 0.0000000000e+00 ;
acbyvs5.r5b2os= 0.0000000000e+00 ;
acbyvs5.r5b2 :=+on_x5 *sphi_ir5*( 8.9073011897e-06)
+on_sep5*cphi_ir5*( -2.1317163597e-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 = -8.5628279808e-06 ;
ahcrab_l5b2 = -1.1106499383e-05 ;
avcrab_l5b1 = -2.2900080410e-05 ;
avcrab_l5b2 = -1.8552321360e-05 ;
ahcrab_r5b1 = -1.1251520729e-05 ;
ahcrab_r5b2 = -8.4780312256e-06 ;
avcrab_r5b1 = -1.8575294670e-05 ;
avcrab_r5b2 = -2.2865549241e-05 ;
!***IR2 Optics***
kqx.l2 = 9.2081428556e-03;
ktqx1.l2 = 0.0000000000e+00;
ktqx2.l2 = 0.0000000000e+00;
kqx.r2 = -9.2081428556e-03;
ktqx1.r2 = 0.0000000000e+00;
ktqx2.r2 = 0.0000000000e+00;
Kq4.L2B1 = -3.4541609915e-03 ;
Kq4.L2B2 = 4.7272468818e-03 ;
Kq4.R2B1 = 4.7883878197e-03 ;
Kq4.R2B2 = -3.5033919591e-03 ;
Kq5.L2B1 = 3.8555182176e-03 ;
Kq5.L2B2 = -3.7129138206e-03 ;
Kq5.R2B1 = -4.2149872948e-03 ;
Kq5.R2B2 = 3.8377943715e-03 ;
Kq6.L2B1 = -3.7391248997e-03 ;
Kq6.L2B2 = 3.2456614732e-03 ;
Kq6.R2B1 = 3.2765811174e-03 ;
Kq6.R2B2 = -3.7120160142e-03 ;
Kq7.L2B1 = 5.4534364829e-03 ;
Kq7.L2B2 = -5.4211904292e-03 ;
Kq7.R2B1 = -4.6309990030e-03 ;
Kq7.R2B2 = 5.4111356060e-03 ;
Kq8.L2B1 = -4.5870141225e-03 ;
Kq8.L2B2 = 7.5802903180e-03 ;
Kq8.R2B1 = 7.0628538954e-03 ;
Kq8.R2B2 = -4.8215733274e-03 ;
Kq9.L2B1 = 7.0358509122e-03 ;
Kq9.L2B2 = -8.3479144688e-03 ;
Kq9.R2B1 = -7.1093630639e-03 ;
Kq9.R2B2 = 7.1030174486e-03 ;
Kq10.L2B1 = -7.0632255233e-03 ;
Kq10.L2B2 = 7.4486545091e-03 ;
Kq10.R2B1 = 7.4820145872e-03 ;
Kq10.R2B2 = -7.2431501916e-03 ;
Kqtl11.L2B1 = 7.0716833821e-04 ;
Kqtl11.L2B2 = 2.1197538762e-04 ;
Kqtl11.R2B1 = -1.8450598847e-03 ;
Kqtl11.R2B2 = 6.6344230680e-04 ;
Kqt12.L2B1 = 4.4212289722e-03 ;
Kqt12.L2B2 = -5.1374069306e-03 ;
Kqt12.R2B1 = -2.6989651903e-03 ;
Kqt12.R2B2 = 4.2130017410e-03 ;
Kqt13.L2B1 = 2.4643595018e-03 ;
Kqt13.L2B2 = 4.2142807190e-03 ;
Kqt13.R2B1 = -1.0924772640e-03 ;
Kqt13.R2B2 = 2.8269108600e-03 ;
!***IR2 X-scheme***
acbxh1.l2x = 0.0000000000e+00 ;
acbxh1.l2s = 1.7200000000e-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.7200000000e-05)
+on_ox2 *cphi_ir2*( 0.0000000000e+00)
+on_os2 *sphi_ir2*( 0.0000000000e+00);
acbxv1.l2x = 5.7000000000e-06 ;
acbxv1.l2s = 0.0000000000e+00 ;
acbxv1.l2ox= 0.0000000000e+00 ;
acbxv1.l2os= 0.0000000000e+00 ;
acbxv1.l2 :=+on_x2 *sphi_ir2*( 5.7000000000e-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.7200000000e-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.7200000000e-05)
+on_ox2 *cphi_ir2*( 0.0000000000e+00)
+on_os2 *sphi_ir2*( 0.0000000000e+00);
acbxv1.r2x = -5.7000000000e-06 ;
acbxv1.r2s = 0.0000000000e+00 ;
acbxv1.r2ox= 0.0000000000e+00 ;
acbxv1.r2os= 0.0000000000e+00 ;
acbxv1.r2 :=+on_x2 *sphi_ir2*( -5.7000000000e-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.7200000000e-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.7200000000e-05)
+on_ox2 *cphi_ir2*( 0.0000000000e+00)
+on_os2 *sphi_ir2*( 0.0000000000e+00);
acbxv2.l2x = 5.7000000000e-06 ;
acbxv2.l2s = 0.0000000000e+00 ;
acbxv2.l2ox= 0.0000000000e+00 ;
acbxv2.l2os= 0.0000000000e+00 ;
acbxv2.l2 :=+on_x2 *sphi_ir2*( 5.7000000000e-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.7200000000e-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.7200000000e-05)
+on_ox2 *cphi_ir2*( 0.0000000000e+00)
+on_os2 *sphi_ir2*( 0.0000000000e+00);
acbxv2.r2x = -5.7000000000e-06 ;
acbxv2.r2s = 0.0000000000e+00 ;
acbxv2.r2ox= 0.0000000000e+00 ;
acbxv2.r2os= 0.0000000000e+00 ;
acbxv2.r2 :=+on_x2 *sphi_ir2*( -5.7000000000e-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.7200000000e-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.7200000000e-05)
+on_ox2 *cphi_ir2*( 0.0000000000e+00)
+on_os2 *sphi_ir2*( 0.0000000000e+00);
acbxv3.l2x = 5.7000000000e-06 ;
acbxv3.l2s = 0.0000000000e+00 ;
acbxv3.l2ox= 0.0000000000e+00 ;
acbxv3.l2os= 0.0000000000e+00 ;
acbxv3.l2 :=+on_x2 *sphi_ir2*( 5.7000000000e-06)
+on_sep2*cphi_ir2*( 0.0000000000e+00)
+on_ox2 *sphi_ir2*( 0.0000000000e+00)
+on_os2 *cphi_ir2*( 0.0000000000e+00);