! *** OPTICS=LCLS2sc31MAR14 ***

! LCLS2sc bypass line, plus match to LTU

! ==============================================================================
! Modification History
! ------------------------------------------------------------------------------
! 31-MAR-2014, M. Woodley
!  * element names changed to conform to nomenclature PRD
! 25-MAR-2014, Y. Nosochkov
!  * add marker D10Js for location of D10 dump face in SXR line
!  * remove BYKIKb, SPOILERb, TDKIKb, SPOILD2b
!  * change names: D2b -> STBP33a, ST60b -> STBP33b, ST61b -> STBP33c
! 06-MAR-2014, Y. Nosochkov
!  * minor matching update
! 26-FEB-2014, Y. Nosochkov
!  * rematch to the updated spreader
! 17-JAN-2014, Y. Nosochkov
!  * add QBP36, rematch to the updated spreader
! 18-DEC-2013, Y. Nosochkov
!  * update match to the spreader
! 16-DEC-2013, Y. Nosochkov
!  * match to the updated 3-way spreader with low R56
! 03-DEC-2013, Y. Nosochkov
!  * match to the updated spreader
! 21-NOV-2013, Y. Nosochkov
!  * rematch bypass quads for the 3-way spreader system
! 17-OCT-2013, M. Woodley
!  * merge Yuri's LTU.xsif into BYP.xsif ... this file now defines QBP13
!   (center) to MUWALL
! ------------------------------------------------------------------------------

! ==============================================================================
! dipoles
! ------------------------------------------------------------------------------

