!ap: maxamp,x_max=0.010,y_max=0.010 ! Elliptical aperture offset in horizontal plane AP: MAXAMP,X_MAX=0.013,Y_MAX=0.010,ELLIPTICAL=1 MM:MARKER MD:MARKER MA:MARKER D51 : drift, l = 0.117 D52 : drift, l = 0.120 D53 : drift, l = 0.120 D54 : drift, l = 0.3061 D55A : drift, l = 0.063032 D55B : drift, l = 0.063032 DW : drift, l = 0.075000 D21A : drift, l = 0.117 D21B : drift, l = 0.100 D24 : drift, l = 0.418804 D25 : drift, l = 0.110 D26 : drift, l = 0.110 D271 : drift, l = 0.109 D272 : drift, l = 0.184 D28 : drift, l = 0.100 D29 : drift, l = 0.117 D13 : drift, l = 0.117 D11A : drift, l = 3.11786 D11B : drift, l = 0.100 D12A : drift, l = 0.100 D12B : drift, l = 0.1435 DSH1 : drift, l = 0.120 DSH2 : drift, l = 0.150 Q1 : kquad, l = 0.300000, k1 = +2.39426, n_slices=5,integration_order=6 Q2 : kquad, l = 0.300000, k1 = -2.02495, n_slices=5,integration_order=6 Q3 : kquad, l = 0.200000, k1 = -1.731155, n_slices=5,integration_order=6 Q4 : kquad, l = 0.300000, k1 = 1.881102, n_slices=5,integration_order=6 Q5 : kquad, l = 0.300000, k1 = 1.966286, n_slices=5,integration_order=6 Q6 : kquad, l = 0.250000, k1 = -2.771466, n_slices=5,integration_order=6 Q7 : kquad, l = 0.500000, k1 = 3.260706, n_slices=5,integration_order=6 Q8 : kquad, l = 0.600000, k1 = 3.520153, n_slices=5,integration_order=6 B1 : csbend, l=1.8,angle=0.0304,k1=-0.000000,e1=0.0000000,e2=0.0000000,n_slices=5,integration_order=6 B2 : csbend, l=1.8,angle=0.0304,k1=-0.000000,e1=0.0000000,e2=0.0000000,n_slices=5,integration_order=6 B3 : csbend, l=1.0,angle =0.0252,k1=-1.713598,e1=0.0000000,e2=0.0000000,n_slices=5,integration_order=6 B4 : csbend, l=0.8,angle =0.0244,k1=-1.654527,e1=0.0000000,e2=0.0000000,n_slices=5,integration_order=6 S1 : ksext, l = 0.25, k2 = -135.4404, n_slices=5,integration_order=6 S2 : ksext, l = 0.25, k2 = +197.8939, n_slices=5,integration_order=6 S3 : ksext, l = 0.25, k2 = -150.4, n_slices=5,integration_order=6 OXY : koct, l=0.09, k3 = 1.6668e4 , n_slices=5,integration_order=6 RF: rfca,freq="9.1182490e+02 6000 mev / beta.p c_mks * / rec 1520 *",volt=7.00e6,phase="180 2.3762 7.00 / dasin -" !RF : RFCA, FREQ=4.9975E+08, VOLT=7E+06, PHASE=170 !SR : SREFFECTS,QEXCITATION=1 SR : SREFFECTS BPM: MONI CH: HKICK CV: VKICK !100 mA corresponds to 304 nC q: charge,total=304e-9 !An element to establish the total charge of a beam !bunch 1 W1: watch,filename="%s.w1",mode="coord" W2: watch,filename="%s.w2",mode="parameters", flush_interval=1 !OUTERAP: SCRAPER,POSITION=1,INSERT_FROM="+X" !INNERAP: SCRAPER,POSITION=-1,INSERT_FROM="-X" SEPTUM1: SCRAPER,POSITION=-1,INSERT_FROM="-X" SEPTUM2: SCRAPER,POSITION=1,INSERT_FROM="+X" SEPTUM: LINE=(SEPTUM1,SEPTUM2) D1KA: drift, l=2.50786 D1KB: drift, l=0.2 D110: drift, l=0.010 ICELL : line=( D11A, BPM, Q1, D12A, CH, CV, DSH2, D12B, Q2, D13, B1, & D21A, Q3, D21B, S1, CH, CV, D24, BPM, Q4, D25, S2, CH, CV, & D26, Q5, D271, OXY,BPM, D272, S3, CH, CV, D28, Q6, D29, & B2, D51, Q7, D52, B3, BPM, D53, Q8, CH, CV, D54, BPM, & B4, BPM, D54, CH, CV, Q8, D53, BPM, B3, D52, Q7,D51, & B2, D29, Q6, D28, CH, CV, S3, D272, BPM, OXY, D271, Q5, D26, & CH, CV, S2, D25, Q4, BPM, D24, CH, CV, S1, D21B, Q3, D21A, & B1, D13, Q2, D12B, DSH2, CH, CV, D12A, Q1, BPM, D11A) !RINGP : line = (32*ICELL) RING : line =(ICELL,ICELL,ICELL,ICELL,ICELL,ICELL,ICELL,ICELL, ICELL, & ICELL, ICELL, ICELL,ICELL,ICELL,ICELL,ICELL,ICELL,ICELL, & ICELL,ICELL,ICELL,ICELL,ICELL,ICELL,ICELL,ICELL,ICELL,ICELL, & ICELL, ICELL, ICELL, ICELL) !RINGRF: line=(RING,sr,rf) ILM_4SECT: ILMATRIX,L=91.18,NUX=7.615,NUY=2.721,NUX1M=0.0,NUY1M=0.0,& BETAX=11.61,BETAY=3.846,ALPHAX=-2.76E-14,ALPHAY=4.77e-15,& ETAX=0.0,ETAY=0.0,ETAPX=6.9E-17,ALPHAC=0.00008,ALPHAC2=0.0 d0: drift,l=0 GB: line=(d0) !ion0: mark ion0: IONEFFECTS,x_span=0.010,y_span=0.010,macro_ions=100 RECIRC: RECIRC !Bunch 1 is wp00 wp00: watch,filename="%s.wp00",mode="param",start_pid=1,end_pid=100, flush_interval=1 wp701: watch,filename="%s.wp701",mode="param",start_pid=70001,end_pid=70100, flush_interval=1 !RING_ILM10: LINE=(q,RECIRC,wp00,wp701,& ! ion0,ILM_4SECT,ion0,ILM_4SECT,ion0,ILM_4SECT,ion0,ILM_4SECT,& ! ion0,ILM_4SECT,ion0,ILM_4SECT,ion0,ILM_4SECT,ion0,ILM_4SECT,& ! ion0,ILM_4SECT,ion0,ILM_4SECT,AP) RING_ILM10: LINE=(q,RECIRC,wp00,wp701,& ILM_4SECT,ILM_4SECT,ILM_4SECT,ILM_4SECT,& ion0,ILM_4SECT,ILM_4SECT,ILM_4SECT,ILM_4SECT,& ILM_4SECT,ILM_4SECT,AP) RETURN