!---------------------------------------------------------------------------------
!
! NLS L-band option studies
!
! RB October 2009 --- 2.25 GeV ---
!
! Adapted from FEL09 layout
!
! Jan 2009: 
!   basic version with three BCs and two 3HC
! Apr 2009: 
!   removed second 3HC, cleaned up drifts, added correctors, BPMs and Laser Heater
! Sep 2009:
!   added dog leg merger after inejctor
! Oct 2009:
!   remove chirp from injector and pushed BC1 after ACC02, pushed BC3 at 1.5 GeV
!
!---------------------------------------------------------------------------------
!
! This file assumes a 15.0 m long injector with an energy of about 135 MeV
! The injector has 1 Tesla module (8 Tesla cavities - 9 cell each) as per JHH simulations
!
!---------------------------------------------------------------------------------
!
! The LINAC has the following structure
!
!  NLSL: LINE = (I2L, NLS_LH, DLMERGE, ACC391, ACC02, BC1, ACC03, ACC04, &
!                BC2, ACC05, ACC06, ACC07, ACC08, ACC09, ACC10, ACC11, ACC12, BC3, &
!                ACC13, ACC14, ACC15, ACC16, ACC17, ACC18, DL or SPREADER)
!
!  i.e. 
!
!  a matching section from the injector to the LINAC (I2L)
!  a laser heater with corresponding triplet for mathcing (NLS_LH)
!  a dog leg about 25 m long with two triplets
!  ACC02 to give energy chirp to the beam before BC1
!  a third harmonic - 1 module of XFEL type eight cavity with 9 cell (ACC39)
!  BC1 at 135 MeV
!  two accelerating sections - TESLA module type eight cavity with 9 cells (ACC02-03)
!  BC2 at 450 MeV
!  five accelerating sections - TESLA module type eight cavity with 9 cells (ACC04-08)
!  BC3 at 1 GeV
!  six accelerating sections - TESLA module type eight cavity with 9 cells (ACC09-14)
!  option for a dog-leg at 2.25 GeV (DL) or a spreader
!  a matching section to the FEL (L2F)
!
! LSC 
! - LSCDRIFT in drifts
! CSR WAKEFIELDS
! - CSR Wakefield at BC1, BC2, BC3, and DL
! WAKEFIELDS
! - Short-Range Transverse Wakefields in 3rd Harmonic Cavities
! - Short-Range Longitudinal Wakefields in 3rd Harmonic Cavities
! - Short-Range Transverse Wakefields in all TESLA Modules
! - Short-Range Longitudinal Wakefields in all TESLA Modules
!
!-------------------------------------------------------------------------------

!-------------------------------------------------------------------------------
!
! working point definitions
!
!-------------------------------------------------------------------------------

! bunch compressor angles (degrees)
% 13.8226  sto  theta_bc1
% 12.9408  sto  theta_bc2
% 10.911  sto  theta_bc3

! cavity phases (degrees off crest)

%  30      sto   ph2

%  0       sto   ph3
%  0       sto   ph4

%  0       sto   ph5
%  0       sto   ph6
%  0       sto   ph7
%  0       sto   ph8
%  0       sto   ph9
%  0       sto   ph10
%  0       sto   ph11
%  0       sto   ph12

%  0       sto   ph13
%  0       sto   ph14
%  0       sto   ph15
%  0       sto   ph16
%  0       sto   ph17
%  0       sto   ph18

! cavity voltages
%  15.10E+06       sto   v2
%  15.60E+06       sto   v3
%  15.60E+06       sto   v4
%  15.60E+06       sto   v5
%  15.60E+06       sto   v6
%  15.60E+06       sto   v7
%  15.60E+06       sto   v8
%  15.60E+06       sto   v9
%  15.60E+06       sto   v10
%  15.60E+06       sto   v11
%  15.60E+06       sto   v12

%  15.70E+06       sto   v13
%  15.70E+06       sto   v14

! not used

%  15.70E+06       sto   v15
%  15.70E+06       sto   v16
%  15.70E+06       sto   v17
%  18.70E+06       sto   v18

! third harmonic cavities
% 11775229.1971    sto  v391
% 180.514          sto  ph391
% 0.0E+06          sto  v392
% 199.99           sto  ph392

! flag for space charge and CSR
% 1                sto lscflag
% 1                sto csrflag

! best settings from NSGA2 run

% 11.841017 sto theta_bc1
% 7.185023 sto theta_bc2
% 7.424815 sto theta_bc3
% 13600428.619493 sto v391
% 186.520112 sto ph391
% 29.307791 sto ph2
% 18.853534 sto ph3
% 8.119301 sto ph5

% "mymacros" @

! copy phases

% ph3 sto ph4

% ph5 sto ph6
% ph5 sto ph7
% ph5 sto ph8
% ph5 sto ph9
% ph5 sto ph10
% ph5 sto ph11
% ph5 sto ph12


!-------------------------------------------------------------------------------
!
! charge definition
!
!-------------------------------------------------------------------------------
Q: CHARGE, TOTAL=0.2E-09 
!-------------------------------------------------------------------------------
!
! wakefields definition
!
!-------------------------------------------------------------------------------
! Longitudinal Short-Range Wakefield for one TESLA module
LWAKE13: WAKE, INPUTFILE="/home/im76/elegant/nlsl/inputdata/TESLA_MODULE_lwake.sdds", FACTOR=1,		&
         CHANGE_P0=1, TCOLUMN="t", WCOLUMN="W", INTERPOLATE=1,		&
         N_BINS=0, SMOOTHING=1
 
! Transverse Short-Range Wakefield for one TESLA Module
TWAKE13: TRWAKE, INPUTFILE="/home/im76/elegant/nlsl/inputdata/TESLA_MODULE_twake.sdds", FACTOR=1,	&
         TCOLUMN="t", WXCOLUMN="W", WYCOLUMN="W", INTERPOLATE=1,	&
         N_BINS=0, SMOOTHING=1, DX=0.0, DY=0.0
 
! Longitudinal and Transverse Wakefields for one TESLA module
LTWAKE13  : LINE = (LWAKE13, TWAKE13)
QLTWAKE13 : LINE = (Q, LWAKE13, TWAKE13)
! Longitudinal Short-Range Wakefield for one ACC39 module
LWAKE39: WAKE, INPUTFILE="/home/im76/elegant/nlsl/inputdata/TESLA_FOUR3900MHz_lwake.sdds", FACTOR=2,	&
         CHANGE_P0=1, TCOLUMN="t", WCOLUMN="W", INTERPOLATE=1,          &
         N_BINS=0, SMOOTHING=1
 
! Transverse Short-Range Wakefield for one ACC39 module
! Misalignment DX and DY
TWAKE39: TRWAKE, INPUTFILE="/home/im76/elegant/nlsl/inputdata/TESLA_FOUR3900MHz_twake.sdds", FACTOR=2,	&
         TCOLUMN="t", WXCOLUMN="W", WYCOLUMN="W", INTERPOLATE=1,	&
         N_BINS=0, SMOOTHING=1, DX=0.0, DY=0.0

! Longitudinal and Transverse Wakefields for one ACC39 module
LTWAKE39  : LINE = (LWAKE39, TWAKE39)
QLTWAKE39 : LINE = (Q, LWAKE39, TWAKE39)

!-------------------------------------------------------------------------------
!
! Drifts definition
!
!-------------------------------------------------------------------------------
D0100 : LSCDRIFT, L=0.100, &
INTERPOLATE=1, SMOOTHING=1, BINS= 100, LSC = "lscflag", &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D0130 : LSCDRIFT, L=0.130, &
INTERPOLATE=1, SMOOTHING=1, BINS= 100, LSC = "lscflag", &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D0150 : LSCDRIFT, L=0.150, &
INTERPOLATE=1, SMOOTHING=1, BINS= 100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D0200 : LSCDRIFT, L=0.200, &
INTERPOLATE=1, SMOOTHING=1, BINS= 100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D0250 : LSCDRIFT, L=0.250, &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D0300 : LSCDRIFT, L=0.300, &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D0500 : LSCDRIFT, L=0.500, &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D1000 : LSCDRIFT, L=1.000, &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D1500 : LSCDRIFT, L=1.500, &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D1600 : LSCDRIFT, L=1.600, &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255

!----------------------------------------------------------------------------
!
! ACC01: END OF TESLA MODULE ACC01 (wakefields and marker as watch point)
! starting absolute position = 15.00 m
!
!----------------------------------------------------------------------------
!
! Watching position at ACC01
!
ACC01w   : WATCH, FILENAME="%s.ACC01.w1", MODE=COORD
ACC01p   : WATCH, FILENAME="%s.ACC01.p1", MODE=PARAMETER
!
ACC01 : LINE = (LTWAKE13, ACC01w, ACC01p)

!----------------------------------------------------------------------------
!
! I2L: matching section to the linac
!
!----------------------------------------------------------------------------
!
! First triplet in I2L
!
Q09I2LU : KQUAD, L=0.150, K1= 5.643368330530897e+00, N_KICKS = 20
Q10I2LU : KQUAD, L=0.150, K1=-5.999998810749320e+00, N_KICKS = 20
Q11I2LU : KQUAD, L=0.150, K1=-8.884267451442844e-01, N_KICKS = 20
!
! Second triplet in I2L
!
Q09I2LD : KQUAD, L=0.150, K1= 8.589075300758336e-01, N_KICKS = 20
Q10I2LD : KQUAD, L=0.150, K1= 1.501183546323217e+00, N_KICKS = 20
Q11I2LD : KQUAD, L=0.150, K1= 2.799175165704973e+00, N_KICKS = 20
!
! Watching position at LINAC start
!
LSw   : WATCH, FILENAME="%s.LS.w1", MODE=COORD
LSp   : WATCH, FILENAME="%s.LS.p1", MODE=PARAMETER
!
I2L_RB: MARK, FITPOINT = 1;
I2L_REF: MARK, FITPOINT = 1;
!
I2L  : LINE = (D0100, Q09I2LU, D0300, Q10I2LU, D0300, Q11I2LU, D1000, I2L_RB,&
                      Q09I2LD, D0300, Q10I2LD, D0300, Q11I2LD, D1000, I2L_REF, LSw, LSp)

!----------------------------------------------------------------------------
!
! Laser Heater
!
!----------------------------------------------------------------------------
!
! First triplet in LH
!
Q09LHU : KQUAD, L=0.150, K1= 3.178747178640611e-01, N_KICKS = 20
Q10LHU : KQUAD, L=0.150, K1=-7.977613178837429e+00, N_KICKS = 20
Q11LHU : KQUAD, L=0.150, K1= 9.197823991257764e+00, N_KICKS = 20
!
! Second triplet in LH
!
Q09LHD : KQUAD, L=0.150, K1=-6.856039220023797e+00, N_KICKS = 20
Q10LHD : KQUAD, L=0.150, K1= 3.647910525987095e+00, N_KICKS = 20
Q11LHD : KQUAD, L=0.150, K1=-6.072361806688511e+00 , N_KICKS = 20
!
! Wiggler for laser heater
! old values: LASER_W0 = 350.0000E-06, LASER_PEAK_POWER = 0.010E+06,
! new values: LASER_W0 = 1000.0000E-06, LASER_PEAK_POWER = 0.400E+06,
LH: LSRMDLTR, L = .4800, BU = 0.5900, PERIODS = 12, LASER_PEAK_POWER = 0.003E+06,	&
                  LASER_W0 = 350.0000E-06, N_STEPS = 1500, LASER_PHASE = 0.00, 		&
                  method="non-adaptive runge-kutta", field_expansion="exact", 		&
                  accuracy=1.0E-09, laser_wavelength=0.0
!
! Dipoles of BC in Laser Heater
!
BLH1 : CSRCSBEN,L= 1.000000000E-01, 			&
               ANGLE=-9.948400000E-02, FINT=0.0,	&
               EDGE1_EFFECTS=1, E1= 0.000000000E+00, 	&
               EDGE2_EFFECTS=1, E2=-9.948400000E-02, 	&
               HGAP= 1.500000000E-02, 			&
               SG_HALFWIDTH=2, SG_ORDER=1, STEADY_STATE=0, BINS=100, &
               N_KICKS=10, INTEGRATION_ORDER=4, ISR=1, CSR = "csrflag"
BLH2 : CSRCSBEN,L= 1.000000000E-01, 			&
               ANGLE= 9.948400000E-02, FINT=0.0, 	&
               EDGE1_EFFECTS=1, E1= 9.948400000E-02, 	&
               EDGE2_EFFECTS=1, E2= 0.000000000E+00, 	&
               HGAP= 1.500000000E-02, 			&
               SG_HALFWIDTH=2, SG_ORDER=1, STEADY_STATE=0, BINS=100, &
               N_KICKS=10, INTEGRATION_ORDER=4, ISR=1, CSR = "csrflag"
BLH3 : CSRCSBEN,L= 1.000000000E-01, 			&
               ANGLE= 9.948400000E-02, FINT=0.0,	&
               EDGE1_EFFECTS=1, E1= 0.000000000E+00, 	&
               EDGE2_EFFECTS=1, E2= 9.948400000E-02, 	&
               HGAP= 1.500000000E-02, 			&
               SG_HALFWIDTH=2, SG_ORDER=1, STEADY_STATE=0, BINS=100, &
               N_KICKS=10, INTEGRATION_ORDER=4, ISR=1, CSR = "csrflag"
BLH4 : CSRCSBEN,L= 1.000000000E-01, 			&
               ANGLE=-9.948400000E-02, FINT=0.0,	&
               EDGE1_EFFECTS=1, E1=-9.948400000E-02, 	&
               EDGE2_EFFECTS=1, E2= 0.000000000E+00, 	&
               HGAP= 1.500000000E-02, 			&
               SG_HALFWIDTH=2, SG_ORDER=1, STEADY_STATE=0, BINS=100, &
               N_KICKS=10, INTEGRATION_ORDER=4, ISR=1, CSR = "csrflag"
!
! Drifts with CSR
!
CSRLHD1  : CSRDRIFT, L=0.100,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CSRLHD2  : CSRDRIFT, L=0.100,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CSRLHD3  : CSRDRIFT, L=0.100,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CSRLHD4  : CSRDRIFT, L=0.100,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CSRLHD5  : CSRDRIFT, L=0.250,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CSRLHD6  : CSRDRIFT, L=0.240,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
!
! Watching positions at ACC39
!
LHw   : WATCH, FILENAME="%s.LH.w1", MODE=COORD
LHp   : WATCH, FILENAME="%s.LH.p1", MODE=PARAMETER
LHwc  : WATCH, FILENAME="%s.LHcentre.w1", MODE=COORD
LHpc  : WATCH, FILENAME="%s.LHcentre.p1", MODE=PARAMETER
!
LH_RB: MARK, FITPOINT = 1;
LH_REF: MARK, FITPOINT = 1;
!
!NLS_LH: line = (Q09LHU, D0300, Q10LHU, D0300, Q11LHU, D0250, &
!                BLH1, CSRLHD1, BLH2, CSRLHD2, LH, CSRLHD3, BLH3, CSRLHD4, BLH4, LHw, LHp,&
!                CSRLHD5, Q09LHD, D0300, Q10LHD, D0300, Q11LHD, D0250, LH_REF)
! LH replaced with a drift for matching at centre
NLS_LH: line = (Q09LHU, D0300, Q10LHU, D0300, Q11LHU, D0250, BLH1, CSRLHD1, BLH2, CSRLHD2, &
                CSRLHD6, LH_RB, LHwc, LHpc, CSRLHD6, CSRLHD3, BLH3, CSRLHD4, BLH4, LHw, LHp,&
                CSRLHD5, Q09LHD, D0300, Q10LHD, D0300, Q11LHD, D0250, LH_REF)

