ARC_SQUEEZE := 1.0 ; !***LAYOUT*** l.MQXL := 7.6850000000 ; l.MQX := 6.5770000000 ; dq1q2a := 3.5600000000 ; dq2aq2b := 1.9150000000 ; dq2bq3 := 3.5600000000 ; deltaposD2 := -15.0000000000 ; deltaposQ4 := 0.0000000000 ; deltaposQ5 := 11.0000000000 ; deltaposQ6 := 0.0000000000 ; on_cutMS.10 := 0 ; on_cutMS.14 := 0 ; is_thin := 1 ; !***BETAS in IR1 and IR5*** betx_IP1 := 0.150000 ; bety_IP1 := 0.150000 ; betx_IP5 := 0.150000 ; bety_IP5 := 0.150000 ; betx0_IP1 := 0.400000 ; bety0_IP1 := 0.400000 ; betx0_IP5 := 0.400000 ; bety0_IP5 := 0.400000 ; !***Exp. configuration in IR1, IR2, IR5 and IR8*** on_sep1:=0;on_x1:=0;phi_IR1 := 90.000; on_sol_atlas:=0;on_crab1:=0; on_sep5:=0;on_x5:=0;phi_IR5 := 0.000; on_sol_cms :=0;on_crab5:=0; on_sep2:=0;on_x2:=0;on_alice:=0;on_sol_alice:=0; on_sep8:=0;on_x8:=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 ; !***Ring Geometry*** !Separation/recombination dipoles kd1.lr1 := ad1.lr1/l.mbxa; 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.mbxa; 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 := -0.639466081577E-02 ; KQX2a.L1 := -0.642025963502E-02 ; KQX2b.L1 := -0.642025963502E-02 ; KQX3.L1 := -0.642025963502E-02 ; KQX1.R1 := -KQX1.L1 ; KQX2a.R1 := -KQX2a.L1 ; KQX2b.R1 := -KQX2b.L1 ; KQX3.R1 := -KQX3.L1 ; !Beam1 KQ4.L1B1 := 0.159333627095E-02 ; KQ4.R1B1 := -0.159333627095E-02 ; KQ5.L1B1 := -0.140819111967E-02 ; KQ5.R1B1 := 0.140819111967E-02 ; KQ6.L1B1 := 0.123903769077E-02 ; KQ6.R1B1 := -0.152950155489E-02 ; KQ7.L1B1 := -0.854821623450E-02 ; KQ7.R1B1 := 0.854863095419E-02 ; KQ8.L1B1 := 0.804093039118E-02 ; KQ8.R1B1 := -0.742569787654E-02 ; KQ9.L1B1 := -0.683253663278E-02 ; KQ9.R1B1 := 0.651032022551E-02 ; KQ10.L1B1 := 0.707783746637E-02 ; KQ10.R1B1 := -0.678664783616E-02 ; KQTL11.L1B1 := 0.725848427905E-03 ; KQTL11.R1B1 := -0.384126254587E-03 ; KQT12.L1B1 := -0.106584738856E-02 ; KQT12.R1B1 := -0.333865472705E-02 ; KQT13.L1B1 := 0.491012498038E-02 ; KQT13.R1B1 := -0.980911958110E-03 ; !Beam2 KQ4.L1B2 := -0.151649502584E-02 ; KQ4.R1B2 := 0.151649502584E-02 ; KQ5.L1B2 := 0.123476543742E-02 ; KQ5.R1B2 := -0.123476543742E-02 ; KQ6.L1B2 := -0.161895657997E-02 ; KQ6.R1B2 := 0.123465110923E-02 ; KQ7.L1B2 := 0.852830818362E-02 ; KQ7.R1B2 := -0.849231912805E-02 ; KQ8.L1B2 := -0.846398847822E-02 ; KQ8.R1B2 := 0.793612378380E-02 ; KQ9.L1B2 := 0.658482660784E-02 ; KQ9.R1B2 := -0.671890509241E-02 ; KQ10.L1B2 := -0.646097354635E-02 ; KQ10.R1B2 := 0.712085256215E-02 ; KQTL11.L1B2 := -0.104155911169E-02 ; KQTL11.R1B2 := 0.403762858544E-03 ; KQT12.L1B2 := 0.498577079249E-02 ; KQT12.R1B2 := -0.132306141929E-02 ; KQT13.L1B2 := -0.209691095773E-02 ; KQT13.R1B2 := 0.337029509419E-02 ; !***IR1 X-scheme*** ACBXV1.L1x := 0.858260669076E-06 ; ACBXV1.L1s := 0.700022853706E-05 ; ACBXV1.L1 := ( 0.858260669076E-06 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.700022853706E-05 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBXV1.R1x := -0.858260669086E-06 ; ACBXV1.R1s := 0.700022853706E-05 ; ACBXV1.R1 := ( -0.858260669086E-06 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.700022853706E-05 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBXH1.L1x := -0.106782893707E-05 ; ACBXH1.L1s := 0.691508389367E-05 ; ACBXH1.L1 := ( -0.106782893707E-05 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.691508389367E-05 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBXH1.R1x := 0.106782893706E-05 ; ACBXH1.R1s := 0.691508389367E-05 ; ACBXH1.R1 := ( 0.106782893706E-05 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.691508389367E-05 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBXV2.L1x := 0.000000000000E+00 ; ACBXV2.L1s := 0.000000000000E+00 ; ACBXV2.L1 := ( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBXV2.R1x := 0.000000000000E+00 ; ACBXV2.R1s := 0.000000000000E+00 ; ACBXV2.R1 := ( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBXH2.L1x := 0.000000000000E+00 ; ACBXH2.L1s := 0.000000000000E+00 ; ACBXH2.L1 := ( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBXH2.R1x := 0.000000000000E+00 ; ACBXH2.R1s := 0.000000000000E+00 ; ACBXH2.R1 := ( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBXV3.L1x := 0.783538170720E-04 ; ACBXV3.L1s := 0.927710073258E-05 ; ACBXV3.L1 := ( 0.783538170720E-04 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.927710073258E-05 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBXV3.R1x := -0.783538170720E-04 ; ACBXV3.R1s := 0.927710073258E-05 ; ACBXV3.R1 := ( -0.783538170720E-04 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.927710073258E-05 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBXH3.L1x := 0.835625777749E-04 ; ACBXH3.L1s := 0.925810425986E-05 ; ACBXH3.L1 := ( 0.835625777749E-04 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.925810425986E-05 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBXH3.R1x := -0.835625777750E-04 ; ACBXH3.R1s := 0.925810425986E-05 ; ACBXH3.R1 := ( -0.835625777750E-04 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.925810425986E-05 )*sin(phi_IR1*twopi/360.)*on_sep1 ; !Beam1 ACBRDV4.L1B1x := -0.177359972038E-03 ; ACBRDV4.L1B1s := 0.344572103629E-05 ; ACBRDV4.L1B1 := ( -0.177359972038E-03 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.344572103629E-05 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBRDV4.R1B1x := 0.112764069162E-03 ; ACBRDV4.R1B1s := 0.630124505701E-05 ; ACBRDV4.R1B1 := ( 0.112764069162E-03 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.630124505701E-05 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBYVS4.L1B1x := 0.000000000000E+00 ; ACBYVS4.L1B1s := 0.000000000000E+00 ; ACBYVS4.L1B1 := ( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBYVS4.R1B1x := 0.000000000000E+00 ; ACBYVS4.R1B1s := 0.000000000000E+00 ; ACBYVS4.R1B1 := ( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBCV5.L1B1x := 0.000000000000E+00 ; ACBCV5.L1B1s := 0.000000000000E+00 ; ACBCV5.L1B1 := ( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBCV6.R1B1x := 0.000000000000E+00 ; ACBCV6.R1B1s := 0.000000000000E+00 ; ACBCV6.R1B1 := ( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBRDH4.L1B1x := -0.115761937421E-03 ; ACBRDH4.L1B1s := 0.641824901537E-05 ; ACBRDH4.L1B1 := ( -0.115761937421E-03 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.641824901537E-05 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBRDH4.R1B1x := 0.182083784286E-03 ; ACBRDH4.R1B1s := 0.348642798025E-05 ; ACBRDH4.R1B1 := ( 0.182083784286E-03 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.348642798025E-05 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBYHS4.L1B1x := 0.000000000000E+00 ; ACBYHS4.L1B1s := 0.000000000000E+00 ; ACBYHS4.L1B1 := ( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBYHS4.R1B1x := 0.000000000000E+00 ; ACBYHS4.R1B1s := 0.000000000000E+00 ; ACBYHS4.R1B1 := ( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBCH6.L1B1x := 0.000000000000E+00 ; ACBCH6.L1B1s := 0.000000000000E+00 ; ACBCH6.L1B1 := ( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBCH5.R1B1x := 0.000000000000E+00 ; ACBCH5.R1B1s := 0.000000000000E+00 ; ACBCH5.R1B1 := ( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1 ; !Beam2 ACBRDV4.L1B2x := -0.112764069162E-03 ; ACBRDV4.L1B2s := 0.630124505701E-05 ; ACBRDV4.L1B2 := ( -0.112764069162E-03 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.630124505701E-05 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBRDV4.R1B2x := 0.177359972038E-03 ; ACBRDV4.R1B2s := 0.344572103629E-05 ; ACBRDV4.R1B2 := ( 0.177359972038E-03 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.344572103629E-05 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBYVS4.L1B2x := 0.000000000000E+00 ; ACBYVS4.L1B2s := 0.000000000000E+00 ; ACBYVS4.L1B2 := ( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBYVS4.R1B2x := 0.000000000000E+00 ; ACBYVS4.R1B2s := 0.000000000000E+00 ; ACBYVS4.R1B2 := ( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBCV6.L1B2x := 0.000000000000E+00 ; ACBCV6.L1B2s := 0.000000000000E+00 ; ACBCV6.L1B2 := ( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBCV5.R1B2x := 0.000000000000E+00 ; ACBCV5.R1B2s := 0.000000000000E+00 ; ACBCV5.R1B2 := ( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBRDH4.L1B2x := -0.182083784286E-03 ; ACBRDH4.L1B2s := 0.348642798025E-05 ; ACBRDH4.L1B2 := ( -0.182083784286E-03 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.348642798025E-05 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBRDH4.R1B2x := 0.115761937421E-03 ; ACBRDH4.R1B2s := 0.641824901537E-05 ; ACBRDH4.R1B2 := ( 0.115761937421E-03 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.641824901537E-05 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBYHS4.L1B2x := 0.000000000000E+00 ; ACBYHS4.L1B2s := 0.000000000000E+00 ; ACBYHS4.L1B2 := ( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBYHS4.R1B2x := 0.000000000000E+00 ; ACBYHS4.R1B2s := 0.000000000000E+00 ; ACBYHS4.R1B2 := ( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBCH5.L1B2x := 0.000000000000E+00 ; ACBCH5.L1B2s := 0.000000000000E+00 ; ACBCH5.L1B2 := ( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBCH6.R1B2x := 0.000000000000E+00 ; ACBCH6.R1B2s := 0.000000000000E+00 ; ACBCH6.R1B2 := ( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1 ; !***CRAB CAVITIES in IR1*** AHCRAB_L1B1 := 0.163683726108E-05 ; AHCRAB_R1B1 := 0.178071707702E-05 ; AHCRAB_L1B2 := 0.178071702507E-05 ; AHCRAB_R1B2 := 0.163683669591E-05 ; AVCRAB_L1B1 := 0.174521588265E-05 ; AVCRAB_R1B1 := 0.164493006565E-05 ; AVCRAB_L1B2 := 0.164493006657E-05 ; AVCRAB_R1B2 := 0.174521587924E-05 ; !***IR5 Optics*** KQX1.L5 := -0.639466081577E-02 ; KQX2a.L5 := -0.642025963502E-02 ; KQX2b.L5 := -0.642025963502E-02 ; KQX3.L5 := -0.642025963502E-02 ; KQX1.R5 := -KQX1.L5 ; KQX2a.R5 := -KQX2a.L5 ; KQX2b.R5 := -KQX2b.L5 ; KQX3.R5 := -KQX3.L5 ; !Beam1 KQ4.L5B1 := 0.159333627095E-02 ; KQ4.R5B1 := -0.159333627095E-02 ; KQ5.L5B1 := -0.140819111967E-02 ; KQ5.R5B1 := 0.140819111967E-02 ; KQ6.L5B1 := 0.123903769077E-02 ; KQ6.R5B1 := -0.152950155489E-02 ; KQ7.L5B1 := -0.854821623450E-02 ; KQ7.R5B1 := 0.854863095419E-02 ; KQ8.L5B1 := 0.804093039118E-02 ; KQ8.R5B1 := -0.742569787654E-02 ; KQ9.L5B1 := -0.683253663278E-02 ; KQ9.R5B1 := 0.651032022551E-02 ; KQ10.L5B1 := 0.707783746637E-02 ; KQ10.R5B1 := -0.678664783616E-02 ; KQTL11.L5B1 := 0.725848427905E-03 ; KQTL11.R5B1 := -0.384126254587E-03 ; KQT12.L5B1 := -0.106584738856E-02 ; KQT12.R5B1 := -0.333865472705E-02 ; KQT13.L5B1 := 0.491012498038E-02 ; KQT13.R5B1 := -0.980911958110E-03 ; !Beam2 KQ4.L5B2 := -0.151649502584E-02 ; KQ4.R5B2 := 0.151649502584E-02 ; KQ5.L5B2 := 0.123476543742E-02 ; KQ5.R5B2 := -0.123476543742E-02 ; KQ6.L5B2 := -0.161895657997E-02 ; KQ6.R5B2 := 0.123465110923E-02 ; KQ7.L5B2 := 0.852830818362E-02 ; KQ7.R5B2 := -0.849231912805E-02 ; KQ8.L5B2 := -0.846398847822E-02 ; KQ8.R5B2 := 0.793612378380E-02 ; KQ9.L5B2 := 0.658482660784E-02 ; KQ9.R5B2 := -0.671890509241E-02 ; KQ10.L5B2 := -0.646097354635E-02 ; KQ10.R5B2 := 0.712085256215E-02 ; KQTL11.L5B2 := -0.104155911169E-02 ; KQTL11.R5B2 := 0.403762858544E-03 ; KQT12.L5B2 := 0.498577079249E-02 ; KQT12.R5B2 := -0.132306141929E-02 ; KQT13.L5B2 := -0.209691095773E-02 ; KQT13.R5B2 := 0.337029509419E-02 ; !***IR5 X-scheme*** ACBXV1.L5x := 0.858260665827E-06 ; ACBXV1.L5s := 0.700022853709E-05 ; ACBXV1.L5 := ( 0.858260665827E-06 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.700022853709E-05 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBXV1.R5x := -0.858260665700E-06 ; ACBXV1.R5s := 0.700022853710E-05 ; ACBXV1.R5 := ( -0.858260665700E-06 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.700022853710E-05 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBXH1.L5x := -0.106782893380E-05 ; ACBXH1.L5s := 0.691508389364E-05 ; ACBXH1.L5 := ( -0.106782893380E-05 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.691508389364E-05 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBXH1.R5x := 0.106782893393E-05 ; ACBXH1.R5s := 0.691508389365E-05 ; ACBXH1.R5 := ( 0.106782893393E-05 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.691508389365E-05 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBXV2.L5x := 0.000000000000E+00 ; ACBXV2.L5s := 0.000000000000E+00 ; ACBXV2.L5 := ( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBXV2.R5x := 0.000000000000E+00 ; ACBXV2.R5s := 0.000000000000E+00 ; ACBXV2.R5 := ( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBXH2.L5x := 0.000000000000E+00 ; ACBXH2.L5s := 0.000000000000E+00 ; ACBXH2.L5 := ( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBXH2.R5x := 0.000000000000E+00 ; ACBXH2.R5s := 0.000000000000E+00 ; ACBXH2.R5 := ( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBXV3.L5x := 0.783538170751E-04 ; ACBXV3.L5s := 0.927710073261E-05 ; ACBXV3.L5 := ( 0.783538170751E-04 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.927710073261E-05 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBXV3.R5x := -0.783538170752E-04 ; ACBXV3.R5s := 0.927710073261E-05 ; ACBXV3.R5 := ( -0.783538170752E-04 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.927710073261E-05 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBXH3.L5x := 0.835625777719E-04 ; ACBXH3.L5s := 0.925810425983E-05 ; ACBXH3.L5 := ( 0.835625777719E-04 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.925810425983E-05 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBXH3.R5x := -0.835625777719E-04 ; ACBXH3.R5s := 0.925810425983E-05 ; ACBXH3.R5 := ( -0.835625777719E-04 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.925810425983E-05 )*sin(phi_IR5*twopi/360.)*on_sep5 ; !Beam1 ACBRDV4.L5B1x := -0.177359972039E-03 ; ACBRDV4.L5B1s := 0.344572103624E-05 ; ACBRDV4.L5B1 := ( -0.177359972039E-03 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.344572103624E-05 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBRDV4.R5B1x := 0.112764069164E-03 ; ACBRDV4.R5B1s := 0.630124505705E-05 ; ACBRDV4.R5B1 := ( 0.112764069164E-03 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.630124505705E-05 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBYVS4.L5B1x := 0.000000000000E+00 ; ACBYVS4.L5B1s := 0.000000000000E+00 ; ACBYVS4.L5B1 := ( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBYVS4.R5B1x := 0.000000000000E+00 ; ACBYVS4.R5B1s := 0.000000000000E+00 ; ACBYVS4.R5B1 := ( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBCV5.L5B1x := 0.000000000000E+00 ; ACBCV5.L5B1s := 0.000000000000E+00 ; ACBCV5.L5B1 := ( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBCV6.R5B1x := 0.000000000000E+00 ; ACBCV6.R5B1s := 0.000000000000E+00 ; ACBCV6.R5B1 := ( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBRDH4.L5B1x := -0.115761937420E-03 ; ACBRDH4.L5B1s := 0.641824901534E-05 ; ACBRDH4.L5B1 := ( -0.115761937420E-03 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.641824901534E-05 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBRDH4.R5B1x := 0.182083784285E-03 ; ACBRDH4.R5B1s := 0.348642798031E-05 ; ACBRDH4.R5B1 := ( 0.182083784285E-03 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.348642798031E-05 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBYHS4.L5B1x := 0.000000000000E+00 ; ACBYHS4.L5B1s := 0.000000000000E+00 ; ACBYHS4.L5B1 := ( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBYHS4.R5B1x := 0.000000000000E+00 ; ACBYHS4.R5B1s := 0.000000000000E+00 ; ACBYHS4.R5B1 := ( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBCH6.L5B1x := 0.000000000000E+00 ; ACBCH6.L5B1s := 0.000000000000E+00 ; ACBCH6.L5B1 := ( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBCH5.R5B1x := 0.000000000000E+00 ; ACBCH5.R5B1s := 0.000000000000E+00 ; ACBCH5.R5B1 := ( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5 ; !Beam2 ACBRDV4.L5B2x := -0.112764069163E-03 ; ACBRDV4.L5B2s := 0.630124505705E-05 ; ACBRDV4.L5B2 := ( -0.112764069163E-03 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.630124505705E-05 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBRDV4.R5B2x := 0.177359972039E-03 ; ACBRDV4.R5B2s := 0.344572103623E-05 ; ACBRDV4.R5B2 := ( 0.177359972039E-03 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.344572103623E-05 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBYVS4.L5B2x := 0.000000000000E+00 ; ACBYVS4.L5B2s := 0.000000000000E+00 ; ACBYVS4.L5B2 := ( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBYVS4.R5B2x := 0.000000000000E+00 ; ACBYVS4.R5B2s := 0.000000000000E+00 ; ACBYVS4.R5B2 := ( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBCV6.L5B2x := 0.000000000000E+00 ; ACBCV6.L5B2s := 0.000000000000E+00 ; ACBCV6.L5B2 := ( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBCV5.R5B2x := 0.000000000000E+00 ; ACBCV5.R5B2s := 0.000000000000E+00 ; ACBCV5.R5B2 := ( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBRDH4.L5B2x := -0.182083784285E-03 ; ACBRDH4.L5B2s := 0.348642798031E-05 ; ACBRDH4.L5B2 := ( -0.182083784285E-03 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.348642798031E-05 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBRDH4.R5B2x := 0.115761937420E-03 ; ACBRDH4.R5B2s := 0.641824901534E-05 ; ACBRDH4.R5B2 := ( 0.115761937420E-03 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.641824901534E-05 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBYHS4.L5B2x := 0.000000000000E+00 ; ACBYHS4.L5B2s := 0.000000000000E+00 ; ACBYHS4.L5B2 := ( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBYHS4.R5B2x := 0.000000000000E+00 ; ACBYHS4.R5B2s := 0.000000000000E+00 ; ACBYHS4.R5B2 := ( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBCH5.L5B2x := 0.000000000000E+00 ; ACBCH5.L5B2s := 0.000000000000E+00 ; ACBCH5.L5B2 := ( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBCH6.R5B2x := 0.000000000000E+00 ; ACBCH6.R5B2s := 0.000000000000E+00 ; ACBCH6.R5B2 := ( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5 ; !***CRAB CAVITIES in IR5*** AHCRAB_L5B1 := 0.163683857853E-05 ; AHCRAB_R5B1 := 0.178071784831E-05 ; AHCRAB_L5B2 := 0.178071861245E-05 ; AHCRAB_R5B2 := 0.163683499285E-05 ; AVCRAB_L5B1 := 0.174521588027E-05 ; AVCRAB_R5B1 := 0.164493006755E-05 ; AVCRAB_L5B2 := 0.164493006383E-05 ; AVCRAB_R5B2 := 0.174521588236E-05 ; !***IR2 Optics*** KQX.L2 := 0.877985714100E-02 ; KTQX1.L2 := 0.000000000000E+00 ; KTQX2.L2 := 0.000000000000E+00 ; KQX.R2 := -KQX.L2 ; KTQX1.R2 := -KTQX1.L2 ; KTQX2.R2 := -KTQX2.L2 ; !Beam1 KQ4.L2B1 := -0.386440732120E-02 ; KQ4.R2B1 := 0.383603500793E-02 ; KQ5.L2B1 := 0.415692839144E-02 ; KQ5.R2B1 := -0.443667162081E-02 ; KQ6.L2B1 := -0.527232031907E-02 ; KQ6.R2B1 := 0.459945386162E-02 ; KQ7.L2B1 := 0.847016859639E-02 ; KQ7.R2B1 := -0.757128563252E-02 ; KQ8.L2B1 := -0.499212727276E-02 ; KQ8.R2B1 := 0.679465668792E-02 ; KQ9.L2B1 := 0.675653092964E-02 ; KQ9.R2B1 := -0.640636368921E-02 ; KQ10.L2B1 := -0.639410813059E-02 ; KQ10.R2B1 := 0.729079709404E-02 ; KQTL11.L2B1 := 0.597848068843E-03 ; KQTL11.R2B1 := -0.277600508450E-03 ; KQT12.L2B1 := 0.144709050565E-02 ; KQT12.R2B1 := -0.191559778678E-02 ; KQT13.L2B1 := 0.167872029787E-02 ; KQT13.R2B1 := -0.223619021728E-02 ; !Beam2 KQ4.L2B2 := 0.263460519385E-02 ; KQ4.R2B2 := -0.355234443153E-02 ; KQ5.L2B2 := -0.405264232912E-02 ; KQ5.R2B2 := 0.469477576385E-02 ; KQ6.L2B2 := 0.446175174111E-02 ; KQ6.R2B2 := -0.453111942680E-02 ; KQ7.L2B2 := -0.829990253347E-02 ; KQ7.R2B2 := 0.771531741666E-02 ; KQ8.L2B2 := 0.789239698086E-02 ; KQ8.R2B2 := -0.563997097246E-02 ; KQ9.L2B2 := -0.700479589585E-02 ; KQ9.R2B2 := 0.706009994398E-02 ; KQ10.L2B2 := 0.708917245483E-02 ; KQ10.R2B2 := -0.668976093839E-02 ; KQTL11.L2B2 := 0.336333326451E-02 ; KQTL11.R2B2 := 0.101180903548E-02 ; KQT12.L2B2 := -0.267705742044E-02 ; KQT12.R2B2 := -0.203940411173E-02 ; KQT13.L2B2 := 0.304451085582E-03 ; KQT13.R2B2 := 0.448785589612E-02 ; !***IR2 X-scheme*** abxwt.l2 := -0.0000772587268993839836*on_alice ; abwmd.l2 := +0.0001472587268993839840*on_alice ; abaw.r2 := -0.0001335474860334838000*on_alice ; abxwt.r2 := +0.0000635474860334838004*on_alice ; ACBXV1.L2 := 0.110000000000E-04 *on_x2; ACBXV1.R2 := -0.110000000000E-04 *on_x2; ACBXH1.L2 := 0.160000000000E-04 *on_sep2; ACBXH1.R2 := 0.160000000000E-04 *on_sep2; ACBXV2.L2 := 0.110000000000E-04 *on_x2; ACBXV2.R2 := -0.110000000000E-04 *on_x2; ACBXH2.L2 := 0.160000000000E-04 *on_sep2; ACBXH2.R2 := 0.160000000000E-04 *on_sep2; ACBXV3.L2 := 0.110000000000E-04 *on_x2; ACBXV3.R2 := -0.110000000000E-04 *on_x2; ACBXH3.L2 := 0.160000000000E-04 *on_sep2; ACBXH3.R2 := 0.160000000000E-04 *on_sep2; !Beam1 ACBYVS4.L2B1 := -0.435383457097E-04 *on_x2; ACBYVS4.R2B1 := -0.644939567951E-05 *on_x2; ACBYVS5.L2B1 := -0.327165311238E-04 *on_x2; ACBCVS5.R2B1 := 0.483664121134E-04 *on_x2; ACBYHS4.L2B1 := 0.281598796119E-04 *on_sep2; ACBYHS4.R2B1 := -0.106433617290E-04 *on_sep2; ACBYHS5.L2B1 := -0.603038029731E-05 *on_sep2; ACBCHS5.R2B1 := 0.464372259547E-04 *on_sep2; !Beam2 ACBYVS4.L2B2 := 0.164887643670E-04 *on_x2; ACBYVS4.R2B2 := -0.274315628328E-04 *on_x2; ACBYVS5.L2B2 := 0.398588354938E-04 *on_x2; ACBCVS5.R2B2 := -0.488429097591E-04 *on_x2; ACBYHS4.L2B2 := 0.632560412919E-05 *on_sep2; ACBYHS4.R2B2 := -0.301420665674E-04 *on_sep2; ACBYHS5.L2B2 := -0.293956022184E-04 *on_sep2; ACBCHS5.R2B2 := 0.761214524593E-05 *on_sep2; !***IR8 Optics*** KQX.L8 := 0.877985714100E-02 ; KTQX1.L8 := 0.000000000000E+00 ; KTQX2.L8 := 0.000000000000E+00 ; KQX.R8 := -KQX.L8 ; KTQX1.R8 := -KTQX1.L8 ; KTQX2.R8 := -KTQX2.L8 ; !Beam1 KQ4.L8B1 := -0.318796724530E-02 ; KQ4.R8B1 := 0.252996358605E-02 ; KQ5.L8B1 := 0.504643837274E-02 ; KQ5.R8B1 := -0.444614021731E-02 ; KQ6.L8B1 := -0.452543432270E-02 ; KQ6.R8B1 := 0.363018212909E-02 ; KQ7.L8B1 := 0.790431258329E-02 ; KQ7.R8B1 := -0.704234036308E-02 ; KQ8.L8B1 := -0.577024560867E-02 ; KQ8.R8B1 := 0.784502428456E-02 ; KQ9.L8B1 := 0.699198980132E-02 ; KQ9.R8B1 := -0.752816176550E-02 ; KQ10.L8B1 := -0.622126260504E-02 ; KQ10.R8B1 := 0.726265679505E-02 ; KQTL11.L8B1 := 0.652423224415E-03 ; KQTL11.R8B1 := 0.203238871114E-02 ; KQT12.L8B1 := 0.266856335170E-02 ; KQT12.R8B1 := -0.292990502398E-02 ; KQT13.L8B1 := 0.356629504221E-02 ; KQT13.R8B1 := 0.159509865714E-04 ; !Beam2 KQ4.L8B2 := 0.352287351599E-02 ; KQ4.R8B2 := -0.384552371181E-02 ; KQ5.L8B2 := -0.517841278587E-02 ; KQ5.R8B2 := 0.419232134147E-02 ; KQ6.L8B2 := 0.451975490165E-02 ; KQ6.R8B2 := -0.497221341802E-02 ; KQ7.L8B2 := -0.666657680662E-02 ; KQ7.R8B2 := 0.733005874594E-02 ; KQ8.L8B2 := 0.677910237446E-02 ; KQ8.R8B2 := -0.716505535237E-02 ; KQ9.L8B2 := -0.494321532204E-02 ; KQ9.R8B2 := 0.688092386828E-02 ; KQ10.L8B2 := 0.715744075161E-02 ; KQ10.R8B2 := -0.601305382435E-02 ; KQTL11.L8B2 := -0.117888954194E-02 ; KQTL11.R8B2 := 0.175561566629E-03 ; KQT12.L8B2 := 0.102154354406E-02 ; KQT12.R8B2 := 0.487919515961E-02 ; KQT13.L8B2 := -0.284963683192E-02 ; KQT13.R8B2 := 0.277901207178E-02 ; !***IR8 X-scheme*** abxws.l8 := -0.000045681598453109894*on_lhcb ; abxwh.l8 := +0.000180681598453109894*on_lhcb ; ablw.r8 := -0.000180681598453109894*on_lhcb ; abxws.r8 := +0.000045681598453109894*on_lhcb ; ACBXV1.L8 := -0.160000000000E-04 *on_sep8; ACBXV1.R8 := -0.160000000000E-04 *on_sep8; ACBXH1.L8 := -0.110000000000E-04 *on_x8; ACBXH1.R8 := 0.110000000000E-04 *on_x8; ACBXV2.L8 := -0.160000000000E-04 *on_sep8; ACBXV2.R8 := -0.160000000000E-04 *on_sep8; ACBXH2.L8 := -0.110000000000E-04 *on_x8; ACBXH2.R8 := 0.110000000000E-04 *on_x8; ACBXV3.L8 := -0.160000000000E-04 *on_sep8; ACBXV3.R8 := -0.160000000000E-04 *on_sep8; ACBXH3.L8 := -0.110000000000E-04 *on_x8; ACBXH3.R8 := 0.110000000000E-04 *on_x8; !Beam1 ACBYVS4.L8B1 := 0.253908465224E-05 *on_sep8; ACBYVS4.R8B1 := -0.266875425220E-04 *on_sep8; ACBCVS5.L8B1 := -0.292095090701E-04 *on_sep8; ACBYVS5.R8B1 := 0.634522679593E-05 *on_sep8; ACBYHS4.L8B1 := 0.104237806092E-04 *on_x8; ACBYHS4.R8B1 := -0.331478162052E-04 *on_x8; ACBWH5.L8B1 := 0.000000000000E+00 *on_x8; ACBCH5.L8B1 := 0.404892466383E-04 *on_x8; ACBCHS5.L8B1 := 0.000000000000E+00 *on_x8; ACBYHS5.R8B1 := -0.307627854218E-04 *on_x8; !Beam2 ACBYVS4.L8B2 := 0.277452414792E-04 *on_sep8; ACBYVS4.R8B2 := 0.251411067215E-05 *on_sep8; ACBCVS5.L8B2 := -0.635531642954E-05 *on_sep8; ACBYVS5.R8B2 := 0.307208659868E-04 *on_sep8; ACBYHS4.L8B2 := -0.406102278141E-04 *on_x8; ACBYHS4.R8B2 := 0.809926574540E-05 *on_x8; ACBCHS5.L8B2 := -0.313459573236E-04 *on_x8; ACBYHS5.R8B2 := 0.386766490860E-04 *on_x8; !***IR4 Optics*** !Beam1 KQ5.L4B1 := 0.457326210967E-02 ; KQ5.R4B1 := -0.504321797559E-02 ; KQ6.L4B1 := -0.517502842908E-02 ; KQ6.R4B1 := 0.543520231075E-02 ; KQ7.L4B1 := 0.711149747425E-02 ; KQ7.R4B1 := -0.439658837119E-02 ; KQ8.L4B1 := -0.477233346379E-02 ; KQ8.R4B1 := 0.804395647245E-02 ; KQ9.L4B1 := 0.660856956863E-02 ; KQ9.R4B1 := -0.628658471515E-02 ; KQ10.L4B1 := -0.550517973099E-02 ; KQ10.R4B1 := 0.741636054644E-02 ; KQTL11.L4B1 := 0.206992675636E-03 ; KQTL11.R4B1 := -0.438760976411E-02 ; KQT12.L4B1 := 0.384396613548E-02 ; KQT12.R4B1 := 0.412222799752E-03 ; KQT13.L4B1 := 0.140627878648E-02 ; KQT13.R4B1 := 0.364965150432E-02 ; !Beam2 KQ5.L4B2 := -0.423297307473E-02 ; KQ5.R4B2 := 0.526030538545E-02 ; KQ6.L4B2 := 0.584996450822E-02 ; KQ6.R4B2 := -0.614236382110E-02 ; KQ7.L4B2 := -0.523936281389E-02 ; KQ7.R4B2 := 0.477753159394E-02 ; KQ8.L4B2 := 0.855514639025E-02 ; KQ8.R4B2 := -0.541271961970E-02 ; KQ9.L4B2 := -0.538198971377E-02 ; KQ9.R4B2 := 0.587187702336E-02 ; KQ10.L4B2 := 0.723717220818E-02 ; KQ10.R4B2 := -0.605035968243E-02 ; KQTL11.L4B2 := 0.936476770122E-06 ; KQTL11.R4B2 := 0.102260865896E-02 ; KQT12.L4B2 := 0.127820723034E-02 ; KQT12.R4B2 := 0.957995657022E-03 ; KQT13.L4B2 := 0.154431875868E-02 ; KQT13.R4B2 := -0.434830889175E-02 ; !***IR6 Optics*** !Beam1 KQ4.L6B1 := -0.488141473400E-02 ; KQ4.R6B1 := 0.480311339041E-02 ; KQ5.L6B1 := 0.495440751690E-02 ; KQ5.R6B1 := -0.465201328338E-02 ; KQ8.L6B1 := -0.643786165275E-02 ; KQ8.R6B1 := 0.497008766862E-02 ; KQ9.L6B1 := 0.675762930082E-02 ; KQ9.R6B1 := -0.665187561016E-02 ; KQ10.L6B1 := -0.751653632305E-02 ; KQ10.R6B1 := 0.723692936328E-02 ; KQTL11.L6B1 := 0.970811755662E-03 ; KQTL11.R6B1 := -0.256261909328E-03 ; KQT12.L6B1 := 0.508155062736E-02 ; KQT12.R6B1 := -0.481964329209E-02 ; KQT13.L6B1 := -0.168528259557E-02 ; KQT13.R6B1 := 0.275696492077E-02 ; !Beam2 KQ4.L6B2 := 0.497705612794E-02 ; KQ4.R6B2 := -0.483383773000E-02 ; KQ5.L6B2 := -0.483703762810E-02 ; KQ5.R6B2 := 0.450974053265E-02 ; KQ8.L6B2 := 0.637912452547E-02 ; KQ8.R6B2 := -0.515703680563E-02 ; KQ9.L6B2 := -0.700503985506E-02 ; KQ9.R6B2 := 0.660252728845E-02 ; KQ10.L6B2 := 0.711474659776E-02 ; KQ10.R6B2 := -0.770851139718E-02 ; KQTL11.L6B2 := 0.229036745191E-02 ; KQTL11.R6B2 := 0.137406990660E-02 ; KQT12.L6B2 := -0.480355850816E-02 ; KQT12.R6B2 := -0.315551050911E-02 ; KQT13.L6B2 := 0.458382186988E-02 ; KQT13.R6B2 := -0.125374816754E-02 ; !***IR3 Optics*** KQ4.LR3 := 0.124128400000E-02 ; KQT4.L3 := 0.688713000000E-03 ; KQT4.R3 := 0.688713000000E-03 ; KQ5.LR3 := -0.130392400000E-02 ; KQT5.L3 := 0.972084000000E-03 ; KQT5.R3 := 0.972084000000E-03 ; !Beam1 KQ6.L3B1 := 0.270233351175E-02 ; KQ6.R3B1 := -0.248064676460E-02 ; KQTL7.L3B1 := -0.256066610427E-02 ; KQTL7.R3B1 := 0.108262342124E-02 ; KQTL8.L3B1 := 0.306586592810E-03 ; KQTL8.R3B1 := 0.246112103641E-02 ; KQTL9.L3B1 := -0.415032866762E-02 ; KQTL9.R3B1 := 0.383599625932E-04 ; KQTL10.L3B1 := 0.993305324054E-03 ; KQTL10.R3B1 := 0.275859719082E-02 ; KQTL11.L3B1 := 0.945429305635E-03 ; KQTL11.R3B1 := -0.340069629590E-02 ; KQT12.L3B1 := 0.348601034713E-02 ; KQT12.R3B1 := 0.388449664492E-02 ; KQT13.L3B1 := -0.348944216540E-03 ; KQT13.R3B1 := -0.383789748912E-02 ; !Beam2 KQ6.L3B2 := -0.248023366784E-02 ; KQ6.R3B2 := 0.274152604236E-02 ; KQTL7.L3B2 := 0.714656379619E-03 ; KQTL7.R3B2 := -0.409658321506E-02 ; KQTL8.L3B2 := 0.237821715929E-02 ; KQTL8.R3B2 := 0.381313882159E-03 ; KQTL9.L3B2 := 0.505005804909E-04 ; KQTL9.R3B2 := -0.365284536348E-02 ; KQTL10.L3B2 := 0.235441460182E-02 ; KQTL10.R3B2 := 0.107229862881E-02 ; KQTL11.L3B2 := -0.334471025741E-02 ; KQTL11.R3B2 := 0.250455161655E-02 ; KQT12.L3B2 := 0.168352729825E-02 ; KQT12.R3B2 := 0.359724898180E-02 ; KQT13.L3B2 := -0.484419961233E-02 ; KQT13.R3B2 := -0.567052180458E-03 ; !***IR7 Optics*** KQ4.LR7 := 0.131382724100E-02 ; KQT4.L7 := 0.331689344000E-03 ; KQT4.R7 := 0.331689344000E-03 ; KQ5.LR7 := -0.133553657300E-02 ; KQT5.L7 := -0.326577060000E-04 ; KQT5.R7 := -0.326577060000E-04 ; !Beam1 KQ6.L7B1 := 0.328525332571E-02 ; KQ6.R7B1 := -0.299863007737E-02 ; KQTL7.L7B1 := 0.127440846165E-02 ; KQTL7.R7B1 := 0.445831706681E-02 ; KQTL8.L7B1 := -0.104372892255E-02 ; KQTL8.R7B1 := 0.969916899352E-03 ; KQTL9.L7B1 := 0.800168964160E-04 ; KQTL9.R7B1 := 0.352024044404E-02 ; KQTL10.L7B1 := 0.448440346055E-02 ; KQTL10.R7B1 := -0.800003141652E-03 ; KQTL11.L7B1 := 0.161771545327E-02 ; KQTL11.R7B1 := -0.196792942022E-03 ; KQT12.L7B1 := 0.162722364921E-02 ; KQT12.R7B1 := 0.143991273298E-03 ; KQT13.L7B1 := 0.539148502270E-03 ; KQT13.R7B1 := 0.806376355813E-03 ; !Beam2 KQ6.L7B2 := -0.286994613439E-02 ; KQ6.R7B2 := 0.330775056994E-02 ; KQTL7.L7B2 := 0.365784616868E-02 ; KQTL7.R7B2 := 0.150694484776E-03 ; KQTL8.L7B2 := 0.108007495349E-02 ; KQTL8.R7B2 := 0.709710215676E-03 ; KQTL9.L7B2 := 0.375461504531E-02 ; KQTL9.R7B2 := -0.365907484542E-03 ; KQTL10.L7B2 := 0.370527986339E-03 ; KQTL10.R7B2 := 0.461575596172E-02 ; KQTL11.L7B2 := 0.195370963807E-03 ; KQTL11.R7B2 := 0.836992953369E-03 ; KQT12.L7B2 := 0.191830066696E-02 ; KQT12.R7B2 := -0.155788716254E-02 ; KQT13.L7B2 := -0.621053646413E-03 ; KQT13.R7B2 := -0.699351795531E-03 ; !***Arc Optics*** !QF/QD KQF.A81 := 0.870376824720E-02 ; KQF.A12 := 0.870376824720E-02 ; KQF.A45 := 0.870376824720E-02 ; KQF.A56 := 0.870376824720E-02 ; KQD.A81 := -0.870522784641E-02 ; KQD.A12 := -0.870522784641E-02 ; KQD.A45 := -0.870522784641E-02 ; KQD.A56 := -0.870522784641E-02 ; KQF.A78 := 0.876396353332E-02 ; KQF.A23 := 0.876396353332E-02 ; KQF.A34 := 0.876396353332E-02 ; KQF.A67 := 0.876396353332E-02 ; KQD.A78 := -0.863871054670E-02 ; KQD.A23 := -0.863871054670E-02 ; KQD.A34 := -0.863871054670E-02 ; KQD.A67 := -0.863871054670E-02 ; !QTF/QTD BEAM1 KQTF.B1 := 0.000000000000E+00 ; KQTD.B1 := 0.000000000000E+00 ; KQTF.A81B1 := 0.000000000000E+00 ; KQTF.A12B1 := 0.000000000000E+00 ; KQTF.A45B1 := 0.000000000000E+00 ; KQTF.A56B1 := 0.000000000000E+00 ; KQTD.A81B1 := 0.000000000000E+00 ; KQTD.A12B1 := 0.000000000000E+00 ; KQTD.A45B1 := 0.000000000000E+00 ; KQTD.A56B1 := 0.000000000000E+00 ; KQTF.A78B1 := 0.000000000000E+00 + KQTF.B1; KQTF.A23B1 := 0.000000000000E+00 + KQTF.B1; KQTF.A34B1 := 0.000000000000E+00 + KQTF.B1; KQTF.A67B1 := 0.000000000000E+00 + KQTF.B1; KQTD.A78B1 := 0.000000000000E+00 + KQTD.B1; KQTD.A23B1 := 0.000000000000E+00 + KQTD.B1; KQTD.A34B1 := 0.000000000000E+00 + KQTD.B1; KQTD.A67B1 := 0.000000000000E+00 + KQTD.B1; !QTF/QTD BEAM2 KQTF.B2 := 0.000000000000E+00 ; KQTD.B2 := 0.000000000000E+00 ; KQTF.A81B2 := 0.000000000000E+00 ; KQTF.A12B2 := 0.000000000000E+00 ; KQTF.A45B2 := 0.000000000000E+00 ; KQTF.A56B2 := 0.000000000000E+00 ; KQTD.A81B2 := 0.000000000000E+00 ; KQTD.A12B2 := 0.000000000000E+00 ; KQTD.A45B2 := 0.000000000000E+00 ; KQTD.A56B2 := 0.000000000000E+00 ; KQTF.A78B2 := 0.000000000000E+00 + KQTF.B2; KQTF.A23B2 := 0.000000000000E+00 + KQTF.B2; KQTF.A34B2 := 0.000000000000E+00 + KQTF.B2; KQTF.A67B2 := 0.000000000000E+00 + KQTF.B2; KQTD.A78B2 := 0.000000000000E+00 + KQTD.B2; KQTD.A23B2 := 0.000000000000E+00 + KQTD.B2; KQTD.A34B2 := 0.000000000000E+00 + KQTD.B2; KQTD.A67B2 := 0.000000000000E+00 + KQTD.B2; !Sextupole BEAM1 KSF.B1 := 0.000000000000E+00 ; KSD.B1 := 0.000000000000E+00 ; !Strong sextupoles of sectors 81/12/45/56 KSF1.A81B1 := 0.249014688657E+00 ; KSF1.A12B1 := 0.235361002682E+00 ; KSF1.A45B1 := 0.254383334310E+00 ; KSF1.A56B1 := 0.243008317600E+00 ; KSD2.A81B1 := -0.417878230998E+00 ; KSD2.A12B1 := -0.397811316547E+00 ; KSD2.A45B1 := -0.407546405366E+00 ; KSD2.A56B1 := -0.417191897007E+00 ; !Weak sextupoles of sectors 81/12/45/56 KSF2.A81B1 := 0.400000000000E-01 ; KSF2.A12B1 := 0.400000000000E-01 ; KSF2.A45B1 := 0.400000000000E-01 ; KSF2.A56B1 := 0.400000000000E-01 ; KSD1.A81B1 := -0.700000000000E-01 ; KSD1.A12B1 := -0.700000000000E-01 ; KSD1.A45B1 := -0.700000000000E-01 ; KSD1.A56B1 := -0.700000000000E-01 ; !Weak sextupoles of sectors 78/23/34/67 KSF1.A78B1 := 0.820117617704E-01 +KSF.B1; KSF2.A78B1 := 0.820117617704E-01 +KSF.B1; KSF1.A23B1 := 0.820117617704E-01 +KSF.B1; KSF2.A23B1 := 0.820117617704E-01 +KSF.B1; KSF1.A34B1 := 0.820117617704E-01 +KSF.B1; KSF2.A34B1 := 0.820117617704E-01 +KSF.B1; KSF1.A67B1 := 0.820117617704E-01 +KSF.B1; KSF2.A67B1 := 0.820117617704E-01 +KSF.B1; KSD1.A78B1 := -0.128216099832E+00 +KSD.B1; KSD2.A78B1 := -0.128216099832E+00 +KSD.B1; KSD1.A23B1 := -0.128216099832E+00 +KSD.B1; KSD2.A23B1 := -0.128216099832E+00 +KSD.B1; KSD1.A34B1 := -0.128216099832E+00 +KSD.B1; KSD2.A34B1 := -0.128216099832E+00 +KSD.B1; KSD1.A67B1 := -0.128216099832E+00 +KSD.B1; KSD2.A67B1 := -0.128216099832E+00 +KSD.B1; !Sextupole BEAM2 KSF.B2 := 0.000000000000E+00 ; KSD.B2 := 0.000000000000E+00 ; !Strong sextupoles of sectors 81/12/45/56 KSF2.A81B2 := 0.240786949161E+00 ; KSF2.A12B2 := 0.236573936861E+00 ; KSF2.A45B2 := 0.235938706409E+00 ; KSF2.A56B2 := 0.249981429753E+00 ; KSD1.A81B2 := -0.419999999998E+00 ; KSD1.A12B2 := -0.406080557523E+00 ; KSD1.A45B2 := -0.419107550626E+00 ; KSD1.A56B2 := -0.418305467588E+00 ; !Weak sextupoles of sectors 81/12/45/56 KSF1.A81B2 := 0.400000000000E-01 ; KSF1.A12B2 := 0.400000000000E-01 ; KSF1.A45B2 := 0.400000000000E-01 ; KSF1.A56B2 := 0.400000000000E-01 ; KSD2.A81B2 := -0.700000000000E-01 ; KSD2.A12B2 := -0.700000000000E-01 ; KSD2.A45B2 := -0.700000000000E-01 ; KSD2.A56B2 := -0.700000000000E-01 ; !Weak sextupoles of sectors 78/23/34/67 KSF1.A78B2 := 0.841997793441E-01 +KSF.B2; KSF2.A78B2 := 0.841997793441E-01 +KSF.B2; KSF1.A23B2 := 0.841997793441E-01 +KSF.B2; KSF2.A23B2 := 0.841997793441E-01 +KSF.B2; KSF1.A34B2 := 0.841997793441E-01 +KSF.B2; KSF2.A34B2 := 0.841997793441E-01 +KSF.B2; KSF1.A67B2 := 0.841997793441E-01 +KSF.B2; KSF2.A67B2 := 0.841997793441E-01 +KSF.B2; KSD1.A78B2 := -0.126986944236E+00 +KSD.B2; KSD2.A78B2 := -0.126986944236E+00 +KSD.B2; KSD1.A23B2 := -0.126986944236E+00 +KSD.B2; KSD2.A23B2 := -0.126986944236E+00 +KSD.B2; KSD1.A34B2 := -0.126986944236E+00 +KSD.B2; KSD2.A34B2 := -0.126986944236E+00 +KSD.B2; KSD1.A67B2 := -0.126986944236E+00 +KSD.B2; KSD2.A67B2 := -0.126986944236E+00 +KSD.B2; !OF/OD BEAM1 KOF.B1 := 0.000000000000E+00 ; KOD.B1 := 0.000000000000E+00 ; KOF.A12B1 := 0.000000000000E+00 *ON_QPP + KOF.B1; KOF.A23B1 := 0.000000000000E+00 *ON_QPP + KOF.B1; KOF.A34B1 := 0.000000000000E+00 *ON_QPP + KOF.B1; KOF.A45B1 := 0.000000000000E+00 *ON_QPP + KOF.B1; KOF.A56B1 := 0.000000000000E+00 *ON_QPP + KOF.B1; KOF.A67B1 := 0.000000000000E+00 *ON_QPP + KOF.B1; KOF.A78B1 := 0.000000000000E+00 *ON_QPP + KOF.B1; KOF.A81B1 := 0.000000000000E+00 *ON_QPP + KOF.B1; KOD.A12B1 := 0.000000000000E+00 *ON_QPP + KOD.B1; KOD.A23B1 := 0.000000000000E+00 *ON_QPP + KOD.B1; KOD.A34B1 := 0.000000000000E+00 *ON_QPP + KOD.B1; KOD.A45B1 := 0.000000000000E+00 *ON_QPP + KOD.B1; KOD.A56B1 := 0.000000000000E+00 *ON_QPP + KOD.B1; KOD.A67B1 := 0.000000000000E+00 *ON_QPP + KOD.B1; KOD.A78B1 := 0.000000000000E+00 *ON_QPP + KOD.B1; KOD.A81B1 := 0.000000000000E+00 *ON_QPP + KOD.B1; !OF/OD BEAM2 KOF.B2 := 0.000000000000E+00 ; KOD.B2 := 0.000000000000E+00 ; KOF.A12B2 := 0.000000000000E+00 *ON_QPP + KOF.B2; KOF.A23B2 := 0.000000000000E+00 *ON_QPP + KOF.B2; KOF.A34B2 := 0.000000000000E+00 *ON_QPP + KOF.B2; KOF.A45B2 := 0.000000000000E+00 *ON_QPP + KOF.B2; KOF.A56B2 := 0.000000000000E+00 *ON_QPP + KOF.B2; KOF.A67B2 := 0.000000000000E+00 *ON_QPP + KOF.B2; KOF.A78B2 := 0.000000000000E+00 *ON_QPP + KOF.B2; KOF.A81B2 := 0.000000000000E+00 *ON_QPP + KOF.B2; KOD.A12B2 := 0.000000000000E+00 *ON_QPP + KOD.B2; KOD.A23B2 := 0.000000000000E+00 *ON_QPP + KOD.B2; KOD.A34B2 := 0.000000000000E+00 *ON_QPP + KOD.B2; KOD.A45B2 := 0.000000000000E+00 *ON_QPP + KOD.B2; KOD.A56B2 := 0.000000000000E+00 *ON_QPP + KOD.B2; KOD.A67B2 := 0.000000000000E+00 *ON_QPP + KOD.B2; KOD.A78B2 := 0.000000000000E+00 *ON_QPP + KOD.B2; KOD.A81B2 := 0.000000000000E+00 *ON_QPP + KOD.B2; !! MCB-beam1 for spurious dispersion correction !! MCB in sector 81 and 12 acbh14.r8b1x := 0.000000000000E+00 ; acbh14.r8b1s := 0.000000000000E+00 ; acbh14.r8b1 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh16.r8b1x := 0.195144060678E-04 ; acbh16.r8b1s := -0.931672448303E-06 ; acbh16.r8b1 := (( 0.195144060678E-04 )*cos(phi_IR1*twopi/360.)*on_x1+( -0.931672448303E-06 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh14.l1b1x := -0.560084396555E-06 ; acbh14.l1b1s := 0.251091762977E-07 ; acbh14.l1b1 := (( -0.560084396555E-06 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.251091762977E-07 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh12.l1b1x := -0.199892151718E-04 ; acbh12.l1b1s := 0.954037091267E-06 ; acbh12.l1b1 := (( -0.199892151718E-04 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.954037091267E-06 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh13.r1b1x := -0.165033932673E-04 ; acbh13.r1b1s := 0.100574722318E-06 ; acbh13.r1b1 := (( -0.165033932673E-04 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.100574722318E-06 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh15.r1b1x := -0.571285578136E-08 ; acbh15.r1b1s := 0.187223901710E-10 ; acbh15.r1b1 := (( -0.571285578136E-08 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.187223901710E-10 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh15.l2b1x := 0.165009438426E-04 ; acbh15.l2b1s := -0.100717417547E-06 ; acbh15.l2b1 := (( 0.165009438426E-04 )*cos(phi_IR1*twopi/360.)*on_x1+( -0.100717417547E-06 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh13.l2b1x := 0.000000000000E+00 ; acbh13.l2b1s := 0.000000000000E+00 ; acbh13.l2b1 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv13.r8b1x := 0.000000000000E+00 ; acbv13.r8b1s := 0.000000000000E+00 ; acbv13.r8b1 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv15.r8b1x := -0.141853980702E-04 ; acbv15.r8b1s := 0.578478275388E-07 ; acbv15.r8b1 := (( -0.141853980702E-04 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.578478275388E-07 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv15.l1b1x := -0.313956259144E-07 ; acbv15.l1b1s := 0.239092093616E-09 ; acbv15.l1b1 := (( -0.313956259144E-07 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.239092093616E-09 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv13.l1b1x := 0.140891757244E-04 ; acbv13.l1b1s := -0.574505544430E-07 ; acbv13.l1b1 := (( 0.140891757244E-04 )*sin(phi_IR1*twopi/360.)*on_x1+( -0.574505544430E-07 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv12.r1b1x := 0.191300115254E-04 ; acbv12.r1b1s := 0.997142861501E-06 ; acbv12.r1b1 := (( 0.191300115254E-04 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.997142861501E-06 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv14.r1b1x := 0.913768544087E-07 ; acbv14.r1b1s := 0.319801896088E-08 ; acbv14.r1b1 := (( 0.913768544087E-07 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.319801896088E-08 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv16.l2b1x := -0.190364709279E-04 ; acbv16.l2b1s := -0.992047237379E-06 ; acbv16.l2b1 := (( -0.190364709279E-04 )*sin(phi_IR1*twopi/360.)*on_x1+( -0.992047237379E-06 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv14.l2b1x := 0.000000000000E+00 ; acbv14.l2b1s := 0.000000000000E+00 ; acbv14.l2b1 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; !! MCB in sector 45 and 56 acbh14.r4b1x := 0.000000000000E+00 ; acbh14.r4b1s := 0.000000000000E+00 ; acbh14.r4b1 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh16.r4b1x := 0.189018846428E-04 ; acbh16.r4b1s := -0.896507288037E-06 ; acbh16.r4b1 := (( 0.189018846428E-04 )*cos(phi_IR5*twopi/360.)*on_x5+( -0.896507288037E-06 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh14.l5b1x := -0.541703086592E-06 ; acbh14.l5b1s := 0.240925692816E-07 ; acbh14.l5b1 := (( -0.541703086592E-06 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.240925692816E-07 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh12.l5b1x := -0.193620818386E-04 ; acbh12.l5b1s := 0.917993684952E-06 ; acbh12.l5b1 := (( -0.193620818386E-04 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.917993684952E-06 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh13.r5b1x := -0.159025181810E-04 ; acbh13.r5b1s := 0.924497213357E-07 ; acbh13.r5b1 := (( -0.159025181810E-04 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.924497213357E-07 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh15.r5b1x := -0.550108552354E-08 ; acbh15.r5b1s := 0.195783181733E-10 ; acbh15.r5b1 := (( -0.550108552354E-08 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.195783181733E-10 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh15.l6b1x := 0.159001261231E-04 ; acbh15.l6b1s := -0.925776977672E-07 ; acbh15.l6b1 := (( 0.159001261231E-04 )*cos(phi_IR5*twopi/360.)*on_x5+( -0.925776977672E-07 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh13.l6b1x := 0.000000000000E+00 ; acbh13.l6b1s := 0.000000000000E+00 ; acbh13.l6b1 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv13.r4b1x := 0.000000000000E+00 ; acbv13.r4b1s := 0.000000000000E+00 ; acbv13.r4b1 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv15.r4b1x := -0.146823751037E-04 ; acbv15.r4b1s := 0.598713638736E-07 ; acbv15.r4b1 := (( -0.146823751037E-04 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.598713638736E-07 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv15.l5b1x := -0.322039487989E-07 ; acbv15.l5b1s := 0.241083603882E-09 ; acbv15.l5b1 := (( -0.322039487989E-07 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.241083603882E-09 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv13.l5b1x := 0.145829062237E-04 ; acbv13.l5b1s := -0.594608429720E-07 ; acbv13.l5b1 := (( 0.145829062237E-04 )*sin(phi_IR5*twopi/360.)*on_x5+( -0.594608429720E-07 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv12.r5b1x := 0.180396390974E-04 ; acbv12.r5b1s := 0.940367146958E-06 ; acbv12.r5b1 := (( 0.180396390974E-04 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.940367146958E-06 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv14.r5b1x := 0.857875317837E-07 ; acbv14.r5b1s := 0.300767394040E-08 ; acbv14.r5b1 := (( 0.857875317837E-07 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.300767394040E-08 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv16.l6b1x := -0.179513325565E-04 ; acbv16.l6b1s := -0.935574370903E-06 ; acbv16.l6b1 := (( -0.179513325565E-04 )*sin(phi_IR5*twopi/360.)*on_x5+( -0.935574370903E-06 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv14.l6b1x := 0.000000000000E+00 ; acbv14.l6b1s := 0.000000000000E+00 ; acbv14.l6b1 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep5)*ON_DISP ; !! MCB-beam2 for spurious dispersion correction !! MCB in sector 81 and 12 acbh13.r8b2x := 0.000000000000E+00 ; acbh13.r8b2s := 0.000000000000E+00 ; acbh13.r8b2 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh15.r8b2x := 0.157728887521E-04 ; acbh15.r8b2s := -0.229567453963E-06 ; acbh15.r8b2 := (( 0.157728887521E-04 )*cos(phi_IR1*twopi/360.)*on_x1+( -0.229567453963E-06 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh15.l1b2x := -0.372104517199E-08 ; acbh15.l1b2s := -0.229428108555E-09 ; acbh15.l1b2 := (( -0.372104517199E-08 )*cos(phi_IR1*twopi/360.)*on_x1+( -0.229428108555E-09 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh13.l1b2x := -0.157288221703E-04 ; acbh13.l1b2s := 0.228712413553E-06 ; acbh13.l1b2 := (( -0.157288221703E-04 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.228712413553E-06 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh12.r1b2x := -0.207297781386E-04 ; acbh12.r1b2s := -0.119154240304E-05 ; acbh12.r1b2 := (( -0.207297781386E-04 )*cos(phi_IR1*twopi/360.)*on_x1+( -0.119154240304E-05 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh14.r1b2x := -0.275335153108E-06 ; acbh14.r1b2s := -0.139715013281E-07 ; acbh14.r1b2 := (( -0.275335153108E-06 )*cos(phi_IR1*twopi/360.)*on_x1+( -0.139715013281E-07 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh16.l2b2x := 0.203728143466E-04 ; acbh16.l2b2s := 0.117093120201E-05 ; acbh16.l2b2 := (( 0.203728143466E-04 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.117093120201E-05 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh14.l2b2x := 0.000000000000E+00 ; acbh14.l2b2s := 0.000000000000E+00 ; acbh14.l2b2 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv14.r8b2x := 0.000000000000E+00 ; acbv14.r8b2s := 0.000000000000E+00 ; acbv14.r8b2 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv16.r8b2x := -0.180968200624E-04 ; acbv16.r8b2s := 0.941920503006E-06 ; acbv16.r8b2 := (( -0.180968200624E-04 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.941920503006E-06 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv14.l1b2x := 0.237715179770E-06 ; acbv14.l1b2s := -0.105646577919E-07 ; acbv14.l1b2 := (( 0.237715179770E-06 )*sin(phi_IR1*twopi/360.)*on_x1+( -0.105646577919E-07 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv12.l1b2x := 0.181632361029E-04 ; acbv12.l1b2s := -0.945675898959E-06 ; acbv12.l1b2 := (( 0.181632361029E-04 )*sin(phi_IR1*twopi/360.)*on_x1+( -0.945675898959E-06 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv13.r1b2x := 0.149404469958E-04 ; acbv13.r1b2s := 0.607862436610E-07 ; acbv13.r1b2 := (( 0.149404469958E-04 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.607862436610E-07 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv15.r1b2x := -0.291968356366E-07 ; acbv15.r1b2s := -0.265354752529E-09 ; acbv15.r1b2 := (( -0.291968356366E-07 )*sin(phi_IR1*twopi/360.)*on_x1+( -0.265354752529E-09 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv15.l2b2x := -0.149383968954E-04 ; acbv15.l2b2s := -0.607970716857E-07 ; acbv15.l2b2 := (( -0.149383968954E-04 )*sin(phi_IR1*twopi/360.)*on_x1+( -0.607970716857E-07 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv13.l2b2x := 0.000000000000E+00 ; acbv13.l2b2s := 0.000000000000E+00 ; acbv13.l2b2 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; !! MCB in sector 45 and 56 acbh13.r4b2x := 0.000000000000E+00 ; acbh13.r4b2s := 0.000000000000E+00 ; acbh13.r4b2 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh15.r4b2x := 0.162015626631E-04 ; acbh15.r4b2s := -0.231601800658E-06 ; acbh15.r4b2 := (( 0.162015626631E-04 )*cos(phi_IR5*twopi/360.)*on_x5+( -0.231601800658E-06 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh15.l5b2x := -0.402455990545E-08 ; acbh15.l5b2s := -0.228361617942E-09 ; acbh15.l5b2 := (( -0.402455990545E-08 )*cos(phi_IR5*twopi/360.)*on_x5+( -0.228361617942E-09 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh13.l5b2x := -0.161563790281E-04 ; acbh13.l5b2s := 0.230741837144E-06 ; acbh13.l5b2 := (( -0.161563790281E-04 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.230741837144E-06 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh12.r5b2x := -0.193295093263E-04 ; acbh12.r5b2s := -0.111403328821E-05 ; acbh12.r5b2 := (( -0.193295093263E-04 )*cos(phi_IR5*twopi/360.)*on_x5+( -0.111403328821E-05 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh14.r5b2x := -0.256017550343E-06 ; acbh14.r5b2s := -0.130421891366E-07 ; acbh14.r5b2 := (( -0.256017550343E-06 )*cos(phi_IR5*twopi/360.)*on_x5+( -0.130421891366E-07 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh16.l6b2x := 0.189964557015E-04 ; acbh16.l6b2s := 0.109476307837E-05 ; acbh16.l6b2 := (( 0.189964557015E-04 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.109476307837E-05 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh14.l6b2x := 0.000000000000E+00 ; acbh14.l6b2s := 0.000000000000E+00 ; acbh14.l6b2 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv14.r4b2x := 0.000000000000E+00 ; acbv14.r4b2s := 0.000000000000E+00 ; acbv14.r4b2 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv16.r4b2x := -0.181061739359E-04 ; acbv16.r4b2s := 0.942369015792E-06 ; acbv16.r4b2 := (( -0.181061739359E-04 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.942369015792E-06 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv14.l5b2x := 0.237631665228E-06 ; acbv14.l5b2s := -0.105309510391E-07 ; acbv14.l5b2 := (( 0.237631665228E-06 )*sin(phi_IR5*twopi/360.)*on_x5+( -0.105309510391E-07 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv12.l5b2x := 0.181727204151E-04 ; acbv12.l5b2s := -0.946137779023E-06 ; acbv12.l5b2 := (( 0.181727204151E-04 )*sin(phi_IR5*twopi/360.)*on_x5+( -0.946137779023E-06 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv13.r5b2x := 0.144599878497E-04 ; acbv13.r5b2s := 0.588268783170E-07 ; acbv13.r5b2 := (( 0.144599878497E-04 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.588268783170E-07 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv15.r5b2x := -0.281762505482E-07 ; acbv15.r5b2s := -0.250741052819E-09 ; acbv15.r5b2 := (( -0.281762505482E-07 )*sin(phi_IR5*twopi/360.)*on_x5+( -0.250741052819E-09 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv15.l6b2x := -0.144579442491E-04 ; acbv15.l6b2s := -0.588348092544E-07 ; acbv15.l6b2 := (( -0.144579442491E-04 )*sin(phi_IR5*twopi/360.)*on_x5+( -0.588348092544E-07 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv13.l6b2x := 0.000000000000E+00 ; acbv13.l6b2s := 0.000000000000E+00 ; acbv13.l6b2 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; !****OPTICS SUMMARY**** !Tune and Chroma Qxb1 = 62.310000; Qyb1 = 60.320000; Qpxb1= 2.000000; Qpyb1= 2.000000; Qxb2 = 62.310000; Qyb2 = 60.320000; Qpxb2= 2.000000; Qpyb2= 2.000000; !IR Optics summary (phase, twiss param., dispersion) muxIP1b1= 2.6427000; muyIP1b1= 2.6420000; muxIP1b1_L= 1.1569000; muyIP1b1_L= 1.4867000; muxIP1b1_R= 1.4858000; muyIP1b1_R= 1.1553000; betxIP1b1= 0.150000; betyIP1b1= 0.150000; alfxIP1b1= 0.000000; alfyIP1b1= 0.000000; dxIP1b1= 0.000000; dpxIP1b1= 0.000000; muxIP1b2= 2.6427000; muyIP1b2= 2.6420000; muxIP1b2_L= 1.4884000; muyIP1b2_L= 1.1563000; muxIP1b2_R= 1.1543000; muyIP1b2_R= 1.4857000; betxIP1b2= 0.150000; betyIP1b2= 0.150000; alfxIP1b2= 0.000000; alfyIP1b2= 0.000000; dxIP1b2= 0.000000; dpxIP1b2= 0.000000; muxIP5b1= 2.6427000; muyIP5b1= 2.6420000; muxIP5b1_L= 1.1569000; muyIP5b1_L= 1.4867000; muxIP5b1_R= 1.4858000; muyIP5b1_R= 1.1553000; betxIP5b1= 0.150000; betyIP5b1= 0.150000; alfxIP5b1= 0.000000; alfyIP5b1= 0.000000; dxIP5b1= 0.000000; dpxIP5b1= 0.000000; muxIP5b2= 2.6427000; muyIP5b2= 2.6420000; muxIP5b2_L= 1.4884000; muyIP5b2_L= 1.1563000; muxIP5b2_R= 1.1543000; muyIP5b2_R= 1.4857000; betxIP5b2= 0.150000; betyIP5b2= 0.150000; alfxIP5b2= 0.000000; alfyIP5b2= 0.000000; dxIP5b2= 0.000000; dpxIP5b2= 0.000000; muxIP2b1= 3.0200000; muyIP2b1= 2.9000000; betxIP2b1= 10.000000; betyIP2b1= 10.000000; alfxIP2b1= 0.000000; alfyIP2b1= 0.000000; dxIP2b1= 0.000000; dpxIP2b1= 0.000000; muxIP2b2= 3.0200000; muyIP2b2= 2.9000000; betxIP2b2= 10.000000; betyIP2b2= 10.000000; alfxIP2b2= 0.000000; alfyIP2b2= 0.000000; dxIP2b2= 0.000000; dpxIP2b2= 0.000000; muxIP8b1= 3.0200000; muyIP8b1= 2.9000000; betxIP8b1= 10.000000; betyIP8b1= 10.000000; alfxIP8b1= 0.000000; alfyIP8b1= 0.000000; dxIP8b1= 0.000000; dpxIP8b1= 0.000000; muxIP8b2= 3.0200000; muyIP8b2= 2.9000000; betxIP8b2= 10.000000; betyIP8b2= 10.000000; alfxIP8b2= 0.000000; alfyIP8b2= 0.000000; dxIP8b2= 0.000000; dpxIP8b2= 0.000000; muxIP4b1= 2.1600000; muyIP4b1= 1.7200000; betxIP4b1= 172.807960; betyIP4b1= 230.297901; alfxIP4b1= 0.580679; alfyIP4b1= -0.325498; dxIP4b1= 0.000000; dpxIP4b1= 0.000000; muxIP4b2= 2.1600000; muyIP4b2= 1.7200000; betxIP4b2= 228.562579; betyIP4b2= 302.565988; alfxIP4b2= -0.537702; alfyIP4b2= 0.588783; dxIP4b2= 0.000000; dpxIP4b2= 0.000000; muxIP6b1= 2.0000000; muyIP6b1= 2.0300000; betxIP6b1= 225.520569; betyIP6b1= 173.163479; alfxIP6b1= -0.763958; alfyIP6b1= 0.745340; dxIP6b1= 0.000000; dpxIP6b1= 0.000000; muxIP6b2= 2.0000000; muyIP6b2= 2.0300000; betxIP6b2= 239.667035; betyIP6b2= 178.367822; alfxIP6b2= 0.880060; alfyIP6b2= -0.607434; dxIP6b2= 0.000000; dpxIP6b2= 0.000000; muxIP3b1= 2.2550000; muyIP3b1= 1.9550000; betxIP3b1= 121.566844; betyIP3b1= 218.585060; alfxIP3b1= 2.295731; alfyIP3b1= -2.642890; dxIP3b1= -0.510507; dpxIP3b1= -0.006525; muxIP3b2= 2.2550000; muyIP3b2= 1.9550000; betxIP3b2= 121.567284; betyIP3b2= 218.584477; alfxIP3b2= -2.295728; alfyIP3b2= 2.642905; dxIP3b2= -0.422999; dpxIP3b2= 0.008312; muxIP7b1= 2.4550000; muyIP7b1= 1.9700000; betxIP7b1= 120.813252; betyIP7b1= 149.430470; alfxIP7b1= 1.276977; alfyIP7b1= -1.385146; dxIP7b1= -0.203847; dpxIP7b1= 0.000000; muxIP7b2= 2.4550000; muyIP7b2= 1.9700000; betxIP7b2= 120.813252; betyIP7b2= 149.430471; alfxIP7b2= -1.276977; alfyIP7b2= 1.385146; dxIP7b2= -0.011973; dpxIP7b2= 0.000000; !Xscheme summary in IR1, IR2,IR5 and IR8 xIP1b1= 0.0007500000; yIP1b1= 0.0000000000; pxIP1b1= 0.0000000000; pyIP1b1= 0.0002950000; xIP1b2=-0.0007500000; yIP1b2= 0.0000000000; pxIP1b2= 0.0000000000; pyIP1b2=-0.0002950000; xIP2b1= 0.0020000000; yIP2b1= 0.0000000000; pxIP2b1= 0.0000002919; pyIP2b1= 0.0002399994; xIP2b2=-0.0020000000; yIP2b2= 0.0000000000; pxIP2b2=-0.0000002919; pyIP2b2=-0.0002399994; xIP5b1= 0.0000000000; yIP5b1= 0.0007500000; pxIP5b1= 0.0002950000; pyIP5b1= 0.0000000000; xIP5b2= 0.0000000000; yIP5b2=-0.0007500000; pxIP5b2=-0.0002950000; pyIP5b2= 0.0000000000; xIP8b1= 0.0000000000; yIP8b1=-0.0020000000; pxIP8b1=-0.0003049879; pyIP8b1=-0.0000018097; xIP8b2= 0.0000000000; yIP8b2= 0.0020000000; pxIP8b2= 0.0003049879; pyIP8b2= 0.0000018097; !Arc Optics summary muxcell81b1=0.24998135; muycell81b1=0.24998135; mux81b1= 5.2179132; muy81b1= 5.2437668; muxcell45b1=0.24998135; muycell45b1=0.24998135; mux45b1= 5.2179132; muy45b1= 5.2437668; muxcell12b2=0.24998135; muycell12b2=0.24998135; mux12b2= 5.2179132; muy12b2= 5.2437668; muxcell56b2=0.24998135; muycell56b2=0.24998135; mux56b2= 5.2179132; muy56b2= 5.2437668; muxcell12b1=0.24999938; muycell12b1=0.24999938; mux12b1= 5.2441454; muy12b1= 5.2182897; muxcell56b1=0.24999938; muycell56b1=0.24999938; mux56b1= 5.2441454; muy56b1= 5.2182897; muxcell81b2=0.24999938; muycell81b2=0.24999938; mux81b2= 5.2441454; muy81b2= 5.2182897; muxcell45b2=0.24999938; muycell45b2=0.24999938; mux45b2= 5.2441454; muy45b2= 5.2182897; muxcell23b1=0.25316572; muycell23b1=0.24654749; mux23b1= 5.2842423; muy23b1= 5.1716766; muxcell78b2=0.25316572; muycell78b2=0.24654749; mux78b2= 5.2842423; muy78b2= 5.1716766; muxcell34b1=0.25316572; muycell34b1=0.24654749; mux34b1= 5.3106180; muy34b1= 5.1463935; muxcell67b2=0.25316572; muycell67b2=0.24654749; mux67b2= 5.3106180; muy67b2= 5.1463935; muxcell67b1=0.25318391; muycell67b1=0.24656533; mux67b1= 5.2846218; muy67b1= 5.1720516; muxcell34b2=0.25318391; muycell34b2=0.24656533; mux34b2= 5.2846218; muy34b2= 5.1720516; muxcell78b1=0.25318391; muycell78b1=0.24656533; mux78b1= 5.3110006; muy78b1= 5.1467656; muxcell23b2=0.25318391; muycell23b2=0.24656533; mux23b2= 5.3110006; muy23b2= 5.1467656; return ;