[430] | 1 | |
---|
| 2 | call, file="../share/LEIR/LEIR.seqx"; |
---|
| 3 | |
---|
| 4 | |
---|
| 5 | eg := 0.938272+0.0042+10000; ! ... in GeV |
---|
| 6 | |
---|
| 7 | eg := 0.938272*2.8385; ! ... in GeV on transition |
---|
| 8 | eg := 0.938272*1.1547; ! ... in GeV beta = 0.5 |
---|
| 9 | |
---|
| 10 | beam, particle = proton, energy = eg; |
---|
| 11 | |
---|
| 12 | use, period=LEIR; |
---|
| 13 | |
---|
| 14 | |
---|
| 15 | |
---|
| 16 | |
---|
| 17 | select,flag=twiss,clear; |
---|
| 18 | select, flag=twiss, column=name,s,beta11,beta22,alfa11,alfa22,mu1,mu2,disp1,disp2, |
---|
| 19 | re11,re12,re13,re14,re15,re16, |
---|
| 20 | re21,re22,re23,re24,re25,re26, |
---|
| 21 | re31,re32,re33,re34,re35,re36, |
---|
| 22 | re41,re42,re43,re44,re45,re46, |
---|
| 23 | re51,re52,re53,re54,re55,re56, |
---|
| 24 | re61,re62,re63,re64,re65,re66; |
---|
| 25 | |
---|
| 26 | |
---|
| 27 | |
---|
| 28 | ptc_create_universe; |
---|
| 29 | ptc_create_layout, model=1, method=6, nst=5, exact=true, closed_layout=true; |
---|
| 30 | |
---|
| 31 | !!!!! T I M E F A L S E, T O T P A T H F A L S E |
---|
| 32 | ptc_setswitch, debuglevel=0, exact_mis=true, time=true, totalpath=false; |
---|
| 33 | |
---|
| 34 | |
---|
| 35 | ptc_twiss, table=twiss, icase=56, no=2, closed_orbit; |
---|
| 36 | write, table=twiss, file="leir.56dt.ptc.twiss"; |
---|
| 37 | write, table=ptc_twiss_summary, file="leir.56dt.ptc.summ.twiss"; |
---|
| 38 | |
---|
| 39 | ptc_end; |
---|
| 40 | |
---|
| 41 | |
---|
| 42 | plot, haxis=s, vaxis=beta11,beta22, colour=100; |
---|
| 43 | plot, haxis=s, vaxis=disp1, colour=100; |
---|
| 44 | plot, haxis=s, vaxis=x, colour=100; |
---|
| 45 | |
---|