!----------------------------------------------------------------------------
!
! DLMERGE: Dog-Leg Section for merger
!
!----------------------------------------------------------------------------
!
! DLM   = UDLM + MDLM + DDLM
!
!----------------------------------------------------------------------------
! UDLM: triplet upstream of DLM
!----------------------------------------------------------------------------
!
! Triplet
!
Q1@UDLM : KQUAD, L=0.15, K1 = 1.024680852110503e+01, N_KICKS = 20
Q2@UDLM : KQUAD, L=0.15, K1 =-5.465128887430701e+00, N_KICKS = 20
Q3@UDLM : KQUAD, L=0.15, K1 =-3.037011340021514e+00, N_KICKS = 20
!
! Markers
!
Q1END@UDLM : MARKER, FITPOINT=1
Q2END@UDLM : MARKER, FITPOINT=1
Q3END@UDLM : MARKER, FITPOINT=1
QM@UDLM : LINE = (D0150, Q1@UDLM, Q1END@UDLM, D0500, Q2@UDLM, Q2END@UDLM,    &
                  D0500, Q3@UDLM, Q3END@UDLM, D0150)
!
! Correctors
!
H1UDLM : HKICKER, L=0.100, KICK= 0.0
V1UDLM : VKICKER, L=0.100, KICK= 0.0
HVUDLM : LINE = (V1UDLM, D0100, H1UDLM, D0100)
!
! BPMs
!
BPMUDLM : MONITOR, L=0.000
!
UDLM : LINE = (QM@UDLM,HVUDLM,BPMUDLM)
!----------------------------------------------------------------------------
! MDLM: DLMERGE proper
!----------------------------------------------------------------------------
!
! QM in Dog-Leg
! Note that 3rd order is used to compensate 2nd and 3rd order dispersion
!
Q1@DLM  : KQUAD, L=0.3000, K1 = 4.515409154777577e+00, N_KICKS = 20
Q2H@DLM : KQUAD, L=0.1500, K1 =-1.305937050837570e+00, N_KICKS = 20
Q3@DLM  : KQUAD, L=0.3000, K1 = 1.653609857112113e+00, N_KICKS = 20
!
! Dog-Leg dipoles
!
CD1ECOLM : CSRCSBEND,                                                		&
           L="4.6 180 / -1 acos * 4.6 180 / -1 acos * sin / 0.400 * ", 		&
           ANGLE="4.6 180.0 / -1 acos * ",                              	&
           E1=0.0, E2="4.5 180.0 / -1 acos * ", HGAP=0.0125,            	&
           NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                	&
           BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                	&
           OUTPUT_FILE="%s.CD1ECOL.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"

CD2ECOLM : CSRCSBEND,                                                    	&
           L="-4.6 180 / -1 acos * -4.6 180 / -1 acos * sin / 0.400 * ",	&
           ANGLE="-4.6 180.0 / -1 acos * ",                             	&
           E1="-4.6 180.0 / -1 acos * ", E2=0.0, HGAP=0.0125,           	&
           NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                	&
           BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                	&
           OUTPUT_FILE="%s.CD7ECOL.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CD0800 : CSRDRIFT, L=0.800, DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CD0150 : CSRDRIFT, L=0.150, DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
!! long drift only
!D4000A  : LSCDRIFT, L = 4.0 &
!INTERPOLATE=1, SMOOTHING=1, BINS= 100, LSC = "lscflag", &
!HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
! Triplet in first drift
Q1@D1RB : KQUAD, L=0.20, K1 = 3.359321236130337e-01, N_KICKS = 20
Q2@D1RB : KQUAD, L=0.20, K1 =-7.355541874586592e+00, N_KICKS = 20
Q3@D1RB : KQUAD, L=0.20, K1 = 6.782807870998500e+00, N_KICKS = 20
D4000A : LINE = (D1000, Q1@D1RB, D0200, Q2@D1RB, D0200, Q3@D1RB, D1000, D1000, D1000)
!! long drift drift
!D4000B  : LSCDRIFT, L = 4.0 &
!INTERPOLATE=1, SMOOTHING=1, BINS= 100, LSC = "lscflag", &
!HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
! Triplet in second drift
Q1@D2RB : KQUAD, L=0.20, K1 = 1.660803453585485e+00, N_KICKS = 20
Q2@D2RB : KQUAD, L=0.20, K1 =-5.546344709943108e+00, N_KICKS = 20
Q3@D2RB : KQUAD, L=0.20, K1 = 2.973944113820237e+00, N_KICKS = 20
D4000B : LINE = (D1000, D1000, D1000, Q1@D2RB, D0200, Q2@D2RB, D0200, Q3@D2RB, D1000)
!
! Marker
!
Q1END@DLM : MARKER, FITPOINT=1
Q2MID@DLM : MARKER, FITPOINT=1
Q3END@DLM : MARKER, FITPOINT=1
DL1M_RB : MARKER, FITPOINT=1
DL2M_RB : MARKER, FITPOINT=1
!
! Watching positions
!
W1@DLM : WATCH, FILENAME="%s.DLM.w1", MODE=COORD
P1@DLM : WATCH, FILENAME="%s.DLM.p1", MODE=PARAMETER
W2@DLM : WATCH, FILENAME="%s.DLM.w2", MODE=COORD
P2@DLM : WATCH, FILENAME="%s.DLM.p2", MODE=PARAMETER
!
MDLM : LINE = (W1@DLM, P1@DLM, CD1ECOLM, DL1M_RB, CD0150, D1500, Q1@DLM,     &
              Q1END@DLM, D1600, D4000A, Q2H@DLM, Q2MID@DLM, Q2H@DLM, D4000B, D1600,  &
              Q3@DLM, Q3END@DLM, D1600, CD2ECOLM, DL2M_RB, CD0800, W2@DLM, P2@DLM)
!----------------------------------------------------------------------------
! DDLM: triplets downstream of DLMERGE
!----------------------------------------------------------------------------
!
! Triplet downstream of Dog-Leg
Q1@DDLM : KQUAD, L=0.15, K1 = 4.848684415195722e+00, N_KICKS = 20
Q2@DDLM : KQUAD, L=0.15, K1 =-8.232726122941990e+00, N_KICKS = 20
Q3@DDLM : KQUAD, L=0.15, K1 = 5.732270439101951e+00, N_KICKS = 20
!
! Marker
!
Q1END@DDLM : MARKER, FITPOINT=1
Q2END@DDLM : MARKER, FITPOINT=1
Q3END@DDLM : MARKER, FITPOINT=1
!
DDLM : LINE = (Q1@DDLM, Q1END@DDLM, D0500, Q2@DDLM, Q2END@DDLM,   &
               D0500, Q3@DDLM, Q3END@DDLM)
!
!----------------------------------------------------------------------------
! DLMERGE   = UDLM + MDLM + DDLM
!----------------------------------------------------------------------------
DLMstart : MARKER
DLMend   : MARKER
DLM_REF : MARKER, FITPOINT = 1;
DLMERGE : LINE = (DLMstart, UDLM, MDLM, DDLM, DLM_REF, DLMend)

!----------------------------------------------------------------------------
!
! TESLA CAVITIES in LINAC before 1st 3HC
!
! 8 TESLA cavities -> One TESLA module
! 9-cells -> One TESLA cavity
! Length of one TESLA cavity = 0.1147 + 7 * 0.1154 + 0.1137 = 1.0362 m
!
!----------------------------------------------------------------------------
!
! Drifts in TESLA accelerating sections
!
D01056: LSCDRIFT, L=0.1056, &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D0101 : LSCDRIFT, L=0.1014, &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D0141 : LSCDRIFT, L=0.1416, &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D0099 : LSCDRIFT, L=0.0995, &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255

!----------------------------------------------------------------------------
!
! ACC39: THIRD HARMONIC CAVITY #1: ACC39 module with eight 3900 MHz cavities
!
! 3900 MHz 9-cells -> one 3900 MHz cavity
! eight 3900 MHz cavities -> one ACC39 module = so called linearizer
!
! Same as ACC01 with scaling factor of 1/3
! Length of one 3900 MHz cavity = 1.0362/3 = 0.3454 m
!
!----------------------------------------------------------------------------
!
! Drifts in 3HC
! 
D39_0101: LSCDRIFT, L="0.1010 3.0 /", &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D39_0105: LSCDRIFT, L="0.1056 3.0 /", &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D39_0141: LSCDRIFT, L="0.1416 3.0 /", &
INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
!
! 3HC
! 
C1_1ACC39: RFCW, L="0.1147 3.0 /", PHASE="90.0 ph391 -",             &
                 VOLT="v391 0.1147 * 3.0 /",                	&
                 FREQ=3900.0E+06, CHANGE_P0=1,                          &
                 END1_FOCUS=1, END2_FOCUS=1,                            &
                 CELL_LENGTH="0.1147 3.0 /",LSC ="lscflag",LSC_BINS= 100,        &
                 LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC39: RFCW, L="0.1154 3.0 /", PHASE="90.0 ph391 -",           	&
                 VOLT="v391 0.1154 * 3.0 /",                	&
                 FREQ=3900.0E+06, CHANGE_P0=1,                          &
                 END1_FOCUS=1, END2_FOCUS=1,                            &
                 CELL_LENGTH="0.1154 3.0 /",LSC ="lscflag",LSC_BINS= 100,        &
                 LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC39: RFCW, L="0.1137 3.0 /", PHASE="90.0 ph391 -",           	&
                 VOLT="v391 0.1137 * 3.0 /",                	&
                 FREQ=3900.0E+06, CHANGE_P0=1,                          &
                 END1_FOCUS=1, END2_FOCUS=1,                            &
                 CELL_LENGTH="0.1137 3.0 /",LSC = "lscflag",LSC_BINS= 100,        &
                 LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
! Eight 3900 MHz cavities before BC2
! Length of each CXACC39 = 0.3454 m
C1ACC391 : LINE = (C1_1ACC39, 7*C1_2ACC39, C1_9ACC39)
C2ACC391 : LINE = (C1_1ACC39, 7*C1_2ACC39, C1_9ACC39)
C3ACC391 : LINE = (C1_1ACC39, 7*C1_2ACC39, C1_9ACC39)
C4ACC391 : LINE = (C1_1ACC39, 7*C1_2ACC39, C1_9ACC39)
C5ACC391 : LINE = (C1_1ACC39, 7*C1_2ACC39, C1_9ACC39)
C6ACC391 : LINE = (C1_1ACC39, 7*C1_2ACC39, C1_9ACC39)
C7ACC391 : LINE = (C1_1ACC39, 7*C1_2ACC39, C1_9ACC39)
C8ACC391 : LINE = (C1_1ACC39, 7*C1_2ACC39, C1_9ACC39)
! Four 3900 MHz cavities with drift space
! Length of each DCXACC39 = 0.4616 m
DC1ACC391: LINE = (D39_0141, C1ACC391, D39_0105, D39_0101)
DC2ACC391: LINE = (D39_0141, C2ACC391, D39_0105, D39_0101)
DC3ACC391: LINE = (D39_0141, C3ACC391, D39_0105, D39_0101)
DC4ACC391: LINE = (D39_0141, C4ACC391, D39_0105, D39_0101)
DC5ACC391: LINE = (D39_0141, C5ACC391, D39_0105, D39_0101)
DC6ACC391: LINE = (D39_0141, C6ACC391, D39_0105, D39_0101)
DC7ACC391: LINE = (D39_0141, C7ACC391, D39_0105, D39_0101)
DC8ACC391: LINE = (D39_0141, C8ACC391, D39_0105, D39_0101)
!
! Watching positions at ACC39
!
ACC391w   : WATCH, FILENAME="%s.ACC391.w1", MODE=COORD
ACC391p   : WATCH, FILENAME="%s.ACC391.p1", MODE=PARAMETER
!
ACC391 : LINE = (D1500, DC1ACC391, DC2ACC391, DC3ACC391, DC4ACC391, &
                DC5ACC391, DC6ACC391, DC7ACC391, DC8ACC391, LTWAKE39, D1000,ACC391w, ACC391p)

!----------------------------------------------------------------------------
!
! ACC02
!
!----------------------------------------------------------------------------
C1_1ACC02: RFCW, L=0.1147, PHASE="90.0 ph2 -",		&
                VOLT="v2 0.1147 *",            		&
                FREQ=1300.0E+06, CHANGE_P0=1,        	&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC02: RFCW, L=0.1154, PHASE="90.0 ph2 -",		&
                VOLT="v2 0.1154 *",			&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC02: RFCW, L=0.1137, PHASE="90.0 ph2 -",		&
                VOLT="v2 0.1137 *",			&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC02: LINE = (C1_1ACC02, 7*C1_2ACC02, C1_9ACC02)
C2ACC02: LINE = (C1_1ACC02, 7*C1_2ACC02, C1_9ACC02)
C3ACC02: LINE = (C1_1ACC02, 7*C1_2ACC02, C1_9ACC02)
C4ACC02: LINE = (C1_1ACC02, 7*C1_2ACC02, C1_9ACC02)
C5ACC02: LINE = (C1_1ACC02, 7*C1_2ACC02, C1_9ACC02)
C6ACC02: LINE = (C1_1ACC02, 7*C1_2ACC02, C1_9ACC02)
C7ACC02: LINE = (C1_1ACC02, 7*C1_2ACC02, C1_9ACC02)
C8ACC02: LINE = (C1_1ACC02, 7*C1_2ACC02, C1_9ACC02)
!
DC1ACC02: LINE = (D01056, C1ACC02, D01056, D0101)
DC2ACC02: LINE = (D0141,  C2ACC02, D01056, D0101)
DC3ACC02: LINE = (D0141,  C3ACC02, D01056, D0101)
DC4ACC02: LINE = (D0141,  C4ACC02, D01056, D0101)
DC5ACC02: LINE = (D0141,  C5ACC02, D01056, D0101)
DC6ACC02: LINE = (D0141,  C6ACC02, D01056, D0101)
DC7ACC02: LINE = (D0141,  C7ACC02, D01056, D0101)
DC8ACC02: LINE = (D0141,  C8ACC02, D01056, D0099)
!
! Triplet before BC1
! 
Q09ACC02 : KQUAD, L=0.150, K1=-4.672955236965925e+00, N_KICKS = 20
Q10ACC02 : KQUAD, L=0.150, K1= 4.931006815678179e+00, N_KICKS = 20
Q11ACC02 : KQUAD, L=0.150, K1=-5.935302091303962e-02, N_KICKS = 20
DQACC02 : LINE = (D0100, Q09ACC02, D0100, Q10ACC02, D0100, Q11ACC02, D0100)
!
! Correctors
!
H1ACC2 : HKICKER, L=0.100, KICK= 0.0
V1ACC2 : VKICKER, L=0.100, KICK= 0.0
HVACC2  : LINE = (V1ACC2, D0100, H1ACC2, D0100)
!
! BPMs
!
BPMACC02 : MONITOR, L=0.000
!
! Fit point
!
ACC02_RB: MARK, FITPOINT = 1;
!
ACC02: LINE = (D0100, DC1ACC02, DC2ACC02, DC3ACC02, DC4ACC02, 	&
              DC5ACC02, DC6ACC02, DC7ACC02, DC8ACC02, LTWAKE13, &
              DQACC02,  HVACC2, ACC02_RB)

