
! *** OPTICS=AD_ACCEL-13JUN19 ***

! HXR XTES

! ==============================================================================
! Modification History
! ------------------------------------------------------------------------------
! 20-JUN-2018, M. Woodley
!  * PCPM3: keyw=ECOL, L=LPCPMW, XSIZE=0.008, YSIZE=0.008
! ------------------------------------------------------------------------------
! 09-JAN-2018, M. Woodley
!  * from: 2017-11-21__REF__XTES_BG_HXR__mo37504899_update2017-12-19.xlsx
! ------------------------------------------------------------------------------

! ==============================================================================
! mirrors
! ------------------------------------------------------------------------------

! NOTE: change mirrors from MULT to INST for Matlab model generator creation!

  a1x := -0.0042 ; a1y := 0.0
  a2x :=  0.0042 ; a2y := 0.0

  M1L0 : MULT, TYPE="MIRROR", K0L=a1x
  M2L0 : MULT, TYPE="MIRROR", K0L=a2x

 !M1L0 : INST, TYPE="MIRROR"
 !M2L0 : INST, TYPE="MIRROR"

! ==============================================================================
! DRIF
! ------------------------------------------------------------------------------

  a12x := a1x+a2x ; a12y := a1y +a2y

  DHXTES01 : DRIF, L=0.472
  DHXTES02 : DRIF, L=1.244
  DHXTES03 : DRIF, L=3.506
  DHXTES04 : DRIF, L=1.0
  DHXTES05 : DRIF, L=0.0
  DHXTES06 : DRIF, L=0.0
  DHXTES07 : DRIF, L=4.2364483799
  DHXTES08 : DRIF, L=0.1422748201
  DHXTES09 : DRIF, L=0.0
  DHXTES10 : DRIF, L=0.4112768-LPCPMW/2
  DHXTES11 : DRIF, L=0.0
  DHXTES12 : DRIF, L=0.16-LPCPMW/2
  DHXTES13 : DRIF, L=0.8059
  DHXTES14 : DRIF, L=0.0
  DHXTES15 : DRIF, L=1.1298914
  DHXTES16 : DRIF, L=0.3642086
  DHXTES17 : DRIF, L=0.0762
  DHXTES18 : DRIF, L=5.5038
  DHXTES19 : DRIF, L=2.34
  DHXTES20 : DRIF, L=0.2151282
  DHXTES21 : DRIF, L=0.0966606
  DHXTES22 : DRIF, L=0.0
  DHXTES23 : DRIF, L=0.0
  DHXTES24 : DRIF, L=2.20007119
  DHXTES25 : DRIF, L=0.06335691
  DHXTES26 : DRIF, L=1.7027831
  DHXTES27 : DRIF, L=3.097995
  DHXTES28 : DRIF, L=3.098005
  DHXTES29 : DRIF, L=1.623186076
  DHXTES30 : DRIF, L=0.0
  DHXTES31 : DRIF, L=0.0
  DHXTES32 : DRIF, L=0.505514924
  DHXTES33 : DRIF, L=0.4156609
  DHXTES34 : DRIF, L=0.2727363
  DHXTES35 : DRIF, L=0.1793446
  DHXTES36 : DRIF, L=0.2931593
  DHXTES37 : DRIF, L=0.4112028
  DHXTES38 : DRIF, L=1.2223747
  DHXTES39 : DRIF, L=0.5262329
  DHXTES40 : DRIF, L=0.487171995
  DHXTES41 : DRIF, L=0.431850805
  DHXTES42 : DRIF, L=0.1409877
  DHXTES43 : DRIF, L=0.0
  DHXTES44 : DRIF, L=0.0
  DHXTES45 : DRIF, L=0.1423749
  DHXTES46 : DRIF, L=0.9542021

