PIMM.seq

! Based on CERN-PS-99-010-DI, TERA Foundation

mb:  sbend, l=1.661, angle=0.3926990817, e1=0.19634954085, e2=0.19634954085;
qfa: quadrupole, l=2*0.175, k1:= kqfa;
qd:  quadrupole, l=2*0.175, k1:= kqd;
qfb: quadrupole, l=2*0.175, k1:= kqfb;

sd1: sextupole, l=0.2, k2:=ksd;
sf1: sextupole, l=0.2, k2:=ksf;
sd2: sextupole, l=0.2, k2:=ksd;
sf2: sextupole, l=0.2, k2:=ksf;
se1: sextupole, l=0.2, k2:=kse1;
se2: sextupole, l=0.2, k2:=kse2;

pimms:sequence,refer=centre,l=75.24;
              extr_septum: marker, at=0.0;
              qfa.1: qfa, at=2.3875;
              mb, at=3.8125;
              qd.1: qd, at=5.2925;
              mb, at=7.0475;
              qfa.2: qfa, at=8.3275;
              sd1, at=10.29;
              qfb.1: qfb, at=10.6775;
              mb, at=12.1325;
              qd.2: qd, at=14.2625;
              mb, at=15.9175;
              qfb.2: qfb, at=17.1975;
              qfb.3: qfb, at=20.2475;
              mb, at=21.7025;
              qd.3: qd, at=23.1825;
              sf1, at=24.045;
              mb, at=25.4875;
              qfb.4: qfb, at=26.7675;
              qfa.3: qfa, at=29.1175;
              mb, at=30.5725;
              qd.4: qd, at=32.1525;
              mb, at=33.8075;
              qfa.4: qfa, at=35.0575;
              se1, at=35.0575 + 0.6;
              se2, at=40.0075 - 0.6;
              qfa.5: qfa, at=40.0075;
              mb, at=41.4325;
              qd.5: qd, at=42.9125;
              mb, at=44.6675;
              qfa.6: qfa, at=45.9475;
              sd2, at=47.91;
              qfb.5: qfb, at=48.2975;
              mb, at=49.7525;
              qd.6: qd, at=51.8825;
              mb, at=53.5375;
              qfb.6: qfb, at=54.8175;
              qfb.7: qfb, at=57.8675;
              mb, at=59.3225;
              qd.7: qd, at=60.8025;
              sf2, at=61.665;
              mb, at=63.1075;
              qfb.8: qfb, at=64.3875;
              qfa.7: qfa, at=66.7375;
              mb, at=68.1925;
              qd.8: qd, at=69.7725;
              mb, at=71.4275;
              qfa.8: qfa, at=72.6775;
endsequence;