!----------------------------------------------------------------------------
!
! Triplets and First Bunch compressor
!
!----------------------------------------------------------------------------
!
! BC1   = UBC1 + MBC1 + DBC1
!
!----------------------------------------------------------------------------
! UBC1: triplet upstream of BC1
!----------------------------------------------------------------------------
!
! Correctors
!
H1UBC1 : HKICKER, L=0.100, KICK= 0.0
V1UBC1 : VKICKER, L=0.100, KICK= 0.0
HVUBC1  : LINE = (V1UBC1, D0100, H1UBC1, D0100)
!
! BPMs
!
BPM1UBC1 : MONITOR, L=0.000
BPM2UBC1 : MONITOR, L=0.000
BPM3UBC1 : MONITOR, L=0.000
!
! Triplet
!
Q1UBC1 : KQUAD, L=0.15, K1= 1.048834159565200e+00, N_KICKS = 20
Q2UBC1 : KQUAD, L=0.15, K1= 1.232160996938692e+00, N_KICKS = 20
Q3UBC1 : KQUAD, L=0.15, K1=-2.726379403309426e+00, N_KICKS = 20
! Quadrupoles with BPMs
Q1UBC1BPM : LINE = (D0100, Q1UBC1,  BPM1UBC1,  D0100)
Q2UBC1BPM : LINE = (D0100, Q2UBC1,  BPM2UBC1,  D0100)
Q3UBC1BPM : LINE = (D0100, Q3UBC1,  BPM3UBC1,  D0100)
!
UBC1: LINE = (D0130, HVUBC1, D0100, Q1UBC1BPM, D0250, Q2UBC1BPM, D0250, Q3UBC1BPM)

!----------------------------------------------------------------------------
!
! MBC1: 4 dipole compressor
!
! lenght of dipole = l_bend = 0.5 m
! angle BC1 in degrees = angle_deg
! angle BC1 in radians = angle = angle_deg / 180.0 * PI = angle_deg / 180.0 * acos(-1)
! lenght of arc in dipole = l_bend * angle / sin(angle) 
! lenght of drift = l_drift
! length of drift travelled by the electorns = l_drift / cos(angle)
!
!----------------------------------------------------------------------------
!
! BC1 dipoles
!
! parameters
% 0.5                                      sto  L1
% theta_bc1 180 / -1 acos *                sto  theta1
% theta1 cos                               sto  ctheta1
% theta1 sin                               sto  stheta1
% L1 theta1 * stheta1 /                    sto  LBEND1

CD1BC1 : CSRCSBEND,                                                        &
         L="LBEND1", &
         ANGLE="theta1",                               &
         E1=0.0, E2="theta1", HGAP=0.0125,             &
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                     &
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                     &
         OUTPUT_FILE="%s.CD1BC1.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CD2BC1 : CSRCSBEND,                                                        &
         L="LBEND1", &
         ANGLE="theta1 -1 *",                               &
         E1="theta1 -1 *", E2=0.0, HGAP=0.0125,             &
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                     &
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                     &
         OUTPUT_FILE="%s.CD2BC1.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CD3BC1 : CSRCSBEND,                                                        &
         L="LBEND1", &
         ANGLE="theta1 -1 *",                               &
         E1=0.0, E2="theta1 -1 *", HGAP=0.0125,             &
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                     &
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                     &
         OUTPUT_FILE="%s.CD3BC1.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CD4BC1 : CSRCSBEND,                                                        &
         L="LBEND1", &
         ANGLE="theta1",                               &
         E1="theta1", E2=0.0, HGAP=0.0125,             &
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,           	   &
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                     &
         OUTPUT_FILE="%s.CD4BC1.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CDD1D2BC1  : CSRDRIFT, L="0.5 ctheta1 /",  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CD0100BC1  : CSRDRIFT, L=0.100,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CD0230BC1  : CSRDRIFT, L=0.230,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CD0150BC1  : CSRDRIFT, L=0.150,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
!
! Collimator
!
CDCOLLBC1: CSRDRIFT, L=0.430, DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
COLLBC1: ECOLLIMATOR, L = 0.000, X_MAX = 1.0, Y_MAX = 1.0
!
! Watching positions
!
BC1W1   : WATCH, FILENAME="%s.BC1.w1", MODE=COORD
BC1P1   : WATCH, FILENAME="%s.BC1.p1", MODE=PARAMETER
BC1W2   : WATCH, FILENAME="%s.BC1.w2", MODE=COORD
BC1P2   : WATCH, FILENAME="%s.BC1.p2", MODE=PARAMETER
!
! Fit point before the fourth dipole
!
BC1_RB: MARK, FITPOINT = 1;
!
MBC1    : LINE = (BC1W1, BC1P1, D0100, CD1BC1, CDD1D2BC1, CD2BC1, & 
                  CD0150BC1, CDCOLLBC1, COLLBC1, CD0230BC1, CD0150BC1, &
                  CD3BC1, CDD1D2BC1, BC1_RB, CD4BC1, CD0100BC1, BC1W2, BC1P2)
!
!----------------------------------------------------------------------------
! DBC1: triplet downstream of BC1
!----------------------------------------------------------------------------
!
! Correctors
!
H1DBC1 : HKICKER, L=0.100, KICK= 0.0
V1DBC1 : VKICKER, L=0.100, KICK= 0.0
HVDBC1  : LINE = (V1DBC1, D0100, H1DBC1, D0100)
!
! BPMs
!
BPM1DBC1 : MONITOR, L=0.0
BPM2DBC1 : MONITOR, L=0.0
BPM3DBC1 : MONITOR, L=0.0
!
! Triplets
! 
Q1DBC1    : KQUAD, L=0.150, K1=-1.483970387555630e+01, N_KICKS = 20
Q2DBC1    : KQUAD, L=0.150, K1= 1.388989218702419e+01, N_KICKS = 20
Q3DBC1    : KQUAD, L=0.150, K1=-1.352084321227676e+01, N_KICKS = 20
!
! Quadrupoles with BPMs
Q1DBC1BPM : LINE = (D0100, Q1DBC1,  BPM1DBC1,  D0100)
Q2DBC1BPM : LINE = (D0100, Q2DBC1,  BPM2DBC1,  D0100)
Q3DBC1BPM : LINE = (D0100, Q3DBC1,  BPM3DBC1,  D0100)
!
DBC1:     LINE = (CD0150BC1, HVDBC1, CD0100BC1, Q1DBC1BPM, D0250, Q2DBC1BPM, D0250, Q3DBC1BPM)
!
!----------------------------------------------------------------------------
!	BC1 = UBC1 + MBC1 + DBC1
!----------------------------------------------------------------------------
BC1start : MARKER
BC1end   : MARKER
!
BC1_REF: MARK, FITPOINT = 1;
!
BC1: LINE = (BC1start, UBC1, MBC1, DBC1, BC1_REF, BC1end)

!----------------------------------------------------------------------------
!
! ACC03
!
!----------------------------------------------------------------------------
C1_1ACC03: RFCW, L=0.1147, PHASE="90.0 ph3 -",	&
                VOLT="v3 0.1147 *",          	&
                FREQ=1300.0E+06, CHANGE_P0=1,        	&
                END1_FOCUS=1, END2_FOCUS=1,             & 
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC03: RFCW, L=0.1154, PHASE="90.0 ph3 -",	&
                VOLT="v3 0.1154 *",		&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC03: RFCW, L=0.1137, PHASE="90.0 ph3 -",	&
                VOLT="v3 0.1137 *",		&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC03: LINE = (C1_1ACC03, 7*C1_2ACC03, C1_9ACC03)
C2ACC03: LINE = (C1_1ACC03, 7*C1_2ACC03, C1_9ACC03)
C3ACC03: LINE = (C1_1ACC03, 7*C1_2ACC03, C1_9ACC03)
C4ACC03: LINE = (C1_1ACC03, 7*C1_2ACC03, C1_9ACC03)
C5ACC03: LINE = (C1_1ACC03, 7*C1_2ACC03, C1_9ACC03)
C6ACC03: LINE = (C1_1ACC03, 7*C1_2ACC03, C1_9ACC03)
C7ACC03: LINE = (C1_1ACC03, 7*C1_2ACC03, C1_9ACC03)
C8ACC03: LINE = (C1_1ACC03, 7*C1_2ACC03, C1_9ACC03)
!
DC1ACC03: LINE = (D01056, C1ACC03, D01056, D0101)
DC2ACC03: LINE = (D0141,  C2ACC03, D01056, D0101)
DC3ACC03: LINE = (D0141,  C3ACC03, D01056, D0101)
DC4ACC03: LINE = (D0141,  C4ACC03, D01056, D0101)
DC5ACC03: LINE = (D0141,  C5ACC03, D01056, D0101)
DC6ACC03: LINE = (D0141,  C6ACC03, D01056, D0101)
DC7ACC03: LINE = (D0141,  C7ACC03, D01056, D0101)
DC8ACC03: LINE = (D0141,  C8ACC03, D01056, D0099)
!
! Doublet
! 
Q09ACC03 : KQUAD, L=0.150, K1= 3.916762116730928e+00, N_KICKS = 20
Q10ACC03 : KQUAD, L=0.150, K1=-3.821917847419555e+00, N_KICKS = 20
DQACC03 : LINE = (D0100, Q09ACC03, D0100, Q10ACC03, D0100)
!
! Correctors
!
H1ACC3 : HKICKER, L=0.100, KICK= 0.0
V1ACC3 : VKICKER, L=0.100, KICK= 0.0
HVACC3  : LINE = (V1ACC3, D0100, H1ACC3, D0100)
!
! BPMs
!
BPMACC03 : MONITOR, L=0.000
!
! Fit point
!
ACC03_RB: MARK, FITPOINT = 1;
!
ACC03: LINE = (D0100, DC1ACC03, DC2ACC03, DC3ACC03, DC4ACC03, 	&
              DC5ACC03, DC6ACC03, DC7ACC03, DC8ACC03, LTWAKE13, &
              DQACC03,  HVACC3, ACC03_RB)
!----------------------------------------------------------------------------
!	ACC04
!----------------------------------------------------------------------------
C1_1ACC04: RFCW, L=0.1147, PHASE="90.0 ph4 -",	&
                VOLT="v4 0.1147 *",           	&
                FREQ=1300.0E+06, CHANGE_P0=1,        	&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC04: RFCW, L=0.1154, PHASE="90.0 ph4 -",	&
                VOLT="v4 0.1154 *",		&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC04: RFCW, L=0.1137, PHASE="90.0 ph4 -",	&
                VOLT="v4 0.1137 *",		&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC04: LINE = (C1_1ACC04, 7*C1_2ACC04, C1_9ACC04)
C2ACC04: LINE = (C1_1ACC04, 7*C1_2ACC04, C1_9ACC04)
C3ACC04: LINE = (C1_1ACC04, 7*C1_2ACC04, C1_9ACC04)
C4ACC04: LINE = (C1_1ACC04, 7*C1_2ACC04, C1_9ACC04)
C5ACC04: LINE = (C1_1ACC04, 7*C1_2ACC04, C1_9ACC04)
C6ACC04: LINE = (C1_1ACC04, 7*C1_2ACC04, C1_9ACC04)
C7ACC04: LINE = (C1_1ACC04, 7*C1_2ACC04, C1_9ACC04)
C8ACC04: LINE = (C1_1ACC04, 7*C1_2ACC04, C1_9ACC04)
!
DC1ACC04: LINE = (D01056, C1ACC04, D01056, D0101)
DC2ACC04: LINE = (D0141,  C2ACC04, D01056, D0101)
DC3ACC04: LINE = (D0141,  C3ACC04, D01056, D0101)
DC4ACC04: LINE = (D0141,  C4ACC04, D01056, D0101)
DC5ACC04: LINE = (D0141,  C5ACC04, D01056, D0101)
DC6ACC04: LINE = (D0141,  C6ACC04, D01056, D0101)
DC7ACC04: LINE = (D0141,  C7ACC04, D01056, D0101)
DC8ACC04: LINE = (D0141,  C8ACC04, D01056, D0099)
!
! Triplet before BC2
!
Q09ACC04 : KQUAD, L=0.150, K1=-3.883488422872854e+00, N_KICKS = 20
Q10ACC04 : KQUAD, L=0.150, K1= 2.731478432837302e+00, N_KICKS = 20
Q11ACC04 : KQUAD, L=0.150, K1= 9.237767728605628e-01, N_KICKS = 20
DQACC04 : LINE = (D0100, Q09ACC04, D0100, Q10ACC04, D0100, Q11ACC04, D0100)
!
! Correctors
!
H1ACC4 : HKICKER, L=0.100, KICK= 0.0
V1ACC4 : VKICKER, L=0.100, KICK= 0.0
HVACC4  : LINE = (V1ACC4, D0100, H1ACC4, D0100)
!
! BPMs
!
BPMACC04 : MONITOR, L=0.000
!
! Fit point
!
ACC04_RB: MARK, FITPOINT = 1;
!
ACC04: LINE = (D0100, DC1ACC04, DC2ACC04, DC3ACC04, DC4ACC04, 	&
              DC5ACC04, DC6ACC04, DC7ACC04, DC8ACC04, LTWAKE13, &
              DQACC04,  HVACC4, ACC04_RB)

!----------------------------------------------------------------------------
!
! Triplets and Second Bunch compressor
!
!----------------------------------------------------------------------------
!
! BC2   = UBC2 + MBC2 + DBC2
!
!----------------------------------------------------------------------------
! UBC2: triplet upstream of BC2
!----------------------------------------------------------------------------
!
! Correctors
!
H1UBC2 : HKICKER, L=0.100, KICK= 0.0
V1UBC2 : VKICKER, L=0.100, KICK= 0.0
HVUBC2  : LINE = (V1UBC2, D0100, H1UBC2, D0100)
!
! BPMs
!
BPM1UBC2 : MONITOR, L=0.000
BPM2UBC2 : MONITOR, L=0.000
BPM3UBC2 : MONITOR, L=0.000
!
! Triplet
!
Q1UBC2 : KQUAD, L=0.15, K1= 2.459681863988011e+00, N_KICKS = 20
Q2UBC2 : KQUAD, L=0.15, K1=-3.786729576418172e+00, N_KICKS = 20
Q3UBC2 : KQUAD, L=0.15, K1= 1.523866226702502e+00, N_KICKS = 20
! Quadrupoles with BPMs
Q1UBC2BPM : LINE = (D0100, Q1UBC2,  BPM1UBC2,  D0100)
Q2UBC2BPM : LINE = (D0100, Q2UBC2,  BPM2UBC2,  D0100)
Q3UBC2BPM : LINE = (D0100, Q3UBC2,  BPM3UBC2,  D0100)
!
UBC2: LINE = (D0130, HVUBC2, D0100, Q1UBC2BPM, D0250, Q2UBC2BPM, D0250, Q3UBC2BPM)
!----------------------------------------------------------------------------
!	MBC2: 4 dipole s-type chicane
!----------------------------------------------------------------------------
!
! BC2 dipoles
!
! parameters
% 0.5                                      sto  L2
% 0.5                                      sto  LD12
% 0.8626                                   sto  LD22
% theta_bc2 180 / -1 acos *                sto  theta12
% theta12 6 pow -0.000483723513861 * 	   sto  f12
% theta12 5 pow  0.010978876345548 * 	   sto  f22
% theta12 4 pow -0.000716468610208 *	   sto  f32
% theta12 3 pow -0.025175789294135 *	   sto  f42
% theta12 2 pow -0.000007664395042 *	   sto  f52
% theta12 1 pow  0.917364069579718 *	   sto  f62
% -0.000000001555712	                   sto  f72
% f12 f22 + f32 + f42 + f52 + f62 + f72 +  sto  theta22
% theta12 cos                              sto  ctheta12
% theta22 cos                              sto  ctheta22
% theta12 sin                              sto  stheta12
% theta12 theta22 + 2 / sin                sto  s2t1t2
% theta12 theta22 - 2 / tan                sto  t2t1t2
% L2 2 * t2t1t2                            sto  x2
% L2 sqr 4 * x2 sqr + sqrt                 sto  del2
% del2 s2t1t2 / 2 /                        sto  rho2
% L2 theta12 * stheta12 /                  sto  LBEND12
% theta12 theta22 + rho2 *                 sto  LBEND22
% LD12 ctheta12 /                          sto  LD1BC2
% LD22 ctheta22 /                          sto  LD2BC2

