m4-20091125-411-4PMDW.lat

{ TITLE "ring20n-20080222 MAXIV lattice from Simon Leeman" }

define lattice; ringtype = 1;

Energy = 3.0;

{making dP smaller speeds up runtime}
dP     = 1e-6;
CODeps = 1e-14;

{Meth = 4; Nbend = 4; Nquad = 4; Nsext = 4; Ncorr = 1;}
Meth = 4; Nbend = 10; Nquad = 10; Nsext = 10; Ncorr = 1;

pi = 4.0*arctan(1.0);
c0 = 2.99792458e8;
Brho = 1e9*Energy/c0;


STR0500:   DRIFT, L= 5.0000000000E-01;
STR0450:   DRIFT, L= 4.5000000000E-01;
STRx403:   DRIFT, L= 4.0311000000E-01;
STR0400:   DRIFT, L= 4.0000000000E-01;
STR0302:   DRIFT, L= 3.0200000000E-01;
STRx203:   DRIFT, L= 2.0311000000E-01;
STRx113:   DRIFT, L= 1.1268000000E-01;
STR0100:   DRIFT, L= 1.0000000000E-01;
STR0075:   DRIFT, L= 7.5000000000E-02;
STR0050:   DRIFT, L= 5.0000000000E-02;
STR0025:   DRIFT, L= 2.5000000000E-02;
STRx013:   DRIFT, L= 1.2500000000E-02;
STR0010:   DRIFT, L= 1.0000000000E-02;
STRx006:   DRIFT, L= 6.0800000000E-03;


{ Girder Markers }
GS:  Marker;
GE:  Marker;


{ Beam Position Monitors }
BPM_D: Drift, L = 5.0e-2/2.0;
BPM_M: Beam Position Monitor;
BPM:   BPM_D, BPM_M, BPM_D;

{ Horizontal and vertical corrector }
CORR_D:  Drift, L = 10.0e-2/2.0;
CORR_H:  Corrector, Horizontal, Method= Meth;
CORR_V:  Corrector, Vertical, Method= Meth;
CORR:    CORR_D, CORR_H, CORR_V, CORR_D;


{T3 and OPA quad/sext strengths are normalized}
{m->m/2 for MAD8->T3}
{m->m/2 for MAD8->OPA}

DISPscale=1.0;QDmaster = 1.0;QFscale = 1.0;QDscale = 1.0;WQDscale = 1.0;WQFscale = 1.0;
{original OPA values}
QDmaster = -0.993433/Brho;
{for disp-free straights}
DISPscale = 1.0;
{for 42.20/14.28 in bare RING}
QFscale = 0.999993897;QDscale = 1.000595795;


D0:    BENDING, L= 3.6189000000E-01, T= 1.085673,
       K=8.6837*QDmaster*QDscale, T1= 0.0, T2= 0.0,
       N = Nbend, Method = Meth;

Df1:   BENDING, L= 5.0000000000E-02, T= 0.149940,
       K=8.6798*QDmaster*QDscale, T1= 0.0, T2= 0.0,