!##### AMOUNT OF CANONCICAL KICKS #####
% 40 sto qkicks
% 20 sto skicks
% 80 sto bkicks

!##### DRIFTS #####
DQ1 : DRIF, L=0.288
DS1 : DRIF, L=0.16
DQ2 : DRIF, L=0.42
DS2 : DRIF, L=0.307   
DB  : DRIF, L=0.42
DS3 : DRIF, L=0.153
DQ  : DRIF, L=0.153
DL  : DRIF, L=2.80600
DK  : DRIF, L=2.45300

!##### DIPOLES #####
% 0.855 sto L
% pi 16 / sto angle
% L angle / sto rho
% angle 2 / sto hangle
B : CSBEND, n_kicks="bkicks", L="L", ANGLE="angle", E1="hangle", E2="hangle"

!##### QUADS #####
Q1  : KQUAD, n_kicks="qkicks",  L=0.25, K1=2.45190
Q2  : KQUAD, n_kicks="qkicks",  L=0.20, K1=-1.89757
Q3D : KQUAD, n_kicks="qkicks",  L=0.25, K1=-2.020250494966872
Q4D : KQUAD, n_kicks="qkicks",  L=0.50, K1=1.408159470450006
Q3T : KQUAD, n_kicks="qkicks",  L=0.25, K1=-2.46319
Q4T : KQUAD, n_kicks="qkicks",  L=0.50, K1=2.62081
Q5T : KQUAD, n_kicks="qkicks",  L=0.20, K1=-2.6000

!##### SEXTUPOLES #####
S1  : KSEXT, n_kicks="skicks", L=0.105, K2=49.35808097165103
S2  : KSEXT, n_kicks="skicks", L=0.16, K2=-41.52033512035799
S3D : KSEXT, n_kicks="skicks", L=0.16, K2=-46.66222668520843
S4D : KSEXT, n_kicks="skicks", L=0.16, K2=26.97788440561498
S3T : KSEXT, n_kicks="skicks", L=0.16, K2=-59.15244659713909
S4T : KSEXT, n_kicks="skicks", L=0.16, K2=85.76518842267137

!#### ACHROMAT LEFT AND RIGHT HALF ####
ACHLH : LINE=(DQ2,Q2,DS2,S2,DQ1,Q1,DS1,S1)
ACHRH : LINE=(S1,DS1,Q1,DQ1,S2,DS2,Q2,DQ2)
    
!#### DOUBLET LEFT AND RIGHT HALF ####
DLH : LINE=(DB,Q3D,DQ,S3D,DS3,Q4D,DQ,S4D,DL)
DRH : LINE=(DL,S4D,DQ,Q4D,DS3,S3D,DQ,Q3D,DB)
    
!#### TRIPLET LEFT AND RIGHT HALF ####
TLH : LINE=(DB,Q3T,DQ,S3T,DS3,Q4T,DQ,S4T,DQ,Q5T,DK)
TRH : LINE=(DK,Q5T,DQ,S4T,DQ,Q4T,DS3,S3T,DQ,Q3T,DB)

!#### FULL TRIPLET AND DOUBLET SECTIONS (each 1/16) ####
TRI : LINE=(ACHRH, B, TLH, TRH, B, ACHLH)
DOU : LINE=(ACHRH, B, DLH, DRH, B, ACHLH)

!#### FULL BESSY II STORAGE RING #### 
CELL : LINE=(TRI,DOU)
BII  : LINE=(8*CELL)
USE,"BII"
RETURN