CD1BC2 : CSRCSBEND, L="LBEND12", ANGLE="theta12 -1 *",                          &
         E1=0.0, E2="theta12 -1 *", HGAP=0.0125,           			&
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                  	&
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                  	&
         OUTPUT_FILE="%s.CD1BC2.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CD2BC2 : CSRCSBEND, L="LBEND22", ANGLE="theta12 theta22 +",                     &
         E1="theta12", E2="theta22", HGAP=0.0125,             			&
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                  	&
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                  	&
         OUTPUT_FILE="%s.CD2BC2.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CD3BC2 : CSRCSBEND, L="LBEND22", ANGLE="theta12 theta22 + -1 *",                &
         E1="theta22 -1 *", E2="theta12 -1 *", HGAP=0.0125,           		&
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                  	&
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                  	&
         OUTPUT_FILE="%s.CD3BC2.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CD4BC2 : CSRCSBEND, L="LBEND12", ANGLE="theta12",                          	&
         E1="theta12", E2=0.0, HGAP=0.0125,           				&
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                  	&
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                  	&
         OUTPUT_FILE="%s.CD4BC2.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CDD1D2BC2  : CSRDRIFT, L="LD1BC2",  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CDD2D3BC2  : CSRDRIFT, L="LD2BC2", DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CD0100BC2  : CSRDRIFT, L=0.100,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CD0230BC2  : CSRDRIFT, L=0.230,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CD0150BC2  : CSRDRIFT, L=0.150,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
!
! Collimator
!
COLLBC2: ECOLLIMATOR, L = 0.000, X_MAX = 1.0, Y_MAX = 1.0
!
! Watching positions
!
BC2W1   : WATCH, FILENAME="%s.BC2.w1", MODE=COORD
BC2P1   : WATCH, FILENAME="%s.BC2.p1", MODE=PARAMETER
BC2W2   : WATCH, FILENAME="%s.BC2.w2", MODE=COORD
BC2P2   : WATCH, FILENAME="%s.BC2.p2", MODE=PARAMETER
!
! Fit point before the fourth dipole
!
BC2_RB: MARK, FITPOINT = 1;
!
MBC2    : LINE = (BC2W1, BC2P1, D0100, CD1BC2, CDD1D2BC2, CD2BC2, CDD2D3BC2, &
	 CDD2D3BC2, CD3BC2, CDD1D2BC2, BC2_RB, CD4BC2, CD0100BC2, BC2W2, BC2P2)
!
!----------------------------------------------------------------------------
! DBC2: triplet downstream of BC2
!----------------------------------------------------------------------------
!
! Correctors
!
H1DBC2 : HKICKER, L=0.100, KICK= 0.0
V1DBC2 : VKICKER, L=0.100, KICK= 0.0
HVDBC2  : LINE = (V1DBC2, D0100, H1DBC2, D0100)
!
! BPMs
!
BPM1DBC2 : MONITOR, L=0.0
BPM2DBC2 : MONITOR, L=0.0
BPM3DBC2 : MONITOR, L=0.0
!
! Triplets
! 
Q1DBC2    : KQUAD, L=0.150, K1=-5.557006856033190e+00, N_KICKS = 20
Q2DBC2    : KQUAD, L=0.150, K1= 5.561326080069442e+00, N_KICKS = 20
Q3DBC2    : KQUAD, L=0.150, K1= 1.200758770092303e+00, N_KICKS = 20
!
! Quadrupoles with BPMs
Q1DBC2BPM : LINE = (D0100, Q1DBC2,  BPM1DBC2,  D0100)
Q2DBC2BPM : LINE = (D0100, Q2DBC2,  BPM2DBC2,  D0100)
Q3DBC2BPM : LINE = (D0100, Q3DBC2,  BPM3DBC2,  D0100)
!
DBC2:     LINE = (CD0150BC2, HVDBC2, CD0100BC2, Q1DBC2BPM, D0250, Q2DBC2BPM, D0250, Q3DBC2BPM)
!
!----------------------------------------------------------------------------
!	BC2 = UBC2 + MBC2 + DBC2
!----------------------------------------------------------------------------
BC2start : MARKER
BC2end   : MARKER
!
BC2_REF: MARK, FITPOINT = 1;
!
BC2: LINE = (BC2start, UBC2, MBC2, DBC2, BC2_REF, BC2end)

!----------------------------------------------------------------------------
!	ACC05
!----------------------------------------------------------------------------
C1_1ACC05: RFCW, L=0.1147, PHASE="90.0 ph5 -",	&
                VOLT="v5 0.1147 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC05: RFCW, L=0.1154, PHASE="90.0 ph5 -",       &
                VOLT="v5 0.1154 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC05: RFCW, L=0.1137, PHASE="90.0 ph5 -",       &
                VOLT="v5 0.1137 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC05: LINE = (C1_1ACC05, 7*C1_2ACC05, C1_9ACC05)
C2ACC05: LINE = (C1_1ACC05, 7*C1_2ACC05, C1_9ACC05)
C3ACC05: LINE = (C1_1ACC05, 7*C1_2ACC05, C1_9ACC05)
C4ACC05: LINE = (C1_1ACC05, 7*C1_2ACC05, C1_9ACC05)
C5ACC05: LINE = (C1_1ACC05, 7*C1_2ACC05, C1_9ACC05)
C6ACC05: LINE = (C1_1ACC05, 7*C1_2ACC05, C1_9ACC05)
C7ACC05: LINE = (C1_1ACC05, 7*C1_2ACC05, C1_9ACC05)
C8ACC05: LINE = (C1_1ACC05, 7*C1_2ACC05, C1_9ACC05)
!
DC1ACC05: LINE = (D0141, C1ACC05, D01056, D0101)
DC2ACC05: LINE = (D0141, C2ACC05, D01056, D0101)
DC3ACC05: LINE = (D0141, C3ACC05, D01056, D0101)
DC4ACC05: LINE = (D0141, C4ACC05, D01056, D0101)
DC5ACC05: LINE = (D0141, C5ACC05, D01056, D0101)
DC6ACC05: LINE = (D0141, C6ACC05, D01056, D0101)
DC7ACC05: LINE = (D0141, C7ACC05, D01056, D0101)
DC8ACC05: LINE = (D0141, C8ACC05, D01056, D0099)
!
! Doublet
!
Q09ACC05 : KQUAD, L=0.150, K1= 5.158683872423122e+00, N_KICKS = 20
Q10ACC05 : KQUAD, L=0.150, K1=-4.971240370445782e+00, N_KICKS = 20
DQACC05 : LINE = (D0100, Q09ACC05, D0100, Q10ACC05, D0100)
!
! Correctors
!
H1ACC5 : HKICKER, L=0.100, KICK= 0.0
V1ACC5 : VKICKER, L=0.100, KICK= 0.0
HVACC5  : LINE = (V1ACC5, D0100, H1ACC5, D0100)
!
! BPMs
!
BPMACC05 : MONITOR, L=0.000
!
! Fit point
!
ACC05_RB: MARK, FITPOINT = 1;
!
ACC05: LINE = (D0100, DC1ACC05, DC2ACC05, DC3ACC05, DC4ACC05, 	&
              DC5ACC05, DC6ACC05, DC7ACC05, DC8ACC05, LTWAKE13, &
              DQACC05,  HVACC5, ACC05_RB)
!----------------------------------------------------------------------------
!	ACC06
!----------------------------------------------------------------------------
C1_1ACC06: RFCW, L=0.1147, PHASE="90.0 ph6 -",	&
                VOLT="v6 0.1147 *",           	&
                FREQ=1300.0E+06, CHANGE_P0=1,        	&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC06: RFCW, L=0.1154, PHASE="90.0 ph6 -",	&
                VOLT="v6 0.1154 *",		&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC06: RFCW, L=0.1137, PHASE="90.0 ph6 -",	&
                VOLT="v6 0.1137 *",	    	&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC06: LINE = (C1_1ACC06, 7*C1_2ACC06, C1_9ACC06)
C2ACC06: LINE = (C1_1ACC06, 7*C1_2ACC06, C1_9ACC06)
C3ACC06: LINE = (C1_1ACC06, 7*C1_2ACC06, C1_9ACC06)
C4ACC06: LINE = (C1_1ACC06, 7*C1_2ACC06, C1_9ACC06)
C5ACC06: LINE = (C1_1ACC06, 7*C1_2ACC06, C1_9ACC06)
C6ACC06: LINE = (C1_1ACC06, 7*C1_2ACC06, C1_9ACC06)
C7ACC06: LINE = (C1_1ACC06, 7*C1_2ACC06, C1_9ACC06)
C8ACC06: LINE = (C1_1ACC06, 7*C1_2ACC06, C1_9ACC06)
!
DC1ACC06: LINE = (D01056, C1ACC06, D01056, D0101)
DC2ACC06: LINE = (D0141,  C2ACC06, D01056, D0101)
DC3ACC06: LINE = (D0141,  C3ACC06, D01056, D0101)
DC4ACC06: LINE = (D0141,  C4ACC06, D01056, D0101)
DC5ACC06: LINE = (D0141,  C5ACC06, D01056, D0101)
DC6ACC06: LINE = (D0141,  C6ACC06, D01056, D0101)
DC7ACC06: LINE = (D0141,  C7ACC06, D01056, D0101)
DC8ACC06: LINE = (D0141,  C8ACC06, D01056, D0099)
!
! Doublet
!
Q09ACC06 : KQUAD, L=0.150, K1= 2.030360905905804e-02, N_KICKS = 20
Q10ACC06 : KQUAD, L=0.150, K1=-2.458109503086761e-03, N_KICKS = 20
DQACC06 : LINE = (D0100, Q09ACC06, D0100, Q10ACC06, D0100)
!
! Correctors
!
H1ACC6 : HKICKER, L=0.100, KICK= 0.0
V1ACC6 : VKICKER, L=0.100, KICK= 0.0
HVACC6  : LINE = (V1ACC6, D0100, H1ACC6, D0100)
!
! BPMs
!
BPMACC06 : MONITOR, L=0.000
!
! Fit point
!
ACC06_RB: MARK, FITPOINT = 1;
!
ACC06: LINE = (D0100, DC1ACC06, DC2ACC06, DC3ACC06, DC4ACC06, 	&
              DC5ACC06, DC6ACC06, DC7ACC06, DC8ACC06, LTWAKE13, &
              DQACC06,  HVACC6, ACC06_RB)
!----------------------------------------------------------------------------
!	ACC07
!----------------------------------------------------------------------------
C1_1ACC07: RFCW, L=0.1147, PHASE="90.0 ph7 -",   	&
                VOLT="v7 0.1147 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC07: RFCW, L=0.1154, PHASE="90.0 ph7 -",       &
                VOLT="v7 0.1154 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC07: RFCW, L=0.1137, PHASE="90.0 ph7 -",       &
                VOLT="v7 0.1137 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC07: LINE = (C1_1ACC07, 7*C1_2ACC07, C1_9ACC07)
C2ACC07: LINE = (C1_1ACC07, 7*C1_2ACC07, C1_9ACC07)
C3ACC07: LINE = (C1_1ACC07, 7*C1_2ACC07, C1_9ACC07)
C4ACC07: LINE = (C1_1ACC07, 7*C1_2ACC07, C1_9ACC07)
C5ACC07: LINE = (C1_1ACC07, 7*C1_2ACC07, C1_9ACC07)
C6ACC07: LINE = (C1_1ACC07, 7*C1_2ACC07, C1_9ACC07)
C7ACC07: LINE = (C1_1ACC07, 7*C1_2ACC07, C1_9ACC07)
C8ACC07: LINE = (C1_1ACC07, 7*C1_2ACC07, C1_9ACC07)
!
DC1ACC07: LINE = (D0141, C1ACC07, D01056, D0101)
DC2ACC07: LINE = (D0141, C2ACC07, D01056, D0101)
DC3ACC07: LINE = (D0141, C3ACC07, D01056, D0101)
DC4ACC07: LINE = (D0141, C4ACC07, D01056, D0101)
DC5ACC07: LINE = (D0141, C5ACC07, D01056, D0101)
DC6ACC07: LINE = (D0141, C6ACC07, D01056, D0101)
DC7ACC07: LINE = (D0141, C7ACC07, D01056, D0101)
DC8ACC07: LINE = (D0141, C8ACC07, D01056, D0099)
!
! Doublet
!
Q09ACC07 : KQUAD, L=0.150, K1= 1.248545865545012e+00, N_KICKS = 20
Q10ACC07 : KQUAD, L=0.150, K1=-1.234043127991317e+00, N_KICKS = 20
DQACC07 : LINE = (D0100, Q09ACC07, D0100, Q10ACC07, D0100)
!
! Correctors
!
H1ACC7 : HKICKER, L=0.100, KICK= 0.0
V1ACC7 : VKICKER, L=0.100, KICK= 0.0
HVACC7  : LINE = (V1ACC7, D0100, H1ACC7, D0100)
!
! BPMs
!
BPMACC07 : MONITOR, L=0.000
!
! Fit point
!
ACC07_RB: MARK, FITPOINT = 1;
!
ACC07: LINE = (D0100, DC1ACC07, DC2ACC07, DC3ACC07, DC4ACC07, 	&
              DC5ACC07, DC6ACC07, DC7ACC07, DC8ACC07, LTWAKE13, &
              DQACC07,  HVACC7, ACC07_RB)
!----------------------------------------------------------------------------
!	ACC08
!----------------------------------------------------------------------------
C1_1ACC08: RFCW, L=0.1147, PHASE="90.0 ph8 -",	&
                VOLT="v8 0.1147 *",           	&
                FREQ=1300.0E+06, CHANGE_P0=1,        	&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC08: RFCW, L=0.1154, PHASE="90.0 ph8 -",	&
                VOLT="v8 0.1154 *",		&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC08: RFCW, L=0.1137, PHASE="90.0 ph8 -",	&
                VOLT="v8 0.1137 *",	        &
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC08: LINE = (C1_1ACC08, 7*C1_2ACC08, C1_9ACC08)
C2ACC08: LINE = (C1_1ACC08, 7*C1_2ACC08, C1_9ACC08)
C3ACC08: LINE = (C1_1ACC08, 7*C1_2ACC08, C1_9ACC08)
C4ACC08: LINE = (C1_1ACC08, 7*C1_2ACC08, C1_9ACC08)
C5ACC08: LINE = (C1_1ACC08, 7*C1_2ACC08, C1_9ACC08)
C6ACC08: LINE = (C1_1ACC08, 7*C1_2ACC08, C1_9ACC08)
C7ACC08: LINE = (C1_1ACC08, 7*C1_2ACC08, C1_9ACC08)
C8ACC08: LINE = (C1_1ACC08, 7*C1_2ACC08, C1_9ACC08)
!
DC1ACC08: LINE = (D01056, C1ACC08, D01056, D0101)
DC2ACC08: LINE = (D0141,  C2ACC08, D01056, D0101)
DC3ACC08: LINE = (D0141,  C3ACC08, D01056, D0101)
DC4ACC08: LINE = (D0141,  C4ACC08, D01056, D0101)
DC5ACC08: LINE = (D0141,  C5ACC08, D01056, D0101)
DC6ACC08: LINE = (D0141,  C6ACC08, D01056, D0101)
DC7ACC08: LINE = (D0141,  C7ACC08, D01056, D0101)
DC8ACC08: LINE = (D0141,  C8ACC08, D01056, D0099)
!
! Doublet
! 
Q09ACC08 : KQUAD, L=0.150, K1=-2.100303538162921e+00, N_KICKS = 20
Q10ACC08 : KQUAD, L=0.150, K1= 2.110293298007932e+00, N_KICKS = 20
DQACC08 : LINE = (D0100, Q09ACC08, D0100, Q10ACC08, D0100)
!
! Correctors
!
H1ACC8 : HKICKER, L=0.100, KICK= 0.0
V1ACC8 : VKICKER, L=0.100, KICK= 0.0
HVACC8  : LINE = (V1ACC8, D0100, H1ACC8, D0100)
!
! BPMs
!
BPMACC08 : MONITOR, L=0.000
!
! Fit point
!
ACC08_RB: MARK, FITPOINT = 1;
!
!
ACC08: LINE = (D0100, DC1ACC08, DC2ACC08, DC3ACC08, DC4ACC08, 	&
              DC5ACC08, DC6ACC08, DC7ACC08, DC8ACC08, LTWAKE13, &
              DQACC08,  HVACC8, ACC08_RB)
