TITLE, "NSLS VUV"
!       DATA COURTESY OF S. KRAMER AT BNL
Q1     :QUADRUPOLE,L=.3,K1=1.80943467
Q2     :QUADRUPOLE,L=.3,K1=-1.120912
Q3     :QUADRUPOLE,L=.3,K1=1.8797615
BD     :SBEND,L=1.5,K1=-.026784185,ANGLE=TWOPI/8.,&
        E1=PI/8.,E2=PI/8.
SF     :SEXTUPOLE,L=0.,K2=0.
SD     :SEXTUPOLE,L=0.,K2=0.
D1     :DRIFT,L=1.628
D2     :DRIFT,L=.35
D3     :DRIFT,L=.65
D4     :DRIFT,L=.41
D5     :DRIFT,L=.59
HSUP   :LINE=(D1,Q1,D2,Q2,D3,BD,D4,SD,D5,Q3,D2,SF)
USE,HSUP,SYMM,SUPER=4
PRINT,#S/E
TWISS
STOP