! mirror #1 (M1L0; horizontal)

  DHXTES47 : DRIF, L=1.0397644  /COS(a1x) /COS(a1y)
  DHXTES48 : DRIF, L=2.4731437  /COS(a1x) /COS(a1y)
  DHXTES49 : DRIF, L=0.0        /COS(a1x) /COS(a1y)
  DHXTES50 : DRIF, L=0.308033894/COS(a1x) /COS(a1y)
  DHXTES51 : DRIF, L=0.319058006/COS(a1x) /COS(a1y)
  DHXTES52 : DRIF, L=0.12245    /COS(a1x) /COS(a1y)
  DHXTES53 : DRIF, L=0.0568946  /COS(a1x) /COS(a1y)
  DHXTES54 : DRIF, L=0.3206554  /COS(a1x) /COS(a1y)
  DHXTES55 : DRIF, L=1.4845097  /COS(a1x) /COS(a1y)
  DHXTES56 : DRIF, L=0.1422743  /COS(a1x) /COS(a1y)
  DHXTES57 : DRIF, L=0.0        /COS(a1x) /COS(a1y)
  DHXTES58 : DRIF, L=0.0        /COS(a1x) /COS(a1y)
  DHXTES59 : DRIF, L=0.0        /COS(a1x) /COS(a1y)
  DHXTES60 : DRIF, L=1.019216   /COS(a1x) /COS(a1y)

! mirror #2 (M2L0; horizontal)

  DHXTES61 : DRIF, L=0.9667925  /COS(a12x)/COS(a12y)
  DHXTES62 : DRIF, L=0.4503304  /COS(a12x)/COS(a12y)
  DHXTES63 : DRIF, L=0.5268771  /COS(a12x)/COS(a12y)
  DHXTES64 : DRIF, L=0.0        /COS(a12x)/COS(a12y)
  DHXTES65 : DRIF, L=0.0        /COS(a12x)/COS(a12y)
  DHXTES66 : DRIF, L=0.0        /COS(a12x)/COS(a12y)
  DHXTES67 : DRIF, L=0.0        /COS(a12x)/COS(a12y)
  DHXTES68 : DRIF, L=0.3351736  /COS(a12x)/COS(a12y)
  DHXTES69 : DRIF, L=0.142401456/COS(a12x)/COS(a12y)
  DHXTES70 : DRIF, L=2.167424944/COS(a12x)/COS(a12y)
  DHXTES71 : DRIF, L=0.12245    /COS(a12x)/COS(a12y)
  DHXTES72 : DRIF, L=0.0568946  /COS(a12x)/COS(a12y)
  DHXTES73 : DRIF, L=1.3854904  /COS(a12x)/COS(a12y)
  DHXTES74 : DRIF, L=0.73931966 /COS(a12x)/COS(a12y)
  DHXTES75 : DRIF, L=0.77084634 /COS(a12x)/COS(a12y)
  DHXTES76 : DRIF, L=0.654999   /COS(a12x)/COS(a12y)
  DHXTES77 : DRIF, L=0.12245    /COS(a12x)/COS(a12y)
  DHXTES78 : DRIF, L=0.0568946  /COS(a12x)/COS(a12y)
  DHXTES79 : DRIF, L=0.3058936  /COS(a12x)/COS(a12y)
  DHXTES80 : DRIF, L=0.2697618  /COS(a12x)/COS(a12y)
  DHXTES81 : DRIF, L=1.93       /COS(a12x)/COS(a12y)
  DHXTES82 : DRIF, L=1.71       /COS(a12x)/COS(a12y)
  DHXTES83 : DRIF, L=0.0        /COS(a12x)/COS(a12y)
  DHXTES84 : DRIF, L=0.0        /COS(a12x)/COS(a12y)
  DHXTES85 : DRIF, L=2.8140924  /COS(a12x)/COS(a12y)
  DHXTES86 : DRIF, L=4.1859076  /COS(a12x)/COS(a12y)