!----------------------------------------------------------------------------
!	ACC09
!----------------------------------------------------------------------------
C1_1ACC09: RFCW, L=0.1147, PHASE="90.0 ph9 -",		&
                VOLT="v9 0.1147 *",		&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,            	&
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC09: RFCW, L=0.1154, PHASE="90.0 ph9 -",		&
                VOLT="v9 0.1154 *",		&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC09: RFCW, L=0.1137, PHASE="90.0 ph9 -",		&
                VOLT="v9 0.1137 *",		&
                FREQ=1300.0E+06, CHANGE_P0=1,		&
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC09: LINE = (C1_1ACC09, 7*C1_2ACC09, C1_9ACC09)
C2ACC09: LINE = (C1_1ACC09, 7*C1_2ACC09, C1_9ACC09)
C3ACC09: LINE = (C1_1ACC09, 7*C1_2ACC09, C1_9ACC09)
C4ACC09: LINE = (C1_1ACC09, 7*C1_2ACC09, C1_9ACC09)
C5ACC09: LINE = (C1_1ACC09, 7*C1_2ACC09, C1_9ACC09)
C6ACC09: LINE = (C1_1ACC09, 7*C1_2ACC09, C1_9ACC09)
C7ACC09: LINE = (C1_1ACC09, 7*C1_2ACC09, C1_9ACC09)
C8ACC09: LINE = (C1_1ACC09, 7*C1_2ACC09, C1_9ACC09)
!
DC1ACC09: LINE = (D0141, C1ACC09, D01056, D0101)
DC2ACC09: LINE = (D0141, C2ACC09, D01056, D0101)
DC3ACC09: LINE = (D0141, C3ACC09, D01056, D0101)
DC4ACC09: LINE = (D0141, C4ACC09, D01056, D0101)
DC5ACC09: LINE = (D0141, C5ACC09, D01056, D0101)
DC6ACC09: LINE = (D0141, C6ACC09, D01056, D0101)
DC7ACC09: LINE = (D0141, C7ACC09, D01056, D0101)
DC8ACC09: LINE = (D0141, C8ACC09, D01056, D0099)
!
! Doublet
!
Q09ACC09 : KQUAD, L=0.150, K1= 9.670013723559872e-01, N_KICKS = 20
Q10ACC09 : KQUAD, L=0.150, K1=-9.949457168170863e-01, N_KICKS = 20
DQACC09 : LINE = (D0100, Q09ACC09, D0100, Q10ACC09, D0100)
!
! Correctors
!
H1ACC9 : HKICKER, L=0.100, KICK= 0.0
V1ACC9 : VKICKER, L=0.100, KICK= 0.0
HVACC9  : LINE = (V1ACC9, D0100, H1ACC9, D0100)
!
! BPMs
!
BPMACC09 : MONITOR, L=0.000
!
! Fit point
!
ACC09_RB: MARK, FITPOINT = 1;
!
ACC09: LINE = (D0100, DC1ACC09, DC2ACC09, DC3ACC09, DC4ACC09, 	&
              DC5ACC09, DC6ACC09, DC7ACC09, DC8ACC09, LTWAKE13, &
              DQACC09,  HVACC9, ACC09_RB)
!----------------------------------------------------------------------------
!	ACC10
!----------------------------------------------------------------------------
C1_1ACC10: RFCW, L=0.1147, PHASE="90.0 ph10 -",		&
                VOLT="v10 0.1147 *",            	&
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,            	&
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100,	&
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC10: RFCW, L=0.1154, PHASE="90.0 ph10 -",         &
                VOLT="v10 0.1154 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC10: RFCW, L=0.1137, PHASE="90.0 ph10 -",         &
                VOLT="v10 0.1137 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC10: LINE = (C1_1ACC10, 7*C1_2ACC10, C1_9ACC10)
C2ACC10: LINE = (C1_1ACC10, 7*C1_2ACC10, C1_9ACC10)
C3ACC10: LINE = (C1_1ACC10, 7*C1_2ACC10, C1_9ACC10)
C4ACC10: LINE = (C1_1ACC10, 7*C1_2ACC10, C1_9ACC10)
C5ACC10: LINE = (C1_1ACC10, 7*C1_2ACC10, C1_9ACC10)
C6ACC10: LINE = (C1_1ACC10, 7*C1_2ACC10, C1_9ACC10)
C7ACC10: LINE = (C1_1ACC10, 7*C1_2ACC10, C1_9ACC10)
C8ACC10: LINE = (C1_1ACC10, 7*C1_2ACC10, C1_9ACC10)
!
DC1ACC10: LINE = (D0141, C1ACC10, D01056, D0101)
DC2ACC10: LINE = (D0141, C2ACC10, D01056, D0101)
DC3ACC10: LINE = (D0141, C3ACC10, D01056, D0101)
DC4ACC10: LINE = (D0141, C4ACC10, D01056, D0101)
DC5ACC10: LINE = (D0141, C5ACC10, D01056, D0101)
DC6ACC10: LINE = (D0141, C6ACC10, D01056, D0101)
DC7ACC10: LINE = (D0141, C7ACC10, D01056, D0101)
DC8ACC10: LINE = (D0141, C8ACC10, D01056, D0099)
!
! Triplet before BC3
!
Q09ACC10 : KQUAD, L=0.150, K1= 1.929604066449537e+00, N_KICKS = 20
Q10ACC10 : KQUAD, L=0.150, K1=-1.936978781014924e+00, N_KICKS = 20
DQACC10 : LINE = (D0100, Q09ACC10, D0100, Q10ACC10, D0100)
!
! Correctors
!
H1ACC10 : HKICKER, L=0.100, KICK= 0.0
V1ACC10 : VKICKER, L=0.100, KICK= 0.0
HVACC10 : LINE = (V1ACC10, D0100, H1ACC10, D0100)
!
! BPMs
!
BPMACC10 : MONITOR, L=0.000
!
! Fit point
!
ACC10_RB: MARK, FITPOINT = 1;
!
ACC10: LINE = (D0100, DC1ACC10, DC2ACC10, DC3ACC10, DC4ACC10, 	&
              DC5ACC10, DC6ACC10, DC7ACC10, DC8ACC10, LTWAKE13, &
              DQACC10,  HVACC10, ACC10_RB)

!----------------------------------------------------------------------------
!	ACC11
!----------------------------------------------------------------------------
C1_1ACC11: RFCW, L=0.1147, PHASE="90.0 ph11 -",		&
                VOLT="v11 0.1147 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC11: RFCW, L=0.1154, PHASE="90.0 ph11 -",         &
                VOLT="v11 0.1154 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC11: RFCW, L=0.1137, PHASE="90.0 ph11 -",         &
                VOLT="v11 0.1137 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC11: LINE = (C1_1ACC11, 7*C1_2ACC11, C1_9ACC11)
C2ACC11: LINE = (C1_1ACC11, 7*C1_2ACC11, C1_9ACC11)
C3ACC11: LINE = (C1_1ACC11, 7*C1_2ACC11, C1_9ACC11)
C4ACC11: LINE = (C1_1ACC11, 7*C1_2ACC11, C1_9ACC11)
C5ACC11: LINE = (C1_1ACC11, 7*C1_2ACC11, C1_9ACC11)
C6ACC11: LINE = (C1_1ACC11, 7*C1_2ACC11, C1_9ACC11)
C7ACC11: LINE = (C1_1ACC11, 7*C1_2ACC11, C1_9ACC11)
C8ACC11: LINE = (C1_1ACC11, 7*C1_2ACC11, C1_9ACC11)
!
DC1ACC11: LINE = (D0141, C1ACC11, D01056, D0101)
DC2ACC11: LINE = (D0141, C2ACC11, D01056, D0101)
DC3ACC11: LINE = (D0141, C3ACC11, D01056, D0101)
DC4ACC11: LINE = (D0141, C4ACC11, D01056, D0101)
DC5ACC11: LINE = (D0141, C5ACC11, D01056, D0101)
DC6ACC11: LINE = (D0141, C6ACC11, D01056, D0101)
DC7ACC11: LINE = (D0141, C7ACC11, D01056, D0101)
DC8ACC11: LINE = (D0141, C8ACC11, D01056, D0099)
!
Q09ACC11 : KQUAD, L=0.150, K1=-1.013310504753148e+00, N_KICKS = 20
Q10ACC11 : KQUAD, L=0.150, K1= 1.037796955402251e+00, N_KICKS = 20
DQACC11 : LINE = (D0100, Q09ACC11, D0100, Q10ACC11, D0100)
!
! Correctors
!
H1ACC11 : HKICKER, L=0.100, KICK= 0.0
V1ACC11 : VKICKER, L=0.100, KICK= 0.0
HVACC11 : LINE = (V1ACC11, D0100, H1ACC11, D0100)
!
! BPMs
!
BPMACC11 : MONITOR, L=0.000
!
! Fit point
!
ACC11_RB: MARK, FITPOINT = 1;
!
ACC11: LINE = (D0100, DC1ACC11, DC2ACC11, DC3ACC11, DC4ACC11, 	&
              DC5ACC11, DC6ACC11, DC7ACC11, DC8ACC11, LTWAKE13, &
              DQACC11,  HVACC11, ACC11_RB)
!----------------------------------------------------------------------------
!	ACC12
!----------------------------------------------------------------------------
C1_1ACC12: RFCW, L=0.1147, PHASE="90.0 ph12 -",		&
                VOLT="v12 0.1147 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC12: RFCW, L=0.1154, PHASE="90.0 ph12 -",         &
                VOLT="v12 0.1154 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC12: RFCW, L=0.1137, PHASE="90.0 ph12 -",         &
                VOLT="v12 0.1137 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC12: LINE = (C1_1ACC12, 7*C1_2ACC12, C1_9ACC12)
C2ACC12: LINE = (C1_1ACC12, 7*C1_2ACC12, C1_9ACC12)
C3ACC12: LINE = (C1_1ACC12, 7*C1_2ACC12, C1_9ACC12)
C4ACC12: LINE = (C1_1ACC12, 7*C1_2ACC12, C1_9ACC12)
C5ACC12: LINE = (C1_1ACC12, 7*C1_2ACC12, C1_9ACC12)
C6ACC12: LINE = (C1_1ACC12, 7*C1_2ACC12, C1_9ACC12)
C7ACC12: LINE = (C1_1ACC12, 7*C1_2ACC12, C1_9ACC12)
C8ACC12: LINE = (C1_1ACC12, 7*C1_2ACC12, C1_9ACC12)
!
DC1ACC12: LINE = (D0141, C1ACC12, D01056, D0101)
DC2ACC12: LINE = (D0141, C2ACC12, D01056, D0101)
DC3ACC12: LINE = (D0141, C3ACC12, D01056, D0101)
DC4ACC12: LINE = (D0141, C4ACC12, D01056, D0101)
DC5ACC12: LINE = (D0141, C5ACC12, D01056, D0101)
DC6ACC12: LINE = (D0141, C6ACC12, D01056, D0101)
DC7ACC12: LINE = (D0141, C7ACC12, D01056, D0101)
DC8ACC12: LINE = (D0141, C8ACC12, D01056, D0099)
! triplet before BC3
Q09ACC12 : KQUAD, L=0.150, K1=-3.787619522055402e+00, N_KICKS = 20
Q10ACC12 : KQUAD, L=0.150, K1= 2.427154487858080e+00, N_KICKS = 20
Q11ACC12 : KQUAD, L=0.150, K1= 4.586571190410086e-01, N_KICKS = 20
DQACC12 : LINE = (D0100, Q09ACC12, D0100, Q10ACC12, D0100, Q11ACC12, D0100)
!
! Correctors
!
H1ACC12 : HKICKER, L=0.100, KICK= 0.0
V1ACC12 : VKICKER, L=0.100, KICK= 0.0
HVACC12 : LINE = (V1ACC12, D0100, H1ACC12, D0100)
!
! BPMs
!
BPMACC12 : MONITOR, L=0.000
!
! Fit point
!
ACC12_RB: MARK, FITPOINT = 1;
!
ACC12: LINE = (D0100, DC1ACC12, DC2ACC12, DC3ACC12, DC4ACC12, 	&
              DC5ACC12, DC6ACC12, DC7ACC12, DC8ACC12, LTWAKE13, &
              DQACC12,  HVACC12, ACC12_RB)

!----------------------------------------------------------------------------
!
! Triplets and third Bunch compressor
!
!----------------------------------------------------------------------------
!
! BC3   = UBC3 + MBC3 + DBC3
!
!----------------------------------------------------------------------------
! UBC3: triplet upstream of BC3
!----------------------------------------------------------------------------
!
! Correctors
!
H1UBC3 : HKICKER, L=0.100, KICK= 0.0
V1UBC3 : VKICKER, L=0.100, KICK= 0.0
HVUBC3  : LINE = (V1UBC3, D0100, H1UBC3, D0100)
!
! BPMs
!
BPM1UBC3 : MONITOR, L=0.000
BPM2UBC3 : MONITOR, L=0.000
BPM3UBC3 : MONITOR, L=0.000
!
! Triplet
!
Q1UBC3 : KQUAD, L=0.150,K1= 4.607521129564364e-01, N_KICKS = 20
Q2UBC3 : KQUAD, L=0.150,K1= 5.493937225583207e-02, N_KICKS = 20
Q3UBC3 : KQUAD, L=0.150,K1= 7.950855052745218e-01, N_KICKS = 20
! Quadrupoles with BPMs
Q1UBC3BPM : LINE = (D0100, Q1UBC3,  BPM1UBC3,  D0100)
Q2UBC3BPM : LINE = (D0100, Q2UBC3,  BPM2UBC3,  D0100)
Q3UBC3BPM : LINE = (D0100, Q3UBC3,  BPM3UBC3,  D0100)
!
UBC3: LINE = (D0130, HVUBC3, D0100, Q1UBC3BPM, D0250, Q2UBC3BPM, D0250, Q3UBC3BPM)
!----------------------------------------------------------------------------
!
! MBC3: 4 dipole s-type chicane
!
!----------------------------------------------------------------------------
!
! BC3 dipoles
!
! parameters
! parameters
% 0.5                                      sto  L3
% 1.0                                      sto  LD13
% 1.3424                                   sto  LD23
% theta_bc3 180 / -1 acos *                sto  theta13
% theta13 6 pow 0.003541052071576 *	   sto  f13
% theta13 5 pow 0.006996194703641 *        sto  f23
% theta13 4 pow 0.000441856648954 *	   sto  f33
% theta13 3 pow -0.015949804823172 *	   sto  f43
% theta13 2 pow 0.000002724126278 *	   sto  f53
% theta13 1 pow 0.949847974674722 *	   sto  f63
%  0.000000000792586            	   sto  f73
% f13 f23 + f33 + f43 + f53 + f63 + f73 +  sto  theta23
% theta13 cos                              sto  ctheta13
% theta23 cos                              sto  ctheta23
% theta13 sin                              sto  stheta13
% theta13 theta23 + 2 / sin                sto  s3t1t2
% theta13 theta23 - 2 / tan                sto  t3t1t2
% L3 2 * t3t1t2                            sto  x3
% L3 sqr 4 * x3 sqr + sqrt                 sto  del3
% del3 s3t1t2 / 2 /                        sto  rho3
% L3 theta13 * stheta13 /                  sto  LBEND13
% theta13 theta23 + rho3 *                 sto  LBEND23
% LD13 ctheta13 /                          sto  LD1BC3
% LD23 ctheta23 /                          sto  LD2BC3

