Optimizing SF+ matching including sextupoles.

Lattice plots have now also an indication for screens
This commit is contained in:
2026-01-22 14:53:38 +01:00
parent 13873bbd69
commit 84b114a2d0
7 changed files with 145 additions and 2083 deletions

View File

@@ -2,7 +2,13 @@
! 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';
@@ -25,9 +31,9 @@ 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;
SIMPLEX,CALLS=1000,TOLERANCE=1.e-21;
LMDIF,CALLS=1000,TOLERANCE=1.e-21;
LMDIF,CALLS=1000,TOLERANCE=1.e-21;
SIMPLEX,CALLS=1000,TOLERANCE=1.e-21;
ENDMATCH;
@@ -84,7 +90,7 @@ plot,haxis=s,vaxis=betx,bety,range=sinbc02$start/#e,colour=100;
s10cb02.mqua230.k1=-0.2;
s10cb02.mqua430.k1=0.2;
muLin1=0.13;
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;
@@ -113,7 +119,7 @@ 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;
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;
@@ -124,6 +130,7 @@ 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;