! ==============================================================================
! instruments
! ------------------------------------------------------------------------------

  MBXPM1   : INST, TYPE="MAGNET"
  MBXPM2   : INST, TYPE="MAGNET"
  IP5H     : INST, TYPE="ION PUMP"
  R02H     : INST, TYPE="RIGHT ANGLE VALV"
  CG1H     : INST, TYPE="COLD CATHODE GAU"
  PG1H     : INST, TYPE="PIRANI GAUGE"
  VV10     : INST, TYPE="GATE VALVE"
  IP7H     : INST, TYPE="ION PUMP"
  R03H     : INST, TYPE="RIGHT ANGLE VALV"
  PCPM3    : ECOL, L=LPCPMW, XSIZE=0.008, YSIZE=0.008, TYPE="ADJ APER"
  BTM3     : INST, TYPE="BTM" !Burn-Through-Monitor behind PCPM3
  SENSOR1  : INST, TYPE="FAST VALVE SENSO"
  CG7H     : INST, TYPE="COLD CATHODE GAU"
  PG7H     : INST, TYPE="PIRANI GAUGE"
  IP6H     : INST, TYPE="ION PUMP"
  MSFTDMP  : INST, TYPE="SAFETY DUMP"
  MBTMSFT  : INST, TYPE="BTM"
  WALL1HE  : INST, TYPE="EAST WALL"
  WALL1HW  : INST, TYPE="WEST WALL"
  VV3H     : INST, TYPE="GATE VALVE"
  R06H     : INST, TYPE="RIGHT ANGLE VALV"
  CG2H     : INST, TYPE="COLD CATHODE GAU"
  PG2H     : INST, TYPE="PIRANI GAUGE"
  SL1H     : INST, TYPE="ADJ APER"
  IP1H     : INST, TYPE="ION PUMP"
  GEM1     : INST, TYPE="GAS ENERGY MONIT"
  AT1H     : INST, TYPE="GAS ATTEN"
  GEM2     : INST, TYPE="GAS ENERGY MONIT"
  RO7H     : INST, TYPE="RIGHT ANGLE VALV"
  CG10H    : INST, TYPE="COLD CATHODE GAU"
  PG10H    : INST, TYPE="PIRANI GAUGE"
  AT2H     : INST, TYPE="SOLID ATTEN"
  VV4H     : INST, TYPE="GATE VALVE"
  PC1H     : INST, TYPE="PHOTON COLL"
  PCB1H    : INST, TYPE="BREMSS COLL"
  IM2H     : INST, TYPE="IMAGER"
  SL2H     : INST, TYPE="ADJ APER"
  SP2H     : INST, TYPE="K MONO"
  RGA1H    : INST, TYPE="RGA"
  PA1H     : INST, TYPE="DIFF PUMP"
  FV1H     : INST, TYPE="FAST VALVE"
  R04H     : INST, TYPE="RIGHT ANGLE VALV"
  CG3H     : INST, TYPE="COLD CATHODE GAU"
  PG3H     : INST, TYPE="PIRANI GAUGE"
  VV5H     : INST, TYPE="GATE VALVE"
  IP8H     : INST, TYPE="ION PUMP"
  CG4H     : INST, TYPE="COLD CATHODE GAU"
  PG4H     : INST, TYPE="PIRANI GAUGE"
  IM3H     : INST, TYPE="IMAGER"
  PC2H     : INST, TYPE="PHOTON COLL"
  BTM2H    : INST, TYPE="BTM"
  PCB2H    : INST, TYPE="BREMSS COLL"
  SW1H     : INST, TYPE="SHADOW WALL"
  VV6H     : INST, TYPE="GATE VALVE"
  IP2H     : INST, TYPE="ION PUMP"
  CG5H     : INST, TYPE="COLD CATHODE GAU"
  PG5H     : INST, TYPE="PIRANI GAUGE"
  BD1H     : INST, TYPE="BURST DISK"
  FV2H     : INST, TYPE="FAST VALVE"
  PA2H     : INST, TYPE="DIFF PUMP"
  RGA2H    : INST, TYPE="RGA"
  RO5H     : INST, TYPE="RIGHT ANGLE VALV"
  CG6H     : INST, TYPE="COLD CATHODE GAU"
  PG6H     : INST, TYPE="PIRANI GAUGE"
  PC5H     : INST, TYPE="PHOTON COLL"
  IP11H    : INST, TYPE="ION PUMP"
  VV7H     : INST, TYPE="GATE VALVE"
  PC3H     : INST, TYPE="PHOTON COLL"
  BTM3H    : INST, TYPE="BTM"
  PCB3H    : INST, TYPE="BREMSS COLL"
  IP9H     : INST, TYPE="ION PUMP"
  IM4H     : INST, TYPE="IMAGER"
  ST1H     : INST, TYPE="PPS STOPPER"
  PC4H     : INST, TYPE="PHOTON COLL"
  BTM4H    : INST, TYPE="BTM"
  PCB4H    : INST, TYPE="BREMSS COLL"
  IP10H    : INST, TYPE="ION PUMP"
  WALL2HE  : INST, TYPE="EAST WALL"
  WALL2HW  : INST, TYPE="WEST WALL"
  RO8H     : INST, TYPE="RIGHT ANGLE VALV"
  CG8H     : INST, TYPE="COLD CATHODE GAU"
  PG8H     : INST, TYPE="PIRANI GAUGE"
  VV11H    : INST, TYPE="GATE VALVE"
  SENSOR2  : INST, TYPE="FAST VALVE SENSO"

