!===================================================================================== ! TITLE, "FLASH optics: FEL mode, 24.09.2007" ! !===================================================================================== ! ! Option 1: ! !CALL, "FLASH_QUAD_OP1.mad" ! ! Option 2: ! CALL, "FLASH_QUAD_OP2.mad" ! !===================================================================================== ! ! 23.04.2003: Created by N. Golubeva ! !===================================================================================== ! 07.09.2007: ! Part of injector starting from Linac0 is added. ! The new position of Chatode is z = -0.300 m. ! 13.06.2007: ! Components of Optical Replica are added: ! - Modulator: z_centre = 167.878 m; ! - chicane dipoles; ! - Radiator; ! - two OTR stations; ! - extra steerer. ! 11.06.2007: ! Four OTR stations in SEED line are changed by OTR+WS stations. ! 06.06.2007: ! EXP section is modified: ! - Q10/Q11EXP are changed to TQB type; ! - new steerer H1EXP/V1EXP and H3EXP/V3EXP are added; ! - FIR undulator is centered in 4.8 m drift. ! 14.05.2007: ! Module ACC6 is introduced. ! 10.05.2007: ! Undulator matrices (natural focusing of FLASH undulator): ! for the beam energy of 1 GeV. ! 10.04.2006: ! For RF accelerator cavities the standing wave model (LCAV), ! introduced in MAD by W.Decking, is used. !===================================================================================== dump_tilt = -(83.00 / 180.0) * PI !===================================================================================== ! Effective length of quadrupole and sextupole magnets: !===================================================================================== ! lpo_tqa = 0.2500 lef_tqa = 0.2768 len_tqa = lef_tqa ! lpo_tqb = 0.3000 lef_tqb = 0.3286 len_tqb = lef_tqb ! lpo_tqm = 0.3000 lef_tqm = 0.3286 len_tqm = lef_tqm ! lpo_tqg = 0.110 lef_tqg = 0.12716 len_tqg = lef_tqg ! lpo_tqd = 0.3000 lef_tqd = 0.3046 len_tqd = lef_tqd ! lpo_tqf = 0.3400 lef_tqf = 0.3728 len_tqf = lef_tqf ! lpo_qmn = 0.300 lef_qmn = 0.335 len_qmn = lef_qmn ! lpo_qc = 1.000 lef_qc = 0.0 len_qc = lpo_qc ! lpo_qa = 0.150 lef_qa = 0.185 len_qa = lef_qa ! lpo_qtsE = 0.050 lpo_qtsI = 0.100 lef_qtsE = 0.093 lef_qtsI = 0.131 len_qtsE = lef_qtsE len_qtsI = lef_qtsI ! lpo_tsb = 0.200 lef_tsb = 0.215 len_tsb = lef_tsb ! !===================================================================================== ! Fitting of the model of quadrupole field in the reserved place. !===================================================================================== ! ! Quadrupole type TQA: ! D0075a: DRIFT, L = 0.075 - 0.5 * (len_tqa - lpo_tqa) D0100a: DRIFT, L = 0.100 - 0.5 * (len_tqa - lpo_tqa) ! ! Quadrupole type TQB: ! D0075b: DRIFT, L = 0.075 - 0.5 * (len_tqb - lpo_tqb) D0100b: DRIFT, L = 0.100 - 0.5 * (len_tqb - lpo_tqb) ! ! Quadrupole type TQM (TQB-modified): ! D0100bm: DRIFT, L = 0.075 - 0.5 * (len_tqb - lpo_tqb) ! ! Quadrupole type TQD (Danfysik): ! D0075d: DRIFT, L = 0.075 - 0.5 * (len_tqd - lpo_tqd) ! ! Quadrupole type TQG (undulator): ! D0025g: DRIFT, L = 0.025 - 0.5 * (len_tqg - lpo_tqg) D0076g: DRIFT, L = 0.076 - 0.5 * (len_tqg - lpo_tqg) ! ! Quadrupole type TQF (Protvino): ! D0100f: DRIFT, L = 0.100 - 0.5 * (len_tqf - lpo_tqf) D0093f: DRIFT, L = 0.093 - 0.5 * (len_tqf - lpo_tqf) ! ! Quadrupole type QMN: ! D0299n: DRIFT, L = 0.299 - 0.5 * (len_qmn - lpo_qmn) ! ! Quadrupole type QC: ! D0200c: DRIFT, L = 0.200 - 0.5 * (len_qc - lpo_qc) ! ! Quadrupole type QA (cold): ! D0100qa: DRIFT, L = 0.100 - 1.0 * (len_qa - lpo_qa) D0075qa: DRIFT, L = 0.075 - 0.5 * (len_qa - lpo_qa) D0095qa: DRIFT, L = 0.095 - 0.5 * (len_qa - lpo_qa) ! ! Quadrupole type QTS (S-band triplet): ! D0115t: DRIFT, L = 0.115 - 0.5 * (len_qtsE - lpo_qtsE) D0050t: DRIFT, L = 0.050 - 0.5 * (len_qtsE - lpo_qtsE) & - 0.5 * (len_qtsI - lpo_qtsI) D0075t: DRIFT, L = 0.075 - 0.5 * (len_qtsE - lpo_qtsE) ! ! Sextupole type TSB: ! D0055sb : DRIFT, L = 0.0550 - 0.5 * (len_tsb - lpo_tsb) D00881sb: DRIFT, L = 0.0881 - 0.5 * (len_tsb - lpo_tsb) D01811sb: DRIFT, L = 0.1811 - 0.5 * (len_tsb - lpo_tsb) ! !====================================================================================== ! INJ_ACC1: Part of Injector starting from Linac0 to Q9ACC1 entrance (PACC1 entrnce). !====================================================================================== ! D00314: drift, L = 0.0314; D0053: drift, L = 0.0530; D0059: drift, L = 0.0590; D0060: drift, L = 0.0600; D00265: drift, L = 0.02650; D02710: drift, L = 0.2710; D019168: drift, L = 0.19168; D018862: drift, L = 0.18862; D03258: drift, L = 0.3258; ! D1IDUMP: RBEND, L = 0.091, ANGLE = 0.0 ! H1GUN: HKICKER, L = 0.0, KICK = 0.0 V1GUN: VKICKER, L = 0.0, KICK = 0.0 H2GUN: HKICKER, L = 0.0, KICK = 0.0 V2GUN: VKICKER, L = 0.0, KICK = 0.0 H3GUN: HKICKER, L = 0.0, KICK = 0.0 V3GUN: VKICKER, L = 0.0, KICK = 0.0 ! BPM1GUN: MONITOR; BPM3GUN: MONITOR; ! OTR2GUN: DRIFT, L = 0.0 OTR3GUN: DRIFT, L = 0.0 TOR3GUN: DRIFT, L = 0.1 INJ: line = (D03258, H1GUN,V1GUN, D02710, H2GUN,V2GUN, & D0053, BPM1GUN, D0059, OTR2GUN, & D019168, D1IDUMP, D018862, TOR3GUN, & D00265, BPM3GUN, D0060, OTR3GUN, D00314) ! !-------------------------------------------------------------------------------------- ! ACC1: !-------------------------------------------------------------------------------------- ! D00360: DRIFT, L = 0.0360 D0075 : DRIFT, L = 0.0750 D0080 : DRIFT, L = 0.0800 D00923: DRIFT, L = 0.0923 D0095 : DRIFT, L = 0.0950 D00995: DRIFT, L = 0.0995 D01014: DRIFT, L = 0.1014 D0130 : DRIFT, L = 0.1300 D0160 : DRIFT, L = 0.1600 D04934: DRIFT, L = 0.4934 ! D005815: DRIFT, L = 0.05815 D007185: DRIFT, L = 0.07185 D0130st: LINE = (D005815, H3GUN,V3GUN, D007185) ! BPM9ACC1: MONITOR ! ! ACC1 RF cavities are drifts ! L_cells = 0.1147 + 7 * 0.1154 + 0.1137 = 1.0362 m ! C1_1ACC1: DRIFT, L=0.1147 C1_2ACC1: DRIFT, L=0.1154 C1_9ACC1: DRIFT, L=0.1137 ! C1ACC1: LINE = (C1_1ACC1, 7*C1_2ACC1, C1_9ACC1) C2ACC1: LINE = (C1_1ACC1, 7*C1_2ACC1, C1_9ACC1) C3ACC1: LINE = (C1_1ACC1, 7*C1_2ACC1, C1_9ACC1) C4ACC1: LINE = (C1_1ACC1, 7*C1_2ACC1, C1_9ACC1) C5ACC1: LINE = (C1_1ACC1, 7*C1_2ACC1, C1_9ACC1) C6ACC1: LINE = (C1_1ACC1, 7*C1_2ACC1, C1_9ACC1) C7ACC1: LINE = (C1_1ACC1, 7*C1_2ACC1, C1_9ACC1) C8ACC1: LINE = (C1_1ACC1, 7*C1_2ACC1, C1_9ACC1) ! DC1ACC1: LINE = (D01416, C1ACC1, D01056) DC2ACC1: LINE = (D01416, C2ACC1, D01056) DC3ACC1: LINE = (D01416, C3ACC1, D01056) DC4ACC1: LINE = (D01416, C4ACC1, D01056) DC5ACC1: LINE = (D01416, C5ACC1, D01056) DC6ACC1: LINE = (D01416, C6ACC1, D01056) DC7ACC1: LINE = (D01416, C7ACC1, D01056) DC8ACC1: LINE = (D01416, C8ACC1, D01056) ! DRACC1: LINE = (DC1ACC1, D01014, DC2ACC1, D01014, & DC3ACC1, D01014, DC4ACC1, D01014, & DC5ACC1, D01014, DC6ACC1, D01014, & DC7ACC1, D01014, DC8ACC1, D00995, BPM9ACC1) ! ! For ACC1 RF cavity the LCAV model is described: ! fasa1 = (90 - 90) / (180 * pi) ! C1.ACC1: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt1_1 * Coef_E, & PHI0 = fasa1 LC1.ACC1: Line = (D01056, C1.ACC1, D01056) ! C2.ACC1: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt1_2 * Coef_E, & PHI0 = fasa1 LC2.ACC1: Line = (D01056, C2.ACC1, D01056) ! C3.ACC1: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt1_3 * Coef_E, & PHI0 = fasa1 LC3.ACC1: Line = (D01056, C3.ACC1, D01056) ! C4.ACC1: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt1_4 * Coef_E, & PHI0 = fasa1 LC4.ACC1: Line = (D01056, C4.ACC1, D01056) ! C5.ACC1: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt1_5 * Coef_E, & PHI0 = fasa1 LC5.ACC1: Line = (D01056, C5.ACC1, D01056) ! C6.ACC1: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt1_6 * Coef_E, & PHI0 = fasa1 LC6.ACC1: Line = (D01056, C6.ACC1, D01056) ! C7.ACC1: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt1_7 * Coef_E, & PHI0 = fasa1 LC7.ACC1: Line = (D01056, C7.ACC1, D01056) ! C8.ACC1: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt1_8 * Coef_E, & PHI0 = fasa1 LC8.ACC1: Line = (D01056, C8.ACC1, D01056) ! TMACC1: LINE = (D00360, LC1.ACC1, D01014, D00360, LC2.ACC1, D01014, & D00360, LC3.ACC1, D01014, D00360, LC4.ACC1, D01014, & D00360, LC5.ACC1, D01014, D00360, LC6.ACC1, D01014, & D00360, LC7.ACC1, D01014, D00360, LC8.ACC1, D00995, BPM9ACC1) ! ACC1_DR_QA: LINE = (D0075, D0130st, D04934, D0160, D0080, & DRACC1, D00923, D0095qa); ! ACC1_TM_QA: LINE = (D0075, D0130st, D04934, D0160, D0080, & TMACC1, D00923, D0095qa); ! INJ_ACC1_DR: LINE = (INJ, ACC1_DR_QA) INJ_ACC1_TM: LINE = (INJ, ACC1_TM_QA) ! !===================================================================================== ! PACC1: section between Q9ACC1 entrance and UBC2 entrance. !===================================================================================== ! ! Start of Q9ACC1: z = 13.5827 m: ! D136002 : DRIFT, L = 13.6002 - 0.5 * (len_qa - lpo_qa) !------------------------------------------------------------------------------------- ! D00648: DRIFT, L = 0.0648 D0100: DRIFT, L = 0.100 D01526: DRIFT, L = 0.1526 D0166: DRIFT, L = 0.166 D14809: DRIFT, L = 1.4809 D2456: DRIFT, L = 2.456 - 0.0005 ! 3d harmonic cavity ! H10ACC1: HKICKER, L = 0.0, KICK = 0.0 V10ACC1: VKICKER, L = 0.0, KICK = 0.0 ! DQACC1: LINE = (Q9ACC1, D0100qa, Q10ACC1, H10ACC1, V10ACC1, D0075qa) ! StartPACC1: MARKER EndPACC1: MARKER ! PACC1: LINE = (StartPACC1, DQACC1, D00648, D0080, D0160, D14809, D0130, & D0075, D0166, D01526, D0160, D2456, EndPACC1) ! !===================================================================================== ! BC2 = UBC2 + MBC2 + DBC2 ! angle = 18 degree !===================================================================================== ! UBC2 !------------------------------------------------------------------------------------- ! D0026: DRIFT, L = 0.026 D0050: DRIFT, L = 0.050 D0065: DRIFT, L = 0.065 D0084: DRIFT, L = 0.084 D0115: DRIFT, L = 0.115 D0135: DRIFT, L = 0.135 ! H1UBC2: HKICKER, L = 0.100, KICK = 0.0 V1UBC2: VKICKER, L = 0.100, KICK = 0.0 ! BPM1UBC2: MONITOR, L = 0.000 BPM2UBC2: MONITOR, L = 0.000 ! PHA1UBC2: DRIFT, L = 0.040 DAR1UBC2: DRIFT, L = 0.200 TOR2UBC2: DRIFT, L = 0.216 ! HV1UBC2: LINE = (D0026, V1UBC2, D0084, H1UBC2) QUBC2000: LINE = (D0115t, Q1UBC2, D0050t, Q2UBC2, D0050t, Q3UBC2, D0075t) ! StartUBC2: MARKER EndUBC2: MARKER ! UBC2: LINE = (StartUBC2, D0135, D0100, BPM1UBC2, D0100, & PHA1UBC2, DAR1UBC2, HV1UBC2, QUBC2000, & BPM2UBC2, D0065, TOR2UBC2, D0135, EndUBC2) ! !------------------------------------------------------------------------------------- ! MBC2 !------------------------------------------------------------------------------------- ! D0045: DRIFT, L = 0.045 D0105: DRIFT, L = 0.105 D0150: DRIFT, L = 0.150 ! lll_bc2 = 0.5 ang_bc2 = (18.0 / 180.0) * PI larc_bc2 = (lll_bc2 * ang_bc2) / sin(ang_bc2) len_bc2 = larc_bc2 ! D0500: DRIFT, L = 0.5 / cos(ang_bc2) ! D1BC2: SBEND, L = len_bc2, ANGLE =-ang_bc2, & E1 = 0.0, E2 =-ang_bc2 D2BC2: SBEND, L = len_bc2, ANGLE = ang_bc2, & E1 = ang_bc2, E2 = 0.0 D3BC2: SBEND, L = len_bc2, ANGLE = ang_bc2, & E1 = 0.0, E2 = ang_bc2 D4BC2: SBEND, L = len_bc2, ANGLE =-ang_bc2, & E1 =-ang_bc2, E2 = 0.0 ! COLLBC2: ECOLLIMATOR, L = 0.433, XSIZE = 1.0, YSIZE = 1.0 ! H1BC2: HKICKER, L = 0.0, KICK = 0.0 H2BC2: HKICKER, L = 0.0, KICK = 0.0 H3BC2: HKICKER, L = 0.0, KICK = 0.0 H4BC2: HKICKER, L = 0.0, KICK = 0.0 ! BPM2BC2: MONITOR, L = 0.0 OTR3BC2: DRIFT, L = 0.0 ! StartMBC2: MARKER EndMBC2: MARKER ! MBC2: LINE = (StartMBC2, D0100, D1BC2, H1BC2, D0500, D2BC2, H2BC2, D0105, & BPM2BC2, D0045, COLLBC2, D0115, OTR3BC2, D0115, & D0150, D3BC2, H3BC2, D0500, D4BC2, H4BC2, D0100, EndMBC2) ! !------------------------------------------------------------------------------------- ! SBC2 !------------------------------------------------------------------------------------- ! D0122: DRIFT, L = 0.122 D0288: DRIFT, L = 0.288 D0757: DRIFT, L = 0.757 D0800: DRIFT, L = 0.800 D0896: DRIFT, L = 0.896 ! OTR3SBC2: DRIFT, L = 0.230 ! StartSBC2: MARKER EndSBC2: MARKER ! SBC2: LINE = (StartSBC2, D0800, D0135, D0896, D0288, OTR3SBC2, & D0122, D0757, D0135, D0800, EndSBC2) ! !------------------------------------------------------------------------------------- ! DBC2 = DBC2_1 + DBC2_FODO + DBC2_3 !------------------------------------------------------------------------------------- ! D0005: DRIFT, L = 0.005 D0011: DRIFT, L = 0.011 D0020: DRIFT, L = 0.020 D0025: DRIFT, L = 0.025 D0040: DRIFT, L = 0.040 D0055: DRIFT, L = 0.055 D0072: DRIFT, L = 0.072 D0086: DRIFT, L = 0.086 D0104: DRIFT, L = 0.104 D0111: DRIFT, L = 0.111 D0125: DRIFT, L = 0.125 D0128: DRIFT, L = 0.128 D0162: DRIFT, L = 0.162 D0175: DRIFT, L = 0.175 D0179: DRIFT, L = 0.179 D0200: DRIFT, L = 0.200 D0230: DRIFT, L = 0.230 D0250: DRIFT, L = 0.250 D0300: DRIFT, L = 0.300 ! H1DBC2: HKICKER, L = 0.100, KICK = 0.0 V1DBC2: VKICKER, L = 0.100, KICK = 0.0 H2DBC2: HKICKER, L = 0.100, KICK = 0.0 V2DBC2: VKICKER, L = 0.100, KICK = 0.0 H4DBC2: HKICKER, L = 0.100, KICK = 0.0 V4DBC2: VKICKER, L = 0.100, KICK = 0.0 H5DBC2: HKICKER, L = 0.100, KICK = 0.0 V6DBC2: VKICKER, L = 0.100, KICK = 0.0 H8DBC2: HKICKER, L = 0.100, KICK = 0.0 V8DBC2: VKICKER, L = 0.100, KICK = 0.0 H9DBC2: HKICKER, L = 0.100, KICK = 0.0 V10DBC2: VKICKER, L = 0.100, KICK = 0.0 H11DBC2: HKICKER, L = 0.100, KICK = 0.0 V11DBC2: VKICKER, L = 0.100, KICK = 0.0 ! BPM1DBC2: MONITOR, L = 0.0 BPM3DBC2: MONITOR, L = 0.0 BPM5DBC2: MONITOR, L = 0.0 BPM7DBC2: MONITOR, L = 0.0 BPM9DBC2: MONITOR, L = 0.0 BPM11DBC2: MONITOR, L = 0.0 ! OTR4DBC2: DRIFT, L = 0.0 OTR6DBC2: DRIFT, L = 0.0 OTR8DBC2: DRIFT, L = 0.0 OTR10DBC2: DRIFT, L = 0.0 ! WIRE4DBC2: DRIFT, L = 0.0 WIRE6DBC2: DRIFT, L = 0.0 WIRE8DBC2: DRIFT, L = 0.0 WIRE10DBC2: DRIFT, L = 0.0 ! PHA3DBC2: DRIFT, L = 0.040 TOR10DBC2: DRIFT, L = 0.216 ! ! Quadrupoles with drifts and BPM's. ! Q1DBC2BPM: LINE = (D0075a, Q1DBC2, BPM1DBC2, D0075a) Q1.1DBC2000: LINE = (D0075a, Q1.1DBC2, D0075a) Q2DBC2000: LINE = (D0100a, Q2DBC2, D0100a) Q2.2DBC2000: LINE = (D0075a, Q2.2DBC2, D0075a) Q3DBC2BPM: LINE = (D0100a, Q3DBC2, BPM3DBC2, D0100a) ! Q4DBC2000: LINE = (D0075a, Q4DBC2, D0075a) Q5DBC2BPM: LINE = (D0100a, Q5DBC2, BPM5DBC2, D0100a) Q6DBC2000: LINE = (D0075a, Q6DBC2, D0075a) Q7DBC2BPM: LINE = (D0100a, Q7DBC2, BPM7DBC2, D0100a) Q8DBC2000: LINE = (D0075a, Q8DBC2, D0075a) Q9DBC2BPM: LINE = (D0100a, Q9DBC2, BPM9DBC2, D0100a) Q10DBC2000: LINE = (D0075a, Q10DBC2, D0075a) ! Q10.3DBC2000: LINE = (D0075d, Q10.3DBC2, D0075d) Q11DBC2BPM: LINE = (D0075d, Q11DBC2, BPM11DBC2, D0075d) Q12DBC2000: LINE = (D0075d, Q12DBC2, D0075d) ! ! Steering blocks ! DH1DBC2: LINE = (D0050, H1DBC2, D0025) DV1DBC2: LINE = (D0050, V1DBC2, D0050) DH2DBC2: LINE = (D0025, H2DBC2, D0050) DV2DBC2: LINE = (D0050, V2DBC2, D0025) DH4DBC2: LINE = (D0050, H4DBC2, D0025) DV4DBC2: LINE = (D0020, V4DBC2, D0040) DH5DBC2: LINE = (D0050, H5DBC2, D0050) DV6DBC2: LINE = (D0020, V6DBC2, D0040) DH8DBC2: LINE = (D0050, H8DBC2, D0050) DV8DBC2: LINE = (D0020, V8DBC2, D0040) DH9DBC2: LINE = (D0050, H9DBC2, D0050) DV10DBC2: LINE = (D0020, V10DBC2, D0040) DH11DBC2: LINE = (D0005, H11DBC2, D0045) DV11DBC2: LINE = (D0045, V11DBC2, D0005) ! ! OTR screen and Wirescaner blocks ! OW4DBC2: LINE = (D0100, OTR4DBC2, D0025, WIRE4DBC2, D0105) OW6DBC2: LINE = (D0100, OTR6DBC2, D0025, WIRE6DBC2, D0105) OW8DBC2: LINE = (D0100, OTR8DBC2, D0025, WIRE8DBC2, D0105) OW10DBC2: LINE = (D0100, OTR10DBC2, D0025, WIRE10DBC2, D0105) ! ! 5 quads between MBC2 and FODO lattice in DBC2 section. ! DBC2_1: LINE = (D0111, & DH1DBC2, Q1DBC2BPM, DV1DBC2, Q1.1DBC2000, & DH2DBC2, Q2DBC2000, DV2DBC2, Q2.2DBC2000, & D0135, PHA3DBC2, Q3DBC2BPM, DH4DBC2) ! ! FODO lattice in DBC2 section. ! DBC2_FODO1_1: LINE = (Q4DBC2000, DV4DBC2, D0100, OTR4DBC2) DBC2_FODO1_2: LINE = (D0025, WIRE4DBC2, D0105, D0135, & Q5DBC2BPM, DH5DBC2, D0128, D0072, D0125) DBC2_FODO1: LINE = (DBC2_FODO1_1, DBC2_FODO1_2) DBC2_FODO2_1: LINE = (Q6DBC2000, DV6DBC2, D0100, OTR6DBC2) DBC2_FODO2_2: LINE = (D0025, WIRE6DBC2, D0105, D0135, & Q7DBC2BPM, DH8DBC2, D0100, D0175, D0050) DBC2_FODO2: LINE = (DBC2_FODO2_1, DBC2_FODO2_2) DBC2_FODO3_1: LINE = (Q8DBC2000, DV8DBC2, D0100, OTR8DBC2) DBC2_FODO3_2: LINE = (D0025, WIRE8DBC2, D0105, D0135, & Q9DBC2BPM, DH9DBC2, D0055, D0230, D0040) DBC2_FODO3: LINE = (DBC2_FODO3_1, DBC2_FODO3_2) DBC2_FODO4_1: LINE = (Q10DBC2000, DV10DBC2, D0100, OTR10DBC2) DBC2_FODO4_2: LINE = (D0025, WIRE10DBC2, D0105, D0135) DBC2_FODO4: LINE = (DBC2_FODO4_1, DBC2_FODO4_2) ! ! Three FODO cells: ! DBC2_FODO: LINE = (DBC2_FODO1, DBC2_FODO2, DBC2_FODO3) ! ! DBC2_3: FODO4 + 3 quads between FODO lattice and UBC3. ! DBC2_3: LINE = (DBC2_FODO4, & TOR10DBC2, D0011, & Q10.3DBC2000, DH11DBC2, & Q11DBC2BPM, DV11DBC2, & Q12DBC2000, D0104, & D0160, D0162, D0160) ! StartDBC2: MARKER EndDBC2: MARKER ! DBC2: LINE = (StartDBC2, DBC2_1, DBC2_FODO, DBC2_3, EndDBC2) ! !------------------------------------------------------------------------------------- ! BC2 = UBC2 + MBC2 + DBC2 !------------------------------------------------------------------------------------- ! StartBC2: MARKER EndBC2: MARKER ! BC2: LINE = (StartBC2, UBC2, MBC2, DBC2, EndBC2) ! !===================================================================================== ! ACC2 & ACC3 : ACC23 = ACC2 + ACC3 !===================================================================================== ! ACC2 !------------------------------------------------------------------------------------- ! D00308: DRIFT, L = 0.0308 D0039: DRIFT, L = 0.0390 D01056: DRIFT, L = 0.1056 D0138: DRIFT, L = 0.1380 D01416: DRIFT, L = 0.1416 D0201: DRIFT, L = 0.2010 D02378: DRIFT, L = 0.2378 D03826: DRIFT, L = 0.3826 D14996: DRIFT, L = 1.4996 L_D0: drift, L = 0.1056 ! BPM9ACC2: MONITOR ! fasa2 = (90 - 90) / 180 * pi; ! C1.ACC2: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt2_1 * Coef_E, & PHI0 = fasa2 LC1.ACC2: Line = (L_D0, C1.ACC2, L_D0) ! C2.ACC2: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt2_2 * Coef_E, & PHI0 = fasa2 LC2.ACC2: Line = (L_D0, C2.ACC2, L_D0) ! C3.ACC2: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt2_3 * Coef_E, & PHI0 = fasa2 LC3.ACC2: Line = (L_D0, C3.ACC2, L_D0) ! C4.ACC2: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt2_4 * Coef_E, & PHI0 = fasa2 LC4.ACC2: Line = (L_D0, C4.ACC2, L_D0) ! C5.ACC2: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt2_5 * Coef_E, & PHI0 = fasa2 LC5.ACC2: Line = (L_D0, C5.ACC2, L_D0) ! C6.ACC2: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt2_6 * Coef_E, & PHI0 = fasa2 LC6.ACC2: Line = (L_D0, C6.ACC2, L_D0) ! C7.ACC2: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt2_7 * Coef_E, & PHI0 = fasa2 LC7.ACC2: Line = (L_D0, C7.ACC2, L_D0) ! C8.ACC2: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt2_8 * Coef_E, & PHI0 = fasa2 LC8.ACC2: Line = (L_D0, C8.ACC2, L_D0) ! TMACC2: LINE = ( LC1.ACC2, D01014, D00360, LC2.ACC2, D01014, & D00360, LC3.ACC2, D01014, D00360, LC4.ACC2, D01014, & D00360, LC5.ACC2, D01014, D00360, LC6.ACC2, D01014, & D00360, LC7.ACC2, D01014, D00360, LC8.ACC2, D00995, BPM9ACC2) ! H10ACC2: HKICKER, L = 0.0, KICK = 0.0 V10ACC2: VKICKER, L = 0.0, KICK = 0.0 ! DQACC2 : LINE = (D0095qa, Q9ACC2, D0100qa, Q10ACC2, H10ACC2, V10ACC2, D0075qa) ! ACC2_TM: LINE = (D0075, D0130, D04934, D0201, D0075, & TMACC2, D00923, DQACC2, D00648, D0080, D02378) ! !------------------------------------------------------------------------------------- ! ACC3 !------------------------------------------------------------------------------------- ! BPM9ACC3: MONITOR ! fasa3 = (90 - 90) / 180 * pi; ! C1.ACC3: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt3_1 * Coef_E, & PHI0 = fasa3 LC1.ACC3: Line = (L_D0, C1.ACC3, L_D0) ! C2.ACC3: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt3_2 * Coef_E, & PHI0 = fasa3 LC2.ACC3: Line = (L_D0, C2.ACC3, L_D0) ! C3.ACC3: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt3_3 * Coef_E, & PHI0 = fasa3 LC3.ACC3: Line = (L_D0, C3.ACC3, L_D0) ! C4.ACC3: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt3_4 * Coef_E, & PHI0 = fasa3 LC4.ACC3: Line = (L_D0, C4.ACC3, L_D0) ! C5.ACC3: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt3_5 * Coef_E, & PHI0 = fasa3 LC5.ACC3: Line = (L_D0, C5.ACC3, L_D0) ! C6.ACC3: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt3_6 * Coef_E, & PHI0 = fasa3 LC6.ACC3: Line = (L_D0, C6.ACC3, L_D0) ! C7.ACC3: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt3_7 * Coef_E, & PHI0 = fasa3 LC7.ACC3: Line = (L_D0, C7.ACC3, L_D0) ! C8.ACC3: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt3_8 * Coef_E, & PHI0 = fasa3 LC8.ACC3: Line = (L_D0, C8.ACC3, L_D0) ! TMACC3: LINE = (D00360, LC1.ACC3, D01014, D00360, LC2.ACC3, D01014, & D00360, LC3.ACC3, D01014, D00360, LC4.ACC3, D01014, & D00360, LC5.ACC3, D01014, D00360, LC6.ACC3, D01014, & D00360, LC7.ACC3, D01014, D00360, LC8.ACC3, D00995, BPM9ACC3) ! H10ACC3: HKICKER, L = 0.0, KICK = 0.0 V10ACC3: VKICKER, L = 0.0, KICK = 0.0 ! DQACC3: LINE = (D0095qa, Q9ACC3, D0100qa, Q10ACC3, H10ACC3, V10ACC3, D0075qa) ! StartACC3: MARKER EndACC3: MARKER ! ACC3_TM: LINE = (StartACC3, D0080, TMACC3, D00923, DQACC3, D00648, D0080, & D0138, D14996, D0130, D0075, EndACC3); ! !===================================================================================== ! BC3 = UBC3 + MBC3 + DBC3 ! angle = 3.8 degree !===================================================================================== ! D0010: DRIFT, L = 0.0100 D00375: DRIFT, L = 0.0375 D00596: DRIFT, L = 0.0596 D00598: DRIFT, L = 0.0598 D00672: DRIFT, L = 0.0672 D00854: DRIFT, L = 0.0854 D0090: DRIFT, L = 0.0900 D00982: DRIFT, L = 0.0982 D0106: DRIFT, L = 0.1060 D0109: DRIFT, L = 0.1090 D01092: DRIFT, L = 0.1092 D01245: DRIFT, L = 0.1245 D0113: DRIFT, L = 0.1130 D0155: DRIFT, L = 0.1550 D0156: DRIFT, L = 0.1560 D01565: DRIFT, L = 0.1565 D01566: DRIFT, L = 0.1566 D0157: DRIFT, L = 0.1570 D01675: DRIFT, L = 0.1675 D0168: DRIFT, L = 0.1680 D01768: DRIFT, L = 0.1768 D01906: DRIFT, L = 0.1906 D0210: DRIFT, L = 0.2100 D0219: DRIFT, L = 0.2190 D02195: DRIFT, L = 0.2195 D02404: DRIFT, L = 0.2404 D03097: DRIFT, L = 0.3097 D03988: DRIFT, L = 0.3988 D0406: DRIFT, L = 0.4062 D0745: DRIFT, L = 0.7450 D07452: DRIFT, L = 0.7452 D07734: DRIFT, L = 0.7734 D0817: DRIFT, L = 0.8170 D09254: DRIFT, L = 0.9254 D1127: DRIFT, L = 1.1270 D1172: DRIFT, L = 1.1720 ! H2UBC3: HKICKER, L = 0.100, KICK = 0.0 V2UBC3: VKICKER, L = 0.100, KICK = 0.0 H1BC3: HKICKER, L = 0.0, KICK = 0.0 H4BC3: HKICKER, L = 0.0, KICK = 0.0 H5BC3: HKICKER, L = 0.0, KICK = 0.0 H10BC3: HKICKER, L = 0.0, KICK = 0.0 H11BC3: HKICKER, L = 0.0, KICK = 0.0 H14BC3: HKICKER, L = 0.0, KICK = 0.0 V1DBC3: VKICKER, L = 0.100, KICK = 0.0 H1DBC3: HKICKER, L = 0.100, KICK = 0.0 H3DBC3: HKICKER, L = 0.100, KICK = 0.0 V3DBC3: VKICKER, L = 0.100, KICK = 0.0 ! TOR1UBC3: DRIFT, L = 0.216 TOR5DBC3: DRIFT, L = 0.216 RMON4DBC3: DRIFT, L = 0.175 PHA4DBC3: DRIFT, L = 0.040 DARK1UBC3: DRIFT, L = 0.200 !DARK5DBC3: DRIFT, L = 0.200 ! OTR3UBC3: DRIFT, L = 0.230 OTR11BC3: DRIFT, L = 0.230 OTR8BC3s: DRIFT, L = 0.230 OTR4DBC3: DRIFT, L = 0.230 OTR5DBC3: DRIFT, L = 0.230 ! BPM1UBC3: MONITOR BPM2UBC3: MONITOR BPM4BC3 : MONITOR, L = 0.034 BPM11BC3: MONITOR, L = 0.034 BPM1DBC3: MONITOR BPM3DBC3: MONITOR ! lll_bc3 = 0.5 ang_bc3 = (3.8 / 180.0) * PI larc_bc3 = (lll_bc3 * ang_bc3) / sin(ang_bc3) len_bc3 = larc_bc3 ! D1BC3: SBEND, L = len_bc3, ANGLE=-ang_bc3, & E1 = 0.0, E2 =-ang_bc3 D4BC3: SBEND, L = len_bc3, ANGLE= ang_bc3, & E1 = ang_bc3, E2 = 0.0 D5BC3: SBEND, L = len_bc3, ANGLE= ang_bc3, & E1 = 0.0, E2 = ang_bc3 D10BC3: SBEND, L = len_bc3, ANGLE=-ang_bc3, & E1 =-ang_bc3, E2 = 0.0 D11BC3: SBEND, L = len_bc3, ANGLE=-ang_bc3, & E1 = 0.0, E2 =-ang_bc3 D14BC3: SBEND, L = len_bc3, ANGLE= ang_bc3, & E1 = ang_bc3, E2 = 0.0 ! D0745bc3: DRIFT, L = 0.7450 / cos(ang_bc3) D0200bc3: DRIFT, L = 0.2000 / cos(ang_bc3) D0901bc3: DRIFT, L = 0.9010 / cos(ang_bc3) D0534bc3: DRIFT, L = 0.5340 / cos(ang_bc3) D2380bc3: Line = (D0745bc3, D0200bc3, D0901bc3, D0534bc3) ! D05060bc3: DRIFT, L = 0.5060 / cos(ang_bc3) D04454bc3: DRIFT, L = 0.4454 / cos(ang_bc3) D04376bc3: DRIFT, L = 0.4376 / cos(ang_bc3) D09254bc3: DRIFT, L = 0.9254 / cos(ang_bc3) D03097bc3: DRIFT, L = 0.3097 / cos(ang_bc3) D10795bc3: DRIFT, L = 1.0795 / cos(ang_bc3) OTR8BC3: DRIFT, L = 0.2300 / cos(ang_bc3) D2629a: Line = (D05060bc3, D04454bc3, D04376bc3, D0200bc3, D09254bc3) D2629b: Line = (OTR8BC3, D09254bc3, D0200bc3, D03097bc3, D10795bc3) ! D09507bc3: DRIFT, L = 0.9507 / cos(ang_bc3) D00853bc3: DRIFT, L = 0.0853 / cos(ang_bc3) D01540bc3: DRIFT, L = 0.1540 / cos(ang_bc3) D02448bc3: DRIFT, L = 0.2448 / cos(ang_bc3) D07452bc3: DRIFT, L = 0.7452 / cos(ang_bc3) D119a: Line = (D09507bc3, D00853bc3, D01540bc3) D119b: Line = (D02448bc3, D0200bc3, D07452bc3) ! ! BC3 dipoles in straight beam line: ! SD1BC3: DRIFT, L = 0.5 SD4BC3: DRIFT, L = 0.5 SD5BC3: DRIFT, L = 0.5 SD10BC3: DRIFT, L = 0.5 SD11BC3: DRIFT, L = 0.5 SD14BC3: DRIFT, L = 0.5 ! DD1BC3: LINE = (D00982, SD1BC3, D0745) DD4BC3: LINE = (D0157, SD4BC3, D0219) DD5BC3: LINE = (D0168, SD5BC3, D0156) DD10BC3: LINE = (D01565, SD10BC3, D02195) DD11BC3: LINE = (D01675, SD11BC3, D01566) DD14BC3: LINE = (D07452, SD14BC3, D00854) ! GP9BC3: LINE = (D03097, D0817) GP13BC3: LINE = (D07734, D03988) ! ! Quadrupole with BPM's ! Q1UBC3BPM: LINE = (D0075d, Q1UBC3, BPM1UBC3, D0075d) Q2UBC3000: LINE = (D0075d, Q2UBC3, D0075d) ! Q1DBC3BPM: LINE = (D0100a, Q1DBC3, BPM1DBC3, D0100a) Q2DBC3000: LINE = (D0100f, Q2DBC3, D0100f) Q3DBC3000: LINE = (D0100f, Q3DBC3, D0093f) ! ! Steering blocks ! HV2UBC3: LINE = (D01245, H2UBC3, D01245, & D0175, V2UBC3, BPM2UBC3, D0175) VH1DBC3: LINE = (D0072, V1DBC3, D0128, H1DBC3, D01056) HV3DBC3: LINE = (D00375, H3DBC3, D00375, D0175, V3DBC3, BPM3DBC3, D0175) ! !------------------------------------------------------------------------------------- ! UBC3: Part of BC3 in the front of the first dipole !------------------------------------------------------------------------------------- ! UBC3: LINE = (D0106, D0150, DARK1UBC3, TOR1UBC3, & Q1UBC3BPM, D0050, Q2UBC3000, D0106, & HV2UBC3, OTR3UBC3, D0106, D01768) ! !------------------------------------------------------------------------------------- ! MBC3 !------------------------------------------------------------------------------------- ! StartMBC3: MARKER EndMBC3: MARKER ! MBC3: LINE = (StartMBC3, D00982, & D1BC3, H1BC3, D2380bc3, & D4BC3, H4BC3, D00598, BPM4BC3, D00672, & D0230, D0109, & D5BC3, H5BC3, D2629a, D2629b, & D10BC3, H10BC3, D00596, BPM11BC3, D00672, & OTR11BC3, D01092, & D11BC3, H11BC3, D119a, D119b, & D14BC3, H14BC3, D00854, EndMBC3) ! !------------------------------------------------------------------------------------- ! SBC3 !------------------------------------------------------------------------------------- ! StartSBC3: MARKER EndSBC3: MARKER ! SBC3: LINE = (StartSBC3, & DD1BC3, D0200, D1172, D0106, & DD4BC3, D0113, DD5BC3, D0106, D1127, & D0200, D09254, OTR8BC3s, D09254, D0200, & GP9BC3, D0106, DD10BC3, D0113, DD11BC3, & D0106, GP13BC3, D0200, DD14BC3, EndSBC3) ! !------------------------------------------------------------------------------------- ! DBC3: Part of BC3 after the last dipole !------------------------------------------------------------------------------------- ! StartDBC3: MARKER EndDBC3: MARKER ! DBC3: LINE=(StartDBC2, VH1DBC3, D02404, D01906, Q1DBC3BPM, D0055, & Q2DBC3000, D0010, Q3DBC3000, D0106, HV3DBC3, & D0090, OTR4DBC3, PHA4DBC3, D0100, OTR5DBC3, & D0100, TOR5DBC3, RMON4DBC3, D0150, D0106, EndDBC3) ! !------------------------------------------------------------------------------------- ! BC3 = UBC3 + MBC3 + DBC3 !------------------------------------------------------------------------------------- ! StartBC3: MARKER EndBC3: MARKER ! BC3: LINE = (StartBC3, UBC3, MBC3, DBC3, EndBC3) ! !===================================================================================== ! ACC4, ACC5, ACC6 & TB_ACC7: ACC4567 = ACC4 + ACC5 + ACC6 + TB_ACC7 !===================================================================================== ! ACC4 !------------------------------------------------------------------------------------- ! BPM9ACC4: MONITOR ! fasa4 = (90 - 90) / 180 * pi; ! C1.ACC4: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt4_1 * Coef_E, & PHI0 = fasa4 LC1.ACC4: Line = (L_D0, C1.ACC4, L_D0) ! C2.ACC4: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt4_2 * Coef_E, & PHI0 = fasa4 LC2.ACC4: Line = (L_D0, C2.ACC4, L_D0) ! C3.ACC4: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt4_3 * Coef_E, & PHI0 = fasa4 LC3.ACC4: Line = (L_D0, C3.ACC4, L_D0) ! C4.ACC4: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt4_4 * Coef_E, & PHI0 = fasa4 LC4.ACC4: Line = (L_D0, C4.ACC4, L_D0) ! C5.ACC4: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt4_5 * Coef_E, & PHI0 = fasa4 LC5.ACC4: Line = (L_D0, C5.ACC4, L_D0) ! C6.ACC4: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt4_6 * Coef_E, & PHI0 = fasa4 LC6.ACC4: Line = (L_D0, C6.ACC4, L_D0) ! C7.ACC4: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt4_7 * Coef_E, & PHI0 = fasa4 LC7.ACC4: Line = (L_D0, C7.ACC4, L_D0) ! C8.ACC4: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt4_8 * Coef_E, & PHI0 = fasa4 LC8.ACC4: Line = (L_D0, C8.ACC4, L_D0) ! TMACC4: LINE = (D00360, LC1.ACC4, D01014, D00360, LC2.ACC4, D01014, & D00360, LC3.ACC4, D01014, D00360, LC4.ACC4, D01014, & D00360, LC5.ACC4, D01014, D00360, LC6.ACC4, D01014, & D00360, LC7.ACC4, D01014, D00360, LC8.ACC4, D00995, BPM9ACC4) ! H10ACC4: HKICKER, L = 0.0, KICK = 0.0 V10ACC4: VKICKER, L = 0.0, KICK = 0.0 ! DQACC4: LINE = (D0095qa, Q9ACC4, D0100qa, Q10ACC4, H10ACC4, V10ACC4, D0075qa) ! StartACC4: MARKER EndACC4: MARKER ! ACC4_TM: LINE = (StartACC4, D0075, D0130, D04934, D0160, D0080, & TMACC4, D00923, DQACC4, D00648, D0080, D02378, EndACC4) ! !------------------------------------------------------------------------------------- ! ACC5 !------------------------------------------------------------------------------------- ! BPM9ACC5: MONITOR ! fasa5 = (90 - 90) / 180 * pi; ! C1.ACC5: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt5_1 * Coef_E, & PHI0 = fasa5 LC1.ACC5: Line = (L_D0, C1.ACC5, L_D0) ! C2.ACC5: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt5_2 * Coef_E, & PHI0 = fasa5 LC2.ACC5: Line = (L_D0, C2.ACC5, L_D0) ! C3.ACC5: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt5_3 * Coef_E, & PHI0 = fasa5 LC3.ACC5: Line = (L_D0, C3.ACC5, L_D0) ! C4.ACC5: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt5_4 * Coef_E, & PHI0 = fasa5 LC4.ACC5: Line = (L_D0, C4.ACC5, L_D0) ! C5.ACC5: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt5_5 * Coef_E, & PHI0 = fasa5 LC5.ACC5: Line = (L_D0, C5.ACC5, L_D0) ! C6.ACC5: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt5_6 * Coef_E, & PHI0 = fasa5 LC6.ACC5: Line = (L_D0, C6.ACC5, L_D0) ! C7.ACC5: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt5_7 * Coef_E, & PHI0 = fasa5 LC7.ACC5: Line = (L_D0, C7.ACC5, L_D0) ! C8.ACC5: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt5_8 * Coef_E, & PHI0 = fasa5 LC8.ACC5: Line = (L_D0, C8.ACC5, L_D0) ! TMACC5: LINE = (D00360, LC1.ACC5, D01014, D00360, LC2.ACC5, D01014, & D00360, LC3.ACC5, D01014, D00360, LC4.ACC5, D01014, & D00360, LC5.ACC5, D01014, D00360, LC6.ACC5, D01014, & D00360, LC7.ACC5, D01014, D00360, LC8.ACC5, D00995, BPM9ACC5) ! H10ACC5: HKICKER, L = 0.0, KICK = 0.0 V10ACC5: VKICKER, L = 0.0, KICK = 0.0 ! DQACC5: LINE = (D0095qa, Q9ACC5, D0100qa, Q10ACC5, H10ACC5, V10ACC5, D0075qa) ! StartACC5: MARKER EndACC5: MARKER ! ACC5_TM: LINE = (StartACC5, D0080, TMACC5, D00923, DQACC5, D00648, & D0080, D02378, EndACC5) ! !------------------------------------------------------------------------------------- ! 14.05.2007: ACC6 !------------------------------------------------------------------------------------- ! D15602: DRIFT, L = 1.5602 ! BPM9ACC6: MONITOR ! fasa6 = (90 - 90) / 180 * pi; ! C1.ACC6: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt6_1 * Coef_E, & PHI0 = fasa6 LC1.ACC6: Line = (L_D0, C1.ACC6, L_D0) ! C2.ACC6: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt6_2 * Coef_E, & PHI0 = fasa6 LC2.ACC6: Line = (L_D0, C2.ACC6, L_D0) ! C3.ACC6: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt6_3 * Coef_E, & PHI0 = fasa6 LC3.ACC6: Line = (L_D0, C3.ACC6, L_D0) ! C4.ACC6: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt6_4 * Coef_E, & PHI0 = fasa6 LC4.ACC6: Line = (L_D0, C4.ACC6, L_D0) ! C5.ACC6: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt6_5 * Coef_E, & PHI0 = fasa6 LC5.ACC6: Line = (L_D0, C5.ACC6, L_D0) ! C6.ACC6: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt6_6 * Coef_E, & PHI0 = fasa6 LC6.ACC6: Line = (L_D0, C6.ACC6, L_D0) ! C7.ACC6: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt6_7 * Coef_E, & PHI0 = fasa6 LC7.ACC6: Line = (L_D0, C7.ACC6, L_D0) ! C8.ACC6: LCAV, L = 1.0362, FREQ = 1300, & DELTAE = Volt6_8 * Coef_E, & PHI0 = fasa6 LC8.ACC6: Line = (L_D0, C8.ACC6, L_D0) ! TMACC6: LINE = (D00360, LC1.ACC6, D01014, D00360, LC2.ACC6, D01014, & D00360, LC3.ACC6, D01014, D00360, LC4.ACC6, D01014, & D00360, LC5.ACC6, D01014, D00360, LC6.ACC6, D01014, & D00360, LC7.ACC6, D01014, D00360, LC8.ACC6, D00995, BPM9ACC6) ! H10ACC6: HKICKER, L = 0.0, KICK = 0.0 V10ACC6: VKICKER, L = 0.0, KICK = 0.0 ! DQACC6: LINE = (D0095qa, Q9ACC6, D0100qa, Q10ACC6, H10ACC6, V10ACC6, D0075qa) ! StartACC6: MARKER EndACC6: MARKER ! ACC6_TM: LINE = (StartACC6, D0080, TMACC6, D00923, DQACC6, D00648, & D0080, D0160, D15602, D0130, D0075, EndACC6) ! !------------------------------------------------------------------------------------- ! TB_ACC7 !------------------------------------------------------------------------------------- ! D0152: DRIFT, L = 0.1520 D0180: DRIFT, L = 0.1800 D0225: DRIFT, L = 0.2250 D0244: DRIFT, L = 0.2440 D0350: DRIFT, L = 0.3500 D04165: DRIFT, L = 0.4165 D04425: DRIFT, L = 0.4425 D0845: DRIFT, L = 0.8450 D12575: DRIFT, L = 1.2575 D1500: DRIFT, L = 1.5000 ! LOLAi: DRIFT, L = 3.826 / 10 LOLA : LINE = (10 * LOLAi) ! KICKACC7: DRIFT, L = 0.4000 EOS : DRIFT, L = 1.1555 CTO : DRIFT, L = 0.4000 ! H10ACC7: HKICKER, L = 0.100, KICK = 0.0 V10ACC7: VKICKER, L = 0.100, KICK = 0.0 ! OTR17ACC7i: DRIFT, L = 0.230 / 2 OTR18ACC7i: DRIFT, L = 0.230 / 2 ! OTR17ACC7: LINE = (OTR17ACC7i, OTR17ACC7i) OTR18ACC7: LINE = (OTR18ACC7i, OTR18ACC7i) ! BPM2ACC7: MONITOR, L = 0.450 BPM9ACC7: MONITOR, L = 0.450 BPM16ACC7: MONITOR, L = 0.345 ! PHA18ACC7: DRIFT, L = 0.040 ! D1500s: LINE = (BPM16ACC7, D0105, OTR17ACC7, D0200, & CTO, D0180, PHA18ACC7) ! DKICK: LINE = (D0160, KICKACC7, D0160) DTCA: LINE = (D0100, D0100, D0100, D0100, D0225) DLOLA: LINE = (D0152, LOLA, D0152) DQ9ACC7: LINE = (D0299n, Q9ACC7, D0299n) HV10ACC7: LINE = (D0244, H10ACC7, D0100, V10ACC7, D04165) ! StartACC7: MARKER EndACC7: MARKER ! TB_ACC7: LINE = (StartACC7, D0200, D0300, D0080, D0200, BPM2ACC7, & DKICK, DTCA, D0075, D0300, D0200, & DLOLA, D0200, D0300, BPM9ACC7, D0200, & DQ9ACC7, HV10ACC7, D0300, D0075, D0200, & D1500, D0300, D12575, D04425, D0200, & EOS, D0200, D1500s, OTR18ACC7, D0350, D0072, EndACC7) ! !------------------------------------------------------------------------------------- ! ACC4567 = ACC4 + ACC5 + TB_ACC6 + TB_ACC7 !------------------------------------------------------------------------------------- ! ACC4567_TM: LINE = (ACC4_TM, ACC5_TM, ACC6_TM, TB_ACC7) ! !===================================================================================== ! Collimator section !===================================================================================== ! D0018: DRIFT, L = 0.0180 D0032: DRIFT, L = 0.0320 D0034: DRIFT, L = 0.0340 D0070: DRIFT, L = 0.0700 D0085: DRIFT, L = 0.0850 D0116: DRIFT, L = 0.1160 D0120: DRIFT, L = 0.1200 D0169: DRIFT, L = 0.1690 D0170: DRIFT, L = 0.1700 D0220: DRIFT, L = 0.2200 D0233: DRIFT, L = 0.2330 D0245: DRIFT, L = 0.2450 D0273: DRIFT, L = 0.2730 D0326: DRIFT, L = 0.3260 D03883: DRIFT, L = 0.3883 D0732: DRIFT, L = 0.7320 ! ! Collimators: open ! APERCT1: ECOLLIMATOR, L = 0.5, XSIZE = 0.017, YSIZE = 0.017 APERCT2: ECOLLIMATOR, L = 0.5, XSIZE = 0.017, YSIZE = 0.017 APERCE1: ECOLLIMATOR, L = 0.5, XSIZE = 0.022, YSIZE = 0.022 APERCE2: ECOLLIMATOR, L = 0.5, XSIZE = 0.022, YSIZE = 0.022 ! FIT_CT1: MARKER FIT_CT2: MARKER FIT_CE1: MARKER FIT_CE2: MARKER ! COLL2TCOL: LINE = (D0150, FIT_CT1, APERCT1, D0150) COLL8TCOL: LINE = (D0150, FIT_CT2, APERCT2, D0150) COLL2ECOL: LINE = (D0150, FIT_CE1, APERCE1, D0150) COLL4ECOL: LINE = (D0150, FIT_CE2, APERCE2, D0150) ! lll_col = 0.446 ang_col = (3.5 / 180.0) * PI larc_col = (lll_col * ang_col) / sin(ang_col) len_col = larc_col ! D1ECOL: SBEND, L = len_col, ANGLE= ang_col, & E1 = 0.0, E2 = ang_col D7ECOL: SBEND, L = len_col, ANGLE=-ang_col, & E1 = -ang_col, E2 = 0.0 ! D0125c: DRIFT, L = 0.1250 - 0.5 * (lll_col - 0.4) D0220c: DRIFT, L = 0.2200 - 0.5 * (lll_col - 0.4) D0273c: DRIFT, L = 0.2730 - 0.5 * (lll_col - 0.4) ! KICK5TCOL: DRIFT, L = 1.00 KICK6TCOL: DRIFT, L = 1.00 KICK3MATCH: DRIFT, L = 1.00 KICK5MATCH: DRIFT, L = 1.00 ! V4TCOL: VKICKER, L = 0.100, KICK = 0.0 H4TCOL: HKICKER, L = 0.100, KICK = 0.0 H9TCOL: HKICKER, L = 0.100, KICK = 0.0 V9TCOL: VKICKER, L = 0.100, KICK = 0.0 H1ECOL: HKICKER, L = 0.0, KICK = 0.0 H2ECOL: HKICKER, L = 0.100, KICK = 0.0 H4ECOL: HKICKER, L = 0.100, KICK = 0.0 V4ECOL: VKICKER, L = 0.100, KICK = 0.0 H6ECOL: HKICKER, L = 0.100, KICK = 0.0 H7ECOL: HKICKER, L = 0.0, KICK = 0.0 V1MATCH: VKICKER, L = 0.100, KICK = 0.0 H3MATCH: HKICKER, L = 0.100, KICK = 0.0 V3MATCH: VKICKER, L = 0.100, KICK = 0.0 H6MATCH: HKICKER, L = 0.100, KICK = 0.0 V6MATCH: VKICKER, L = 0.100, KICK = 0.0 ! BPM2TCOL: MONITOR BPM8TCOL: MONITOR BPM3ECOL: MONITOR BPM5ECOL: MONITOR BPM2MATCH: MONITOR BPM6MATCH: MONITOR ! DARK1TCOL: DRIFT, L = 0.200 TOR1TCOL: DRIFT, L = 0.216 DARK1MATCH: DRIFT, L = 0.200 RMON1MATCH: DRIFT, L = 0.175 PHA6MATCH: DRIFT, L = 0.040 TOR7MATCH: DRIFT, L = 0.216 ! OTR9TCOLi: DRIFT, L = 0.230 / 2 OTR5ECOLi: DRIFT, L = 0.230 / 2 OTR7MATCHi: DRIFT, L = 0.230 / 2 ! OTR9TCOL: LINE = (OTR9TCOLi, OTR9TCOLi) OTR5ECOL: LINE = (OTR5ECOLi, OTR5ECOLi) OTR7MATCH: LINE = (OTR7MATCHi, OTR7MATCHi) ! ! Quadrupoles with drifts and BPM's ! Q2TCOLBPM: LINE = (D0100a, Q2TCOL, BPM2TCOL, D0100a) Q8TCOLBPM: LINE = (D0100a, Q8TCOL, BPM8TCOL, D0100a) Q9TCOL000: LINE = (D0100a, Q9TCOL, D0100a) ! Q3ECOLBPM: LINE = (D0075b, Q3ECOL, BPM3ECOL, D0075b) Q4ECOL000: LINE = (D0075b, Q4ECOL, D0075b) Q5ECOLBPM: LINE = (D0075b, Q5ECOL, BPM5ECOL, D0075b) ! Q1MATC000: LINE = (D0100a, Q1MATCH, D0100a) Q2MATCBPM: LINE = (D0100a, Q2MATCH, BPM2MATCH, D0100a) Q4MATC000: LINE = (D0100a, Q4MATCH, D0100a) Q6MATCBPM: LINE = (D0100a, Q6MATCH, BPM6MATCH, D0100a) ! ! Steering blocks ! VH4TCOL: LINE = (D0120, V4TCOL, D0018, D0104, D0018, H4TCOL) HV9TCOL: LINE = (D0032, H9TCOL, D0084, V9TCOL, D0034) HV4ECOL: LINE = (D0100, H4ECOL, D0170, V4ECOL, D0100) HV3MATCH: LINE = (D0032, H3MATCH, D0084, V3MATCH, D0034) HV6MATCH: LINE = (D0032, H6MATCH, D0084, V6MATCH) ! TSP3TCOL: LINE = (D0732, D0732) DKICKCOL: LINE = (D0040, KICK5TCOL, D0106, KICK6TCOL, D0080) DS2ECOL : LINE = (D00881sb, S2ECOL, D0055sb) DS6ECOL : LINE = (D0055sb, S6ECOL, D01811sb) ! !------------------------------------------------------------------------------------- ! First straight section of COLLIMATOR: contains collimators CT1 and CT2 !------------------------------------------------------------------------------------- ! FIT_BYP: MARKER ! COLL: LINE = (D0326, D0080, D0106, DARK1TCOL, TOR1TCOL, & Q2TCOLBPM, COLL2TCOL, FIT_BYP, TSP3TCOL, D0072, & VH4TCOL, DKICKCOL, D0104, D0116, COLL8TCOL, & Q8TCOLBPM, HV9TCOL, Q9TCOL000, OTR9TCOL) ! !------------------------------------------------------------------------------------- ! DOGLEG in COLLIMATOR: contains collimators CE1 and CE2 !------------------------------------------------------------------------------------- ! DOGLEG: LINE = (D0125c, D1ECOL, H1ECOL, D0273c, COLL2ECOL, D0085, & H2ECOL, DS2ECOL, Q3ECOLBPM, COLL4ECOL, Q4ECOL000, & HV4ECOL, OTR5ECOL, Q5ECOLBPM, DS6ECOL, D0845, & H6ECOL, D0220c, D7ECOL, H7ECOL, D0125c) ! !------------------------------------------------------------------------------------- ! Second straight section of COLLIMATOR !------------------------------------------------------------------------------------- ! MATCCOL: LINE = (DARK1MATCH, D0070, V1MATCH, D0245, & RMON1MATCH, Q1MATC000, D0300, Q2MATCBPM, HV3MATCH, & KICK3MATCH, Q4MATC000, D0106, KICK5MATCH, Q6MATCBPM, & HV6MATCH, D0179, PHA6MATCH, TOR7MATCH, & D0106, OTR7MATCH, D0169, D0072) ! !------------------------------------------------------------------------------------- ! Total COLLIMATOR section !------------------------------------------------------------------------------------- ! StartCOL: MARKER EndCOL: MARKER ! COLLIMATOR: LINE = (StartCOL, COLL, DOGLEG, MATCCOL, EndCOL) ! !===================================================================================== ! TB_SEED !===================================================================================== ! D0158: DRIFT, L = 0.1580 D0240: DRIFT, L = 0.2400 D0330: DRIFT, L = 0.3300 D0336: DRIFT, L = 0.3360 D0720: DRIFT, L = 0.7200 D1153: DRIFT, L = 1.15305 D1222: DRIFT, L = 1.22205 D1350: DRIFT, L = 1.3500 D1852: DRIFT, L = 1.85205 ! H5SUND2: HKICKER, L = 0.100, KICK = 0.0 V5SUND2: VKICKER, L = 0.100, KICK = 0.0 H3SEED: HKICKER, L = 0.100, KICK = 0.0 V3SEED: VKICKER, L = 0.100, KICK = 0.0 H12SEED: HKICKER, L = 0.100, KICK = 0.0 V12SEED: VKICKER, L = 0.100, KICK = 0.0 H19SEED: HKICKER, L = 0.100, KICK = 0.0 V19SEED: VKICKER, L = 0.100, KICK = 0.0 ! BPM4SUND2: MONITOR BPM3SEED: MONITOR BPM12SEED: MONITOR BPM20SEED: MONITOR BPM21SEED: MONITOR ! OTR3SUND1: DRIFT, L = 0.0 OTR2SUND3: DRIFT, L = 0.0 OTR5SEED: DRIFT, L = 0.0 OTR14SEED: DRIFT, L = 0.0 ! WIRE3SUND1: DRIFT, L = 0.0 WIRE2SUND3: DRIFT, L = 0.0 WIRE5SEED: DRIFT, L = 0.0 WIRE14SEED: DRIFT, L = 0.0 ! OTR8SEED: DRIFT, L = 0.229 WIRE21SEED: DRIFT, L = 0.123 / 2 TEO8SEED: DRIFT, L = 0.230 ! ! Quadrupoles with drifts and BPM's ! Q1SUND1000: LINE = (D0100a, Q1SUND1, D0100a) Q5SUND1000: LINE = (D0100a, Q5SUND1, D0100a) Q4SUND2BPM: LINE = (D0100a, Q4SUND2, BPM4SUND2, D0100a) Q4SUND3000: LINE = (D0100a, Q4SUND3, D0100a) Q3SEEDBPM: LINE = (D0100a, Q3SEED, BPM3SEED, D0100a) Q7SEED000: LINE = (D0100a, Q7SEED, D0100a) Q12SEEDBPM: LINE = (D0100a, Q12SEED, BPM12SEED, D0100a) Q16SEED000: LINE = (D0100a, Q16SEED, D0100a) Q18SEED000: LINE = (D0100a, Q18SEED, D0100a) Q20SEEDBPM: LINE = (D0100a, Q20SEED, BPM20SEED, D0100a) ! Q21SEED000: LINE = (D0025g, Q21SEED, D0076g) Q22SEED000: LINE = (D0076g, Q22SEED, D0025g) ! ! Steering blocks ! HV5SUND2: LINE = (D0330, H5SUND2, D0100, V5SUND2) HV3SEED: LINE = (D0330, H3SEED, D0100, V3SEED) HV12SEED: LINE = (D0330, H12SEED, D0100, V12SEED) HV19SEED: LINE = (D0330, H19SEED, D0100, V19SEED) ! ! OTR screen and Wirescaner blocks ! OW3SUND1: LINE = (D0100, OTR3SUND1, D0025, WIRE3SUND1, D0105) OW2SUND3: LINE = (D0100, OTR2SUND3, D0025, WIRE2SUND3, D0105) OW5SEED: LINE = (D0100, OTR5SEED, D0025, WIRE5SEED, D0105) OW14SEED: LINE = (D0100, OTR14SEED, D0025, WIRE14SEED, D0105) ! !------------------------------------------------------------------------------------- ! Components of Optical Replica. !------------------------------------------------------------------------------------- ! U1SUND1: sbend, L = 1.450 / 2, angle = 0 D02007: DRIFT, L = 167.87800 - 166.9523 - 0.5 * 1.450 D020135: DRIFT, L = 168.80435 - 167.878 - 0.5 * 1.450 DU1SUND1: line = (D02007, U1SUND1,U1SUND1, D020135) ! U3SUND3: sbend, L = 1.450 / 2, angle = 0 D025445: DRIFT, L = 179.100 - 178.12055 - 0.5 * 1.450 D014760: DRIFT, L = 179.9726 - 179.100 - 0.5 * 1.450 DU3SUND3: line = (D025445, U3SUND3,U3SUND3, D014760) ! B1SUND2: HKICKER, L = 0.100 / 2, KICK = 0.0 B2SUND2: HKICKER, L = 0.100 / 2, KICK = 0.0 B3SUND2: HKICKER, L = 0.100 / 2, KICK = 0.0 B4SUND2: HKICKER, L = 0.100 / 2, KICK = 0.0 ! D021000: DRIFT, L = 171.70240 - 171.4424 - 0.5 * 0.100 D024205: DRIFT, L = 173.29445 - 173.0024 - 0.5 * 0.100 D1B1400: DRIFT, L = 173.00240 - 171.7024 - 0.100 DB12SUND2: line = (D021000, B1SUND2,B1SUND2, D1B1400, B2SUND2,B2SUND2, D024205) ! D024605: DRIFT, L = 173.9265 - 173.63045 - 0.5 * 0.100 D020600: DRIFT, L = 175.4825 - 175.22650 - 0.5 * 0.100 D2B1400: DRIFT, L = 175.2265 - 173.9265 - 0.100 DB34SUND2: line = (D024605, B3SUND2,B3SUND2, D2B1400, B4SUND2,B4SUND2, D020600) ! OTR2SUND2: DRIFT, L = 0.230 / 2 D001755: DRIFT, L = 173.427 - 173.29445 - 0.5 * 0.230 D008845: DRIFT, L = 173.63045 - 173.427 - 0.5 * 0.230 DOTR2SUND2: line = (D001755, OTR2SUND2,OTR2SUND2, D008845) ! OTR1SEED: DRIFT, L = 0.230 / 2 D001835: DRIFT, L = 182.408 - 182.27465 - 0.5 * 0.230 D008765: DRIFT, L = 182.61065 - 182.408 - 0.5 * 0.230 DOTR1SEED: line = (D001835, OTR1SEED,OTR1SEED, D008765) ! H2SEED: HKICKER, L = 0.100 / 2, KICK=0.0 D009105: DRIFT, L = 182.75170 - 182.61065 - 0.5 * 0.100 ! 0.09105 D166100: DRIFT, L = 184.46270 - 182.75170 - 0.5 * 0.100 ! 1.6610 DH2SEED: line = (D009105, H2SEED,H2SEED, D166100) ! !------------------------------------------------------------------------------------- ! First quadrupole Q1SUND1 of TB_SEED !------------------------------------------------------------------------------------- ! TB_SEED_1: LINE = (Q1SUND1000, DU1SUND1, OW3SUND1, D0106, D1852) ! !------------------------------------------------------------------------------------- ! FODO cells of TB_SEED !------------------------------------------------------------------------------------- ! SEED_FODO2_1: LINE = (Q5SUND1000, DB12SUND2, DOTR2SUND2, DB34SUND2, & Q4SUND2BPM, HV5SUND2, D1222) SEED_FODO2_2: LINE = (OW2SUND3, D0106, DU3SUND3) SEED_FODO2: LINE = (SEED_FODO2_1, SEED_FODO2_2) ! SEED_FODO3_1: LINE = (Q4SUND3000, D1852, DOTR1SEED, DH2SEED, & Q3SEEDBPM, HV3SEED, D1222) SEED_FODO3_2: LINE = (OW5SEED, D0106, D1852) SEED_FODO3: LINE = (SEED_FODO3_1, SEED_FODO3_2) ! SEED_FODO4_1: LINE = (Q7SEED000, D1153, TEO8SEED, & OTR8SEED, D0240, D0336, D1852, & Q12SEEDBPM, HV12SEED, D1222) SEED_FODO4_2: LINE = (OW14SEED, D0106, D1852) SEED_FODO4: LINE = (SEED_FODO4_1, SEED_FODO4_2) ! TB_SEED_F: LINE = (SEED_FODO2, SEED_FODO3, SEED_FODO4) ! !------------------------------------------------------------------------------------- ! 5 quadrupoles of TB_SEED: matching to undulator !------------------------------------------------------------------------------------- ! SEED_FODO5: LINE = (Q16SEED000, D1350, Q18SEED000, HV19SEED, D0720) SEED_FODO6: LINE = (Q20SEEDBPM, D0350, D0158, D0072, D0300) SEED_FODO7: LINE = (Q21SEED000, WIRE21SEED, WIRE21SEED, BPM21SEED, Q22SEED000) ! TB_SEED_2: LINE = (SEED_FODO5, SEED_FODO6, SEED_FODO7) ! !------------------------------------------------------------------------------------- ! TB_SEED section: drift D03883 is included. !------------------------------------------------------------------------------------- ! StartSEED: MARKER EndSEED: MARKER ! TB_SEED: LINE = (StartSEED, D03883, TB_SEED_1, TB_SEED_F, TB_SEED_2, EndSEED) ! !===================================================================================== ! Undulator section: 6 cells. ! Quadrupoles of last undulator UNDU6 have individual power supplies. !===================================================================================== ! ! Matrices of undulator segments are in "FLASH-QUAD-OP2.mad". ! WIRE5UN1: DRIFT, L = 0.123 / 2 WIRE5UN2: DRIFT, L = 0.123 / 2 WIRE5UN3: DRIFT, L = 0.123 / 2 WIRE5UN4: DRIFT, L = 0.123 / 2 WIRE5UN5: DRIFT, L = 0.123 / 2 WIRE5UN6: DRIFT, L = 0.123 / 2 ! ! Undulator BPM ! BPM2UND1: DRIFT, L = 0 BPM2UND2: DRIFT, L = 0 BPM2UND3: DRIFT, L = 0 BPM2UND4: DRIFT, L = 0 BPM2UND5: DRIFT, L = 0 BPM2UND6: DRIFT, L = 0 ! ! Diagnostic-Block BPM ! BPM5UND1: DRIFT, L = 0 BPM5UND2: DRIFT, L = 0 BPM5UND3: DRIFT, L = 0 BPM5UND4: DRIFT, L = 0 BPM5UND5: DRIFT, L = 0 BPM5UND6: DRIFT, L = 0 ! Q5UND1000: LINE = (D0025g, Q5UND1, D0076g) Q6UND1000: LINE = (D0076g, Q6UND1, D0025g) Q5UND2000: LINE = (D0025g, Q5UND2, D0076g) Q6UND2000: LINE = (D0076g, Q6UND2, D0025g) Q5UND3000: LINE = (D0025g, Q5UND3, D0076g) Q6UND3000: LINE = (D0076g, Q6UND3, D0025g) Q5UND4000: LINE = (D0025g, Q5UND4, D0076g) Q6UND4000: LINE = (D0076g, Q6UND4, D0025g) Q5UND5000: LINE = (D0025g, Q5UND5, D0076g) Q6UND5000: LINE = (D0076g, Q6UND5, D0025g) ! Q5UND6000: LINE = (D0025g, Q5UND6, D0076g) Q6UND6000: LINE = (D0076g, Q6UND6, D0025g) ! ! Undulator segments: 5 + 1 ! UNDU1: LINE=(D4553, BPM2UND1, Q5UND1000, WIRE5UN1,WIRE5UN1, BPM5UND1, Q6UND1000) UNDU2: LINE=(D4553, BPM2UND2, Q5UND2000, WIRE5UN2,WIRE5UN2, BPM5UND2, Q6UND2000) UNDU3: LINE=(D4553, BPM2UND3, Q5UND3000, WIRE5UN3,WIRE5UN3, BPM5UND3, Q6UND3000) UNDU4: LINE=(D4553, BPM2UND4, Q5UND4000, WIRE5UN4,WIRE5UN4, BPM5UND4, Q6UND4000) UNDU5: LINE=(D4553, BPM2UND5, Q5UND5000, WIRE5UN5,WIRE5UN5, BPM5UND5, Q6UND5000) ! UNDU6: LINE=(D4553, BPM2UND6, Q5UND6000, WIRE5UN6,WIRE5UN6, BPM5UND6, Q6UND6000) ! ! Undulator: UNDU1 + UNDU2 + UNDU3 + UNDU4 + UNDU5. ! UNDU6 is in EXP. ! StartUND: MARKER EndUND: MARKER ! UNDULATOR: LINE=(StartUND, UNDU1, UNDU2, UNDU3, UNDU4, UNDU5, EndUND) ! !===================================================================================== ! EXP section. !===================================================================================== ! D0322: DRIFT, L = 0.322 D0340: DRIFT, L = 0.340 D1342: DRIFT, L = 1.342 D1660: DRIFT, L = 1.660 ! H1EXP: HKICKER, L = 0.100, KICK = 0.0 V1EXP: VKICKER, L = 0.100, KICK = 0.0 H3EXP: HKICKER, L = 0.100, KICK = 0.0 V3EXP: VKICKER, L = 0.100, KICK = 0.0 H10EXP: HKICKER, L = 0.100, KICK = 0.0 V10EXP: VKICKER, L = 0.100, KICK = 0.0 ! BPM9EXP: MONITOR ! OTR10EXPi: DRIFT, L = 0.320 / 2 OTR12EXPi: DRIFT, L = 0.230 / 2 DARK10EXP: DRIFT, L = 0.000 TOR12EXPi: DRIFT, L = 0.216 / 2 ! OTR10EXP: Line = (OTR10EXPi, OTR10EXPi) OTR12EXP: Line = (OTR12EXPi, OTR12EXPi) TOR12EXP: Line = (TOR12EXPi, TOR12EXPi) ! !------------------------------------------------------------------------------------- ! FIR undulator: in D4800 drift in the front of Q9EXP !------------------------------------------------------------------------------------- ! ! FIR undulator off: ! D4800i: DRIFT, L = 4.800 / 10.0 D4800: LINE = (10 * D4800i) FIR_no: LINE = (D4800) ! ! FIR undulator on: matrix for B_max = 1.2 T and E = 1000 MeV. ! FirEn_1000: MATRIX, L = 0.50085, & RM(1,1) = +1.000000e+00, RM(1,2) = +5.009142e-01, RM(1,3) = +0.000000e+00, & RM(1,4) = +0.000000e+00, RM(1,5) = +0.000000e+00, RM(1,6) = +3.109107e-03, & RM(2,1) = +0.000000e+00, RM(2,2) = +1.000000e+00, RM(2,3) = +0.000000e+00, & RM(2,4) = +0.000000e+00, RM(2,5) = +0.000000e+00, RM(2,6) = +7.292775e-19, & RM(3,1) = +0.000000e+00, RM(3,2) = +0.000000e+00, RM(3,3) = +9.994507e-01, & RM(3,4) = +5.006413e-01, RM(3,5) = +0.000000e+00, RM(3,6) = +0.000000e+00, & RM(4,1) = +0.000000e+00, RM(4,2) = +0.000000e+00, RM(4,3) = -6.494803e-03, & RM(4,4) = +9.972963e-01, RM(4,5) = +0.000000e+00, RM(4,6) = +0.000000e+00, & RM(5,1) = +0.000000e+00, RM(5,2) = +3.109107e-03, RM(5,3) = +0.000000e+00, & RM(5,4) = +0.000000e+00, RM(5,5) = +1.000000e-00, RM(5,6) = +4.295333e-05, & RM(6,1) = +0.000000e+00, RM(6,2) = +0.000000e+00, RM(6,3) = +0.000000e+00, & RM(6,4) = +0.000000e+00, RM(6,5) = +0.000000e+00, RM(6,6) = +1.000000e+00 FirP1_1000: MATRIX, L = 0.40015, & RM(1,1) = +1.000000e+00, RM(1,2) = +4.003249e-01, RM(1,3) = +0.000000e+00, & RM(1,4) = +0.000000e+00, RM(1,5) = +0.000000e+00, RM(1,6) = +8.790155e-04, & RM(2,1) = +0.000000e+00, RM(2,2) = +1.000000e+00, RM(2,3) = +0.000000e+00, & RM(2,4) = +0.000000e+00, RM(2,5) = +0.000000e+00, RM(2,6) = -2.117568e-19, & RM(3,1) = +0.000000e+00, RM(3,2) = +0.000000e+00, RM(3,3) = +9.949041e-01, & RM(3,4) = +3.994186e-01, RM(3,5) = +0.000000e+00, RM(3,6) = +0.000000e+00, & RM(4,1) = +0.000000e+00, RM(4,2) = +0.000000e+00, RM(4,3) = -2.743416e-02, & RM(4,4) = +9.941081e-01, RM(4,5) = +0.000000e+00, RM(4,6) = +0.000000e+00, & RM(5,1) = +0.000000e+00, RM(5,2) = +8.790155e-04, RM(5,3) = +0.000000e+00, & RM(5,4) = +0.000000e+00, RM(5,5) = +1.000000e-00, RM(5,6) = +1.167480e-04, & RM(6,1) = +0.000000e+00, RM(6,2) = +0.000000e+00, RM(6,3) = +0.000000e+00, & RM(6,4) = +0.000000e+00, RM(6,5) = +0.000000e+00, RM(6,6) = +1.000000e+00 FirP2_1000: MATRIX, L = 0.40015, & RM(1,1) = +1.000000e+00, RM(1,2) = +4.003193e-01, RM(1,3) = +0.000000e+00, & RM(1,4) = +0.000000e+00, RM(1,5) = +0.000000e+00, RM(1,6) = +4.725482e-05, & RM(2,1) = +0.000000e+00, RM(2,2) = +1.000000e+00, RM(2,3) = +0.000000e+00, & RM(2,4) = +0.000000e+00, RM(2,5) = +0.000000e+00, RM(2,6) = -1.544363e-18, & RM(3,1) = +0.000000e+00, RM(3,2) = +0.000000e+00, RM(3,3) = +9.944341e-01, & RM(3,4) = +3.994064e-01, RM(3,5) = +0.000000e+00, RM(3,6) = +0.000000e+00, & RM(4,1) = +0.000000e+00, RM(4,2) = +0.000000e+00, RM(4,3) = -2.785333e-02, & RM(4,4) = +9.944099e-01, RM(4,5) = +0.000000e+00, RM(4,6) = +0.000000e+00, & RM(5,1) = +0.000000e+00, RM(5,2) = +4.725482e-05, RM(5,3) = +0.000000e+00, & RM(5,4) = +0.000000e+00, RM(5,5) = +1.000000e-00, RM(5,6) = +1.129555e-04, & RM(6,1) = +0.000000e+00, RM(6,2) = +0.000000e+00, RM(6,3) = +0.000000e+00, & RM(6,4) = +0.000000e+00, RM(6,5) = +0.000000e+00, RM(6,6) = +1.000000e+00 FirP3_1000: MATRIX, L = 0.40015, & RM(1,1) = +1.000000e+00, RM(1,2) = +4.003190e-01, RM(1,3) = +0.000000e+00, & RM(1,4) = +0.000000e+00, RM(1,5) = +0.000000e+00, RM(1,6) = +5.883898e-05, & RM(2,1) = +0.000000e+00, RM(2,2) = +1.000000e+00, RM(2,3) = +0.000000e+00, & RM(2,4) = +0.000000e+00, RM(2,5) = +0.000000e+00, RM(2,6) = +5.694456e-19, & RM(3,1) = +0.000000e+00, RM(3,2) = +0.000000e+00, RM(3,3) = +9.944390e-01, & RM(3,4) = +3.994070e-01, RM(3,5) = +0.000000e+00, RM(3,6) = +0.000000e+00, & RM(4,1) = +0.000000e+00, RM(4,2) = +0.000000e+00, RM(4,3) = -2.783022e-02, & RM(4,4) = +9.944143e-01, RM(4,5) = +0.000000e+00, RM(4,6) = +0.000000e+00, & RM(5,1) = +0.000000e+00, RM(5,2) = +5.883898e-05, RM(5,3) = +0.000000e+00, & RM(5,4) = +0.000000e+00, RM(5,5) = +1.000000e-00, RM(5,6) = +1.127901e-04, & RM(6,1) = +0.000000e+00, RM(6,2) = +0.000000e+00, RM(6,3) = +0.000000e+00, & RM(6,4) = +0.000000e+00, RM(6,5) = +0.000000e+00, RM(6,6) = +1.000000e+00 FirP4_1000: MATRIX, L = 0.40015, & RM(1,1) = +1.000000e+00, RM(1,2) = +4.003188e-01, RM(1,3) = +0.000000e+00, & RM(1,4) = +0.000000e+00, RM(1,5) = +0.000000e+00, RM(1,6) = +6.913333e-05, & RM(2,1) = +0.000000e+00, RM(2,2) = +1.000000e+00, RM(2,3) = +0.000000e+00, & RM(2,4) = +0.000000e+00, RM(2,5) = +0.000000e+00, RM(2,6) = -1.762867e-18, & RM(3,1) = +0.000000e+00, RM(3,2) = +0.000000e+00, RM(3,3) = +9.944412e-01, & RM(3,4) = +3.994073e-01, RM(3,5) = +0.000000e+00, RM(3,6) = +0.000000e+00, & RM(4,1) = +0.000000e+00, RM(4,2) = +0.000000e+00, RM(4,3) = -2.781574e-02, & RM(4,4) = +9.944179e-01, RM(4,5) = +0.000000e+00, RM(4,6) = +0.000000e+00, & RM(5,1) = +0.000000e+00, RM(5,2) = +6.913333e-05, RM(5,3) = +0.000000e+00, & RM(5,4) = +0.000000e+00, RM(5,5) = +1.000000e-00, RM(5,6) = +1.126409e-04, & RM(6,1) = +0.000000e+00, RM(6,2) = +0.000000e+00, RM(6,3) = +0.000000e+00, & RM(6,4) = +0.000000e+00, RM(6,5) = +0.000000e+00, RM(6,6) = +1.000000e+00 FirP5_1000: MATRIX, L = 0.40015, & RM(1,1) = +1.000000e+00, RM(1,2) = +4.003185e-01, RM(1,3) = +0.000000e+00, & RM(1,4) = +0.000000e+00, RM(1,5) = +0.000000e+00, RM(1,6) = +7.706653e-05, & RM(2,1) = +0.000000e+00, RM(2,2) = +1.000000e+00, RM(2,3) = +0.000000e+00, & RM(2,4) = +0.000000e+00, RM(2,5) = +0.000000e+00, RM(2,6) = -1.389357e-18, & RM(3,1) = +0.000000e+00, RM(3,2) = +0.000000e+00, RM(3,3) = +9.944452e-01, & RM(3,4) = +3.994080e-01, RM(3,5) = +0.000000e+00, RM(3,6) = +0.000000e+00, & RM(4,1) = +0.000000e+00, RM(4,2) = +0.000000e+00, RM(4,3) = -2.778998e-02, & RM(4,4) = +9.944242e-01, RM(4,5) = +0.000000e+00, RM(4,6) = +0.000000e+00, & RM(5,1) = +0.000000e+00, RM(5,2) = +7.706653e-05, RM(5,3) = +0.000000e+00, & RM(5,4) = +0.000000e+00, RM(5,5) = +1.000000e-00, RM(5,6) = +1.124492e-04, & RM(6,1) = +0.000000e+00, RM(6,2) = +0.000000e+00, RM(6,3) = +0.000000e+00, & RM(6,4) = +0.000000e+00, RM(6,5) = +0.000000e+00, RM(6,6) = +1.000000e+00 FirP6_1000: MATRIX, L = 0.40015, & RM(1,1) = +1.000000e+00, RM(1,2) = +4.003184e-01, RM(1,3) = +0.000000e+00, & RM(1,4) = +0.000000e+00, RM(1,5) = +0.000000e+00, RM(1,6) = +9.328509e-05, & RM(2,1) = +0.000000e+00, RM(2,2) = +1.000000e+00, RM(2,3) = +0.000000e+00, & RM(2,4) = +0.000000e+00, RM(2,5) = +0.000000e+00, RM(2,6) = -3.002168e-19, & RM(3,1) = +0.000000e+00, RM(3,2) = +0.000000e+00, RM(3,3) = +9.944480e-01, & RM(3,4) = +3.994081e-01, RM(3,5) = +0.000000e+00, RM(3,6) = +0.000000e+00, & RM(4,1) = +0.000000e+00, RM(4,2) = +0.000000e+00, RM(4,3) = -2.778480e-02, & RM(4,4) = +9.944236e-01, RM(4,5) = +0.000000e+00, RM(4,6) = +0.000000e+00, & RM(5,1) = +0.000000e+00, RM(5,2) = +9.328509e-05, RM(5,3) = +0.000000e+00, & RM(5,4) = +0.000000e+00, RM(5,5) = +1.000000e-00, RM(5,6) = +1.123764e-04, & RM(6,1) = +0.000000e+00, RM(6,2) = +0.000000e+00, RM(6,3) = +0.000000e+00, & RM(6,4) = +0.000000e+00, RM(6,5) = +0.000000e+00, RM(6,6) = +1.000000e+00 FirP7_1000: MATRIX, L = 0.40015, & RM(1,1) = +1.000000e+00, RM(1,2) = +4.003182e-01, RM(1,3) = +0.000000e+00, & RM(1,4) = +0.000000e+00, RM(1,5) = +0.000000e+00, RM(1,6) = +1.039004e-04, & RM(2,1) = +0.000000e+00, RM(2,2) = +1.000000e+00, RM(2,3) = +0.000000e+00, & RM(2,4) = +0.000000e+00, RM(2,5) = +0.000000e+00, RM(2,6) = +2.369019e-18, & RM(3,1) = +0.000000e+00, RM(3,2) = +0.000000e+00, RM(3,3) = +9.944518e-01, & RM(3,4) = +3.994086e-01, RM(3,5) = +0.000000e+00, RM(3,6) = +0.000000e+00, & RM(4,1) = +0.000000e+00, RM(4,2) = +0.000000e+00, RM(4,3) = -2.776498e-02, & RM(4,4) = +9.944277e-01, RM(4,5) = +0.000000e+00, RM(4,6) = +0.000000e+00, & RM(5,1) = +0.000000e+00, RM(5,2) = +1.039004e-04, RM(5,3) = +0.000000e+00, & RM(5,4) = +0.000000e+00, RM(5,5) = +1.000000e-00, RM(5,6) = +1.122212e-04, & RM(6,1) = +0.000000e+00, RM(6,2) = +0.000000e+00, RM(6,3) = +0.000000e+00, & RM(6,4) = +0.000000e+00, RM(6,5) = +0.000000e+00, RM(6,6) = +1.000000e+00 FirP8_1000: MATRIX, L = 0.40015, & RM(1,1) = +1.000000e+00, RM(1,2) = +4.003180e-01, RM(1,3) = +0.000000e+00, & RM(1,4) = +0.000000e+00, RM(1,5) = +0.000000e+00, RM(1,6) = +1.196682e-04, & RM(2,1) = +0.000000e+00, RM(2,2) = +1.000000e+00, RM(2,3) = +0.000000e+00, & RM(2,4) = +0.000000e+00, RM(2,5) = +0.000000e+00, RM(2,6) = +8.283944e-19, & RM(3,1) = +0.000000e+00, RM(3,2) = +0.000000e+00, RM(3,3) = +9.944554e-01, & RM(3,4) = +3.994088e-01, RM(3,5) = +0.000000e+00, RM(3,6) = +0.000000e+00, & RM(4,1) = +0.000000e+00, RM(4,2) = +0.000000e+00, RM(4,3) = -2.775493e-02, & RM(4,4) = +9.944282e-01, RM(4,5) = +0.000000e+00, RM(4,6) = +0.000000e+00, & RM(5,1) = +0.000000e+00, RM(5,2) = +1.196682e-04, RM(5,3) = +0.000000e+00, & RM(5,4) = +0.000000e+00, RM(5,5) = +1.000000e-00, RM(5,6) = +1.121431e-04, & RM(6,1) = +0.000000e+00, RM(6,2) = +0.000000e+00, RM(6,3) = +0.000000e+00, & RM(6,4) = +0.000000e+00, RM(6,5) = +0.000000e+00, RM(6,6) = +1.000000e+00 FirP9_1000: MATRIX, L = 0.40015, & RM(1,1) = +1.000000e+00, RM(1,2) = +4.003179e-01, RM(1,3) = +0.000000e+00, & RM(1,4) = +0.000000e+00, RM(1,5) = +0.000000e+00, RM(1,6) = +1.358671e-04, & RM(2,1) = +0.000000e+00, RM(2,2) = +1.000000e+00, RM(2,3) = +0.000000e+00, & RM(2,4) = +0.000000e+00, RM(2,5) = +0.000000e+00, RM(2,6) = -3.366744e-19, & RM(3,1) = +0.000000e+00, RM(3,2) = +0.000000e+00, RM(3,3) = +9.944602e-01, & RM(3,4) = +3.994093e-01, RM(3,5) = +0.000000e+00, RM(3,6) = +0.000000e+00, & RM(4,1) = +0.000000e+00, RM(4,2) = +0.000000e+00, RM(4,3) = -2.773713e-02, & RM(4,4) = +9.944305e-01, RM(4,5) = +0.000000e+00, RM(4,6) = +0.000000e+00, & RM(5,1) = +0.000000e+00, RM(5,2) = +1.358671e-04, RM(5,3) = +0.000000e+00, & RM(5,4) = +0.000000e+00, RM(5,5) = +1.000000e-00, RM(5,6) = +1.120504e-04, & RM(6,1) = +0.000000e+00, RM(6,2) = +0.000000e+00, RM(6,3) = +0.000000e+00, & RM(6,4) = +0.000000e+00, RM(6,5) = +0.000000e+00, RM(6,6) = +1.000000e+00 FirEx_1000: MATRIX, L = 0.69695, & RM(1,1) = +1.000000e+00, RM(1,2) = +6.971152e-01, RM(1,3) = +0.000000e+00, & RM(1,4) = +0.000000e+00, RM(1,5) = +0.000000e+00, RM(1,6) = +9.258606e-04, & RM(2,1) = +0.000000e+00, RM(2,2) = +1.000000e+00, RM(2,3) = +0.000000e+00, & RM(2,4) = +0.000000e+00, RM(2,5) = +0.000000e+00, RM(2,6) = +9.293605e-19, & RM(3,1) = +0.000000e+00, RM(3,2) = +0.000000e+00, RM(3,3) = +9.891917e-01, & RM(3,4) = +6.954253e-01, RM(3,5) = +0.000000e+00, RM(3,6) = +0.000000e+00, & RM(4,1) = +0.000000e+00, RM(4,2) = +0.000000e+00, RM(4,3) = -2.014787e-02, & RM(4,4) = +9.967620e-01, RM(4,5) = +0.000000e+00, RM(4,6) = +0.000000e+00, & RM(5,1) = +0.000000e+00, RM(5,2) = +9.258606e-04, RM(5,3) = +0.000000e+00, & RM(5,4) = +0.000000e+00, RM(5,5) = +1.000000e-00, RM(5,6) = +1.103243e-04, & RM(6,1) = +0.000000e+00, RM(6,2) = +0.000000e+00, RM(6,3) = +0.000000e+00, & RM(6,4) = +0.000000e+00, RM(6,5) = +0.000000e+00, RM(6,6) = +1.000000e+00 ! DFU: DRIFT, L = (4.8 - 4.79915) ! FIR_yes_1000: Line = (FirEn_1000, FirP1_1000, FirP2_1000, FirP3_1000, & FirP4_1000, FirP5_1000, FirP6_1000, & FirP7_1000, FirP8_1000, FirP9_1000, & FirEx_1000, DFU) ! U6EXP: Line = (FIR_no) !U6EXP: Line = (FIR_yes) ! !------------------------------------------------------------------------------------- ! ! Quadrupoles with drifts and BPM's ! Q9EXPBPM: LINE = (D0100a, Q9EXP, BPM9EXP, D0100a) Q10EXP000: LINE = (D0100bm, Q10EXP, D0100bm) Q11EXP000: LINE = (D0100bm, Q11EXP, D0100bm) ! ! Steering blocks ! HV10EXP: LINE = (D0100, H10EXP, D0100, V10EXP, D0100) ! D0074: DRIFT, L = 0.074 D0856: DRIFT, L = 235.476 - 234.470 - 0.5 * 0.100 - 0.100 D0012: DRIFT, L = 235.812 - 235.650 - 0.5 * 0.100 - 0.100 HV1EXP: LINE = (D0100, H1EXP, D0074, V1EXP, D0100) DHV1EXP: LINE = (D0856, HV1EXP, D0012) ! D1278: DRIFT, L = 237.240 - 235.812 - 0.5 * 0.100 - 0.100 D0082: DRIFT, L = 237.812 - 237.580 - 0.5 * 0.100 - 0.100 HV3EXP: LINE = (D0100, H3EXP, D0240, V3EXP, D0100) DHV3EXP: LINE = (D1278, HV3EXP, D0082) ! !------------------------------------------------------------------------------------- ! EXP section: contains UNDU6 !------------------------------------------------------------------------------------- ! StartEXP: MARKER EndEXP: MARKER ! UND_EXP: LINE = (StartEXP, UNDU6, & D0072, D0080, D0322, DHV1EXP, & DHV3EXP, D0080, U6EXP, & Q9EXPBPM, OTR10EXP, Q10EXP000, DARK10EXP, & HV10EXP, Q11EXP000, TOR12EXP, OTR12EXP, & D0075, EndEXP) ! !===================================================================================== ! DUMP beam line: 02.06.2003 !===================================================================================== ! D0015: DRIFT, L = 0.015 D0140: DRIFT, L = 0.140 D0280: DRIFT, L = 0.280 D0342: DRIFT, L = 0.342 D0385: DRIFT, L = 0.385 D0392: DRIFT, L = 0.392 D0482: DRIFT, L = 0.482 D0620: DRIFT, L = 0.620 D07983: DRIFT, L = 0.79833 D08833: DRIFT, L = 0.8833 D21093: DRIFT, L = 2.1093 ! lll_dump = 1.2 ang_dump = (19.0 / 180.0) * PI larc_dump = (lll_dump * ang_dump) / sin(ang_dump) len_dump = larc_dump ! ! This model of dump dipole has been used. ! D6DUMP: SBEND, L = len_dump, ANGLE = -ang_dump, & E1 = 0.0, E2 = -ang_dump, & TILT=dump_tilt ! DE6DUMP: LINE = (D0350, D6DUMP, D0482) ! H07DUMP: HKICKER, L = 0.300, KICK = 0.0 ! OTR9DUMPi: DRIFT, L = 0.270 / 2 OTR9DUM: MONITOR, L = 0.0 OTR9DUMP: LINE = (OTR9DUMPi, OTR9DUM, OTR9DUMPi) ! BPM9DUMP: MONITOR, L = 0.350 BPM15DUMP: MONITOR, L = 0.150 ! ! Quadrupoles with drifts ! Q10DUMPU000: LINE = (D0200c, Q10DUMP.U,Q10DUMP.U, D0200c) Q11DUMPU000: LINE = (D0200c, Q11DUMP.U,Q11DUMP.U, D0200c) ! !------------------------------------------------------------------------------------- ! DUMP line: from EXP to the dump !------------------------------------------------------------------------------------- ! StartDUMP: MARKER EndDUMP: MARKER ! EXP_DUMP: LINE = (StartDUMP, & DE6DUMP, D0034, H07DUMP, D0244, & D0100, D0350, OTR9DUMP, & D0230, D0150, BPM9DUMP, D0230, & Q10DUMPU000, Q11DUMPU000, D0140, D0280, & D0130, D0085, D21093, BPM15DUMP, D0620, & EndDUMP) ! !===================================================================================== ! FLASH: from Q9ACC1 entrance to entrance of dump dipole D6DUMP !===================================================================================== ! FLASH: LINE = (PACC1, & BC2, & ACC2_TM, ACC3_TM, & BC3, & ACC4567_TM, & COLLIMATOR, & TB_SEED, & UNDULATOR, & UND_EXP) ! !------------------------------------------------------------------------------------- ! Beam parameters at the entrance of PACC1 (at Q9ACC1 entrance): !------------------------------------------------------------------------------------- ! BEAM, PARTICLE = ELECTRON, ENERGY = 0.127 ! ! 21.04.2006: Data of E.Schneidmiller are shifted to upstream ! for the usage of L_eff = 0.185 m for Q9ACC1: ! INITIAL_PACC1: BETA0 , & BETX = 18.7992, ALFX = -0.3428, & BETY = 18.8904, ALFY = -0.3177 ! !------------------------------------------------------------------------------------- ! Plot of optical functions: !------------------------------------------------------------------------------------- ! TWISSPLOT_FLASH: SUBROUTINE PLOT, HAXIS=S, VAXIS=BETX,BETY, VMIN=0,VMAX=100, & SPLINE=T, COLOUR=100, TABLE=BETA_FLASH PLOT, HAXIS=S, VAXIS=MUX,MUY, VMIN=0,VMAX=6, & SPLINE=T, COLOUR=100, TABLE=BETA_FLASH PLOT, HAXIS=S, VAXIS=DX,DY, VMIN=-0.5,VMAX=0.5, & SPLINE=T, COLOUR=100, TABLE=BETA_FLASH ENDSUBROUTINE ! !------------------------------------------------------------------------------------- ! USE, FLASH SELECT, TWISS,FULL TWISS, BETA0=INITIAL_PACC1, SAVE=BETA_FLASH SURVEY, TAPE=LAYOUT_FLASH TWISSPLOT_FLASH ! !=====================================================================================