ARC_SQUEEZE := 0.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 := 5.500000 ; bety_IP1 := 5.500000 ; betx_IP5 := 5.500000 ; bety_IP5 := 5.500000 ; betx0_IP1 := 5.500000 ; bety0_IP1 := 5.500000 ; betx0_IP5 := 5.500000 ; bety0_IP5 := 5.500000 ; !***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.626927908761E-02 ; KQX2a.L1 := -0.626927908761E-02 ; KQX2b.L1 := -0.626927908761E-02 ; KQX3.L1 := -0.626927908761E-02 ; KQX1.R1 := -KQX1.L1 ; KQX2a.R1 := -KQX2a.L1 ; KQX2b.R1 := -KQX2b.L1 ; KQX3.R1 := -KQX3.L1 ; !Beam1 KQ4.L1B1 := 0.319786666814E-02 ; KQ4.R1B1 := -0.319786666814E-02 ; KQ5.L1B1 := -0.320566201423E-02 ; KQ5.R1B1 := 0.320566201423E-02 ; KQ6.L1B1 := 0.494755486215E-02 ; KQ6.R1B1 := -0.509261613266E-02 ; KQ7.L1B1 := -0.478920914601E-02 ; KQ7.R1B1 := 0.481828942416E-02 ; KQ8.L1B1 := 0.849511532212E-02 ; KQ8.R1B1 := -0.855238681760E-02 ; KQ9.L1B1 := -0.722136052857E-02 ; KQ9.R1B1 := 0.700833522449E-02 ; KQ10.L1B1 := 0.734615553469E-02 ; KQ10.R1B1 := -0.748407457645E-02 ; KQTL11.L1B1 := -0.343687196786E-03 ; KQTL11.R1B1 := 0.678676352806E-03 ; KQT12.L1B1 := -0.446301034967E-03 ; KQT12.R1B1 := -0.512811013468E-03 ; KQT13.L1B1 := 0.475573576232E-02 ; KQT13.R1B1 := -0.139351006100E-03 ; !Beam2 KQ4.L1B2 := -0.320330449228E-02 ; KQ4.R1B2 := 0.320330449228E-02 ; KQ5.L1B2 := 0.359662586292E-02 ; KQ5.R1B2 := -0.359662586292E-02 ; KQ6.L1B2 := -0.529273379138E-02 ; KQ6.R1B2 := 0.540933950059E-02 ; KQ7.L1B2 := 0.471642403832E-02 ; KQ7.R1B2 := -0.470480436978E-02 ; KQ8.L1B2 := -0.841825289024E-02 ; KQ8.R1B2 := 0.851063359567E-02 ; KQ9.L1B2 := 0.689025361809E-02 ; KQ9.R1B2 := -0.703637515830E-02 ; KQ10.L1B2 := -0.727702707302E-02 ; KQ10.R1B2 := 0.738463211492E-02 ; KQTL11.L1B2 := 0.596524838300E-03 ; KQTL11.R1B2 := -0.144024070808E-02 ; KQT12.L1B2 := -0.106136847345E-03 ; KQT12.R1B2 := 0.575323545449E-03 ; KQT13.L1B2 := -0.136664488301E-02 ; KQT13.R1B2 := 0.324896254979E-03 ; !***IR1 X-scheme*** ACBXV1.L1x := 0.189970742178E-04 ; ACBXV1.L1s := 0.125479984074E-04 ; ACBXV1.L1 := ( 0.189970742178E-04 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.125479984074E-04 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBXV1.R1x := -0.189970742178E-04 ; ACBXV1.R1s := 0.125479984074E-04 ; ACBXV1.R1 := ( -0.189970742178E-04 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.125479984074E-04 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBXH1.L1x := 0.175169443687E-04 ; ACBXH1.L1s := 0.122795017846E-04 ; ACBXH1.L1 := ( 0.175169443687E-04 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.122795017846E-04 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBXH1.R1x := -0.175169443687E-04 ; ACBXH1.R1s := 0.122795017846E-04 ; ACBXH1.R1 := ( -0.175169443687E-04 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.122795017846E-04 )*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.622824081604E-04 ; ACBXV3.L1s := 0.278140305834E-04 ; ACBXV3.L1 := ( 0.622824081604E-04 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.278140305834E-04 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBXV3.R1x := -0.622824081604E-04 ; ACBXV3.R1s := 0.278140305834E-04 ; ACBXV3.R1 := ( -0.622824081604E-04 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.278140305834E-04 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBXH3.L1x := 0.664234452527E-04 ; ACBXH3.L1s := 0.278399907789E-04 ; ACBXH3.L1 := ( 0.664234452527E-04 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.278399907789E-04 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBXH3.R1x := -0.664234452528E-04 ; ACBXH3.R1s := 0.278399907789E-04 ; ACBXH3.R1 := ( -0.664234452528E-04 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.278399907789E-04 )*sin(phi_IR1*twopi/360.)*on_sep1 ; !Beam1 ACBRDV4.L1B1x := -0.140949525767E-03 ; ACBRDV4.L1B1s := 0.726944671792E-05 ; ACBRDV4.L1B1 := ( -0.140949525767E-03 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.726944671792E-05 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBRDV4.R1B1x := 0.925984965525E-04 ; ACBRDV4.R1B1s := 0.160403583350E-04 ; ACBRDV4.R1B1 := ( 0.925984965525E-04 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.160403583350E-04 )*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.950370063547E-04 ; ACBRDH4.L1B1s := 0.163240317234E-04 ; ACBRDH4.L1B1 := ( -0.950370063547E-04 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.163240317234E-04 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBRDH4.R1B1x := 0.144680651670E-03 ; ACBRDH4.R1B1s := 0.731863861157E-05 ; ACBRDH4.R1B1 := ( 0.144680651670E-03 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.731863861157E-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.925984965525E-04 ; ACBRDV4.L1B2s := 0.160403583350E-04 ; ACBRDV4.L1B2 := ( -0.925984965525E-04 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.160403583350E-04 )*cos(phi_IR1*twopi/360.)*on_sep1 ; ACBRDV4.R1B2x := 0.140949525767E-03 ; ACBRDV4.R1B2s := 0.726944671792E-05 ; ACBRDV4.R1B2 := ( 0.140949525767E-03 )*sin(phi_IR1*twopi/360.)*on_x1 +( 0.726944671792E-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.144680651670E-03 ; ACBRDH4.L1B2s := 0.731863861157E-05 ; ACBRDH4.L1B2 := ( -0.144680651670E-03 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.731863861157E-05 )*sin(phi_IR1*twopi/360.)*on_sep1 ; ACBRDH4.R1B2x := 0.950370063547E-04 ; ACBRDH4.R1B2s := 0.163240317234E-04 ; ACBRDH4.R1B2 := ( 0.950370063547E-04 )*cos(phi_IR1*twopi/360.)*on_x1 +( 0.163240317234E-04 )*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.142753659597E-05 ; AHCRAB_R1B1 := 0.179927016103E-05 ; AHCRAB_L1B2 := 0.179956880868E-05 ; AHCRAB_R1B2 := 0.142762603538E-05 ; AVCRAB_L1B1 := 0.165061933151E-05 ; AVCRAB_R1B1 := 0.130969680035E-05 ; AVCRAB_L1B2 := 0.130969681984E-05 ; AVCRAB_R1B2 := 0.165061932985E-05 ; !***IR5 Optics*** KQX1.L5 := -0.626927908761E-02 ; KQX2a.L5 := -0.626927908761E-02 ; KQX2b.L5 := -0.626927908761E-02 ; KQX3.L5 := -0.626927908761E-02 ; KQX1.R5 := -KQX1.L5 ; KQX2a.R5 := -KQX2a.L5 ; KQX2b.R5 := -KQX2b.L5 ; KQX3.R5 := -KQX3.L5 ; !Beam1 KQ4.L5B1 := 0.319786666814E-02 ; KQ4.R5B1 := -0.319786666814E-02 ; KQ5.L5B1 := -0.320566201423E-02 ; KQ5.R5B1 := 0.320566201423E-02 ; KQ6.L5B1 := 0.494755486215E-02 ; KQ6.R5B1 := -0.509261613266E-02 ; KQ7.L5B1 := -0.478920914601E-02 ; KQ7.R5B1 := 0.481828942416E-02 ; KQ8.L5B1 := 0.849511532212E-02 ; KQ8.R5B1 := -0.855238681760E-02 ; KQ9.L5B1 := -0.722136052857E-02 ; KQ9.R5B1 := 0.700833522449E-02 ; KQ10.L5B1 := 0.734615553469E-02 ; KQ10.R5B1 := -0.748407457645E-02 ; KQTL11.L5B1 := -0.343687196786E-03 ; KQTL11.R5B1 := 0.678676352806E-03 ; KQT12.L5B1 := -0.446301034967E-03 ; KQT12.R5B1 := -0.512811013468E-03 ; KQT13.L5B1 := 0.475573576232E-02 ; KQT13.R5B1 := -0.139351006100E-03 ; !Beam2 KQ4.L5B2 := -0.320330449228E-02 ; KQ4.R5B2 := 0.320330449228E-02 ; KQ5.L5B2 := 0.359662586292E-02 ; KQ5.R5B2 := -0.359662586292E-02 ; KQ6.L5B2 := -0.529273379138E-02 ; KQ6.R5B2 := 0.540933950059E-02 ; KQ7.L5B2 := 0.471642403832E-02 ; KQ7.R5B2 := -0.470480436978E-02 ; KQ8.L5B2 := -0.841825289024E-02 ; KQ8.R5B2 := 0.851063359567E-02 ; KQ9.L5B2 := 0.689025361809E-02 ; KQ9.R5B2 := -0.703637515830E-02 ; KQ10.L5B2 := -0.727702707302E-02 ; KQ10.R5B2 := 0.738463211492E-02 ; KQTL11.L5B2 := 0.596524838300E-03 ; KQTL11.R5B2 := -0.144024070808E-02 ; KQT12.L5B2 := -0.106136847345E-03 ; KQT12.R5B2 := 0.575323545449E-03 ; KQT13.L5B2 := -0.136664488301E-02 ; KQT13.R5B2 := 0.324896254979E-03 ; !***IR5 X-scheme*** ACBXV1.L5x := 0.189970742156E-04 ; ACBXV1.L5s := 0.125479984074E-04 ; ACBXV1.L5 := ( 0.189970742156E-04 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.125479984074E-04 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBXV1.R5x := -0.189970742154E-04 ; ACBXV1.R5s := 0.125479984074E-04 ; ACBXV1.R5 := ( -0.189970742154E-04 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.125479984074E-04 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBXH1.L5x := 0.175169443710E-04 ; ACBXH1.L5s := 0.122795017846E-04 ; ACBXH1.L5 := ( 0.175169443710E-04 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.122795017846E-04 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBXH1.R5x := -0.175169443709E-04 ; ACBXH1.R5s := 0.122795017846E-04 ; ACBXH1.R5 := ( -0.175169443709E-04 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.122795017846E-04 )*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.622824081628E-04 ; ACBXV3.L5s := 0.278140305835E-04 ; ACBXV3.L5 := ( 0.622824081628E-04 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.278140305835E-04 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBXV3.R5x := -0.622824081628E-04 ; ACBXV3.R5s := 0.278140305835E-04 ; ACBXV3.R5 := ( -0.622824081628E-04 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.278140305835E-04 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBXH3.L5x := 0.664234452503E-04 ; ACBXH3.L5s := 0.278399907788E-04 ; ACBXH3.L5 := ( 0.664234452503E-04 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.278399907788E-04 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBXH3.R5x := -0.664234452504E-04 ; ACBXH3.R5s := 0.278399907788E-04 ; ACBXH3.R5 := ( -0.664234452504E-04 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.278399907788E-04 )*sin(phi_IR5*twopi/360.)*on_sep5 ; !Beam1 ACBRDV4.L5B1x := -0.140949525767E-03 ; ACBRDV4.L5B1s := 0.726944671776E-05 ; ACBRDV4.L5B1 := ( -0.140949525767E-03 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.726944671776E-05 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBRDV4.R5B1x := 0.925984965535E-04 ; ACBRDV4.R5B1s := 0.160403583351E-04 ; ACBRDV4.R5B1 := ( 0.925984965535E-04 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.160403583351E-04 )*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.950370063537E-04 ; ACBRDH4.L5B1s := 0.163240317233E-04 ; ACBRDH4.L5B1 := ( -0.950370063537E-04 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.163240317233E-04 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBRDH4.R5B1x := 0.144680651669E-03 ; ACBRDH4.R5B1s := 0.731863861174E-05 ; ACBRDH4.R5B1 := ( 0.144680651669E-03 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.731863861174E-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.925984965535E-04 ; ACBRDV4.L5B2s := 0.160403583351E-04 ; ACBRDV4.L5B2 := ( -0.925984965535E-04 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.160403583351E-04 )*cos(phi_IR5*twopi/360.)*on_sep5 ; ACBRDV4.R5B2x := 0.140949525767E-03 ; ACBRDV4.R5B2s := 0.726944671776E-05 ; ACBRDV4.R5B2 := ( 0.140949525767E-03 )*sin(phi_IR5*twopi/360.)*on_x5 +( 0.726944671776E-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.144680651669E-03 ; ACBRDH4.L5B2s := 0.731863861174E-05 ; ACBRDH4.L5B2 := ( -0.144680651669E-03 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.731863861174E-05 )*sin(phi_IR5*twopi/360.)*on_sep5 ; ACBRDH4.R5B2x := 0.950370063537E-04 ; ACBRDH4.R5B2s := 0.163240317233E-04 ; ACBRDH4.R5B2 := ( 0.950370063537E-04 )*cos(phi_IR5*twopi/360.)*on_x5 +( 0.163240317233E-04 )*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.142745744824E-05 ; AHCRAB_R5B1 := 0.179935934162E-05 ; AHCRAB_L5B2 := 0.179944263557E-05 ; AHCRAB_R5B2 := 0.142745868714E-05 ; AVCRAB_L5B1 := 0.165061933964E-05 ; AVCRAB_R5B1 := 0.130969685487E-05 ; AVCRAB_L5B2 := 0.130969675189E-05 ; AVCRAB_R5B2 := 0.165061932374E-05 ; !***IR2 Optics*** KQX.L2 := 0.950981581300E-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.549274522900E-02 ; KQ4.R2B1 := 0.492308831500E-02 ; KQ5.L2B1 := 0.482678438300E-02 ; KQ5.R2B1 := -0.474422267900E-02 ; KQ6.L2B1 := -0.429969717816E-02 ; KQ6.R2B1 := 0.437263586291E-02 ; KQ7.L2B1 := 0.633654543117E-02 ; KQ7.R2B1 := -0.680376255392E-02 ; KQ8.L2B1 := -0.407804155460E-02 ; KQ8.R2B1 := 0.596605708883E-02 ; KQ9.L2B1 := 0.614650030990E-02 ; KQ9.R2B1 := -0.616729653942E-02 ; KQ10.L2B1 := -0.588385405284E-02 ; KQ10.R2B1 := 0.728879072779E-02 ; KQTL11.L2B1 := 0.500647083262E-03 ; KQTL11.R2B1 := -0.182501254177E-03 ; KQT12.L2B1 := -0.472278976791E-03 ; KQT12.R2B1 := -0.256520546030E-02 ; KQT13.L2B1 := -0.751609738151E-03 ; KQT13.R2B1 := -0.264811550976E-02 ; !Beam2 KQ4.L2B2 := 0.518632344160E-02 ; KQ4.R2B2 := -0.537346244860E-02 ; KQ5.L2B2 := -0.422506183572E-02 ; KQ5.R2B2 := 0.440860036690E-02 ; KQ6.L2B2 := 0.420229878776E-02 ; KQ6.R2B2 := -0.423242149737E-02 ; KQ7.L2B2 := -0.629389409468E-02 ; KQ7.R2B2 := 0.611168682297E-02 ; KQ8.L2B2 := 0.626587251258E-02 ; KQ8.R2B2 := -0.429438231215E-02 ; KQ9.L2B2 := -0.726405267555E-02 ; KQ9.R2B2 := 0.659484138630E-02 ; KQ10.L2B2 := 0.736063967783E-02 ; KQ10.R2B2 := -0.600379870228E-02 ; KQTL11.L2B2 := -0.153267889695E-02 ; KQTL11.R2B2 := 0.395058780965E-03 ; KQT12.L2B2 := -0.245113883427E-02 ; KQT12.R2B2 := 0.268250005715E-03 ; KQT13.L2B2 := -0.113201008732E-02 ; KQT13.R2B2 := 0.152985440584E-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.100000000000E-05 *on_x2; ACBXV1.R2 := -0.100000000000E-05 *on_x2; ACBXH1.L2 := 0.180000000000E-04 *on_sep2; ACBXH1.R2 := 0.180000000000E-04 *on_sep2; ACBXV2.L2 := 0.100000000000E-05 *on_x2; ACBXV2.R2 := -0.100000000000E-05 *on_x2; ACBXH2.L2 := 0.180000000000E-04 *on_sep2; ACBXH2.R2 := 0.180000000000E-04 *on_sep2; ACBXV3.L2 := 0.100000000000E-05 *on_x2; ACBXV3.R2 := -0.100000000000E-05 *on_x2; ACBXH3.L2 := 0.180000000000E-04 *on_sep2; ACBXH3.R2 := 0.180000000000E-04 *on_sep2; !Beam1 ACBYVS4.L2B1 := -0.612347392142E-04 *on_x2; ACBYVS4.R2B1 := -0.463653659358E-05 *on_x2; ACBYVS5.L2B1 := -0.539979414030E-05 *on_x2; ACBCVS5.R2B1 := 0.441296517214E-04 *on_x2; ACBYHS4.L2B1 := 0.355628134709E-04 *on_sep2; ACBYHS4.R2B1 := 0.139504413495E-04 *on_sep2; ACBYHS5.L2B1 := -0.881939005548E-05 *on_sep2; ACBCHS5.R2B1 := 0.140179083869E-04 *on_sep2; !Beam2 ACBYVS4.L2B2 := 0.668406331840E-05 *on_x2; ACBYVS4.R2B2 := -0.586174239443E-04 *on_x2; ACBYVS5.L2B2 := 0.350060655965E-04 *on_x2; ACBCVS5.R2B2 := -0.823044632363E-05 *on_x2; ACBYHS4.L2B2 := -0.187052965041E-04 *on_sep2; ACBYHS4.R2B2 := -0.385494807069E-04 *on_sep2; ACBYHS5.L2B2 := -0.939874817918E-05 *on_sep2; ACBCHS5.R2B2 := 0.108113100294E-04 *on_sep2; !***IR8 Optics*** KQX.L8 := 0.950981581300E-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.427350821506E-02 ; KQ4.R8B1 := 0.499189555719E-02 ; KQ5.L8B1 := 0.472789228207E-02 ; KQ5.R8B1 := -0.435240422518E-02 ; KQ6.L8B1 := -0.437227165210E-02 ; KQ6.R8B1 := 0.358383636403E-02 ; KQ7.L8B1 := 0.625974319567E-02 ; KQ7.R8B1 := -0.585440180930E-02 ; KQ8.L8B1 := -0.532654153968E-02 ; KQ8.R8B1 := 0.646018481885E-02 ; KQ9.L8B1 := 0.637864703540E-02 ; KQ9.R8B1 := -0.673218256800E-02 ; KQ10.L8B1 := -0.672450271632E-02 ; KQ10.R8B1 := 0.731181404359E-02 ; KQTL11.L8B1 := 0.456903644681E-03 ; KQTL11.R8B1 := 0.424234827407E-03 ; KQT12.L8B1 := 0.281847026392E-02 ; KQT12.R8B1 := -0.330683693368E-02 ; KQT13.L8B1 := -0.219887846628E-02 ; KQT13.R8B1 := -0.841660235919E-03 ; !Beam2 KQ4.L8B2 := 0.467704586700E-02 ; KQ4.R8B2 := -0.447368899600E-02 ; KQ5.L8B2 := -0.565604833600E-02 ; KQ5.R8B2 := 0.425682473400E-02 ; KQ6.L8B2 := 0.465394681130E-02 ; KQ6.R8B2 := -0.343635834070E-02 ; KQ7.L8B2 := -0.814781333653E-02 ; KQ7.R8B2 := 0.567399813602E-02 ; KQ8.L8B2 := 0.667358781916E-02 ; KQ8.R8B2 := -0.464273379570E-02 ; KQ9.L8B2 := -0.657119467370E-02 ; KQ9.R8B2 := 0.672638594397E-02 ; KQ10.L8B2 := 0.725107776331E-02 ; KQ10.R8B2 := -0.579438836644E-02 ; KQTL11.L8B2 := 0.191274737931E-02 ; KQTL11.R8B2 := 0.245560714107E-03 ; KQT12.L8B2 := -0.419683681941E-02 ; KQT12.R8B2 := 0.407880070473E-02 ; KQT13.L8B2 := 0.468967048416E-02 ; KQT13.R8B2 := 0.282474243422E-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.180000000000E-04 *on_sep8; ACBXV1.R8 := -0.180000000000E-04 *on_sep8; ACBXH1.L8 := -0.100000000000E-05 *on_x8; ACBXH1.R8 := 0.100000000000E-05 *on_x8; ACBXV2.L8 := -0.180000000000E-04 *on_sep8; ACBXV2.R8 := -0.180000000000E-04 *on_sep8; ACBXH2.L8 := -0.100000000000E-05 *on_x8; ACBXH2.R8 := 0.100000000000E-05 *on_x8; ACBXV3.L8 := -0.180000000000E-04 *on_sep8; ACBXV3.R8 := -0.180000000000E-04 *on_sep8; ACBXH3.L8 := -0.100000000000E-05 *on_x8; ACBXH3.R8 := 0.100000000000E-05 *on_x8; !Beam1 ACBYVS4.L8B1 := -0.165447988881E-04 *on_sep8; ACBYVS4.R8B1 := -0.348419612769E-04 *on_sep8; ACBCVS5.L8B1 := -0.892181941063E-05 *on_sep8; ACBYVS5.R8B1 := 0.876979821373E-05 *on_sep8; ACBYHS4.L8B1 := 0.103191487933E-04 *on_x8; ACBYHS4.R8B1 := -0.605553228482E-04 *on_x8; ACBWH5.L8B1 := 0.000000000000E+00 *on_x8; ACBCH5.L8B1 := 0.365388838068E-04 *on_x8; ACBCHS5.L8B1 := 0.000000000000E+00 *on_x8; ACBYHS5.R8B1 := -0.535669851645E-05 *on_x8; !Beam2 ACBYVS4.L8B2 := 0.342750568662E-04 *on_sep8; ACBYVS4.R8B2 := 0.170309134515E-04 *on_sep8; ACBCVS5.L8B2 := -0.934900091441E-05 *on_sep8; ACBYVS5.R8B2 := 0.911480532557E-05 *on_sep8; ACBYHS4.L8B2 := -0.600850539171E-04 *on_x8; ACBYHS4.R8B2 := 0.110759645213E-04 *on_x8; ACBCHS5.L8B2 := -0.509612730141E-05 *on_x8; ACBYHS5.R8B2 := 0.357625009311E-04 *on_x8; !***IR4 Optics*** !Beam1 KQ5.L4B1 := 0.454615520024E-02 ; KQ5.R4B1 := -0.452825298792E-02 ; KQ6.L4B1 := -0.515621612566E-02 ; KQ6.R4B1 := 0.594766777809E-02 ; KQ7.L4B1 := 0.712422630636E-02 ; KQ7.R4B1 := -0.820436943098E-02 ; KQ8.L4B1 := -0.477710314326E-02 ; KQ8.R4B1 := 0.777636194271E-02 ; KQ9.L4B1 := 0.663381063085E-02 ; KQ9.R4B1 := -0.641363383353E-02 ; KQ10.L4B1 := -0.546415080420E-02 ; KQ10.R4B1 := 0.710099691185E-02 ; KQTL11.L4B1 := 0.173438343874E-03 ; KQTL11.R4B1 := 0.133967664382E-02 ; KQT12.L4B1 := 0.423772652157E-02 ; KQT12.R4B1 := -0.225545300671E-02 ; KQT13.L4B1 := 0.156767718398E-02 ; KQT13.R4B1 := -0.100589337323E-02 ; !Beam2 KQ5.L4B2 := -0.430261936066E-02 ; KQ5.R4B2 := 0.462221667443E-02 ; KQ6.L4B2 := 0.590365700684E-02 ; KQ6.R4B2 := -0.614611154539E-02 ; KQ7.L4B2 := -0.494445342859E-02 ; KQ7.R4B2 := 0.656224311800E-02 ; KQ8.L4B2 := 0.853033954196E-02 ; KQ8.R4B2 := -0.722494712508E-02 ; KQ9.L4B2 := -0.510576498201E-02 ; KQ9.R4B2 := 0.635059974042E-02 ; KQ10.L4B2 := 0.713903818178E-02 ; KQ10.R4B2 := -0.568054779017E-02 ; KQTL11.L4B2 := 0.165729540860E-02 ; KQTL11.R4B2 := 0.601787614004E-03 ; KQT12.L4B2 := 0.472898558894E-03 ; KQT12.R4B2 := 0.184824534332E-02 ; KQT13.L4B2 := 0.227699631943E-02 ; KQT13.R4B2 := -0.966364442354E-03 ; !***IR6 Optics*** !Beam1 KQ4.L6B1 := -0.488141473400E-02 ; KQ4.R6B1 := 0.484358029001E-02 ; KQ5.L6B1 := 0.459627629226E-02 ; KQ5.R6B1 := -0.463900194907E-02 ; KQ8.L6B1 := -0.509798986999E-02 ; KQ8.R6B1 := 0.522447182454E-02 ; KQ9.L6B1 := 0.690581645834E-02 ; KQ9.R6B1 := -0.698600476535E-02 ; KQ10.L6B1 := -0.752508471321E-02 ; KQ10.R6B1 := 0.734561545041E-02 ; KQTL11.L6B1 := 0.165329116696E-02 ; KQTL11.R6B1 := -0.152955298108E-02 ; KQT12.L6B1 := -0.107250129919E-02 ; KQT12.R6B1 := -0.279859256601E-02 ; KQT13.L6B1 := 0.929939943858E-03 ; KQT13.R6B1 := 0.831146398174E-03 ; !Beam2 KQ4.L6B2 := 0.485592666642E-02 ; KQ4.R6B2 := -0.483383773000E-02 ; KQ5.L6B2 := -0.462861485335E-02 ; KQ5.R6B2 := 0.457878482020E-02 ; KQ8.L6B2 := 0.517171082135E-02 ; KQ8.R6B2 := -0.512705767395E-02 ; KQ9.L6B2 := -0.693573443251E-02 ; KQ9.R6B2 := 0.695270128530E-02 ; KQ10.L6B2 := 0.726696009072E-02 ; KQ10.R6B2 := -0.763920330182E-02 ; KQTL11.L6B2 := -0.145673123971E-02 ; KQTL11.R6B2 := 0.172825965895E-02 ; KQT12.L6B2 := -0.165462839194E-02 ; KQT12.R6B2 := -0.156582135447E-02 ; KQT13.L6B2 := 0.102721824077E-02 ; KQT13.R6B2 := 0.921554655061E-03 ; !***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.B1; KQTF.A12B1 := 0.000000000000E+00 + KQTF.B1; KQTF.A45B1 := 0.000000000000E+00 + KQTF.B1; KQTF.A56B1 := 0.000000000000E+00 + KQTF.B1; KQTD.A81B1 := 0.000000000000E+00 + KQTD.B1; KQTD.A12B1 := 0.000000000000E+00 + KQTD.B1; KQTD.A45B1 := 0.000000000000E+00 + KQTD.B1; KQTD.A56B1 := 0.000000000000E+00 + KQTD.B1; 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.B2; KQTF.A12B2 := 0.000000000000E+00 + KQTF.B2; KQTF.A45B2 := 0.000000000000E+00 + KQTF.B2; KQTF.A56B2 := 0.000000000000E+00 + KQTF.B2; KQTD.A81B2 := 0.000000000000E+00 + KQTD.B2; KQTD.A12B2 := 0.000000000000E+00 + KQTD.B2; KQTD.A45B2 := 0.000000000000E+00 + KQTD.B2; KQTD.A56B2 := 0.000000000000E+00 + KQTD.B2; 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.619739744191E-01 +KSF.B1; KSF1.A12B1 := 0.619739744191E-01 +KSF.B1; KSF1.A45B1 := 0.619739744191E-01 +KSF.B1; KSF1.A56B1 := 0.619739744191E-01 +KSF.B1; KSD2.A81B1 := -0.102482038940E+00 +KSD.B1; KSD2.A12B1 := -0.102482038940E+00 +KSD.B1; KSD2.A45B1 := -0.102482038940E+00 +KSD.B1; KSD2.A56B1 := -0.102482038940E+00 +KSD.B1; !Weak sextupoles of sectors 81/12/45/56 KSF2.A81B1 := 0.619739744191E-01 +KSF.B1; KSF2.A12B1 := 0.619739744191E-01 +KSF.B1; KSF2.A45B1 := 0.619739744191E-01 +KSF.B1; KSF2.A56B1 := 0.619739744191E-01 +KSF.B1; KSD1.A81B1 := -0.102482038940E+00 +KSD.B1; KSD1.A12B1 := -0.102482038940E+00 +KSD.B1; KSD1.A45B1 := -0.102482038940E+00 +KSD.B1; KSD1.A56B1 := -0.102482038940E+00 +KSD.B1; !Weak sextupoles of sectors 78/23/34/67 KSF1.A78B1 := 0.620898075797E-01 +KSF.B1; KSF2.A78B1 := 0.620898075797E-01 +KSF.B1; KSF1.A23B1 := 0.620898075797E-01 +KSF.B1; KSF2.A23B1 := 0.620898075797E-01 +KSF.B1; KSF1.A34B1 := 0.620898075797E-01 +KSF.B1; KSF2.A34B1 := 0.620898075797E-01 +KSF.B1; KSF1.A67B1 := 0.620898075797E-01 +KSF.B1; KSF2.A67B1 := 0.620898075797E-01 +KSF.B1; KSD1.A78B1 := -0.102593182713E+00 +KSD.B1; KSD2.A78B1 := -0.102593182713E+00 +KSD.B1; KSD1.A23B1 := -0.102593182713E+00 +KSD.B1; KSD2.A23B1 := -0.102593182713E+00 +KSD.B1; KSD1.A34B1 := -0.102593182713E+00 +KSD.B1; KSD2.A34B1 := -0.102593182713E+00 +KSD.B1; KSD1.A67B1 := -0.102593182713E+00 +KSD.B1; KSD2.A67B1 := -0.102593182713E+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.620606197562E-01 +KSF.B2; KSF2.A12B2 := 0.620606197562E-01 +KSF.B2; KSF2.A45B2 := 0.620606197562E-01 +KSF.B2; KSF2.A56B2 := 0.620606197562E-01 +KSF.B2; KSD1.A81B2 := -0.102852001542E+00 +KSD.B2; KSD1.A12B2 := -0.102852001542E+00 +KSD.B2; KSD1.A45B2 := -0.102852001542E+00 +KSD.B2; KSD1.A56B2 := -0.102852001542E+00 +KSD.B2; !Weak sextupoles of sectors 81/12/45/56 KSF1.A81B2 := 0.620606197562E-01 +KSF.B2; KSF1.A12B2 := 0.620606197562E-01 +KSF.B2; KSF1.A45B2 := 0.620606197562E-01 +KSF.B2; KSF1.A56B2 := 0.620606197562E-01 +KSF.B2; KSD2.A81B2 := -0.102852001542E+00 +KSD.B2; KSD2.A12B2 := -0.102852001542E+00 +KSD.B2; KSD2.A45B2 := -0.102852001542E+00 +KSD.B2; KSD2.A56B2 := -0.102852001542E+00 +KSD.B2; !Weak sextupoles of sectors 78/23/34/67 KSF1.A78B2 := 0.621101889900E-01 +KSF.B2; KSF2.A78B2 := 0.621101889900E-01 +KSF.B2; KSF1.A23B2 := 0.621101889900E-01 +KSF.B2; KSF2.A23B2 := 0.621101889900E-01 +KSF.B2; KSF1.A34B2 := 0.621101889900E-01 +KSF.B2; KSF2.A34B2 := 0.621101889900E-01 +KSF.B2; KSF1.A67B2 := 0.621101889900E-01 +KSF.B2; KSF2.A67B2 := 0.621101889900E-01 +KSF.B2; KSD1.A78B2 := -0.102897268450E+00 +KSD.B2; KSD2.A78B2 := -0.102897268450E+00 +KSD.B2; KSD1.A23B2 := -0.102897268450E+00 +KSD.B2; KSD2.A23B2 := -0.102897268450E+00 +KSD.B2; KSD1.A34B2 := -0.102897268450E+00 +KSD.B2; KSD2.A34B2 := -0.102897268450E+00 +KSD.B2; KSD1.A67B2 := -0.102897268450E+00 +KSD.B2; KSD2.A67B2 := -0.102897268450E+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.000000000000E+00 ; acbh16.r8b1s := 0.000000000000E+00 ; acbh16.r8b1 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh14.l1b1x := 0.000000000000E+00 ; acbh14.l1b1s := 0.000000000000E+00 ; acbh14.l1b1 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh12.l1b1x := 0.000000000000E+00 ; acbh12.l1b1s := 0.000000000000E+00 ; acbh12.l1b1 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh13.r1b1x := 0.000000000000E+00 ; acbh13.r1b1s := 0.000000000000E+00 ; acbh13.r1b1 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh15.r1b1x := 0.000000000000E+00 ; acbh15.r1b1s := 0.000000000000E+00 ; acbh15.r1b1 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh15.l2b1x := 0.000000000000E+00 ; acbh15.l2b1s := 0.000000000000E+00 ; acbh15.l2b1 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*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.000000000000E+00 ; acbv15.r8b1s := 0.000000000000E+00 ; acbv15.r8b1 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv15.l1b1x := 0.000000000000E+00 ; acbv15.l1b1s := 0.000000000000E+00 ; acbv15.l1b1 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv13.l1b1x := 0.000000000000E+00 ; acbv13.l1b1s := 0.000000000000E+00 ; acbv13.l1b1 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv12.r1b1x := 0.000000000000E+00 ; acbv12.r1b1s := 0.000000000000E+00 ; acbv12.r1b1 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv14.r1b1x := 0.000000000000E+00 ; acbv14.r1b1s := 0.000000000000E+00 ; acbv14.r1b1 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv16.l2b1x := 0.000000000000E+00 ; acbv16.l2b1s := 0.000000000000E+00 ; acbv16.l2b1 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*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.000000000000E+00 ; acbh16.r4b1s := 0.000000000000E+00 ; acbh16.r4b1 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh14.l5b1x := 0.000000000000E+00 ; acbh14.l5b1s := 0.000000000000E+00 ; acbh14.l5b1 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh12.l5b1x := 0.000000000000E+00 ; acbh12.l5b1s := 0.000000000000E+00 ; acbh12.l5b1 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh13.r5b1x := 0.000000000000E+00 ; acbh13.r5b1s := 0.000000000000E+00 ; acbh13.r5b1 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh15.r5b1x := 0.000000000000E+00 ; acbh15.r5b1s := 0.000000000000E+00 ; acbh15.r5b1 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh15.l6b1x := 0.000000000000E+00 ; acbh15.l6b1s := 0.000000000000E+00 ; acbh15.l6b1 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*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.000000000000E+00 ; acbv15.r4b1s := 0.000000000000E+00 ; acbv15.r4b1 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv15.l5b1x := 0.000000000000E+00 ; acbv15.l5b1s := 0.000000000000E+00 ; acbv15.l5b1 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv13.l5b1x := 0.000000000000E+00 ; acbv13.l5b1s := 0.000000000000E+00 ; acbv13.l5b1 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv12.r5b1x := 0.000000000000E+00 ; acbv12.r5b1s := 0.000000000000E+00 ; acbv12.r5b1 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv14.r5b1x := 0.000000000000E+00 ; acbv14.r5b1s := 0.000000000000E+00 ; acbv14.r5b1 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv16.l6b1x := 0.000000000000E+00 ; acbv16.l6b1s := 0.000000000000E+00 ; acbv16.l6b1 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*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.000000000000E+00 ; acbh15.r8b2s := 0.000000000000E+00 ; acbh15.r8b2 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh15.l1b2x := 0.000000000000E+00 ; acbh15.l1b2s := 0.000000000000E+00 ; acbh15.l1b2 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh13.l1b2x := 0.000000000000E+00 ; acbh13.l1b2s := 0.000000000000E+00 ; acbh13.l1b2 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh12.r1b2x := 0.000000000000E+00 ; acbh12.r1b2s := 0.000000000000E+00 ; acbh12.r1b2 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh14.r1b2x := 0.000000000000E+00 ; acbh14.r1b2s := 0.000000000000E+00 ; acbh14.r1b2 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbh16.l2b2x := 0.000000000000E+00 ; acbh16.l2b2s := 0.000000000000E+00 ; acbh16.l2b2 := (( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*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.000000000000E+00 ; acbv16.r8b2s := 0.000000000000E+00 ; acbv16.r8b2 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv14.l1b2x := 0.000000000000E+00 ; acbv14.l1b2s := 0.000000000000E+00 ; acbv14.l1b2 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv12.l1b2x := 0.000000000000E+00 ; acbv12.l1b2s := 0.000000000000E+00 ; acbv12.l1b2 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv13.r1b2x := 0.000000000000E+00 ; acbv13.r1b2s := 0.000000000000E+00 ; acbv13.r1b2 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv15.r1b2x := 0.000000000000E+00 ; acbv15.r1b2s := 0.000000000000E+00 ; acbv15.r1b2 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*cos(phi_IR1*twopi/360.)*on_sep1)*ON_DISP ; acbv15.l2b2x := 0.000000000000E+00 ; acbv15.l2b2s := 0.000000000000E+00 ; acbv15.l2b2 := (( 0.000000000000E+00 )*sin(phi_IR1*twopi/360.)*on_x1+( 0.000000000000E+00 )*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.000000000000E+00 ; acbh15.r4b2s := 0.000000000000E+00 ; acbh15.r4b2 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh15.l5b2x := 0.000000000000E+00 ; acbh15.l5b2s := 0.000000000000E+00 ; acbh15.l5b2 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh13.l5b2x := 0.000000000000E+00 ; acbh13.l5b2s := 0.000000000000E+00 ; acbh13.l5b2 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh12.r5b2x := 0.000000000000E+00 ; acbh12.r5b2s := 0.000000000000E+00 ; acbh12.r5b2 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh14.r5b2x := 0.000000000000E+00 ; acbh14.r5b2s := 0.000000000000E+00 ; acbh14.r5b2 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbh16.l6b2x := 0.000000000000E+00 ; acbh16.l6b2s := 0.000000000000E+00 ; acbh16.l6b2 := (( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*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.000000000000E+00 ; acbv16.r4b2s := 0.000000000000E+00 ; acbv16.r4b2 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv14.l5b2x := 0.000000000000E+00 ; acbv14.l5b2s := 0.000000000000E+00 ; acbv14.l5b2 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv12.l5b2x := 0.000000000000E+00 ; acbv12.l5b2s := 0.000000000000E+00 ; acbv12.l5b2 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv13.r5b2x := 0.000000000000E+00 ; acbv13.r5b2s := 0.000000000000E+00 ; acbv13.r5b2 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv15.r5b2x := 0.000000000000E+00 ; acbv15.r5b2s := 0.000000000000E+00 ; acbv15.r5b2 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*cos(phi_IR5*twopi/360.)*on_sep5)*ON_DISP ; acbv15.l6b2x := 0.000000000000E+00 ; acbv15.l6b2s := 0.000000000000E+00 ; acbv15.l6b2 := (( 0.000000000000E+00 )*sin(phi_IR5*twopi/360.)*on_x5+( 0.000000000000E+00 )*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.280000; Qyb1 = 60.310000; Qpxb1= 2.000000; Qpyb1= 2.000000; Qxb2 = 62.280000; Qyb2 = 60.310000; Qpxb2= 2.000000; Qpyb2= 2.000000; !IR Optics summary (phase, twiss param., dispersion) muxIP1b1= 2.6277000; muyIP1b1= 2.6370000; muxIP1b1_L= 1.3512841; muyIP1b1_L= 1.2679579; muxIP1b1_R= 1.2764159; muyIP1b1_R= 1.3690421; betxIP1b1= 5.500000; betyIP1b1= 5.500000; alfxIP1b1= 0.000000; alfyIP1b1= 0.000000; dxIP1b1= 0.000000; dpxIP1b1= 0.000000; muxIP1b2= 2.6277000; muyIP1b2= 2.6370000; muxIP1b2_L= 1.2689648; muyIP1b2_L= 1.3451626; muxIP1b2_R= 1.3587352; muyIP1b2_R= 1.2918374; betxIP1b2= 5.500000; betyIP1b2= 5.500000; alfxIP1b2= 0.000000; alfyIP1b2= 0.000000; dxIP1b2= 0.000000; dpxIP1b2= 0.000000; muxIP5b1= 2.6277000; muyIP5b1= 2.6370000; muxIP5b1_L= 1.3512841; muyIP5b1_L= 1.2679579; muxIP5b1_R= 1.2764159; muyIP5b1_R= 1.3690421; betxIP5b1= 5.500000; betyIP5b1= 5.500000; alfxIP5b1= 0.000000; alfyIP5b1= 0.000000; dxIP5b1= 0.000000; dpxIP5b1= 0.000000; muxIP5b2= 2.6277000; muyIP5b2= 2.6370000; muxIP5b2_L= 1.2689648; muyIP5b2_L= 1.3451626; muxIP5b2_R= 1.3587352; muyIP5b2_R= 1.2918374; betxIP5b2= 5.500000; betyIP5b2= 5.500000; 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= 187.297499; betyIP6b1= 168.122917; alfxIP6b1= -0.541994; alfyIP6b1= 0.605891; dxIP6b1= 0.140000; dpxIP6b1= 0.000000; muxIP6b2= 2.0000000; muyIP6b2= 2.0300000; betxIP6b2= 187.749224; betyIP6b2= 178.368556; alfxIP6b2= 0.551968; alfyIP6b2= -0.607183; dxIP6b2= 0.186000; dpxIP6b2= -0.000256; muxIP3b1= 2.2550000; muyIP3b1= 1.9550000; betxIP3b1= 121.566844; betyIP3b1= 218.585060; alfxIP3b1= 2.295731; alfyIP3b1= -2.642890; dxIP3b1= -0.510508; dpxIP3b1= -0.006525; muxIP3b2= 2.2550000; muyIP3b2= 1.9550000; betxIP3b2= 121.567284; betyIP3b2= 218.584477; alfxIP3b2= -2.295728; alfyIP3b2= 2.642905; dxIP3b2= -0.423000; 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.0020000000; yIP1b1= 0.0000000000; pxIP1b1= 0.0000000000; pyIP1b1= 0.0002450000; xIP1b2=-0.0020000000; yIP1b2= 0.0000000000; pxIP1b2= 0.0000000000; pyIP1b2=-0.0002450000; 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.0020000000; pxIP5b1= 0.0002450000; pyIP5b1= 0.0000000000; xIP5b2= 0.0000000000; yIP5b2=-0.0020000000; pxIP5b2=-0.0002450000; 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 ;