! ==============================================================================
! BEAMLINE
! ------------------------------------------------------------------------------

  HXTES : LINE=(BEGHXTES,DHXTES01,MBXPM1,DHXTES02,MBXPM2,DHXTES03,&
    IP5H,DHXTES04,R02H,DHXTES05,CG1H,DHXTES06,PG1H,DHXTES07,VV10,DHXTES08,&
    IP7H,DHXTES09,R03H,DHXTES10,PCPM3,DHXTES11,BTM3,DHXTES12,&
    SENSOR1,DHXTES13,CG7H,DHXTES14,PG7H,DHXTES15,IP6H,DHXTES16,&
    MSFTDMP,DHXTES17,MBTMSFT,DHXTES18,WALL1HE,DHXTES19,WALL1HW,DHXTES20,&
    VV3H,DHXTES21,R06H,DHXTES22,CG2H,DHXTES23,PG2H,DHXTES24,SL1H,DHXTES25,&
    IP1H,DHXTES26,GEM1,DHXTES27,AT1H,DHXTES28,GEM2,DHXTES29,RO7H,DHXTES30,&
    CG10H,DHXTES31,PG10H,DHXTES32,AT2H,DHXTES33,VV4H,DHXTES34,&
    PC1H,DHXTES35,PCB1H,DHXTES36,IM2H,DHXTES37,SL2H,DHXTES38,SP2H,DHXTES39,&
    RGA1H,DHXTES40,PA1H,DHXTES41,FV1H,DHXTES42,R04H,DHXTES43,CG3H,DHXTES44,&
    PG3H,DHXTES45,VV5H,DHXTES46,M1L0,DHXTES47,IP8H,DHXTES48,CG4H,DHXTES49,&
    PG4H,DHXTES50,IM3H,DHXTES51,PC2H,DHXTES52,BTM2H,DHXTES53,&
    PCB2H,DHXTES54,SW1H,DHXTES55,VV6H,DHXTES56,IP2H,DHXTES57,CG5H,DHXTES58,&
    PG5H,DHXTES59,BD1H,DHXTES60,M2L0,DHXTES61,FV2H,DHXTES62,PA2H,DHXTES63,&
    RGA2H,DHXTES64,RO5H,DHXTES65,CG6H,DHXTES66,PG6H,DHXTES67,PC5H,DHXTES68,&
    IP11H,DHXTES69,VV7H,DHXTES70,PC3H,DHXTES71,BTM3H,DHXTES72,&
    PCB3H,DHXTES73,IP9H,DHXTES74,IM4H,DHXTES75,ST1H,DHXTES76,PC4H,DHXTES77,&
    BTM4H,DHXTES78,PCB4H,DHXTES79,IP10H,DHXTES80,WALL2HE,DHXTES81,&
    WALL2HW,DHXTES82,RO8H,DHXTES83,CG8H,DHXTES84,PG8H,DHXTES85,&
    VV11H,DHXTES86,SENSOR2,ENDHXTES)

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

  RETURN