! single beam dumper vertical kicker

  LKIKY := 1.0601 !kicker coil length per magnet (m) [41.737"; SA-380-330-02]

 !BYKIK1bA: SBEN, TYPE="SBD", L=LKIKY/2, ANGLE=1E-12/2, HGAP=25.4E-3, &
 !                FINT=0.5, FINTX=0  , TILT
 !BYKIK1bB: SBEN, TYPE="SBD", L=LKIKY/2, ANGLE=1E-12/2, HGAP=25.4E-3, &
 !                FINT=0  , FINTX=0.5, TILT
 !BYKIK2bA: SBEN, TYPE="SBD", L=LKIKY/2, ANGLE=1E-12/2, HGAP=25.4E-3, &
 !                FINT=0.5, FINTX=0  , TILT
 !BYKIK2bB: SBEN, TYPE="SBD", L=LKIKY/2, ANGLE=1E-12/2, HGAP=25.4E-3, &
 !                FINT=0  , FINTX=0.5, TILT

! ==============================================================================
! quadrupoles
! ------------------------------------------------------------------------------

  QFY : QUAD, L=LQM/2, TYPE="PEPII", K1= KQY, APER=rQM !dummy magnet
  QDY : QUAD, L=LQM/2, TYPE="PEPII", K1=-KQY, APER=rQM !dummy magnet

  KQY    :=  0.060580505638 !45 degree bypass FODO
  KQBP25 :=  0.065034826431 ! 0.065037593588
  KQBP26 := -0.077871170402 !-0.077866849787
  KQBP27 :=  0.082053258936 ! 0.082051970403
  KQBP35 :=  0.210131848096 ! 0.21013000698
  KQBP28 := -0.300991304085 !-0.300989159675
  KQBP36 := -0.241632809415
  KQBP30 :=  0.355504998222
  KQBP31 :=  0.126468499275
  KQBP32 := -0.199490664269
  KQBP33 :=  0.171730314175
  KQBP34 :=  KQBP33
  KQBP37 :=  KQBP36

  QBP13 : QUAD, TYPE="2Q4",  L=LQM/2, K1= KQY,    APER=rQM
  QBP14 : QUAD, TYPE="2Q4",  L=LQM/2, K1=-KQY,    APER=rQM
  QBP15 : QUAD, TYPE="2Q4",  L=LQM/2, K1= KQY,    APER=rQM
  QBP16 : QUAD, TYPE="2Q4",  L=LQM/2, K1=-KQY,    APER=rQM
  QBP17 : QUAD, TYPE="2Q4",  L=LQM/2, K1= KQY,    APER=rQM
  QBP18 : QUAD, TYPE="2Q4",  L=LQM/2, K1=-KQY,    APER=rQM
  QBP19 : QUAD, TYPE="2Q4",  L=LQM/2, K1= KQY,    APER=rQM
  QBP20 : QUAD, TYPE="2Q4",  L=LQM/2, K1=-KQY,    APER=rQM
  QBP21 : QUAD, TYPE="2Q4",  L=LQM/2, K1= KQY,    APER=rQM
  QBP22 : QUAD, TYPE="2Q4",  L=LQM/2, K1=-KQY,    APER=rQM
  QBP23 : QUAD, TYPE="2Q4",  L=LQM/2, K1= KQY,    APER=rQM
  QBP24 : QUAD, TYPE="2Q4",  L=LQM/2, K1=-KQY,    APER=rQM
  QBP25 : QUAD, TYPE="2Q4",  L=LQM/2, K1= KQBP25, APER=rQM
  QBP26 : QUAD, TYPE="2Q4",  L=LQM/2, K1= KQBP26, APER=rQM
  QBP27 : QUAD, TYPE="2Q4",  L=LQM/2, K1= KQBP27, APER=rQM
  QBP35 : QUAD, TYPE="2Q4W", L=LQM/2, K1= KQBP35, APER=rQM
  QBP28 : QUAD, TYPE="2Q4W", L=LQM/2, K1= KQBP28, APER=rQM
  QBP36 : QUAD, TYPE="2Q4W", L=LQM/2, K1= KQBP36, APER=rQM
  QBP37 : QUAD, TYPE="2Q4W", L=LQM/2, K1= KQBP37, APER=rQM
  QBP30 : QUAD, TYPE="2Q4W", L=LQM/2, K1= KQBP30, APER=rQM
  QBP31 : QUAD, TYPE="2Q4W", L=LQM/2, K1= KQBP31, APER=rQM
  QBP32 : QUAD, TYPE="2Q4W", L=LQM/2, K1= KQBP32, APER=rQM
  QBP33 : QUAD, TYPE="2Q4W", L=LQM/2, K1= KQBP33, APER=rQM
  QBP34 : QUAD, TYPE="2Q4W", L=LQM/2, K1= KQBP34, APER=rQM

! ==============================================================================
! drifts
! ------------------------------------------------------------------------------

  LCM2a  := 31.2135115 !places upstream face of muon wall at proper z-location

! bypass drifts which locate BPMs, XCORs, YCORs, WSs, and collimators w.r.t.
! bypass line "2Q4" QUADs

! DCY   : 1/2 dist. between bypass quads - from PEP-II deck
! DCYa  : corrects distance between QBP28 and QBP29
! DCYb  : corrects distance between QBP29 and QBP30
! DCYc  : corrects distance between QBP30 and QBP31

  DCY  : DRIF, L=(101.6-LQM)/2
  DCYa : DRIF, L=36.0688
  DCYb : DRIF, L=59.25482
  DCYc : DRIF, L=53.40728
  DCYd : DRIF, L=DCY[L]-35.269103
  DCYe : DRIF, L=35.269103-0.6096
  dDCYf := 0.0 !adjust Z
  dDCYg := 0.0 !adjust position of QBP36, QBP37
  DCYf : DRIF, L=7.389360792228 +dDCYf-dDCYg
  DCYg : DRIF, L=4.5 +dDCYg
  DQBP36 : DRIF, L=0.3

! D2Q4a : QUAD to BPM
! D2Q4b : BPM to XCOR
! D2Q4c : XCOR to YCOR
! D2Q4d : a+b+c+d=DCY
! D2Q4e : YCOR to collimator
! D2Q4f : a+b+c+e+Lcoll+f=DCY
! D2Q4g : collimator to wire scanner
! D2Q4h : g+h=f
! D2Q4i : YCOR to wire scanner
! D2Q4j : i+j=d
! D2Q4k : locates WSBP3
! D2Q4l : a+b+c+l=DCM1b
! D2Q4m : a+b+c+l=DCM2a
! D2Q4n : a+b+c+l=DCM3a
! D2Q4o : a+b+c+o=DCM3d

  D2Q4a : DRIF, L=0.4598
  D2Q4b : DRIF, L=0.7433
  D2Q4c : DRIF, L=0.2794
  D2Q4d : DRIF, L=DCY[L]-(D2Q4a[L]+D2Q4b[L]+D2Q4c[L])
  D2Q4e : DRIF, L=1.26
  D2Q4f : DRIF, L=D2Q4d[L]-(D2Q4e[L]+Lcoll)
  D2Q4h : DRIF, L=2.4
  D2Q4g : DRIF, L=D2Q4f[L]-D2Q4h[L]
  D2Q4j : DRIF, L=1.0
  D2Q4i : DRIF, L=D2Q4d[L]-D2Q4j[L]
  D2Q4k : DRIF, L=2.0
  D2Q4l : DRIF, L=DCM1b[L]-(D2Q4a[L]+D2Q4b[L]+D2Q4c[L])
  D2Q4m : DRIF, L=DCM2a[L]-(D2Q4a[L]+D2Q4b[L]+D2Q4c[L])
  D2Q4n : DRIF, L=DCM3a[L]-(D2Q4a[L]+D2Q4b[L]+D2Q4c[L])
  D2Q4o : DRIF, L=DCM3d[L]-(D2Q4a[L]+D2Q4b[L]+D2Q4c[L])
  D2Q4q : DRIF, L=0.5
  D2Q4s : DRIF, L=D2Q4d[L]-LQM/2 +35.0
  D2Q4t : DRIF, L=D2Q4d[L]-LQM/2 -35.0

  DDL1c  : DRIF, L=0.609226+1.0601/2

! DCM1b : separates QBP31 from QBP32
! DCM2a+DCM2b : separates QBP32 from the face of D10
! DCM2c : separates STBP33a from STBP33b
! DCM2d : separates STBP33b from QBP33
! DCM2e : separates the face of D10 from STBP33a
! DCM3a : separates QBP33 from STBP33c
! DCM3b+DCM3c+2*DDL1C : separates STBP33c from QBP34
! DCM3d+DCWL : separates QBP34 from MUWALL

  DCM1b : DRIF, L=58.22939075-3.048
  DCM2a : DRIF, L=LCM2a+3.6576
  DCM2b : DRIF, L=295.3*in2m -DCM2e[L]
  DCM2c : DRIF, L=59.0*in2m
  DCM2d : DRIF, L=59.1*in2m-LQM/2 +1.2192
  DCM2e : DRIF, L=4.201207
  DCM3a : DRIF, L=215.9*in2m-LQM/2-1.2192
  DCM3b : DRIF, L=80.0*in2m-DDL1C[L]
  DCM3c : DRIF, L=286.8*in2m-DDL1C[L]-LQM/2-2.032
  DCM3d : DRIF, L=41.8*in2m-LQM/2+2.032
  DCWL  : DRIF, L=40.0*in2m + 272.4*in2m

! ==============================================================================
! collimators
! ------------------------------------------------------------------------------

! CX13 : 3 mm half-gap in X in bypass-line
! CY14 : 3 mm half-gap in Y in bypass-line
! CX17 : 3 mm half-gap in X in bypass-line
! CY18 : 3 mm half-gap in Y in bypass-line

  CX13 : RCOL, L=Lcoll, XSIZE=3E-3 , YSIZE=20E-3
  CY14 : RCOL, L=Lcoll, XSIZE=20E-3, YSIZE=3E-3
  CX17 : RCOL, L=Lcoll, XSIZE=3E-3 , YSIZE=20E-3
  CY18 : RCOL, L=Lcoll, XSIZE=20E-3, YSIZE=3E-3

  DCX23 : DRIF, L=Lcoll
  DCY24 : DRIF, L=Lcoll
  DCX27 : DRIF, L=Lcoll
  DCY28 : DRIF, L=Lcoll

! ==============================================================================
! BPMs
! ------------------------------------------------------------------------------

  BPMBP13 : MONI, TYPE="05_um_res_R0"
  BPMBP14 : MONI, TYPE="05_um_res_R0"
  BPMBP15 : MONI, TYPE="05_um_res_R0"
  BPMBP16 : MONI, TYPE="05_um_res_R0"
  BPMBP17 : MONI, TYPE="05_um_res_R0"
  BPMBP18 : MONI, TYPE="05_um_res_R0"
  BPMBP19 : MONI, TYPE="05_um_res_R0"
  BPMBP20 : MONI, TYPE="05_um_res_R0"
  BPMBP21 : MONI, TYPE="05_um_res_R0"
  BPMBP22 : MONI, TYPE="05_um_res_R0"
  BPMBP23 : MONI, TYPE="05_um_res_R0" !2/22/11
  BPMBP24 : MONI, TYPE="05_um_res_R0" !2/22/11
  BPMBP25 : MONI, TYPE="05_um_res_R0" !2/22/11
  BPMBP26 : MONI, TYPE="05_um_res_R0" !2/22/11
  BPMBP27 : MONI, TYPE="05_um_res_R0" !2/22/11
  BPMBP35 : MONI, TYPE="05_um_res_R0" !10/1/13
  BPMBP28 : MONI, TYPE="05_um_res_R0" !2/22/11
  BPMBP37 : MONI, TYPE="05_um_res_R0"
  BPMBP30 : MONI, TYPE="05_um_res_R0"
  BPMBP31 : MONI, TYPE="05_um_res_R0"
  BPMBP32 : MONI, TYPE="05_um_res_R0"
  BPMBP33 : MONI, TYPE="05_um_res_R0"
  BPMBP34 : MONI, TYPE="05_um_res_R0"

! ==============================================================================
! XCORs
! ------------------------------------------------------------------------------

  XCBP13 : HKIC, TYPE="Bypass"
  XCBP14 : HKIC, TYPE="Bypass"
  XCBP15 : HKIC, TYPE="Bypass"
  XCBP16 : HKIC, TYPE="Bypass"
  XCBP17 : HKIC, TYPE="Bypass"
  XCBP18 : HKIC, TYPE="Bypass"
  XCBP19 : HKIC, TYPE="Bypass"
  XCBP20 : HKIC, TYPE="Bypass"
  XCBP21 : HKIC, TYPE="Bypass"
  XCBP22 : HKIC, TYPE="Bypass"
  XCBP23 : HKIC, TYPE="type-4" !2/22/11
  XCBP24 : HKIC, TYPE="Bypass#2" !4/18/13
  XCBP25 : HKIC, TYPE="Bypass#2" !4/18/13
  XCBP26 : HKIC, TYPE="Bypass#2" !4/18/13
  XCBP27 : HKIC, TYPE="Bypass#2" !4/18/13
  XCBP35 : HKIC, TYPE="Bypass#2" !10/1/13
  XCBP28 : HKIC, TYPE="Bypass#2" !4/18/13
  XCBP37 : HKIC, TYPE="Bypass"
  XCBP30 : HKIC, TYPE="Bypass"
  XCBP31 : HKIC, TYPE="Bypass"
  XCBP32 : HKIC, TYPE="Bypass"
  XCBP33 : HKIC, TYPE="Bypass"
  XCBP34 : HKIC, TYPE="Bypass"

! ==============================================================================
! YCORs
! ------------------------------------------------------------------------------

  YCBP13 : VKIC, TYPE="Bypass"
  YCBP14 : VKIC, TYPE="Bypass"
  YCBP15 : VKIC, TYPE="Bypass"
  YCBP16 : VKIC, TYPE="Bypass"
  YCBP17 : VKIC, TYPE="Bypass"
  YCBP18 : VKIC, TYPE="Bypass"
  YCBP19 : VKIC, TYPE="Bypass"
  YCBP20 : VKIC, TYPE="Bypass"
  YCBP21 : VKIC, TYPE="Bypass"
  YCBP22 : VKIC, TYPE="Bypass"
  YCBP23 : VKIC, TYPE="type-4" !2/22/11
  YCBP24 : VKIC, TYPE="Bypass#2" !4/18/13
  YCBP25 : VKIC, TYPE="Bypass#2" !4/18/13
  YCBP26 : VKIC, TYPE="Bypass#2" !4/18/13
  YCBP27 : VKIC, TYPE="Bypass#2" !4/18/13
  YCBP35 : VKIC, TYPE="Bypass#2" !10/1/13
  YCBP28 : VKIC, TYPE="Bypass#2" !4/18/13
  YCBP37 : VKIC, TYPE="Bypass"
  YCBP30 : VKIC, TYPE="Bypass"
  YCBP31 : VKIC, TYPE="Bypass"
  YCBP32 : VKIC, TYPE="Bypass"
  YCBP33 : VKIC, TYPE="Bypass"
  YCBP34 : VKIC, TYPE="Bypass"

! ==============================================================================
! diagnostics, etc.
! ------------------------------------------------------------------------------

  WSBP1 : WIRE
  WSBP2 : WIRE
  WSBP3 : WIRE
  WSBP4 : WIRE

 !SPOILD2b : INST           !STBP33a spoiler
  STBP33a  : INST           !center of STBP33a
  STBP33b  : INST           !STBP33a 1st backup stopper
  STBP33c  : INST           !STBP33a 2nd backup stopper
 !SPOILERb : INST           !SBD dump spoiler
 !TDKIKb   : INST, L=0.6096 !SBD vertical off-axis kicker dump (24" long)

! ==============================================================================
! MARKER points
! ------------------------------------------------------------------------------

! Q2MRK : QBP23 (Q285330T) quad center (Z=2270.531303)
! S100B : Station-100B is same Z as Station-100, but off axis in X & Y

  Q2MRK : MARK
  S100B : MARK
  D10Js : MARK !face of D10 dump
  LTUSPLIT : MARK !SXR/HXR split point

! ==============================================================================
! BEAMLINEs
! ------------------------------------------------------------------------------

  FODO : LINE=(QFY,DCY,DCY,QDY,QDY,DCY,DCY,QFY)

  FODOLa : LINE=(&
    QBP13,D2Q4a,BPMBP13,D2Q4b,XCBP13,D2Q4c,YCBP13,D2Q4e,&
      CX13,D2Q4f,DCY,&
    QBP14,QBP14,D2Q4a,BPMBP14,D2Q4b,XCBP14,D2Q4c,YCBP14,D2Q4e,&
      CY14,D2Q4g,WSBP1,D2Q4h,DCY,&
    QBP15,QBP15,D2Q4a,BPMBP15,D2Q4b,XCBP15,D2Q4c,YCBP15,D2Q4d,DCY,&
    QBP16,QBP16,D2Q4a,BPMBP16,D2Q4b,XCBP16,D2Q4c,YCBP16,D2Q4i,&
      WSBP2,D2Q4j,DCY,&
    QBP17,QBP17,D2Q4a,BPMBP17,D2Q4b,XCBP17,D2Q4c,YCBP17,D2Q4e,&
      CX17,D2Q4f,DCY,&
    QBP18,QBP18,D2Q4a,BPMBP18,D2Q4b,XCBP18,D2Q4c,YCBP18,D2Q4e,&
      CY18,D2Q4g,WSBP3,D2Q4h,DCY,&
    QBP19,QBP19,D2Q4a,BPMBP19,D2Q4b,XCBP19,D2Q4c,YCBP19,D2Q4d,DCY,&
    QBP20,QBP20,D2Q4a,BPMBP20,D2Q4b,XCBP20,D2Q4c,YCBP20,D2Q4i,&
      WSBP4,D2Q4j,DCY,&
    QBP21,QBP21,D2Q4a,BPMBP21,D2Q4b,XCBP21,D2Q4c,YCBP21,D2Q4d,DCY,&
    QBP22,QBP22,D2Q4a,BPMBP22,D2Q4b,XCBP22,D2Q4c,YCBP22,D2Q4d,DCY,&
    QBP23,Q2MRK,QBP23,D2Q4a,BPMBP23,D2Q4b,XCBP23,D2Q4c,YCBP23,D2Q4d,DCY,&
    QBP24,QBP24,D2Q4a,BPMBP24,D2Q4b,XCBP24,D2Q4c,YCBP24,D2Q4d,DCY,&
    QBP25,QBP25,D2Q4a,BPMBP25,D2Q4b,XCBP25,D2Q4c,YCBP25,D2Q4d,DCY,&
    QBP26,QBP26,D2Q4a,BPMBP26,D2Q4b,XCBP26,D2Q4c,YCBP26,D2Q4d,DCY,&
    QBP27,QBP27,D2Q4a,BPMBP27,D2Q4b,XCBP27,D2Q4c,YCBP27,D2Q4s,&
    QBP35,QBP35,D2Q4a,BPMBP35,D2Q4b,XCBP35,D2Q4c,YCBP35,D2Q4t,&
    QBP28,QBP28,D2Q4a,BPMBP28,D2Q4b,XCBP28,D2Q4c,YCBP28,D2Q4q,&
    ENDBYP,&
    LTUSPLIT,&
    SEQ05END)

  FODOLb : LINE=(&
    SPRDs,DCYf,&
    QBP36,QBP36,DQBP36,&
    QBP37,QBP37,D2Q4a,BPMBP37,D2Q4b,XCBP37,D2Q4c,YCBP37,DCYg,&
    QBP30,QBP30,D2Q4a,BPMBP30,D2Q4b,XCBP30,D2Q4c,YCBP30,DCYc)

  FODOL : LINE=(FODOLa,FODOLb)

  BYPM : LINE=(DCYd,S100B,DCYe,&
    QBP31,QBP31,D2Q4a,BPMBP31,D2Q4b,XCBP31,D2Q4c,YCBP31,D2Q4l,&
    QBP32,QBP32,D2Q4a,BPMBP32,D2Q4b,XCBP32,D2Q4c,YCBP32,D2Q4m,&
      DCM2b,D10Js,DCM2e,STBP33a,DCM2c,STBP33b,DCM2d,&
    QBP33,QBP33,D2Q4a,BPMBP33,D2Q4b,XCBP33,D2Q4c,YCBP33,D2Q4n,&
      STBP33c,DCM3b,DDL1C,DDL1C,DCM3c,&
    QBP34,QBP34,D2Q4a,BPMBP34,D2Q4b,XCBP34,D2Q4c,YCBP34,D2Q4o,&
      DCWL)

  BYPASS : LINE=(FODOL,BYPM)

! ------------------------------------------------------------------------------

  RETURN