! ============================================================================== ! multipoles ! ------------------------------------------------------------------------------ ! chicane dipoles KLB1LE := 0.02258935 KLB2LE := -0.0328099014 KLB3LE := 0.010220551408 KLB3RE := 0.010220551408 KLB2RE := -0.0328099014 KLB1RE := 0.02258935 KLWIGE1 := -0.25E-2 KLWIGE2 := 0.5E-2 KLWIGE3 := -0.25E-2 B1LEm : MULT, & !B1E#1\wirepltvsx.ru2 (I=551.459) K1L=KnLBF*KLB1LE*(-0.017064126639)/4, & K2L=KnLBF*KLB1LE*(-5.082426816743)/4, & K3L=KnLBF*KLB1LE*(-76.148657244914)/4, & K4L=KnLBF*KLB1LE*(2.451597094554E5)/4, & K5L=KnLBF*KLB1LE*(5.213522310586E6)/4, & K6L=KnLBF*KLB1LE*(-3.347730577476E9)/4, & APER=0.0115 B2LEm : MULT, & !B2E#1\wirepltvsx.ru1 (I=315.896) K1L=KnLBF*KLB2LE*(-0.046555608063)/4, & K2L=KnLBF*KLB2LE*(-57.923063068943)/4, & K3L=KnLBF*KLB2LE*(3.639421988802E3)/4, & K4L=KnLBF*KLB2LE*(6.647659496606E6)/4, & K5L=KnLBF*KLB2LE*(-3.496406632625E8)/4, & K6L=KnLBF*KLB2LE*(-9.34354885101E11)/4, & APER=0.635E-2 B3LEm : MULT, & !B3E#1\wirepltvsx.ru3 (I=399.647) K1L=KnLBF*KLB3LE*(0.016235524346)/4, & K2L=KnLBF*KLB3LE*(-2.953909566937)/4, & K3L=KnLBF*KLB3LE*(-96.029390865431)/4, & K4L=KnLBF*KLB3LE*(5.754340916609E4)/4, & K5L=KnLBF*KLB3LE*(1.506736060723E6)/4, & K6L=KnLBF*KLB3LE*(-2.23526406365E9)/4, & APER=0.010325 B3REm : MULT, & !B3E#2\wirepltvsx.ru3 (I=399.770) K1L=KnLBF*KLB3RE*(0.012608278512)/4, & K2L=KnLBF*KLB3RE*(-5.558140723956)/4, & K3L=KnLBF*KLB3RE*(-2.80713702546E2)/4, & K4L=KnLBF*KLB3RE*(8.080260820302E4)/4, & K5L=KnLBF*KLB3RE*(6.065740892371E6)/4, & K6L=KnLBF*KLB3RE*(-2.094381648883E9)/4, & APER=0.010325 B2REm : MULT, & !B2E#2\wirepltvsx.ru2 (I=315.080) K1L=KnLBF*KLB2RE*(-0.01057232568)/4, & K2L=KnLBF*KLB2RE*(-55.719835905228)/4, & K3L=KnLBF*KLB2RE*(2.146342383201E3)/4, & K4L=KnLBF*KLB2RE*(6.306841761534E6)/4, & K5L=KnLBF*KLB2RE*(-4.411177852958E8)/4, & K6L=KnLBF*KLB2RE*(-8.857901572971E11)/4, & APER=0.635E-2 B1REm : MULT, & !B1E#2\wirepltvsx.ru3 (I=551.480) K1L=KnLBF*KLB1RE*(-0.357618287167E-2)/4, & K2L=KnLBF*KLB1RE*(-6.48371420405)/4, & K3L=KnLBF*KLB1RE*(-1.407230524592E2)/4, & K4L=KnLBF*KLB1RE*(3.017073828673E5)/4, & K5L=KnLBF*KLB1RE*(6.9003510269E6)/4, & K6L=KnLBF*KLB1RE*(-4.324101698492E9)/4, & APER=0.0115 WIGE1m : MULT, & !WIG1E#1\wireplt.ru5 (I=104.342) K1L=KnLBF*KLWIGE1*(0.618254522406E-2)/4,T1=PI/2, & K2L=KnLBF*KLWIGE1*(-44.610505433032)/4,T2=PI/2, & K3L=KnLBF*KLWIGE1*(-5.1971778119E2)/4,T3=PI/2, & K4L=KnLBF*KLWIGE1*(-1.005735536372E6)/4,T4=PI/2, & K5L=KnLBF*KLWIGE1*(2.294671247108E7)/4,T5=PI/2, & K6L=KnLBF*KLWIGE1*(-3.114781126777E11)/4,T6=PI/2, & APER=0.01016 WIGE2m : MULT, & !WIG2E\wireplt.ru3 (I=104.342) K1L=KnLBF*KLWIGE2*(0.030005978133)/4,T1=PI/2, & K2L=KnLBF*KLWIGE2*(-41.972230761551)/4,T2=PI/2, & K3L=KnLBF*KLWIGE2*(-5.691833018745E2)/4,T3=PI/2, & K4L=KnLBF*KLWIGE2*(-3.109847673464E5)/4,T4=PI/2, & K5L=KnLBF*KLWIGE2*(1.046128471031E8)/4,T5=PI/2, & K6L=KnLBF*KLWIGE2*(-3.412069883774E11)/4,T6=PI/2, & APER=0.01016 WIGE3m : MULT, & !WIG1E#2\wireplt.ru2 (I=104.342) K1L=KnLBF*KLWIGE3*(0.050224986282)/4,T1=PI/2, & K2L=KnLBF*KLWIGE3*(-45.093969019969)/4,T2=PI/2, & K3L=KnLBF*KLWIGE3*(-1.081628512026E3)/4,T3=PI/2, & K4L=KnLBF*KLWIGE3*(-8.951143510403E5)/4,T4=PI/2, & K5L=KnLBF*KLWIGE3*(2.419162565806E8)/4,T5=PI/2, & K6L=KnLBF*KLWIGE3*(-3.205473083409E11)/4,T6=PI/2, & APER=0.01016 ! chicane quadrupoles Q1ELm : MULT, & !Q1E#1\hardat.ru4 (I=116.597 A) K2L=KnLQF*Q1EL[K1]*(-0.842104136779)/4,T2=RADDEG*(-33.720), & K3L=KnLQF*Q1EL[K1]*(-31.164598197333)/4,T3=RADDEG*(11.950), & K4L=KnLQF*Q1EL[K1]*(-1.883748305237E4)/4,T4=RADDEG*(8.660), & K5L=KnLQF*Q1EL[K1]*(-2.578694881508E7)/4,T5=RADDEG*(18.930), & K6L=KnLQF*Q1EL[K1]*(-4.8242405376E9)/4,T6=RADDEG*(17.561), & K7L=KnLQF*Q1EL[K1]*(-5.795432389301E12)/4,T7=RADDEG*(0.130), & K8L=KnLQF*Q1EL[K1]*(-4.742929367836E15)/4,T8=RADDEG*(17.380), & K9L=KnLQF*Q1EL[K1]*(-1.00652327486E19)/4,T9=RADDEG*(-8.980), & APER=0.8325E-2 SQ1m : MULT, & !53SQ8\hardat.ru1 (I=1.000 A) K2L=KnLQF*SQ1[K1]*(0.080965242)/4,T2=RADDEG*(-50.430), & K3L=KnLQF*SQ1[K1]*(5.13908514E2)/4,T3=RADDEG*(1.570), & K4L=KnLQF*SQ1[K1]*(2.706833448E2)/4,T4=RADDEG*(16.330), & K5L=KnLQF*SQ1[K1]*(1.736074152E5)/4,T5=RADDEG*(13.120), & K6L=KnLQF*SQ1[K1]*(5.274660168E7)/4,T6=RADDEG*(-7.663), & K7L=KnLQF*SQ1[K1]*(2.119692456E11)/4,T7=RADDEG*(-20.910), & K8L=KnLQF*SQ1[K1]*(1.67130927936E13)/4,T8=RADDEG*(-16.460), & K9L=KnLQF*SQ1[K1]*(1.435825476288E16)/4,T9=RADDEG*(-6.640), & APER=0.0257302 Q2ELm : MULT, & !Q2E#2\hardat.ru2 (I=194.782 A) K2L=KnLQF*Q2EL[K1]*(-0.01266922)/4,T2=RADDEG*(-31.070), & K3L=KnLQF*Q2EL[K1]*(-8.295228)/4,T3=RADDEG*(43.100), & K4L=KnLQF*Q2EL[K1]*(-6.542112E2)/4,T4=RADDEG*(17.170), & K5L=KnLQF*Q2EL[K1]*(-4.3227E5)/4,T5=RADDEG*(29.790), & K6L=KnLQF*Q2EL[K1]*(-1.473336E7)/4,T6=RADDEG*(13.347), & K7L=KnLQF*Q2EL[K1]*(-8.17488E9)/4,T7=RADDEG*(0.030), & K8L=KnLQF*Q2EL[K1]*(-1.141056E11)/4,T8=RADDEG*(-14.900), & K9L=KnLQF*Q2EL[K1]*(-9.507456E13)/4,T9=RADDEG*(-12.680), & APER=0.025 Q3EL_1m : MULT, & !Q3E#1\hardat.ru3 (I=208.046 A) K2L=KnLQF*Q3EL_1[K1]*(1.234306465448)/4,T2=RADDEG*(29.800), & K3L=KnLQF*Q3EL_1[K1]*(2.07007299)/4,T3=RADDEG*(-3.990), & K4L=KnLQF*Q3EL_1[K1]*(4.10759388672E3)/4,T4=RADDEG*(-20.980), & K5L=KnLQF*Q3EL_1[K1]*(1.9380202668E6)/4,T5=RADDEG*(-26.960), & K6L=KnLQF*Q3EL_1[K1]*(6.8506463952E7)/4,T6=RADDEG*(21.611), & K7L=KnLQF*Q3EL_1[K1]*(8.07037543872E10)/4,T7=RADDEG*(-12.620), & K8L=KnLQF*Q3EL_1[K1]*(1.040390338176E13)/4,T8=RADDEG*(-13.240), & K9L=KnLQF*Q3EL_1[K1]*(3.671179245619E16)/4,T9=RADDEG*(16.970), & APER=0.0186375 Q3EL_2m : MULT, & !Q3E#2\hardat.ru1 (I=208.181 A) K2L=KnLQF*Q3EL_2[K1]*(1.457791101216)/4,T2=RADDEG*(28.640), & K3L=KnLQF*Q3EL_2[K1]*(4.505073612)/4,T3=RADDEG*(-13.160), & K4L=KnLQF*Q3EL_2[K1]*(5.5662862512E2)/4,T4=RADDEG*(-22.720), & K5L=KnLQF*Q3EL_2[K1]*(2.10646976472E6)/4,T5=RADDEG*(-27.270), & K6L=KnLQF*Q3EL_2[K1]*(5.919232464E7)/4,T6=RADDEG*(-16.517), & K7L=KnLQF*Q3EL_2[K1]*(1.72764865728E10)/4,T7=RADDEG*(-5.420), & K8L=KnLQF*Q3EL_2[K1]*(6.86336829696E12)/4,T8=RADDEG*(-13.610), & K9L=KnLQF*Q3EL_2[K1]*(3.950563315507E16)/4,T9=RADDEG*(14.000), & APER=0.0186375 Q4EL_1m : MULT, & !Q4E#1\hardat.ru1 (I=193.505 A) K2L=KnLQF*Q4EL_1[K1]*(1.60452371976)/4,T2=RADDEG*(27.280), & K3L=KnLQF*Q4EL_1[K1]*(15.073340982)/4,T3=RADDEG*(3.740), & K4L=KnLQF*Q4EL_1[K1]*(3.5240970576E2)/4,T4=RADDEG*(-4.490), & K5L=KnLQF*Q4EL_1[K1]*(2.61695107104E6)/4,T5=RADDEG*(-23.860), & K6L=KnLQF*Q4EL_1[K1]*(3.7747641168E7)/4,T6=RADDEG*(-9.677), & K7L=KnLQF*Q4EL_1[K1]*(1.49630442192E10)/4,T7=RADDEG*(12.300), & K8L=KnLQF*Q4EL_1[K1]*(9.46312028928E12)/4,T8=RADDEG*(-8.590), & K9L=KnLQF*Q4EL_1[K1]*(3.59467258752E16)/4,T9=RADDEG*(13.220), & APER=0.0186375 Q4EL_2m : MULT, & !Q4E#2\hardat.ru2 (I=193.512 A) K2L=KnLQF*Q4EL_2[K1]*(1.603315964708)/4,T2=RADDEG*(27.710), & K3L=KnLQF*Q4EL_2[K1]*(3.48879558)/4,T3=RADDEG*(12.800), & K4L=KnLQF*Q4EL_2[K1]*(5.5768621248E2)/4,T4=RADDEG*(-11.900), & K5L=KnLQF*Q4EL_2[K1]*(2.55309559176E6)/4,T5=RADDEG*(-29.900), & K6L=KnLQF*Q4EL_2[K1]*(3.7647881712E7)/4,T6=RADDEG*(-1.547), & K7L=KnLQF*Q4EL_2[K1]*(3.65287760208E10)/4,T7=RADDEG*(-10.400), & K8L=KnLQF*Q4EL_2[K1]*(1.300999061376E13)/4,T8=RADDEG*(-9.710), & K9L=KnLQF*Q4EL_2[K1]*(3.163337793907E16)/4,T9=RADDEG*(14.560), & APER=0.0186375 Q4EL_3m : MULT, & !Q4E#3\hardat.ru2 (I=193.523 A) K2L=KnLQF*Q4EL_3[K1]*(1.456263613108)/4,T2=RADDEG*(26.960), & K3L=KnLQF*Q4EL_3[K1]*(8.2475273208)/4,T3=RADDEG*(-8.060), & K4L=KnLQF*Q4EL_3[K1]*(6.5495511024E2)/4,T4=RADDEG*(-32.080), & K5L=KnLQF*Q4EL_3[K1]*(2.25134380632E6)/4,T5=RADDEG*(-25.100), & K6L=KnLQF*Q4EL_3[K1]*(1.0270595952E8)/4,T6=RADDEG*(-5.267), & K7L=KnLQF*Q4EL_3[K1]*(8.3182416912E9)/4,T7=RADDEG*(-4.880), & K8L=KnLQF*Q4EL_3[K1]*(5.61129456384E12)/4,T8=RADDEG*(-18.630), & K9L=KnLQF*Q4EL_3[K1]*(3.808538760499E16)/4,T9=RADDEG*(14.740), & APER=0.0186375 Q5ELm : MULT, & !Q5E#1\hardat.ru1 (I=127.009 A) K2L=KnLQF*Q5EL[K1]*(-0.399950857134)/4,T2=RADDEG*(53.210), & K3L=KnLQF*Q5EL[K1]*(-17.383241430254)/4,T3=RADDEG*(-27.450), & K4L=KnLQF*Q5EL[K1]*(-5.894675053345E3)/4,T4=RADDEG*(-10.900), & K5L=KnLQF*Q5EL[K1]*(-3.684265353801E6)/4,T5=RADDEG*(26.390), & K6L=KnLQF*Q5EL[K1]*(-2.51839653224E9)/4,T6=RADDEG*(9.887), & K7L=KnLQF*Q5EL[K1]*(-5.746901170675E11)/4,T7=RADDEG*(20.850), & K8L=KnLQF*Q5EL[K1]*(-3.741308211449E14)/4,T8=RADDEG*(-0.760), & K9L=KnLQF*Q5EL[K1]*(-1.28080991373E18)/4,T9=RADDEG*(-10.070), & APER=0.0186375 Q6Em : MULT, & !Q6E\hardat.ru4 (I=111.364 A) K2L=KnLQF*Q6E[K1]*(-0.347358802667)/4,T2=RADDEG*(-30.830), & K3L=KnLQF*Q6E[K1]*(-13.59310816)/4,T3=RADDEG*(-20.400), & K4L=KnLQF*Q6E[K1]*(-1.579431008711E4)/4,T4=RADDEG*(26.290), & K5L=KnLQF*Q6E[K1]*(-5.817650926933E7)/4,T5=RADDEG*(-29.780), & K6L=KnLQF*Q6E[K1]*(-8.897029613037E8)/4,T6=RADDEG*(-25.531), & K7L=KnLQF*Q6E[K1]*(-4.935760908642E11)/4,T7=RADDEG*(-18.320), & K8L=KnLQF*Q6E[K1]*(-2.137052823889E15)/4,T8=RADDEG*(15.960), & K9L=KnLQF*Q6E[K1]*(-1.049232864771E19)/4,T9=RADDEG*(-17.600), & APER=0.8E-2 Q5ERm : MULT, & !Q5E#2\hardat.ru5 (I=127.006 A) K2L=KnLQF*Q5ER[K1]*(-0.17973688252)/4,T2=RADDEG*(-5.830), & K3L=KnLQF*Q5ER[K1]*(-8.640106753585)/4,T3=RADDEG*(1.380), & K4L=KnLQF*Q5ER[K1]*(-1.953377855526E3)/4,T4=RADDEG*(-22.190), & K5L=KnLQF*Q5ER[K1]*(-3.628493344755E5)/4,T5=RADDEG*(-19.690), & K6L=KnLQF*Q5ER[K1]*(-2.077117861859E9)/4,T6=RADDEG*(21.987), & K7L=KnLQF*Q5ER[K1]*(-4.802771718343E11)/4,T7=RADDEG*(2.030), & K8L=KnLQF*Q5ER[K1]*(-3.445527869781E14)/4,T8=RADDEG*(-5.080), & K9L=KnLQF*Q5ER[K1]*(-1.045720673537E18)/4,T9=RADDEG*(10.270), & APER=0.0186375 Q4ER_1m : MULT, & !Q4E#4\hardat.ru1 (I=193.513 A) K2L=KnLQF*Q4ER_1[K1]*(1.273347208568)/4,T2=RADDEG*(30.440), & K3L=KnLQF*Q4ER_1[K1]*(5.3503893048)/4,T3=RADDEG*(7.210), & K4L=KnLQF*Q4ER_1[K1]*(4.615674624E2)/4,T4=RADDEG*(-5.100), & K5L=KnLQF*Q4ER_1[K1]*(2.55845980512E6)/4,T5=RADDEG*(-27.580), & K6L=KnLQF*Q4ER_1[K1]*(2.5246855728E7)/4,T6=RADDEG*(9.713), & K7L=KnLQF*Q4ER_1[K1]*(1.2987241344E10)/4,T7=RADDEG*(-8.110), & K8L=KnLQF*Q4ER_1[K1]*(4.23539569152E12)/4,T8=RADDEG*(-15.000), & K9L=KnLQF*Q4ER_1[K1]*(2.509843422643E16)/4,T9=RADDEG*(16.260), & APER=0.0186375 Q4ER_2m : MULT, & !Q4E#5\hardat.ru1 (I=193.507 A) K2L=KnLQF*Q4ER_2[K1]*(1.5911094011)/4,T2=RADDEG*(24.430), & K3L=KnLQF*Q4ER_2[K1]*(22.591338714)/4,T3=RADDEG*(-17.920), & K4L=KnLQF*Q4ER_2[K1]*(6.1342466592E3)/4,T4=RADDEG*(35.090), & K5L=KnLQF*Q4ER_2[K1]*(2.48000207832E6)/4,T5=RADDEG*(28.170), & K6L=KnLQF*Q4ER_2[K1]*(2.35497108384E8)/4,T6=RADDEG*(1.633), & K7L=KnLQF*Q4ER_2[K1]*(2.96798779872E10)/4,T7=RADDEG*(6.130), & K8L=KnLQF*Q4ER_2[K1]*(2.0179178208E13)/4,T8=RADDEG*(-9.320), & K9L=KnLQF*Q4ER_2[K1]*(3.524334149146E16)/4,T9=RADDEG*(-17.890), & APER=0.0186375 Q4ER_3m : MULT, & !Q4E#6\hardat.ru2 (I=193.517 A) K2L=KnLQF*Q4ER_3[K1]*(1.47051380288)/4,T2=RADDEG*(26.070), & K3L=KnLQF*Q4ER_3[K1]*(8.933806386)/4,T3=RADDEG*(0.060), & K4L=KnLQF*Q4ER_3[K1]*(4.8026293296E3)/4,T4=RADDEG*(-23.700), & K5L=KnLQF*Q4ER_3[K1]*(2.65048790328E6)/4,T5=RADDEG*(-26.370), & K6L=KnLQF*Q4ER_3[K1]*(2.59691347584E8)/4,T6=RADDEG*(-6.427), & K7L=KnLQF*Q4ER_3[K1]*(2.4763228056E10)/4,T7=RADDEG*(-1.100), & K8L=KnLQF*Q4ER_3[K1]*(1.778503353984E13)/4,T8=RADDEG*(-13.740), & K9L=KnLQF*Q4ER_3[K1]*(4.897592378381E16)/4,T9=RADDEG*(16.540), & APER=0.0186375 Q3ER_1m : MULT, & !Q3E#3\hardat.r12 (I=208.187 A) K2L=KnLQF*Q3ER_1[K1]*(0.041062452867)/4,T2=RADDEG*(-9.710), & K3L=KnLQF*Q3ER_1[K1]*(37.776355182222)/4,T3=RADDEG*(-12.680), & K4L=KnLQF*Q3ER_1[K1]*(1.098147571556E4)/4,T4=RADDEG*(20.800), & K5L=KnLQF*Q3ER_1[K1]*(5.172941129584E6)/4,T5=RADDEG*(26.770), & K6L=KnLQF*Q3ER_1[K1]*(1.686639741503E9)/4,T6=RADDEG*(-17.857), & K7L=KnLQF*Q3ER_1[K1]*(1.870863548822E12)/4,T7=RADDEG*(-14.520), & K8L=KnLQF*Q3ER_1[K1]*(1.457136846754E15)/4,T8=RADDEG*(6.460), & K9L=KnLQF*Q3ER_1[K1]*(2.492997332159E17)/4,T9=RADDEG*(-15.380), & APER=0.0186375 Q3ER_2m : MULT, & !Q3E#4\hardat.ru5 (I=167.280 A) K2L=KnLQF*Q3ER_2[K1]*(1.607868761164)/4,T2=RADDEG*(-33.670), & K3L=KnLQF*Q3ER_2[K1]*(40.9793761704)/4,T3=RADDEG*(1.140), & K4L=KnLQF*Q3ER_2[K1]*(2.48468923008E3)/4,T4=RADDEG*(9.830), & K5L=KnLQF*Q3ER_2[K1]*(3.15123923448E6)/4,T5=RADDEG*(-21.180), & K6L=KnLQF*Q3ER_2[K1]*(1.46517330096E8)/4,T6=RADDEG*(24.041), & K7L=KnLQF*Q3ER_2[K1]*(1.452425688E10)/4,T7=RADDEG*(-6.100), & K8L=KnLQF*Q3ER_2[K1]*(5.45809694976E12)/4,T8=RADDEG*(4.010), & K9L=KnLQF*Q3ER_2[K1]*(3.089604242995E16)/4,T9=RADDEG*(-14.420), & APER=0.0186375 Q2ERm : MULT, & !Q2E#1\hardat.ru3 (I=274.881 A) K2L=KnLQF*Q2ER[K1]*(0.060281116)/4,T2=RADDEG*(31.910), & K3L=KnLQF*Q2ER[K1]*(17.9375958)/4,T3=RADDEG*(43.720), & K4L=KnLQF*Q2ER[K1]*(6.3524736E2)/4,T4=RADDEG*(13.150), & K5L=KnLQF*Q2ER[K1]*(4.114734E5)/4,T5=RADDEG*(-29.100), & K6L=KnLQF*Q2ER[K1]*(1.384128E7)/4,T6=RADDEG*(17.391), & K7L=KnLQF*Q2ER[K1]*(8.1523008E9)/4,T7=RADDEG*(1.040), & K8L=KnLQF*Q2ER[K1]*(8.8917696E11)/4,T8=RADDEG*(-8.400), & K9L=KnLQF*Q2ER[K1]*(5.25305088E14)/4,T9=RADDEG*(-16.270), & APER=0.025 Q1ERm : MULT, & !Q1E#2\hardat.ru2 (I=114.645 A) K2L=KnLQF*Q1ER[K1]*(-0.577683570171)/4,T2=RADDEG*(-25.170), & K3L=KnLQF*Q1ER[K1]*(-60.018134410667)/4,T3=RADDEG*(-40.610), & K4L=KnLQF*Q1ER[K1]*(-1.031455635115E4)/4,T4=RADDEG*(-27.890), & K5L=KnLQF*Q1ER[K1]*(-4.181025198383E7)/4,T5=RADDEG*(-28.570), & K6L=KnLQF*Q1ER[K1]*(-3.09798394387E9)/4,T6=RADDEG*(5.163), & K7L=KnLQF*Q1ER[K1]*(-2.111668718918E12)/4,T7=RADDEG*(-21.340), & K8L=KnLQF*Q1ER[K1]*(-1.077173775534E15)/4,T8=RADDEG*(-11.190), & K9L=KnLQF*Q1ER[K1]*(-6.682789064051E18)/4,T9=RADDEG*(2.090), & APER=0.8325E-2 ! FF & spectrometer quadrupoles QFF1m : MULT, & !QFF1\hardat.ru5 (I=29.898 A) K2L=KnLQF*QFF1[K1]*(-2.224191702421)/4,T2=RADDEG*(-8.530), & K3L=KnLQF*QFF1[K1]*(-75.259567022933)/4,T3=RADDEG*(12.090), & K4L=KnLQF*QFF1[K1]*(-3.227424710713E4)/4,T4=RADDEG*(20.670), & K5L=KnLQF*QFF1[K1]*(-1.589261292165E7)/4,T5=RADDEG*(23.570), & K6L=KnLQF*QFF1[K1]*(-7.266551530382E9)/4,T6=RADDEG*(-17.777), & K7L=KnLQF*QFF1[K1]*(-6.15735749319E12)/4,T7=RADDEG*(16.880), & K8L=KnLQF*QFF1[K1]*(-3.078230069988E15)/4,T8=RADDEG*(4.070), & K9L=KnLQF*QFF1[K1]*(-2.953629378459E18)/4,T9=RADDEG*(-9.160), & APER=0.8325E-2 SQ2m : MULT, & !53SQ12\hardat.ru1 (I=1.000 A) K2L=KnLQF*SQ2[K1]*(0.15370203)/4,T2=RADDEG*(-28.150), & K3L=KnLQF*SQ2[K1]*(6.10087626E2)/4,T3=RADDEG*(0.540), & K4L=KnLQF*SQ2[K1]*(7.612242696E2)/4,T4=RADDEG*(21.840), & K5L=KnLQF*SQ2[K1]*(5.26285512E5)/4,T5=RADDEG*(1.580), & K6L=KnLQF*SQ2[K1]*(3.15990936E7)/4,T6=RADDEG*(17.387), & K7L=KnLQF*SQ2[K1]*(2.4496572744E11)/4,T7=RADDEG*(-21.960), & K8L=KnLQF*SQ2[K1]*(4.3423908192E12)/4,T8=RADDEG*(-17.720), & K9L=KnLQF*SQ2[K1]*(9.294607357056E15)/4,T9=RADDEG*(-11.850), & APER=0.0257302 QFF2_1m : MULT, & !QFF2#1\hardat.ru4 (I=80.075 A) K2L=KnLQF*QFF2_1[K1]*(-0.578282614243)/4,T2=RADDEG*(-27.370), & K3L=KnLQF*QFF2_1[K1]*(-8.0881386784)/4,T3=RADDEG*(-9.750), & K4L=KnLQF*QFF2_1[K1]*(-1.012226531556E4)/4,T4=RADDEG*(-21.300), & K5L=KnLQF*QFF2_1[K1]*(-2.278676926957E7)/4,T5=RADDEG*(22.900), & K6L=KnLQF*QFF2_1[K1]*(-4.20833125869E8)/4,T6=RADDEG*(23.487), & K7L=KnLQF*QFF2_1[K1]*(-1.840822709918E11)/4,T7=RADDEG*(-13.130), & K8L=KnLQF*QFF2_1[K1]*(-1.89217223144E15)/4,T8=RADDEG*(5.610), & K9L=KnLQF*QFF2_1[K1]*(-4.236241970433E18)/4,T9=RADDEG*(-8.110), & APER=0.8325E-2 QFF2_2m : MULT, & !QFF2#2\hardat.ru1 (I=80.075 A) K2L=KnLQF*QFF2_2[K1]*(-0.761516764595)/4,T2=RADDEG*(-19.640), & K3L=KnLQF*QFF2_2[K1]*(-43.0772478752)/4,T3=RADDEG*(44.070), & K4L=KnLQF*QFF2_2[K1]*(-1.132627868729E4)/4,T4=RADDEG*(-26.830), & K5L=KnLQF*QFF2_2[K1]*(-2.934193832429E7)/4,T5=RADDEG*(28.980), & K6L=KnLQF*QFF2_2[K1]*(-9.854949761327E8)/4,T6=RADDEG*(10.797), & K7L=KnLQF*QFF2_2[K1]*(-2.20653743325E12)/4,T7=RADDEG*(6.020), & K8L=KnLQF*QFF2_2[K1]*(-2.014680740425E15)/4,T8=RADDEG*(0.670), & K9L=KnLQF*QFF2_2[K1]*(-4.946515947438E18)/4,T9=RADDEG*(-4.140), & APER=0.8325E-2 QFF2_3m : MULT, & !QFF2#3\hardat.ru1 (I=80.065 A) K2L=KnLQF*QFF2_3[K1]*(-0.993222969053)/4,T2=RADDEG*(-18.020), & K3L=KnLQF*QFF2_3[K1]*(-32.715852071467)/4,T3=RADDEG*(-2.870), & K4L=KnLQF*QFF2_3[K1]*(-1.539392955506E4)/4,T4=RADDEG*(2.350), & K5L=KnLQF*QFF2_3[K1]*(-8.026255881861E6)/4,T5=RADDEG*(-29.160), & K6L=KnLQF*QFF2_3[K1]*(-1.326426051925E9)/4,T6=RADDEG*(1.337), & K7L=KnLQF*QFF2_3[K1]*(-9.402109015482E11)/4,T7=RADDEG*(22.280), & K8L=KnLQF*QFF2_3[K1]*(-1.703785310179E15)/4,T8=RADDEG*(0.090), & K9L=KnLQF*QFF2_3[K1]*(-1.100380540971E18)/4,T9=RADDEG*(-5.640), & APER=0.8325E-2 QFF4_1m : MULT, & !QFF4#1\hardat.ru1 (I=162.915 A) K2L=KnLQF*QFF4_1[K1]*(1.785994469228)/4,T2=RADDEG*(27.810), & K3L=KnLQF*QFF4_1[K1]*(2.8504164804)/4,T3=RADDEG*(-31.580), & K4L=KnLQF*QFF4_1[K1]*(1.28645817792E3)/4,T4=RADDEG*(-23.230), & K5L=KnLQF*QFF4_1[K1]*(2.87221015056E6)/4,T5=RADDEG*(26.110), & K6L=KnLQF*QFF4_1[K1]*(8.534575728E7)/4,T6=RADDEG*(-17.687), & K7L=KnLQF*QFF4_1[K1]*(4.0113585792E9)/4,T7=RADDEG*(-10.830), & K8L=KnLQF*QFF4_1[K1]*(2.72328916608E12)/4,T8=RADDEG*(-0.230), & K9L=KnLQF*QFF4_1[K1]*(3.70028391264E16)/4,T9=RADDEG*(-14.910), & APER=0.0186375 QFF4_2m : MULT, & !QFF4#2\hardat.ru1 (I=162.927 A) K2L=KnLQF*QFF4_2[K1]*(1.4834523215)/4,T2=RADDEG*(30.750), & K3L=KnLQF*QFF4_2[K1]*(2.824975248)/4,T3=RADDEG*(20.510), & K4L=KnLQF*QFF4_2[K1]*(5.70789154224E3)/4,T4=RADDEG*(-7.090), & K5L=KnLQF*QFF4_2[K1]*(2.79256713744E6)/4,T5=RADDEG*(-24.130), & K6L=KnLQF*QFF4_2[K1]*(2.4058998288E8)/4,T6=RADDEG*(-19.267), & K7L=KnLQF*QFF4_2[K1]*(7.6408029936E9)/4,T7=RADDEG*(-12.930), & K8L=KnLQF*QFF4_2[K1]*(1.840041568512E13)/4,T8=RADDEG*(-14.830), & K9L=KnLQF*QFF4_2[K1]*(4.408825757414E16)/4,T9=RADDEG*(15.640), & APER=0.0186375 QFF6m : MULT, & !QFF6\hardat.r12 (I=354.988 A) K2L=KnLQF*QFF6[K1]*(1.575135489628)/4,T2=RADDEG*(28.820), & K3L=KnLQF*QFF6[K1]*(16.7993466936)/4,T3=RADDEG*(23.910), & K4L=KnLQF*QFF6[K1]*(6.74956881168E3)/4,T4=RADDEG*(3.630), & K5L=KnLQF*QFF6[K1]*(3.1013192256E6)/4,T5=RADDEG*(-26.230), & K6L=KnLQF*QFF6[K1]*(3.34164866832E8)/4,T6=RADDEG*(20.151), & K7L=KnLQF*QFF6[K1]*(6.72662070864E10)/4,T7=RADDEG*(4.070), & K8L=KnLQF*QFF6[K1]*(1.379872795392E13)/4,T8=RADDEG*(-6.380), & K9L=KnLQF*QFF6[K1]*(7.372759002739E16)/4,T9=RADDEG*(-12.130), & APER=0.0186375 QS1m : MULT, & !QS1\hardat.ru4 (I=274.922 A) K2L=KnLQF*QS1[K1]*(0.091110706)/4,T2=RADDEG*(-54.230), & K3L=KnLQF*QS1[K1]*(2.5385322)/4,T3=RADDEG*(-41.810), & K4L=KnLQF*QS1[K1]*(5.9076264E2)/4,T4=RADDEG*(-27.490), & K5L=KnLQF*QS1[K1]*(4.61028E5)/4,T5=RADDEG*(29.310), & K6L=KnLQF*QS1[K1]*(8.512344E6)/4,T6=RADDEG*(25.187), & K7L=KnLQF*QS1[K1]*(4.2578928E9)/4,T7=RADDEG*(1.410), & K8L=KnLQF*QS1[K1]*(6.8185152E11)/4,T8=RADDEG*(6.710), & K9L=KnLQF*QS1[K1]*(2.93098176E14)/4,T9=RADDEG*(-8.260), & APER=0.027 QS2m : MULT, & !QS2\hardat.ru2 (I=428.355 A) K2L=KnLQF*QS2[K1]*(0.075463054)/4,T2=RADDEG*(39.250), & K3L=KnLQF*QS2[K1]*(1.5857886)/4,T3=RADDEG*(26.820), & K4L=KnLQF*QS2[K1]*(3.7540128E2)/4,T4=RADDEG*(-10.990), & K5L=KnLQF*QS2[K1]*(4.8679356E5)/4,T5=RADDEG*(29.800), & K6L=KnLQF*QS2[K1]*(1.0869552E7)/4,T6=RADDEG*(-17.727), & K7L=KnLQF*QS2[K1]*(5.8536576E9)/4,T7=RADDEG*(21.800), & K8L=KnLQF*QS2[K1]*(1.16682048E12)/4,T8=RADDEG*(19.300), & K9L=KnLQF*QS2[K1]*(2.66789376E14)/4,T9=RADDEG*(-17.080), & APER=0.027 ! chicane sextupoles S1ELm : MULT, & !S1E#1\hardat.ru5 (I=35.080 A) K3L=KnLSF*S1EL[K2]*(1.2412750725)/4,T3=RADDEG*(21.810), & K4L=KnLSF*S1EL[K2]*(48.381048)/4,T4=RADDEG*(20.880), & K5L=KnLSF*S1EL[K2]*(1.0218228E4)/4,T5=RADDEG*(-28.650), & K6L=KnLSF*S1EL[K2]*(1.6481493E6)/4,T6=RADDEG*(-17.987), & K7L=KnLSF*S1EL[K2]*(1.9135683E8)/4,T7=RADDEG*(22.360), & K8L=KnLSF*S1EL[K2]*(1.033823448E12)/4,T8=RADDEG*(-0.120), & K9L=KnLSF*S1EL[K2]*(5.36581584E13)/4,T9=RADDEG*(10.740), & APER=0.0186375 S2ELm : MULT, & !S2E#1\hardat.ru3 (I=79.058 A) K3L=KnLSF*S2EL[K2]*(3.4651495848)/4,T3=RADDEG*(-40.500), & K4L=KnLSF*S2EL[K2]*(1.998183456E2)/4,T4=RADDEG*(18.410), & K5L=KnLSF*S2EL[K2]*(4.134324133333E4)/4,T5=RADDEG*(0.690), & K6L=KnLSF*S2EL[K2]*(1.154010847737E7)/4,T6=RADDEG*(4.667), & K7L=KnLSF*S2EL[K2]*(6.462840574303E9)/4,T7=RADDEG*(15.620), & K8L=KnLSF*S2EL[K2]*(4.824843237311E12)/4,T8=RADDEG*(-10.840), & K9L=KnLSF*S2EL[K2]*(2.823166627851E15)/4,T9=RADDEG*(17.230), & APER=0.0186375 S3EL_1m : MULT, & !S3E#1\hardat.ru3 (I=37.572 A) K3L=KnLSF*S3EL_1[K2]*(1.5930179475)/4,T3=RADDEG*(21.240), & K4L=KnLSF*S3EL_1[K2]*(23.073855)/4,T4=RADDEG*(-24.670), & K5L=KnLSF*S3EL_1[K2]*(2.8365795E3)/4,T5=RADDEG*(26.180), & K6L=KnLSF*S3EL_1[K2]*(7.492815E5)/4,T6=RADDEG*(17.497), & K7L=KnLSF*S3EL_1[K2]*(6.1016508E8)/4,T7=RADDEG*(-9.650), & K8L=KnLSF*S3EL_1[K2]*(9.45802872E11)/4,T8=RADDEG*(-0.160), & K9L=KnLSF*S3EL_1[K2]*(7.3362996E13)/4,T9=RADDEG*(6.640), & APER=0.0186375 S3EL_2m : MULT, & !S3E#2\hardat.ru1 (I=37.570 A) K3L=KnLSF*S3EL_2[K2]*(1.44692388)/4,T3=RADDEG*(20.830), & K4L=KnLSF*S3EL_2[K2]*(11.782335)/4,T4=RADDEG*(-4.650), & K5L=KnLSF*S3EL_2[K2]*(7.164849E3)/4,T5=RADDEG*(2.310), & K6L=KnLSF*S3EL_2[K2]*(7.050285E5)/4,T6=RADDEG*(-1.033), & K7L=KnLSF*S3EL_2[K2]*(1.6881984E8)/4,T7=RADDEG*(-16.570), & K8L=KnLSF*S3EL_2[K2]*(9.10988568E11)/4,T8=RADDEG*(0.010), & K9L=KnLSF*S3EL_2[K2]*(4.71893688E13)/4,T9=RADDEG*(11.210), & APER=0.0186375 S3ER_1m : MULT, & !S3E#3\hardat.ru1 (I=37.570 A) K3L=KnLSF*S3ER_1[K2]*(1.581483645)/4,T3=RADDEG*(20.520), & K4L=KnLSF*S3ER_1[K2]*(33.537786)/4,T4=RADDEG*(21.390), & K5L=KnLSF*S3ER_1[K2]*(7.5913575E3)/4,T5=RADDEG*(-9.110), & K6L=KnLSF*S3ER_1[K2]*(1.7287209E6)/4,T6=RADDEG*(-17.051), & K7L=KnLSF*S3ER_1[K2]*(1.6469271E8)/4,T7=RADDEG*(7.410), & K8L=KnLSF*S3ER_1[K2]*(1.149120504E12)/4,T8=RADDEG*(1.580), & K9L=KnLSF*S3ER_1[K2]*(4.708132128E14)/4,T9=RADDEG*(14.400), & APER=0.0186375 S3ER_2m : MULT, & !S3E#4\hardat.ru1 (I=37.570 A) K3L=KnLSF*S3ER_2[K2]*(1.602732165)/4,T3=RADDEG*(20.960), & K4L=KnLSF*S3ER_2[K2]*(46.874022)/4,T4=RADDEG*(-33.190), & K5L=KnLSF*S3ER_2[K2]*(6.321747E3)/4,T5=RADDEG*(-9.380), & K6L=KnLSF*S3ER_2[K2]*(1.5219855E6)/4,T6=RADDEG*(21.187), & K7L=KnLSF*S3ER_2[K2]*(2.9965635E8)/4,T7=RADDEG*(16.290), & K8L=KnLSF*S3ER_2[K2]*(7.63979328E11)/4,T8=RADDEG*(-0.450), & K9L=KnLSF*S3ER_2[K2]*(4.468908024E14)/4,T9=RADDEG*(-3.660), & APER=0.0186375 S2ERm : MULT, & !S2E#2\hardat.ru6 (I=78.993 A) K3L=KnLSF*S2ER[K2]*(0.5459217428)/4,T3=RADDEG*(4.270), & K4L=KnLSF*S2ER[K2]*(1.951864128889E2)/4,T4=RADDEG*(-24.860), & K5L=KnLSF*S2ER[K2]*(2.001932044444E4)/4,T5=RADDEG*(-29.480), & K6L=KnLSF*S2ER[K2]*(9.474768625514E6)/4,T6=RADDEG*(-4.263), & K7L=KnLSF*S2ER[K2]*(5.038798342936E9)/4,T7=RADDEG*(0.340), & K8L=KnLSF*S2ER[K2]*(6.801949608495E12)/4,T8=RADDEG*(0.530), & K9L=KnLSF*S2ER[K2]*(2.142897667226E15)/4,T9=RADDEG*(1.890), & APER=0.0186375 S1ERm : MULT, & !S1E#2\hardat.ru1 (I=35.080 A) K3L=KnLSF*S1ER[K2]*(1.3627678875)/4,T3=RADDEG*(22.510), & K4L=KnLSF*S1ER[K2]*(45.29268)/4,T4=RADDEG*(26.290), & K5L=KnLSF*S1ER[K2]*(7.534212E3)/4,T5=RADDEG*(-26.770), & K6L=KnLSF*S1ER[K2]*(1.9287342E6)/4,T6=RADDEG*(-18.307), & K7L=KnLSF*S1ER[K2]*(1.5985305E8)/4,T7=RADDEG*(21.560), & K8L=KnLSF*S1ER[K2]*(1.164777264E12)/4,T8=RADDEG*(-0.130), & K9L=KnLSF*S1ER[K2]*(3.637872E13)/4,T9=RADDEG*(6.940), & APER=0.0186375 ! ============================================================================== ! magnet beamlines ! ------------------------------------------------------------------------------ OPTION, -WARN BLB1LE : LINE=(B1LEm,B1LE1,B1LEm,B1LEm,B1LE2,B1LEm) BLB2LE : LINE=(B2LEm,B2LE1,B2LEm,XCB2LE,B2LEm,B2LE2,B2LEm) BLB3LE : LINE=(B3LEm,B3LE1,B3LEm,XCB3LE,B3LEm,B3LE2,B3LEm) BLB3RE : LINE=(B3REm,B3RE1,B3REm,XCB3RE,B3REm,B3RE2,B3REm) BLB2RE : LINE=(B2REm,B2RE1,B2REm,XCB2RE,B2REm,B2RE2,B2REm) BLB1RE : LINE=(B1REm,B1RE1,B1REm,B1REm,B1RE2,B1REm) BLWIGE : LINE=(& WIGE1m,WIGE11,WIGE1m,WIGE1m,WIGE12,WIGE1m,DWE,& WIGE2m,WIGE21,WIGE2m,YCWIGE,WIGE2m,WIGE22,WIGE2m,DWE,& WIGE3m,WIGE31,WIGE3m,WIGE3m,WIGE32,WIGE3m) BLQ1EL : LINE=(Q1ELm,Q1EL,Q1ELm,Q1ELm,Q1EL,Q1ELm) BLSQ1 : LINE=(SQ1m,SQ1,SQ1m,SQ1m,SQ1,SQ1m) BLQ2EL : LINE=(Q2ELm,Q2EL,Q2ELm,Q2ELm,Q2EL,Q2ELm) BLQ3EL_1 : LINE=(Q3EL_1m,Q3EL_1,Q3EL_1m,Q3EL_1m,Q3EL_1,Q3EL_1m) BLQ3EL_2 : LINE=(Q3EL_2m,Q3EL_2,Q3EL_2m,Q3EL_2m,Q3EL_2,Q3EL_2m) BLQ4EL_1 : LINE=(Q4EL_1m,Q4EL_1,Q4EL_1m,Q4EL_1m,Q4EL_1,Q4EL_1m) BLQ4EL_2 : LINE=(Q4EL_2m,Q4EL_2,Q4EL_2m,Q4EL_2m,Q4EL_2,Q4EL_2m) BLQ4EL_3 : LINE=(Q4EL_3m,Q4EL_3,Q4EL_3m,Q4EL_3m,Q4EL_3,Q4EL_3m) BLQ5EL : LINE=(Q5ELm,Q5EL,Q5ELm,Q5ELm,Q5EL,Q5ELm) BLQ6E : LINE=(Q6Em,Q6E,Q6Em,MCE,Q6Em,Q6E,Q6Em) BLQ5ER : LINE=(Q5ERm,Q5ER,Q5ERm,Q5ERm,Q5ER,Q5ERm) BLQ4ER_1 : LINE=(Q4ER_1m,Q4ER_1,Q4ER_1m,Q4ER_1m,Q4ER_1,Q4ER_1m) BLQ4ER_2 : LINE=(Q4ER_2m,Q4ER_2,Q4ER_2m,Q4ER_2m,Q4ER_2,Q4ER_2m) BLQ4ER_3 : LINE=(Q4ER_3m,Q4ER_3,Q4ER_3m,Q4ER_3m,Q4ER_3,Q4ER_3m) BLQ3ER_1 : LINE=(Q3ER_1m,Q3ER_1,Q3ER_1m,Q3ER_1m,Q3ER_1,Q3ER_1m) BLQ3ER_2 : LINE=(Q3ER_2m,Q3ER_2,Q3ER_2m,Q3ER_2m,Q3ER_2,Q3ER_2m) BLQ2ER : LINE=(Q2ERm,Q2ER,Q2ERm,Q2ERm,Q2ER,Q2ERm) BLQ1ER : LINE=(Q1ERm,Q1ER,Q1ERm,Q1ERm,Q1ER,Q1ERm) BLQFF1 : LINE=(QFF1m,QFF1,QFF1m,QFF1m,QFF1,QFF1m) BLSQ2 : LINE=(SQ2m,SQ2,SQ2m,SQ2m,SQ2,SQ2m) BLQFF2_1 : LINE=(QFF2_1m,QFF2_1,QFF2_1m,QFF2_1m,QFF2_1,QFF2_1m) BLQFF2_2 : LINE=(QFF2_2m,QFF2_2,QFF2_2m,QFF2_2m,QFF2_2,QFF2_2m) BLQFF2_3 : LINE=(QFF2_3m,QFF2_3,QFF2_3m,QFF2_3m,QFF2_3,QFF2_3m) BLQFF4_1 : LINE=(QFF4_1m,QFF4_1,QFF4_1m,QFF4_1m,QFF4_1,QFF4_1m) BLQFF4_2 : LINE=(QFF4_2m,QFF4_2,QFF4_2m,QFF4_2m,QFF4_2,QFF4_2m) BLQFF6 : LINE=(QFF6m,QFF6,QFF6m,QFF6m,QFF6,QFF6m) BLQS1 : LINE=(QS1m,QS1,QS1m,QS1m,QS1,QS1m) BLQS2 : LINE=(QS2m,QS2,QS2m,QS2m,QS2,QS2m) BLS1EL : LINE=(S1ELm,S1EL,S1ELm,AS1EL,S1ELm,S1EL,S1ELm) BLS2EL : LINE=(S2ELm,S2EL,S2ELm,AS2EL,S2ELm,S2EL,S2ELm) BLS3EL_1 : LINE=(S3EL_1m,S3EL_1,S3EL_1m,S3EL_1m,S3EL_1,S3EL_1m) BLS3EL_2 : LINE=(S3EL_2m,S3EL_2,S3EL_2m,S3EL_2m,S3EL_2,S3EL_2m) BLS3ER_1 : LINE=(S3ER_1m,S3ER_1,S3ER_1m,S3ER_1m,S3ER_1,S3ER_1m) BLS3ER_2 : LINE=(S3ER_2m,S3ER_2,S3ER_2m,S3ER_2m,S3ER_2,S3ER_2m) BLS2ER : LINE=(S2ERm,S2ER,S2ERm,AS2ER,S2ERm,S2ER,S2ERm) BLS1ER : LINE=(S1ERm,S1ER,S1ERm,AS1ER,S1ERm,S1ER,S1ERm) OPTION, WARN ! ------------------------------------------------------------------------------ RETURN