source: MML/trunk/applications/orbit/cls/CLSmis.m @ 4

TITLE
CLS Mar 2003
CX:GKICK,L=0,DXP=0
CY:GKICK,L=0,DYP=0
MV:MONITOR
MH:MONITOR 
D1:DRIFT,l=.25
D1b:DRIFT,l=.357
D2:DRIFT,l=0.534
D3:DRIFT,l=0.312
D4:DRIFT,l=.407
D5:DRIFT,l=.3125
D6:DRIFT,l=.1695
D7:DRIFT,l=.3975
D8:DRIFT,l=.322
D9:DRIFT,l=.339
D10:DRIFT,l=.195
D11:DRIFT,l=.210
D12:DRIFT,l=.324
Q1:MULTIPOLE,L=.18,K1=1.67899,APERTURE=.035, &
 K2=K1*5.35E-2,T2=2.32,K3=K1*5.31,T3=.25,K4=K1*1.25E2,T4=2.36,&
 K5=K1*1.49E4,T5=1.84,K6=K1*1.22E6,T6=1.70,K7=K1*2.65E8,T7=1.33,&
 K8=K1*6.18E10,T8=.51,K9=K1*3.55E13,T9=3.14,K10=K1*3.21E15,T10=1.57,&
 K11=K1*1.12E18,T11=1.84 
Q2:MULTIPOLE,L=.18,K1=1.88264,APERTURE=.035, &
 K2=K1*6.42E-2,T2=2.34,K3=K1*4.42,T3=-.03,K4=K1*1.23E2,T4=2.87,&
 K5=K1*1.42E4,T5=1.72,K6=K1*1.55E6,T6=1.16,K7=K1*2.20E8,T7=1.69,&
 K8=K1*5.10E10,T8=.63,K9=K1*3.08E13,T9=3.12,K10=K1*4.76E15,T10=1.31,&
 K11=K1*1.13E18,T11=1.32 
Q3:MULTIPOLE,L=.260,K1=2.03992,APERTURE=.035, &
 K2=K1*5.52E-2,T2=1.99,K3=K1*6.39,T3=-.01,K4=K1*1.04E2,T4=2.82,&
 K5=K1*3.05E4,T5=.14,K6=K1*1.77E6,T6=2.09,K7=K1*2.09E8,T7=1.94,&
 K8=K1*3.13E10,T8=1.05,K9=K1*1.32E13,T9=1.99,K10=K1*2.82E15,T10=1.18,&
 K11=K1*9.32E17,T11=2.23 
S1:MULTIPOLE,L=.192/2,K2=-24.793,APERTURE=.035, &
 K3=K2*5.33E-2,T3=.33,K4=K2*4.47,T4=3.24,K5=K2*2.17E2,T5=1.28,&
 K6=K2*3.01E4,T6=.29,K7=K2*9.51E6,T7=-.02,K8=K2*1.23E9,T8=.91,&
 K9=K2*4.03E11,T9=.39,K10=K2*8.61E13,T10=1.17,K11=K2*2.74E16,T11=2.26,&
 K12=K2*1.13E19,T12=2.62
S2:MULTIPOLE,L=.192/2,K2=39.052*1.1,APERTURE=.035, &
 K3=K2*4.79E-2,T3=.47,K4=K2*5.28,T4=3.23,K5=K2*2.19E2,T5=.27,&
 K6=K2*2.82E4,T6=.54,K7=K2*1.04E7,T7=-.01,K8=K2*1.20E9,T8=1.54,&
 K9=K2*4.14E11,T9=1.01,K10=K2*1.01E14,T10=1.57,K11=K2*2.33E16,T11=1.80,&
 K12=K2*9.24E18,T12=2.61
HC:SBEND,L=1.87,ANGLE=0.2617994,E1=0.105,E2=.105,K1=-.3972, &
HGAP=.025,FINT=0.5,FINTX=0.5,K2=-.2,H1=0.,H2=0.
KSYN:GKICK,L=0.,DP=-.000302,V=1,T=1
 CAV:RFCAVITY,L=0.,VOLT=2.4,LAG=2.77,FREQ=285.,ENERGY=2.9;
HCELL:LINE=(5*D1,4*D1,D1b,MH,MV,Q1, &
D9,CX,CY,D10,Q2,D3,HC,MH,MV,D4,S1,CX,CY,S1,D5,Q3,D6, &
S2)
HCELR:LINE=(S2,D6,Q3,D7,S1,CY,CX,S1,D8, &
MH,MV,HC,D3,Q2,D11,CY,CX,D12,Q1,MH,MV,D1b,4*D1, &
5*D1)
CELL:LINE=(HCELL,HCELR)
RING:LINE=(12*CELL,KSYN,CAV)
USE,RING
DIMAT
MATRIX
2 -1,
LEAST squres fit to tune.
2 2 3 3
0 0 0 0 0 0 0 0 
Q1  K1 0.001 Q2 k1 0.001 Q3 k1 0.001 
2 .22 1 12 .25 1 3 .15 1
0,
LEAST squres fit to chrom.
2 2 2 2
0 0 0 0 0 0 0 0 
S1 K2 0.001 S2 K2 0.001
8 0.0 1 18 0. 1
0 1,
HARDWARE for layout
2.9 0. 0. 0. 0. 0. 0. 0. 1. 0,
machine
2.75 2.9001  .15 1 .025 1 1 
0 0 0 0 0 0 0 0
0;
STOP;