CD1BC3 : CSRCSBEND, L="LBEND13", ANGLE="theta13 -1 *",                          &
         E1=0.0, E2="theta13 -1 *", HGAP=0.0125,             			&
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                 		&
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                 		&
         OUTPUT_FILE="%s.CD1BC3.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CD2BC3 : CSRCSBEND, L="LBEND23", ANGLE="theta13 theta23 +",                     &
         E1="theta13", E2="theta23", HGAP=0.0125,               		&
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                 		&
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                 		&
         OUTPUT_FILE="%s.CD2BC3.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CD3BC3 : CSRCSBEND, L="LBEND23", ANGLE="theta13 theta23 + -1 *",                &
         E1="theta23 -1 *", E2="theta13 -1 *", HGAP=0.0125,             	&
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                 		&
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                 		&
         OUTPUT_FILE="%s.CD3BC3.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CD4BC3 : CSRCSBEND, L="LBEND13", ANGLE="theta13",                               &
         E1="theta13", E2=0.0, HGAP=0.0125,             			&
         NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                 		&
         BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                 		&
         OUTPUT_FILE="%s.CD4BC3.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
CDD1D2BC3  : CSRDRIFT, L="LD1BC3",  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CDD2D3BC3  : CSRDRIFT, L="LD2BC3",  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CDBPM2BC3  : CSRDRIFT, L=0.5000000000, DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
!
! Correctors
!
H1BC3  : HKICKER, L=0.100,   KICK= 0.0
H2BC3  : HKICKER, L=0.100,   KICK= 0.0
H3BC3  : HKICKER, L=0.100,   KICK= 0.0
H4BC3  : HKICKER, L=0.100,   KICK= 0.0
!
! Watching positions
!
BC3W1   : WATCH, FILENAME="%s.BC3.w1", MODE=COORD
BC3P1   : WATCH, FILENAME="%s.BC3.p1", MODE=PARAMETER
BC3W2   : WATCH, FILENAME="%s.BC3.w2", MODE=COORD
BC3P2   : WATCH, FILENAME="%s.BC3.p2", MODE=PARAMETER
BC3W1b   : WATCH, FILENAME="%s.BC3.w1b", MODE=COORD
BC3W1c   : WATCH, FILENAME="%s.BC3.w1c", MODE=COORD
BC3W1d   : WATCH, FILENAME="%s.BC3.w1d", MODE=COORD
!
! Fit point before the fourth dipole
!
BC3_IM: MARK, FITPOINT = 1;
BC3_RB: MARK, FITPOINT = 1;
!
MBC3    : LINE = (BC3W1, BC3P1, D0100, CD1BC3, CDD1D2BC3, CD2BC3, CDD2D3BC3, CDD2D3BC3, &
                  CD3BC3, CDD1D2BC3, BC3_RB, CD4BC3, CDBPM2BC3, BC3W2, BC3P2)
!
!----------------------------------------------------------------------------
! DBC3: triplet downstream of BC3
!----------------------------------------------------------------------------
!
! Drifts
!
CD0100BC3  : CSRDRIFT, L=0.100,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
CD0150BC3  : CSRDRIFT, L=0.150,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
!
! Correctors
!
H1DBC3 : HKICKER, L=0.100, KICK= 0.0
V1DBC3 : VKICKER, L=0.100, KICK= 0.0
HVDBC3  : LINE = (V1DBC3, D0100, H1DBC3, D0100)
!
! BPMs
!
BPM1DBC3 : MONITOR, L=0.0
BPM2DBC3 : MONITOR, L=0.0
BPM3DBC3 : MONITOR, L=0.0
!
! Triplet
! 
Q1DBC3    : KQUAD, L=0.150, K1=-4.087091989358641e-01, N_KICKS = 20
Q2DBC3    : KQUAD, L=0.150, K1=-2.919273855916398e+00, N_KICKS = 20
Q3DBC3    : KQUAD, L=0.150, K1= 3.548265340743851e+00, N_KICKS = 20
!
! Quadrupoles with BPMs
Q1DBC3BPM : LINE = (D0100, Q1DBC3,  BPM1DBC3,  D0100)
Q2DBC3BPM : LINE = (D0100, Q2DBC3,  BPM2DBC3,  D0100)
Q3DBC3BPM : LINE = (D0100, Q3DBC3,  BPM3DBC3,  D0100)
!
DBC3:     LINE = (CD0150BC3, HVDBC3, CD0100BC3, Q1DBC3BPM, D0250, Q2DBC3BPM, D0250, Q3DBC3BPM)
!
!----------------------------------------------------------------------------
!	BC3 = UBC3 + MBC3 + DBC3
!----------------------------------------------------------------------------
BC3start : MARKER
BC3end   : MARKER
!
BC3_REF: MARK, FITPOINT = 1;
!
BC3: LINE=(BC3start, UBC3, MBC3, DBC3, BC3_REF, BC3end)


!----------------------------------------------------------------------------
!	ACC13
!----------------------------------------------------------------------------
C1_1ACC13: RFCW, L=0.1147, PHASE="90.0 ph13 -",		&
                VOLT="v13 0.1147 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC13: RFCW, L=0.1154, PHASE="90.0 ph13 -",         &
                VOLT="v13 0.1154 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC13: RFCW, L=0.1137, PHASE="90.0 ph13 -",         &
                VOLT="v13 0.1137 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC13: LINE = (C1_1ACC13, 7*C1_2ACC13, C1_9ACC13)
C2ACC13: LINE = (C1_1ACC13, 7*C1_2ACC13, C1_9ACC13)
C3ACC13: LINE = (C1_1ACC13, 7*C1_2ACC13, C1_9ACC13)
C4ACC13: LINE = (C1_1ACC13, 7*C1_2ACC13, C1_9ACC13)
C5ACC13: LINE = (C1_1ACC13, 7*C1_2ACC13, C1_9ACC13)
C6ACC13: LINE = (C1_1ACC13, 7*C1_2ACC13, C1_9ACC13)
C7ACC13: LINE = (C1_1ACC13, 7*C1_2ACC13, C1_9ACC13)
C8ACC13: LINE = (C1_1ACC13, 7*C1_2ACC13, C1_9ACC13)
!
DC1ACC13: LINE = (D0141, C1ACC13, D01056, D0101)
DC2ACC13: LINE = (D0141, C2ACC13, D01056, D0101)
DC3ACC13: LINE = (D0141, C3ACC13, D01056, D0101)
DC4ACC13: LINE = (D0141, C4ACC13, D01056, D0101)
DC5ACC13: LINE = (D0141, C5ACC13, D01056, D0101)
DC6ACC13: LINE = (D0141, C6ACC13, D01056, D0101)
DC7ACC13: LINE = (D0141, C7ACC13, D01056, D0101)
DC8ACC13: LINE = (D0141, C8ACC13, D01056, D0099)
!
Q09ACC13 : KQUAD, L=0.150, K1= 3.306763960127618e+00, N_KICKS = 20
Q10ACC13 : KQUAD, L=0.150, K1=-3.363307501730297e+00, N_KICKS = 20
DQACC13 : LINE = (D0100, Q09ACC13, D0100, Q10ACC13, D0100)
!
! Correctors
!
H1ACC13 : HKICKER, L=0.100, KICK= 0.0
V1ACC13 : VKICKER, L=0.100, KICK= 0.0
HVACC13 : LINE = (V1ACC13, D0100, H1ACC13, D0100)
!
! BPMs
!
BPMACC13 : MONITOR, L=0.000
!
! Fit point
!
ACC13_RB: MARK, FITPOINT = 1;
!
ACC13: LINE = (D0100, DC1ACC13, DC2ACC13, DC3ACC13, DC4ACC13, 	&
              DC5ACC13, DC6ACC13, DC7ACC13, DC8ACC13, LTWAKE13, &
              DQACC13,  HVACC13, ACC13_RB)

!----------------------------------------------------------------------------
!	ACC14
!----------------------------------------------------------------------------
C1_1ACC14: RFCW, L=0.1147, PHASE="90.0 ph13 -",		&
                VOLT="v13 0.1147 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC14: RFCW, L=0.1154, PHASE="90.0 ph13 -",         &
                VOLT="v13 0.1154 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC14: RFCW, L=0.1137, PHASE="90.0 ph13 -",         &
                VOLT="v13 0.1137 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC14: LINE = (C1_1ACC14, 7*C1_2ACC14, C1_9ACC14)
C2ACC14: LINE = (C1_1ACC14, 7*C1_2ACC14, C1_9ACC14)
C3ACC14: LINE = (C1_1ACC14, 7*C1_2ACC14, C1_9ACC14)
C4ACC14: LINE = (C1_1ACC14, 7*C1_2ACC14, C1_9ACC14)
C5ACC14: LINE = (C1_1ACC14, 7*C1_2ACC14, C1_9ACC14)
C6ACC14: LINE = (C1_1ACC14, 7*C1_2ACC14, C1_9ACC14)
C7ACC14: LINE = (C1_1ACC14, 7*C1_2ACC14, C1_9ACC14)
C8ACC14: LINE = (C1_1ACC14, 7*C1_2ACC14, C1_9ACC14)
!
DC1ACC14: LINE = (D0141, C1ACC14, D01056, D0101)
DC2ACC14: LINE = (D0141, C2ACC14, D01056, D0101)
DC3ACC14: LINE = (D0141, C3ACC14, D01056, D0101)
DC4ACC14: LINE = (D0141, C4ACC14, D01056, D0101)
DC5ACC14: LINE = (D0141, C5ACC14, D01056, D0101)
DC6ACC14: LINE = (D0141, C6ACC14, D01056, D0101)
DC7ACC14: LINE = (D0141, C7ACC14, D01056, D0101)
DC8ACC14: LINE = (D0141, C8ACC14, D01056, D0099)
!
Q09ACC14 : KQUAD, L=0.150, K1= 2.079192219556209e+00, N_KICKS = 20
Q10ACC14 : KQUAD, L=0.150, K1=-2.083733814351911e+00, N_KICKS = 20
DQACC14 : LINE = (D0100, Q09ACC14, D0100, Q10ACC14, D0100)
!
! Correctors
!
H1ACC14 : HKICKER, L=0.100, KICK= 0.0
V1ACC14 : VKICKER, L=0.100, KICK= 0.0
HVACC14 : LINE = (V1ACC14, D0100, H1ACC14, D0100)
!
! BPMs
!
BPMACC14 : MONITOR, L=0.000
!
! Fit point
!
ACC14_RB: MARK, FITPOINT = 1;
!
ACC14: LINE = (D0100, DC1ACC14, DC2ACC14, DC3ACC14, DC4ACC14, 	&
              DC5ACC14, DC6ACC14, DC7ACC14, DC8ACC14, LTWAKE13, &
              DQACC14,  HVACC14, ACC14_RB)

!----------------------------------------------------------------------------
!	ACC15
!----------------------------------------------------------------------------
C1_1ACC15: RFCW, L=0.1147, PHASE="90.0 ph13 -",		&
                VOLT="v13 0.1147 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC15: RFCW, L=0.1154, PHASE="90.0 ph13 -",         &
                VOLT="v13 0.1154 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC15: RFCW, L=0.1137, PHASE="90.0 ph13 -",         &
                VOLT="v13 0.1137 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC15: LINE = (C1_1ACC15, 7*C1_2ACC15, C1_9ACC15)
C2ACC15: LINE = (C1_1ACC15, 7*C1_2ACC15, C1_9ACC15)
C3ACC15: LINE = (C1_1ACC15, 7*C1_2ACC15, C1_9ACC15)
C4ACC15: LINE = (C1_1ACC15, 7*C1_2ACC15, C1_9ACC15)
C5ACC15: LINE = (C1_1ACC15, 7*C1_2ACC15, C1_9ACC15)
C6ACC15: LINE = (C1_1ACC15, 7*C1_2ACC15, C1_9ACC15)
C7ACC15: LINE = (C1_1ACC15, 7*C1_2ACC15, C1_9ACC15)
C8ACC15: LINE = (C1_1ACC15, 7*C1_2ACC15, C1_9ACC15)
!
DC1ACC15: LINE = (D0141, C1ACC15, D01056, D0101)
DC2ACC15: LINE = (D0141, C2ACC15, D01056, D0101)
DC3ACC15: LINE = (D0141, C3ACC15, D01056, D0101)
DC4ACC15: LINE = (D0141, C4ACC15, D01056, D0101)
DC5ACC15: LINE = (D0141, C5ACC15, D01056, D0101)
DC6ACC15: LINE = (D0141, C6ACC15, D01056, D0101)
DC7ACC15: LINE = (D0141, C7ACC15, D01056, D0101)
DC8ACC15: LINE = (D0141, C8ACC15, D01056, D0099)
!
Q09ACC15 : KQUAD, L=0.150, K1=-1.069343628973726e+00, N_KICKS = 20
Q10ACC15 : KQUAD, L=0.150, K1= 1.095866048948198e+00, N_KICKS = 20
DQACC15 : LINE = (D0100, Q09ACC15, D0100, Q10ACC15, D0100)
!
! Correctors
!
H1ACC15 : HKICKER, L=0.100, KICK= 0.0
V1ACC15 : VKICKER, L=0.100, KICK= 0.0
HVACC15 : LINE = (V1ACC15, D0100, H1ACC15, D0100)
!
! BPMs
!
BPMACC15 : MONITOR, L=0.000
!
! Fit point
!
ACC15_RB: MARK, FITPOINT = 1;
!
ACC15: LINE = (D0100, DC1ACC15, DC2ACC15, DC3ACC15, DC4ACC15, 	&
              DC5ACC15, DC6ACC15, DC7ACC15, DC8ACC15, LTWAKE13, &
              DQACC15,  HVACC15, ACC15_RB)

!----------------------------------------------------------------------------
!	ACC16
!----------------------------------------------------------------------------
C1_1ACC16: RFCW, L=0.1147, PHASE="90.0 ph13 -",		&
                VOLT="v13 0.1147 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC16: RFCW, L=0.1154, PHASE="90.0 ph13 -",         &
                VOLT="v13 0.1154 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC16: RFCW, L=0.1137, PHASE="90.0 ph13 -",         &
                VOLT="v13 0.1137 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC16: LINE = (C1_1ACC16, 7*C1_2ACC16, C1_9ACC16)
C2ACC16: LINE = (C1_1ACC16, 7*C1_2ACC16, C1_9ACC16)
C3ACC16: LINE = (C1_1ACC16, 7*C1_2ACC16, C1_9ACC16)
C4ACC16: LINE = (C1_1ACC16, 7*C1_2ACC16, C1_9ACC16)
C5ACC16: LINE = (C1_1ACC16, 7*C1_2ACC16, C1_9ACC16)
C6ACC16: LINE = (C1_1ACC16, 7*C1_2ACC16, C1_9ACC16)
C7ACC16: LINE = (C1_1ACC16, 7*C1_2ACC16, C1_9ACC16)
C8ACC16: LINE = (C1_1ACC16, 7*C1_2ACC16, C1_9ACC16)
!
DC1ACC16: LINE = (D0141, C1ACC16, D01056, D0101)
DC2ACC16: LINE = (D0141, C2ACC16, D01056, D0101)
DC3ACC16: LINE = (D0141, C3ACC16, D01056, D0101)
DC4ACC16: LINE = (D0141, C4ACC16, D01056, D0101)
DC5ACC16: LINE = (D0141, C5ACC16, D01056, D0101)
DC6ACC16: LINE = (D0141, C6ACC16, D01056, D0101)
DC7ACC16: LINE = (D0141, C7ACC16, D01056, D0101)
DC8ACC16: LINE = (D0141, C8ACC16, D01056, D0099)
!
Q09ACC16 : KQUAD, L=0.150, K1=-3.384823493673481e+00, N_KICKS = 20
Q10ACC16 : KQUAD, L=0.150, K1= 3.340297736037317e+00, N_KICKS = 20
DQACC16 : LINE = (D0100, Q09ACC16, D0100, Q10ACC16, D0100)
!
! Correctors
!
H1ACC16 : HKICKER, L=0.100, KICK= 0.0
V1ACC16 : VKICKER, L=0.100, KICK= 0.0
HVACC16 : LINE = (V1ACC16, D0100, H1ACC16, D0100)
!
! BPMs
!
BPMACC16 : MONITOR, L=0.000
!
! Fit point
!
ACC16_RB: MARK, FITPOINT = 1;
!
ACC16: LINE = (D0100, DC1ACC16, DC2ACC16, DC3ACC16, DC4ACC16, 	&
              DC5ACC16, DC6ACC16, DC7ACC16, DC8ACC16, LTWAKE13, &
              DQACC16,  HVACC16, ACC16_RB)

