183 lines
7.1 KiB
Plaintext
183 lines
7.1 KiB
Plaintext
|
|
! into laser heater
|
|
|
|
|
|
sinlh01.mqua020.k1=4.13741e-01;
|
|
sinlh01.mqua040.k1=1.02263e-02;
|
|
sinlh01.mqua070.k1=8.56362e-01;
|
|
sinsb03.mqua130.k1=-9.18903e-01;
|
|
sinsb03.mqua230.k1=1.61605e+00;
|
|
sinsb04.mqua130.k1=-1.34639e+00;
|
|
sinsb04.mqua230.k1=1.47628e+00;
|
|
|
|
|
|
Print,text='MATCH POINT: Laser Heater';
|
|
MATCH,SEQUENCE=SwissFEL,range=#s/sinbc02$start,beta0 = Twiss0;
|
|
VARY,NAME=sinlh01.MQUA020.k1,STEP=0.0001;
|
|
VARY,NAME=sinlh01.MQUA040.k1,STEP=0.0001;
|
|
VARY,NAME=sinlh01.MQUA070.k1,STEP=0.0001;
|
|
VARY,NAME=sinsb03.MQUA130.k1,STEP=0.0001;
|
|
VARY,NAME=sinsb03.MQUA230.k1,STEP=0.0001;
|
|
VARY,NAME=sinsb04.MQUA130.k1,STEP=0.0001;
|
|
VARY,NAME=sinsb04.MQUA230.k1,STEP=0.0001;
|
|
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinsb04.mqua230$end, alfx = TwissM1->ALFX;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinsb04.mqua230$end, alfy = TwissM1->ALFY;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinsb04.mqua230$end, betx = TwissM1->BETX;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinsb04.mqua230$end, bety = TwissM1->BETY;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinsb04.mqua130$end, betx < 65;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinsb04.mqua130$end, bety < 65;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinsb03.mqua230$end, betx < 65;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinsb03.mqua230$end, bety < 65;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinsb03.mqua130$end, betx < 65;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinsb03.mqua130$end, bety < 65;
|
|
|
|
LMDIF,CALLS=1000,TOLERANCE=1.e-21;
|
|
SIMPLEX,CALLS=1000,TOLERANCE=1.e-21;
|
|
ENDMATCH;
|
|
|
|
|
|
|
|
twiss,SEQUENCE=swissfel,range=#s/sinbc01$end,beta0 = Twiss0;
|
|
plot,haxis=s,vaxis=betx,bety,range=#s/#e,colour=100;
|
|
|
|
Print,text='MATCH POINT: BC 1';
|
|
MATCH,SEQUENCE=SwissFEL,range=#s/sinma01$start,beta0 = Twiss0;
|
|
VARY,NAME=sinbc01.MQUA020.k1,STEP=0.0001;
|
|
VARY,NAME=sinbc01.MQUA050.k1,STEP=0.0001;
|
|
VARY,NAME=sinbc01.MQUA070.k1,STEP=0.0001;
|
|
VARY,NAME=sinbc01.MQUA090.k1,STEP=0.0001;
|
|
VARY,NAME=sinbc01.MQUA110.k1,STEP=0.0001;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinbc02$end, betx = 3;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinbc02$end, alfx = 0;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinbc01.mqua070$end, bety < 32;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinbc02$end, bety = 25;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sinbc01$end, x = 0;
|
|
SIMPLEX,CALLS=1000,TOLERANCE=1.e-21;
|
|
ENDMATCH;
|
|
|
|
twiss,SEQUENCE=swissfel,range=#s/sinbc02$end,beta0 = Twiss0;
|
|
plot,haxis=s,vaxis=betx,bety,range=#s/#e,colour=100;
|
|
|
|
|
|
|
|
Print,text='MATCH POINT: Injector-TDS';
|
|
MATCH,SEQUENCE=SwissFEL,range=#s/sindi02$end,beta0 = Twiss0;
|
|
VARY,NAME=sinma01.MQUA020.k1,STEP=0.0001;
|
|
VARY,NAME=sinma01.MQUA030.k1,STEP=0.0001;
|
|
VARY,NAME=sinma01.MQUA050.k1,STEP=0.0001;
|
|
VARY,NAME=sincb01.MQUA230.k1,STEP=0.0001;
|
|
VARY,NAME=sincb01.MQUA430.k1,STEP=0.0001;
|
|
VARY,NAME=sindi01.mqua020.k1,STEP=0.0001,lower=-3.5,upper=3.5;
|
|
VARY,NAME=sindi01.mqua070.k1,STEP=0.0001,lower=-3.5,upper=3.5;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sindi02.mqua020$start,bety=TwissM2->BETY;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sindi02.mqua020$start,alfy=TwissM2->ALFY;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sindi02.mqua020$start,betx=TwissM2->BETX;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sindi02.mqua020$start,alfx=TwissM2->ALFX;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sincb01.mqua230$end, betx <65;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sincb01.mqua230$end, bety < 65;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sincb01$end, betx < 50;
|
|
CONSTRAINT,SEQUENCE=SwissFEL,range=sincb01$end, bety < 50;
|
|
LMDIF,CALLS=1000,TOLERANCE=1.e-21;
|
|
SIMPLEX,CALLS=1000,TOLERANCE=1.e-21;
|
|
ENDMATCH;
|
|
|
|
|
|
twiss,SEQUENCE=swissfel,range=#s/sindi02$end,beta0 = Twiss0;
|
|
plot,haxis=s,vaxis=betx,bety,range=sinbc02$start/#e,colour=100;
|
|
|
|
|
|
s10cb02.mqua230.k1=-0.2;
|
|
s10cb02.mqua430.k1=0.2;
|
|
|
|
muLin1=0.1;
|
|
Print,text='MATCH POINT: FODO - Linac 1';
|
|
match,SEQUENCE=swissfel,range=S10cb02$start/s10cb02$end;
|
|
Vary,name=S10CB02.MQUA230.k1,step=0.0001;
|
|
Vary,name=S10CB02.MQUA430.k1,step=0.0001;
|
|
constraint,sequence=swissfel,range=s10cb02$end,mux=muLin1;
|
|
constraint,sequence=swissfel,range=s10cb02$end,muy=muLin1;
|
|
lmdif,calls=100,tolerance=1e-21;
|
|
endmatch;
|
|
|
|
s10cb01.mqua230.k1 = s10cb02.mqua230.k1;
|
|
s10cb01.mqua430.k1 = s10cb02.mqua430.k1;
|
|
|
|
twiss,SEQUENCE=swissfel,range=s10cb02$start/s10cb02$end;
|
|
|
|
nbetx=table(twiss,s10cb02$end,betx);
|
|
nalfx=table(twiss,s10cb02$end,alfx);
|
|
nbety=table(twiss,s10cb02$end,bety);
|
|
nalfy=table(twiss,s10cb02$end,alfy);
|
|
plot,haxis=s,vaxis=betx,bety,colour=100;
|
|
|
|
Print,text='MATCH POINT: Match into Linac 1';
|
|
MATCH,SEQUENCE=SwissFEL,range=#s/s10cb02$end,beta0 = Twiss0;
|
|
VARY,NAME=sindi02.mqua020.k1,STEP=0.0001,lower=-5.5,upper=5.5;
|
|
VARY,NAME=sindi02.mqua030.k1,STEP=0.0001,lower=-5.5,upper=5.5;
|
|
VARY,NAME=sindi02.mqua050.k1,STEP=0.0001,lower=-5.5,upper=5.5;
|
|
VARY,NAME=sindi02.mqua060.k1,STEP=0.0001,lower=-5.5,upper=5.5;
|
|
VARY,NAME=sindi02.mqua090.k1,STEP=0.0001,lower=-5.5,upper=5.5;
|
|
VARY,NAME=s10cb01.mqua230.k1,STEP=0.0001,lower=-5.5,upper=5.5;
|
|
VARY,NAME=s10cb01.mqua430.k1,STEP=0.0001,lower=-5.5,upper=5.5;
|
|
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s10cb02$start,betx=nbetx;
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s10cb02$start,alfx=nalfx;
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s10cb02$start,bety=nbety;
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s10cb02$start,alfy=nalfy;
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s10cb01$start,x=0;
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s10cb01$start,y=0;
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s10cb01$start,dx=0;
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s10cb01$start,dy=0;
|
|
LMDIF,CALLS=1000,TOLERANCE=1.e-21;
|
|
SIMPLEX,CALLS=1000,TOLERANCE=1.e-21;
|
|
ENDMATCH;
|
|
|
|
twiss,SEQUENCE=swissfel,range=#s/s10cb02$end,beta0 = Twiss0;
|
|
plot,haxis=s,vaxis=betx,bety,range=#s/#e,colour=100;
|
|
|
|
S10DI01.MQUA120.k1=S10CB02.MQUA230.k1;
|
|
S10CB03.MQUA230.k1=S10CB02.MQUA430.k1;
|
|
S10CB03.MQUA430.k1=S10CB02.MQUA230.k1;
|
|
S10CB04.MQUA230.k1=S10CB02.MQUA430.k1;
|
|
S10CB04.MQUA430.k1=S10CB02.MQUA230.k1;
|
|
S10CB05.MQUA230.k1=S10CB02.MQUA430.k1;
|
|
S10CB05.MQUA430.k1=S10CB02.MQUA230.k1;
|
|
S10CB06.MQUA230.k1=S10CB02.MQUA430.k1;
|
|
S10CB06.MQUA430.k1=S10CB02.MQUA230.k1;
|
|
S10CB07.MQUA230.k1=S10CB02.MQUA430.k1;
|
|
S10CB07.MQUA430.k1=S10CB02.MQUA230.k1;
|
|
S10CB08.MQUA230.k1=S10CB02.MQUA430.k1;
|
|
S10CB08.MQUA430.k1=S10CB02.MQUA230.k1;
|
|
S10CB09.MQUA230.k1=S10CB02.MQUA430.k1;
|
|
S10CB09.MQUA430.k1=S10CB02.MQUA230.k1;
|
|
S10CB10.MQUA230.k1=S10CB02.MQUA430.k1;
|
|
S10CB10.MQUA430.k1=S10CB02.MQUA230.k1;
|
|
S10CB11.MQUA230.k1=S10CB02.MQUA430.k1;
|
|
|
|
|
|
twiss,SEQUENCE=swissfel,range=#s/s10cb10$end,beta0 = Twiss0;
|
|
plot,haxis=s,vaxis=betx,bety,range=#s/#e,colour=100;
|
|
|
|
|
|
Print,text='MATCH POINT: Match into Athos Septum';
|
|
MATCH,SEQUENCE=SwissFEL,range=#s/s20sy02$start,beta0 = Twiss0;
|
|
VARY,NAME=s20sy01.mqua010.k1,STEP=0.0001,lower=-5.5,upper=5.5;
|
|
VARY,NAME=s20sy01.mqua060.k1,STEP=0.0001,lower=-5.5,upper=5.5;
|
|
VARY,NAME=s20sy01.mqua030.k1,STEP=0.0001,lower=-5.5,upper=5.5;
|
|
VARY,NAME=s20sy01.mqua040.k1,STEP=0.0001,lower=-5.5,upper=5.5;
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s20sy01$end,betx=twisssep->BETX;
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s20sy01$end,alfx=twisssep->ALFX;
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s20sy01$end,bety=twisssep->BETY;
|
|
CONSTRAINT,SEQUENCE=swissfel,range=s20sy01$end,alfy=twisssep->ALFY;
|
|
!CONSTRAINT,SEQUENCE=swissfel,range=s20sy01.mqua020$end,bety<80;
|
|
LMDIF,CALLS=1000,TOLERANCE=1.e-21;
|
|
ENDMATCH;
|
|
|
|
|
|
twiss,SEQUENCE=swissfel,range=#s/s20sy01$end,beta0 = Twiss0;
|
|
plot,haxis=s,vaxis=betx,bety,range=s10cb08$start/#e,colour=100;
|
|
plot,haxis=s,vaxis=betx,bety,range=#s/#e,colour=100;
|
|
|
|
|