! *** OPTICS=LCLS2sc28NOV16 ***

! ==============================================================================
! Modification History
! ------------------------------------------------------------------------------
! 02-NOV-2016, Y. Nosochkov
!  * update BSYH2 definition for use with A-line pulsed magnets
! ------------------------------------------------------------------------------
! 24-JUN-2016, Y. Nosochkov
!  * update beamline definitions to avoid duplication with other files
! ------------------------------------------------------------------------------

! ------------------------------------------------------------------------------
! from copper linac
! ------------------------------------------------------------------------------

  CLTH0 : LINE=(BEGCLTH0,BSYBEG,BSYS100,S100SXRA,ENDCLTH0)

  CLTH1 : LINE=(BEGCLTH1,S100SXRB,ENDCLTH1)

  DBKRCUSA : DRIF, L=BKRCUSA[L] ; DBKRCUSB : DRIF, L=BKRCUSB[L]
  DBLRCUSA : DRIF, L=BLRCUSA[L] ; DBLRCUSB : DRIF, L=BLRCUSB[L]
  DBXSP1HA : DRIF, L=BXSP1HA[L] ; DBXSP1HB : DRIF, L=BXSP1HB[L]

  CLTH2 : LINE=(&
    BEGCLTH2,&
    DBKRCUSA,DBKRCUSB,DCUSBLRA,BPMCUS,DCUSBLRB,&
    DBLRCUSA,DBLRCUSB,DBSY52D,&
    DBXSP1HA,DBXSP1HB,ENDBSY1,&
    ENDCLTH2)

  BSYH1 : LINE=(BEGBSYH1,SPHAL,ENDBSYH1)

  BSYH2 : LINE=(&
    BEGBSYH2,&
    DBKXAPM1a,DBKXAPM1b,DZAPM1,PCAPM1,DZAPM1,&
    DBKXAPM2a,DBKXAPM2b,DZAPM2,PCAPM2,DZAPM2,&
    DBKXAPM3a,DBKXAPM3b,DZAPM3,PCAPM3,DZAPM3,&
    DBKXAPM4a,DBKXAPM4b,DZAPM4,PCAPM4,DZA01,&
    PCBSY2,BTMBSY2,DZA02,DUMPBSYA,&
    SPHBSYB,&
    ENDBSYH2)

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

  CLTS : LINE=(BEGCLTS,KCUSXR,DLCUSXR,ENDCLTS)

  BSYS : LINE=(&
    BEGBSYS,BYPM2,MUWALLB,DWALLA,DUMPBSYS,DWALLB,BSYENDB,ENDBSYS)

! ------------------------------------------------------------------------------
 
  BSYA : LINE=(BEGBSYA,ALINEA,ALINEB,ALINEC)

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

  LTUS : LINE=(DBLDL21,LTUSC,RWWAKE5S,ENDLTUS)
  LTUH : LINE=(LTU)

  BSYLTUH  : LINE=(CLTH0,CLTH1,CLTH2,BSYH1,BSYH2,LTUH,HXRUND,DUMPLINE)
  BSYLTUHS : LINE=(CLTH0,CLTH1,CLTH2,BSYH1,BSYH2,LTUH,HXRUND,SFTDUMP)
  BSYLTUS  : LINE=(CLTH0,CLTH1,CLTS,BSYS,LTUS,SXRUND,DUMPLINEb)
  BSYLTUSS : LINE=(CLTH0,CLTH1,CLTS,BSYS,LTUS,SXRUND,SFTDUMPb)
  BSYALINE : LINE=(CLTH0,CLTH1,CLTH2,BSYH1,BSYA)

  LCLS2cuC  : LINE=(DL1,L1,BC1,L2,BC2,L3) !common
  LCLS2cuH  : LINE=(LCLS2cuC,BSYLTUH)     !to HXR
  LCLS2cuHS : LINE=(LCLS2cuC,BSYLTUHS)    !to HXR safety dump
  LCLS2cuS  : LINE=(LCLS2cuC,BSYLTUS)     !to SXR
  LCLS2cuSS : LINE=(LCLS2cuC,BSYLTUSS)    !to SXR safety dump
  LCLS2cuA  : LINE=(LCLS2cuC,BSYALINE)    !to A-line

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

  RETURN