!----------------------------------------------------------------------------
!	ACC17
!----------------------------------------------------------------------------
C1_1ACC17: RFCW, L=0.1147, PHASE="90.0 ph13 -",		&
                VOLT="v13 0.1147 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC17: RFCW, L=0.1154, PHASE="90.0 ph13 -",         &
                VOLT="v13 0.1154 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC17: RFCW, L=0.1137, PHASE="90.0 ph13 -",         &
                VOLT="v13 0.1137 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC17: LINE = (C1_1ACC17, 7*C1_2ACC17, C1_9ACC17)
C2ACC17: LINE = (C1_1ACC17, 7*C1_2ACC17, C1_9ACC17)
C3ACC17: LINE = (C1_1ACC17, 7*C1_2ACC17, C1_9ACC17)
C4ACC17: LINE = (C1_1ACC17, 7*C1_2ACC17, C1_9ACC17)
C5ACC17: LINE = (C1_1ACC17, 7*C1_2ACC17, C1_9ACC17)
C6ACC17: LINE = (C1_1ACC17, 7*C1_2ACC17, C1_9ACC17)
C7ACC17: LINE = (C1_1ACC17, 7*C1_2ACC17, C1_9ACC17)
C8ACC17: LINE = (C1_1ACC17, 7*C1_2ACC17, C1_9ACC17)
!
DC1ACC17: LINE = (D0141, C1ACC17, D01056, D0101)
DC2ACC17: LINE = (D0141, C2ACC17, D01056, D0101)
DC3ACC17: LINE = (D0141, C3ACC17, D01056, D0101)
DC4ACC17: LINE = (D0141, C4ACC17, D01056, D0101)
DC5ACC17: LINE = (D0141, C5ACC17, D01056, D0101)
DC6ACC17: LINE = (D0141, C6ACC17, D01056, D0101)
DC7ACC17: LINE = (D0141, C7ACC17, D01056, D0101)
DC8ACC17: LINE = (D0141, C8ACC17, D01056, D0099)
!
Q09ACC17 : KQUAD, L=0.150, K1= 3.311808516611429e+00, N_KICKS = 20
Q10ACC17 : KQUAD, L=0.150, K1=-3.440435499458543e+00, N_KICKS = 20
DQACC17 : LINE = (D0100, Q09ACC17, D0100, Q10ACC17, D0100)
!
! Correctors
!
H1ACC17 : HKICKER, L=0.100, KICK= 0.0
V1ACC17 : VKICKER, L=0.100, KICK= 0.0
HVACC17 : LINE = (V1ACC17, D0100, H1ACC17, D0100)
!
! BPMs
!
BPMACC17 : MONITOR, L=0.000
!
! Fit point
!
ACC17_RB: MARK, FITPOINT = 1;
!
ACC17: LINE = (D0100, DC1ACC17, DC2ACC17, DC3ACC17, DC4ACC17, 	&
              DC5ACC17, DC6ACC17, DC7ACC17, DC8ACC17, LTWAKE13, &
              DQACC17,  HVACC17, ACC17_RB)

!----------------------------------------------------------------------------
!	ACC18 (operating at reduced voltage for 2.2 GeV)
!----------------------------------------------------------------------------
C1_1ACC18: RFCW, L=0.1147, PHASE="90.0 ph14 -",    	&
                VOLT="v14 0.1147 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1147,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_2ACC18: RFCW, L=0.1154, PHASE="90.0 ph14 -",         &
                VOLT="v14 0.1154 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1154,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
C1_9ACC18: RFCW, L=0.1137, PHASE="90.0 ph14 -",         &
                VOLT="v14 0.1137 *",              &
                FREQ=1300.0E+06, CHANGE_P0=1,           &
                END1_FOCUS=1, END2_FOCUS=1,             &
                CELL_LENGTH=0.1137,LSC = "lscflag",LSC_BINS= 100, &
                LSC_HIGH_FREQUENCY_CUTOFF0=0.20,LSC_HIGH_FREQUENCY_CUTOFF1=0.25
!
C1ACC18: LINE = (C1_1ACC18, 7*C1_2ACC18, C1_9ACC18)
C2ACC18: LINE = (C1_1ACC18, 7*C1_2ACC18, C1_9ACC18)
C3ACC18: LINE = (C1_1ACC18, 7*C1_2ACC18, C1_9ACC18)
C4ACC18: LINE = (C1_1ACC18, 7*C1_2ACC18, C1_9ACC18)
C5ACC18: LINE = (C1_1ACC18, 7*C1_2ACC18, C1_9ACC18)
C6ACC18: LINE = (C1_1ACC18, 7*C1_2ACC18, C1_9ACC18)
C7ACC18: LINE = (C1_1ACC18, 7*C1_2ACC18, C1_9ACC18)
C8ACC18: LINE = (C1_1ACC18, 7*C1_2ACC18, C1_9ACC18)
!
DC1ACC18: LINE = (D0141, C1ACC18, D01056, D0101)
DC2ACC18: LINE = (D0141, C2ACC18, D01056, D0101)
DC3ACC18: LINE = (D0141, C3ACC18, D01056, D0101)
DC4ACC18: LINE = (D0141, C4ACC18, D01056, D0101)
DC5ACC18: LINE = (D0141, C5ACC18, D01056, D0101)
DC6ACC18: LINE = (D0141, C6ACC18, D01056, D0101)
DC7ACC18: LINE = (D0141, C7ACC18, D01056, D0101)
DC8ACC18: LINE = (D0141, C8ACC18, D01056, D0099)
!
Q09ACC18 : KQUAD, L=0.150, K1= 3.315336855844263e+00, N_KICKS = 20
Q10ACC18 : KQUAD, L=0.150, K1=-1.119663419544028e+00, N_KICKS = 20
Q11ACC18 : KQUAD, L=0.150, K1=-2.848473624927546e+00, N_KICKS = 20
DQACC18 : LINE = (D0100, Q09ACC18, D0100, Q10ACC18, D0100, Q11ACC18, D0100)
!
! Correctors
!
H1ACC18 : HKICKER, L=0.100, KICK= 0.0
V1ACC18 : VKICKER, L=0.100, KICK= 0.0
HVACC18 : LINE = (V1ACC18, D0100, H1ACC18, D0100)
!
! BPMs
!
BPMACC18 : MONITOR, L=0.000
!
! Fit point
!
ACC18_REF: MARK, FITPOINT = 1;
!
ACC18: LINE = (D0100, DC1ACC18, DC2ACC18, DC3ACC18, DC4ACC18, 	&
              DC5ACC18, DC6ACC18, DC7ACC18, DC8ACC18, LTWAKE13, &
              DQACC18,  HVACC18, ACC18_REF)

!----------------------------------------------------------------------------
!
! DL: Dog-Leg Section. Collimator should be included later.
!
!----------------------------------------------------------------------------
!
! DL   = UDL + MDL + DDL
!
!----------------------------------------------------------------------------
! UDL: triplet upstream of DL
!----------------------------------------------------------------------------
!
! Triplet
!
Q1@UDL : KQUAD, L=0.15, K1 = 5.110222, N_KICKS = 20
Q2@UDL : KQUAD, L=0.15, K1 =-10.00000, N_KICKS = 20
Q3@UDL : KQUAD, L=0.15, K1 = 10.00000, N_KICKS = 20
!
! Markers
!
Q1END@UDL : MARKER, FITPOINT=1
Q2END@UDL : MARKER, FITPOINT=1
Q3END@UDL : MARKER, FITPOINT=1
QM@UDL : LINE = (D0150, Q1@UDL, Q1END@UDL, D0300, Q2@UDL, Q2END@UDL,    &
                 D0300, Q3@UDL, Q3END@UDL, D0150)
!
! Correctors
!
H1UDL : HKICKER, L=0.100, KICK= 0.0
V1UDL : VKICKER, L=0.100, KICK= 0.0
HVUDL : LINE = (V1UDL, D0100, H1UDL, D0100)
!
! BPMs
!
BPMUDL : MONITOR, L=0.000
!
UDL : LINE = (QM@UDL,HVUDL, BPMUDL)
!----------------------------------------------------------------------------
! MDL: DL proper
!----------------------------------------------------------------------------
!
! QM in Dog-Leg
! Note that 3rd order is used to compensate 2nd and 3rd order dispersion
!
Q1@DL  : KQUAD, L=0.3000, K1 = 3.593980, N_KICKS = 20
Q2H@DL : KQUAD, L=0.1500, K1 =-2.486103, N_KICKS = 20
Q3@DL  : KQUAD, L=0.3000, K1 = 3.669760, N_KICKS = 20
!
! Dog-Leg dipoles
!
CD1ECOL : CSRCSBEND,                                                	&
          L="3.5 180 / -1 acos * 3.5 180 / -1 acos * sin / 0.400 * ", 	&
          ANGLE="3.5 180.0 / -1 acos * ",                              	&
          E1=0.0, E2="3.5 180.0 / -1 acos * ", HGAP=0.0125,            	&
          NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                	&
          BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                	&
          OUTPUT_FILE="%s.CD1ECOL.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"

CD2ECOL : CSRCSBEND,                                                    &
          L="-3.5 180 / -1 acos * -3.5 180 / -1 acos * sin / 0.400 * ",	&
          ANGLE="-3.5 180.0 / -1 acos * ",                             	&
          E1="-3.5 180.0 / -1 acos * ", E2=0.0, HGAP=0.0125,           	&
          NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4,                	&
          BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,                	&
          OUTPUT_FILE="%s.CD7ECOL.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
!
! Marker
!
Q1END@DL : MARKER, FITPOINT=1
Q2MID@DL : MARKER, FITPOINT=1
Q3END@DL : MARKER, FITPOINT=1
DL1_RB : MARKER, FITPOINT=1
DL2_RB : MARKER, FITPOINT=1
!
! Watching positions
!
W1@DL : WATCH, FILENAME="%s.DL.w1", MODE=COORD
P1@DL : WATCH, FILENAME="%s.DL.p1", MODE=PARAMETER
W2@DL : WATCH, FILENAME="%s.DL.w2", MODE=COORD
P2@DL : WATCH, FILENAME="%s.DL.p2", MODE=PARAMETER
!
MDL : LINE = (W1@DL, P1@DL, CD1ECOL, DL1_RB, CD0150, D1500, Q1@DL,      &
              Q1END@DL, D1600, Q2H@DL, Q2MID@DL, Q2H@DL, D1600,         &
              Q3@DL, Q3END@DL, D1600, CD2ECOL, DL2_RB, CD0800, W2@DL, P2@DL)
!----------------------------------------------------------------------------
! DDL: triplets downstream of DL
!----------------------------------------------------------------------------
!
! Triplet downstream of Dog-Leg
Q1@DDL : KQUAD, L=0.15, K1 = 3.168267, N_KICKS = 20
Q2@DDL : KQUAD, L=0.15, K1 =-7.231591, N_KICKS = 20
Q3@DDL : KQUAD, L=0.15, K1 = 6.152296, N_KICKS = 20
!
! Triplet to match to FEL undulator channel
!
Q1@FEL : KQUAD, L=0.15, K1 = 1.742193, N_KICKS = 20
Q2@FEL : KQUAD, L=0.15, K1 =-0.505625, N_KICKS = 20
Q3@FEL : KQUAD, L=0.15, K1 =-2.087850, N_KICKS = 20
!
! Marker
!
Q1END@DDL : MARKER, FITPOINT=1
Q2END@DDL : MARKER, FITPOINT=1
Q3END@DDL : MARKER, FITPOINT=1
DL_FEL   : MARKER, FITPOINT=1
!
! Watching positions
!
W1@FEL : WATCH, FILENAME="%s.FEL.w1", MODE=COORD
P1@FEL : WATCH, FILENAME="%s.FEL.p1", MODE=PARAMETER
!
DDL : LINE = (Q1@DDL, Q1END@DDL, D0300, Q2@DDL, Q2END@DDL,   &
                 D0300, Q3@DDL, Q3END@DDL, D1600, Q1@FEL, D0300, &
		 Q2@FEL, D0300, Q3@FEL, D1000, DL_FEL, W1@FEL, P1@FEL)
!
!----------------------------------------------------------------------------
! DL   = UDL + MDL + DDL
!----------------------------------------------------------------------------
DLstart : MARKER
DLend   : MARKER
DL : LINE = (DLstart, UDL, MDL, DDL, DLend)

!----------------------------------------------------------------------------
!	NLSL L-band beam line (old dog leg and FEL matching section):
!----------------------------------------------------------------------------
!
nlsl_0p2nC_DL: LINE = (Q, ACC01, I2L, NLS_LH, DLMERGE, ACC02, ACC391, BC1, ACC03, ACC04, &
                    BC2, ACC05, ACC06, ACC07, ACC08, ACC09, ACC10, ACC11, ACC12, BC3, &
                    ACC13, ACC14, ACC15, ACC16, ACC17, ACC18, DL)
!
!----------------------------------------------------------------------------

!----------------------------------------------------------------------------
!	Collimation, Diagnostics and Spreader Section:
!----------------------------------------------------------------------------

! definitions
!%  6.945679   sto KCQ1
!% -1.273016   sto KCQ2
!%  4.073609   sto KCQ3
!% -2.482232   sto KCQ4
%  4.708172         sto  KCQ1 
% -3.339256         sto  KCQ2 
%  2.975892         sto  KCQ3 
% -0.597790         sto  KCQ4 
%  0.829373   sto KQ
%  1.64       sto KQT
! DAK ****Angles changed to get R56=0.0 and to get total 60 mrad as in LBNL
% 0.024    sto DIP1ANGLE
% 0.036    sto DIP2ANGLE

