! HLS2 lattice

B: CSBEND, INTEGRATION_ORDER=4, N_KICKS=26, EDGE_ORDER=1, &
    L=1.1635,ANGLE=0.523599,E1=0.261799,E2=0.261799, &
    K1=-3.772552E-01, K2= 0.0, HGAP= 0.0200, FINT= 0.5, group="girderDip"

C1X: HKICK, L=1E-12
C2X: HKICK, L=1E-12
C3X: HKICK, L=1E-12
C4X: HKICK, L=1E-12
C5X: HKICK, L=1E-12
C6X: HKICK, L=1E-12
C7X: HKICK, L=1E-12
C8X: HKICK, L=1E-12

C1Y: VKICK, L=1E-12
C2Y: VKICK, L=1E-12
C3Y: VKICK, L=1E-12
C4Y: VKICK, L=1E-12
C5Y: VKICK, L=1E-12
C6Y: VKICK, L=1E-12

DL    : DRIF, L = 1.6811
DL1   : DRIF, L = 0.31115
DL2   : DRIF, L = 0.2300
DL3   : DRIF, L = 0.5000

DQ    : DRIF, L = 0.3200 
DBQ   : DRIF, L = 1.0000
DSB   : DRIF, L = 0.6200
DQS   : DRIF, L = 0.1800
D1    : DRIF, L = 0.8800
D2    : DRIF, L = 0.2000


MK1: MARK,FITPOINT=1
MK2: MARK,FITPOINT=1
MK3: MARK,FITPOINT=1
MKHID: MARK,FITPOINT=1
MKLID: MARK,FITPOINT=1
MK6: MARK,FITPOINT=1
MK7: MARK,FITPOINT=1
MP: MARK

P1: MONI, WEIGHT = 0, group="girder1"
P2: MONI, WEIGHT = 0, group="girder1"
P3: MONI, WEIGHT = 0, group="girderDip"
P4: MONI, WEIGHT = 0, group="girderDip"
P5: MONI, WEIGHT = 0, group="girderDip"
P6: MONI, WEIGHT = 0, group="girderDip"
P7: MONI, WEIGHT = 0, group="girder2"
P8: MONI, WEIGHT = 0, group="girder2"
Pa: MONI, WEIGHT = 0, group="girder2"

Q1: KQUAD,N_KICKS=35, INTEGRATION_ORDER=4, L=0.20, K1=-1.803602e+000, group="girder1"
Q2: KQUAD,N_KICKS=40, INTEGRATION_ORDER=4, L=0.34, K1=3.659235e+000 ,  , group="girder1"
Q3: KQUAD,N_KICKS=35, INTEGRATION_ORDER=4, L=0.20, K1=-2.738517e+000, group="girder1"
Q4: KQUAD,N_KICKS=40, INTEGRATION_ORDER=4, L=0.34, K1=  3.142499E+00          , group="girderDip"

! convert from thin lens Taylor series to Mad gradients
! LSS= 0.2

SD1: KSEXT,N_KICKS=20, INTEGRATION_ORDER=4,L=0.000010,K2=0.0  , group="girderDip"
!SD2: KSEXT,N_KICKS=20, INTEGRATION_ORDER=4,L=0.000010,K2=0.0      , group="girderDip"
SF1: KSEXT,N_KICKS=20, INTEGRATION_ORDER=4,L=0.200000,K2=0.0    , group="girderDip"
!SF2: KSEXT,N_KICKS=20, INTEGRATION_ORDER=4,L=0.200000,K2=-0.0     , group="girderDip"

ONESP: LINE=(DL,C1X,P1,Q1,DL1,Q2,C1Y,DL2,Q3,P3,C2X,DL3,&
               B,DSB,D2,P3,SD1,C3X,Q4,C2Y,D1,DSB,P4,C4X,SF1,C3Y,DQS,&
               B,DQS,C4Y,SF1,C5X,P5,DSB,D1,C5Y,Q4,C6X,SD1,P6,D2,DSB,&
               B,DL3,C7X,P7,Q3,DL2,C6Y,Q2,DL1,Q1,P8,C8X,DL)
injoffset: malign, dx=0.00
rc: recirc

!RF1: DRIFT,L=0.8
malin0: malign,on_pass=0,dx=0.0,dp=0.0,force_modify_matrix=0
malin1: malign,on_pass=1
w1: watch,filename="%s.w1",mode="centroid"

ring: LINE=(malin0,w1,4*ONESP)
! ring with extra monitors at the end to constrain the trajectory
!RINGT: LINE=(injoffset,rc, malin0,malin1,w1,4*ONESP,Pa)
USE,par
RETURN