! LSC drifts
D0_COL: LSCDRIFT, L=1.0, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D1_COL: LSCDRIFT, L=0.1019, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D2_COL: LSCDRIFT, L=1.9717, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D3_COL: LSCDRIFT, L=0.9597, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D5_COL: LSCDRIFT, L=0.96475, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D6_COL: LSCDRIFT, L=0.96475, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D8_COL: LSCDRIFT, L=0.5973, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D9_COL: LSCDRIFT, L=0.2001, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D10_COL: LSCDRIFT, L=1.2968, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D11_CSR_COL: LSCDRIFT, L=0.8047, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D12_COL: LSCDRIFT, L=0.5, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D16_COL: LSCDRIFT, L=0.8, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D13_COL: LSCDRIFT, L=0.1883, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D14_COL: LSCDRIFT, L=0.4875, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D15_COL: LSCDRIFT, L=0.4883, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D18_COL: LSCDRIFT, L=0.601, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D19_COL: LSCDRIFT, L=2.0, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
D20_COL: LSCDRIFT, L=2.0447, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DM1: LSCDRIFT, L=0.5, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DM2: LSCDRIFT, L=1.5, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DM3: LSCDRIFT, L=1.0, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DM4: LSCDRIFT, L=1.5, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DM5: LSCDRIFT, L=1.0, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR:   LSCDRIFT, L=0.5, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR0:  LSCDRIFT, L=0.35 , &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR2B: LSCDRIFT, L=0.1, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR3:  LSCDRIFT, L=2.7, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR3A:  LSCDRIFT, L=2.5, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR3B:  LSCDRIFT, L=0.1, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR4:  LSCDRIFT, L=6.6, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR5:  LSCDRIFT, L=1.2, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR6:  LSCDRIFT, L=1.9, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR7:  LSCDRIFT, L=1.5, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR8:  LSCDRIFT, L=0.15, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR9:  LSCDRIFT, L=0.9, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR10: LSCDRIFT, L=1.2, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR11: LSCDRIFT, L=1.8, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR12: LSCDRIFT, L=1.5, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR13: LSCDRIFT, L=1.3, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR14: LSCDRIFT, L=1.8, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR151: LSCDRIFT, L=0.85, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR15: LSCDRIFT, L=1.8, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR161: LSCDRIFT, L=0.85, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR16: LSCDRIFT, L=1.8, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR17: LSCDRIFT, L=1.8, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR17A: LSCDRIFT, L=0.1, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR17B: LSCDRIFT, L=1.6, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DR18: LSCDRIFT, L=1.8, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255
DRT:  LSCDRIFT, L=1.35, &
  INTERPOLATE=1, SMOOTHING=1, BINS=100, LSC = "lscflag" &
  HIGH_FREQUENCY_CUTOFF0=0.255, HIGH_FREQUENCY_CUTOFF1=0.255

! CSR drifts
D11_COL:     CSRDRIFT, L=0.8047,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
D12_CSR_COL: CSRDRIFT, L=0.5,     DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
D17_COL:     CSRDRIFT, L=0.4055,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
DR_CSR:   CSRDRIFT, L=0.5,   DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
DR0_CSR:  CSRDRIFT, L=0.35,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
DR1:      CSRDRIFT, L=2.7,   DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
DR2A:      CSRDRIFT, L="5.1 0.2 -",   DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
DR5_CSR:  CSRDRIFT, L=1.2,   DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
DRT_CSR:  CSRDRIFT, L=1.35,  DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
DR14_CSR: CSRDRIFT, L=1.8,   DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"
DR18_CSR: CSRDRIFT, L=1.8,   DZ=0.01, USE_STUPAKOV=1, CSR = "csrflag"

! quadrupoles
Q1_COL:  KQUAD, N_KICKS = 20, L=0.1,    K1= KCQ1
Q2_COL:  KQUAD, N_KICKS = 20, L=0.1,    K1= KCQ2
Q3_COL:  KQUAD, N_KICKS = 20, L=0.1,    K1= KCQ3
Q4_COL:  KQUAD, N_KICKS = 20, L=0.1,    K1= KCQ4
Q5_COL:  KQUAD, N_KICKS = 20, L=0.15,   K1= 2.787404540596
Q6_COL:  KQUAD, N_KICKS = 20, L=0.2,    K1=-3.445089190074
Q7_COL:  KQUAD, N_KICKS = 20, L=0.15,   K1= 2.397514675646
Q8_COL:  KQUAD, N_KICKS = 20, L=0.15,   K1= 4.62552629356
Q9_COL:  KQUAD, N_KICKS = 20, L=0.15,   K1=-4.090737303781
Q10_COL: KQUAD, N_KICKS = 20, L=0.15,   K1=-3.000181942907
Q11_COL: KQUAD, N_KICKS = 20, L=0.15,   K1= 3.038902200058
Q12_COL: KQUAD, N_KICKS = 20, L=0.15,   K1=-0.629840930013
UQF_COL: KQUAD, N_KICKS = 20, L=0.1375, K1=-1.16138748605
QM1: KQUAD, N_KICKS = 20, L=0.2, K1=-1.133196E+00
QM2: KQUAD, N_KICKS = 20, L=0.2, K1= 3.091300E+00
QM3: KQUAD, N_KICKS = 20, L=0.2, K1=-1.925288E+00
QM4: KQUAD, N_KICKS = 20, L=0.2, K1= -1.589558E+00
Q1:  KQUAD, N_KICKS = 20, L=0.2, K1= KQT
Q2:  KQUAD, N_KICKS = 20, L=0.2, K1="KQT -1 *"
Q3:  KQUAD, N_KICKS = 20, L=0.2, K1= KQT
Q4:  KQUAD, N_KICKS = 20, L=0.2, K1="KQT -1 *"
Q5:  KQUAD, N_KICKS = 20, L=0.2, K1= 1.908051E+00
Q6:  KQUAD, N_KICKS = 20, L=0.2, K1=-1.781235E+00
Q7:  KQUAD, N_KICKS = 20, L=0.2, K1= 1.634750E+00
Q8:  KQUAD, N_KICKS = 20, L=0.2, K1=-3.250760E-01
Q9:  KQUAD, N_KICKS = 20, L=0.2, K1=-1.363761E+00
Q10: KQUAD, N_KICKS = 20, L=0.2, K1= 1.477792E+00
Q11: KQUAD, N_KICKS = 20, L=0.2, K1= 2.163649E+00
Q12: KQUAD, N_KICKS = 20, L=0.2, K1=-1.721830E+00
Q13: KQUAD, N_KICKS = 20, L=0.2, K1= 5.557906E+00
Q14: KQUAD, N_KICKS = 20, L=0.2, K1=-4.395730E+00
Q15: KQUAD, N_KICKS = 20, L=0.2, K1= 4.947735E+00 
Q16: KQUAD, N_KICKS = 20, L=0.2, K1=-4.135292E+00
Q17: KQUAD, N_KICKS = 20, L=0.2, K1= 2.186418E+00
Q18: KQUAD, N_KICKS = 20, L=0.2, K1=-2.317152E+00 
Q19: KQUAD, N_KICKS = 20, L=0.2, K1= 2.693978E+00
Q20: KQUAD, N_KICKS = 20, L=0.2, K1=-7.036112E-01

! sextupoles
SF1 :  KSEXT, N_KICKS=2, L=0.1, K2=29.305
SF2 :  KSEXT, N_KICKS=2, L=0.1, K2=177.075
SF3 :  KSEXT, N_KICKS=2, L=0.1, K2=311.775
SF4 :  KSEXT, N_KICKS=2, L=0.1, K2=132.396
SF5 :  KSEXT, N_KICKS=2, L=0.1, K2=-235.267
SF6 :  KSEXT, N_KICKS=2, L=0.1, K2=204.282
SF7 :  KSEXT, N_KICKS=2, L=0.1, K2=7.697
SF8 :  KSEXT, N_KICKS=2, L=0.1, K2=-34.075
SF9 :  KSEXT, N_KICKS=2, L=0.1, K2=-103.844

! markers
FEL_FIT : MARKER, FITPOINT=1
COLL_REF:  MARKER, FITPOINT=1
MQ1REF:  MARKER, FITPOINT=1
MQ2REF:  MARKER, FITPOINT=1
COL_ENT:   MARKER
MFOD1:     MARKER
HALF:      MARKER
MSPDR:     MARKER
OBS1 : MARKER
OBS2 : MARKER
OBS3 : MARKER
OBS4 : MARKER


! collimators
CT1_COL: ECOL, L=0.3, X_MAX=0.4E-2,   Y_MAX=0.4E-2
CT2_COL: ECOL, L=0.3, X_MAX=0.4E-2,   Y_MAX=0.4E-2
EC1_COL: ECOL, L=0.3, X_MAX=0.75E-2,  Y_MAX=0.75E-2
EC2_COL: ECOL, L=0.3, X_MAX=0.375E-2, Y_MAX=0.375E-2

! bending magnets
B1_COL: CSRCSBEND, L=0.4001, ANGLE= 0.0436, E1=0.0, E2=0.0, &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.B1_COL.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
B2_COL: CSRCSBEND, L=0.4001, ANGLE=-0.0436, E1=0.0, E2=0.0, &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.B2_COL.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
DIPQ2 : CSRCSBEND, l=0.2, k1="KQT -1 *", angle= 0.0014366, E1=0.0, E2=0.0, &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.DIPQ2.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
DIPQ3 : CSRCSBEND, l=0.2, k1= KQT, angle=-0.005369, E1=0.0, E2=0.0, &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.DIPQ3.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
DIPQ4 : CSRCSBEND, l=0.2, k1="KQT -1 *", angle= 0.0175218, E1=0.0, E2=0.0, &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.DIPQ4.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
kicker: CSRCSBEND,l=2.0,k1=0,angle=0.003,e1=0.0015,e2=0.0015, &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.kicker.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
SEPTUM: CSRCSBEND, L=2.0, ANGLE=0.027, K1=0.0, E1=0.0135, E2=0.0135, &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.SEPTUM.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
DIP1:   CSRCSBEND, L=0.3, ANGLE="DIP1ANGLE", K1=0.0, E1="DIP1ANGLE 2.0 /", E2="DIP1ANGLE 2.0 /", &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.DIP1.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
DIP2:   CSRCSBEND, L=0.5, ANGLE="DIP2ANGLE", K1=0.0, E1="DIP2ANGLE 2.0 /", E2="DIP2ANGLE 2.0 /", &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.DIP2.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
DIP3:   CSRCSBEND, L=0.6, ANGLE=0.0927, K1=0.0, E1=0.04635, E2=0.04635, &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.DIP3.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
HALF1DIP4: CSRCSBEND, L=0.6, ANGLE=0.0927, K1=0.0, E1=0.0927, E2=0.0, &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.HALF1DIP4.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
HALF2DIP4: CSRCSBEND, L=0.6, ANGLE=0.0927, K1=0.0, E1=0.0, E2=0.0927, &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.HALF2DIP4.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"
DIP5:   CSRCSBEND, L=0.6, ANGLE=0.0927, K1=0.0, E1=0.04635, E2=0.04635, &
            HGAP=0.0125, NONLINEAR=1, N_KICKS=10, INTEGRATION_ORDER=4, &
            BINS=100, SG_HALFWIDTH=2, ISR=1, SYNCH_RAD=1,&
            OUTPUT_FILE="%s.DIP5.csr", OUTPUT_INTERVAL=10, CSR = "csrflag"

! watch points
COLLW1 : WATCH, FILENAME="%s.COLL.w1", MODE=COORD
COLLW2 : WATCH, FILENAME="%s.COLL.w2", MODE=COORD
SPDRW1 : WATCH, FILENAME="%s.SPDR.w1", MODE=COORD
SPDRW2 : WATCH, FILENAME="%s.SPDR.w2", MODE=COORD
SPDRW3 : WATCH, FILENAME="%s.SPDR.w3", MODE=COORD
SPDRW4 : WATCH, FILENAME="%s.SPDR.w4", MODE=COORD
SPDRW5 : WATCH, FILENAME="%s.SPDR.w5", MODE=COORD
SPDRW6 : WATCH, FILENAME="%s.SPDR.w6", MODE=COORD
SPDRW7 : WATCH, FILENAME="%s.SPDR.w7", MODE=COORD


!
! matching triplet to FEL
!
Q1FEL : KQUAD, L=0.150, K1= 7.100906392839157e+00, N_KICKS = 20
Q2FEL : KQUAD, L=0.150, K1=-9.162647135500888e+00, N_KICKS = 20
Q3FEL : KQUAD, L=0.150, K1= 4.595564954909189e+00, N_KICKS = 20
Q4FEL : KQUAD, L=0.150, K1=-1.636359464576519e+00, N_KICKS = 20
!
MATCHFEL  : LINE = (D0100, Q1FEL, D0100, Q2FEL,  D0500, Q3FEL, D0100, Q4FEL, D0500)

! line definitions
DIP4: LINE=(HALF1DIP4,HALF,HALF2DIP4)
ARC1: LINE=(OBS1, DRT,Q1,DR0,KICKER,SPDRW1,DR0_CSR,DIPQ2,DR1,DIPQ3,DR0_CSR,SEPTUM,SPDRW2,DR0_CSR,&
            DIPQ4,DR2A,SF1,DR2B,Q5,DR3A,SF2,DR3B,Q6,DR4,Q7,DR5,DIP1,SPDRW3,DR5_CSR,Q8,DR4,Q9,DR3,Q10,DR6,&
            SF3,DR6,Q11,DR7,DIP2,SPDRW4,DRT_CSR, OBS2)
MATCH1: LINE=(DR8,Q12,DR9,Q13,DR10,Q14,DR11,Q15,DR12,Q16,DR13)
ARC2: LINE=(OBS3,DR,DIP3,SPDRW5,DR14_CSR,Q17,DR151,SF4,DR151,Q18,DR161,SF5,DR161,Q19,DR17A,SF6,DR17B,Q20,DR18,DIP4,&
            SPDRW6,DR18_CSR,Q20,DR17B,SF7,DR17A,Q19,DR161,SF8,DR161,Q18,DR151,SF9,DR151,Q17,DR14,DIP5,SPDRW7,DR_CSR, OBS4)
SPREADER: LINE=(MSPDR,ARC1,MATCH1,ARC2)
COLL_1: LINE=(Q1_COL,Q1_COL,D0_COL,D1_COL,Q2_COL,MQ1REF,Q2_COL,D2_COL,&
              Q3_COL,MQ2REF,Q3_COL,D3_COL,Q4_COL,Q4_COL,COLL_REF)
COLL_2: LINE=(COL_ENT,CT1_COL,10*D5_COL,10*D6_COL,CT2_COL)
COLL_3: LINE=(D8_COL,2*Q5_COL,D9_COL,2*Q6_COL,D9_COL,2*Q7_COL,D10_COL)
COLL_4: LINE=(B1_COL,D11_CSR_COL,D12_CSR_COL,EC1_COL,Q8_COL,Q8_COL,EC2_COL,&
              D13_COL,D14_COL,Q9_COL,Q9_COL,D14_COL,D15_COL,Q8_COL,Q8_COL,&
              D16_COL,D11_COL,B2_COL)
COLL_5: LINE=(D17_COL,2*Q10_COL,D18_COL,2*Q11_COL,D19_COL,2*Q12_COL,D20_COL,2*UQF_COL)
COLLIMATOR: LINE=(COLLW1,COLL_1,COLL_2,COLL_3,COLL_4,COLL_5,COLLW2,MFOD1)
MATCHSPDR: LINE=(DM1, QM1, DM2, QM2, DM3, QM3, DM4, QM4, DM5)
COLLMATCH : LINE=(COLLIMATOR, MATCHSPDR)
TOTAL: LINE=(COLLIMATOR,MATCHSPDR,SPREADER,MATCHFEL,FEL_FIT,W1@FEL)


!----------------------------------------------------------------------------
!	NLSL L-band beam line (inc. Collimation, Diagnostics and Spreader):
!----------------------------------------------------------------------------
!
nlsl_0p2nC: LINE = (Q, ACC01, I2L, NLS_LH, DLMERGE, ACC391, ACC02, BC1, ACC03, ACC04, &
                    BC2, ACC05, ACC06, ACC07, ACC08, ACC09, ACC10, ACC11, ACC12, BC3, &
                    ACC13, ACC14, ACC15, ACC16, ACC17, ACC18, TOTAL)
!nlsl_0p2nC: LINE = (Q, ACC01, I2L, NLS_LH, DLMERGE, ACC391, ACC02, BC1, ACC03, ACC04, &
!                    BC2, ACC05, ACC06, ACC07, ACC08, ACC09, ACC10, ACC11, ACC12, BC3, &
!                    ACC13, ACC14, ACC15, ACC16, ACC17, ACC18, TOTAL)
!
!----------------------------------------------------------------------------


