HOME ESR EXPERIMENTS LABS etc
E121 E127 E132 E125 E143 laser_cooling_2021 E142 Ê128 E146 E0052 E0018 E0028 E0038
  nuclear two-photon decay  Not logged in ELOG logo
Message ID: 8     Entry time: Thu May 6 00:32:57 2021
Author: Helmut Weick 
Category: Simulations 
Subject: GICOSY file for TE beamline and ESR 
This file has several options:
start in SIS, at TE3UF target or inside ESR, choose with GOTO LABEL (G L)after start system (S S).
Depending on the choice select different start beam parameters at top of file, others comment out.

There are also different optics setting with different quadrupoles:
- for TE beamline the standard and the mode by Hans for better focus on the target.
- for ESR a standard mode and variations of isochronous modes
also select by commenting in/out.

Input can be made also in units of K'L for fast import from parammodi, still by hand but with copy and paste.
One half of ESR is defined as a block, can be used more or less often (B I HALF ;)
Attachment 1: SIS-TE-ESR-isoc-std.dat  21 kB  | Hide | Hide all
S N SIS18-TE-ESR TE3UF FOCUS ;
; mode for injection into ESR on 2nd May 2021
; TE line geometry based on MIRKO file from Hans Geissel/Benno F.,
; added ESR dipole and ESR, Helmut Weick 25.11.2020
; added May2021 values, parammodi in/output , HWeick 02.05.2021
; mode for focus on TE3UF target by Hans Geissel, 3.5.2021
; isoc. modes of ESR from Sergey Litvinov, 05.05.2021
;
;
 MASS   = 72 ; [u]
 CHARGE = 32 ; [e]  
 ENERGY =  379.61 * MASS ; gamma=1.407
 ;
 BRHO = SQRT(ENERGY*ENERGY+2*ENERGY*931.4940*MASS)/CHARGE/2.99792458E8*1E6;
 GAMMA = 1 + ENERGY/MASS/931.4940 ;
 BETAV = 100*SQRT(1-(1/GAMMA^2)) ; [%]
 ;
R P ENERGY MASS CHARGE ;
;
; starting in SIS
 EX  =   20.E-06  ; [m]
 EY  =   20.E-06  ; [m]
 TXA =   -1.82809997  ; [1] 
 TXB =   17.9983997   ; [m]
 TYA =   0.102665998  ; [1]
 TYB =    6.38079977  ; [m]
 XD0 =  2.6210839844 /(1+1/gamma) ; [m]
 AD0 =  0.0873332163 /(1+1/gamma) ; [1]
;
;starting at TE target
 EX  =  20.E-06  ; [m]
 EY  =  20.E-06  ; [m]
 TXA =   0.0   ; [1] 
 TXB =  EX/(0.003)^2 ; [m] with 10 mrad
 TYA =   0.0   ; [1]
 TYB =  EY/(0.010)^2 ; [m] with 10 mrad
 XD0 =   0.0   ; [m]
 AD0 =   0.0   ; [1]
;
;starting in ESR, 2021 isoc. gamma_t=1.34
; EX  =  20E-06  ; [m]
; EY  =  20E-06  ; [m]
; TXA =   0.00   ; [1] 
; TXB =  7.356   ; [m]
; TYA =   0.00   ; [1]
; TYB =  39.93 ; [m]
; XD0 =  -9.953 /(1+1/gamma) ; [m]
; AD0 =  0.0 /(1+1/gamma) ; [1]
;
;starting in ESR, 2021 std mode
; EX  =  20E-06  ; [m]
; EY  =  20E-06  ; [m]
; TXA =   0.00   ; [1] 
; TXB =  10.47   ; [m]
; TYA =   0.00   ; [1]
; TYB =  4.042 ; [m]
; XD0 =  2.016 /(1+1/gamma) ; [m]
; AD0 =  0.0 /(1+1/gamma) ; [1]
;
;starting in ESR, 2021 asymm. isoc. gamma_t=1.407
; EX  =  20E-06  ; [m]
; EY  =  20E-06  ; [m]
; TXA =   0.00   ; [1] 
; TXB =  2.17   ; [m]
; TYA =   0.00   ; [1]
; TYB =  13.6 ; [m]
; XD0 =  0 /(1+1/gamma) ; [m]
; AD0 =  0.0 /(1+1/gamma) ; [1]
;
T X TXA TXB EX ;
T Y TYA TYB EY ;
D P  0 0.001 ;
;
O C N M L S ;
;O C N E T S ;
C M 3 ; use fringe field integrals
;F T H ;
C O 1 ; calculation order
O O 1 ; output order
;
;P A B E ;
;S F TEST E ;
;S O D ; set output disabled
;
; ------- Element part -------------------
; 
 MDS001 =   7.50000000      ; GTE3MU1         
 MDR001 =   17.8700008      ; GTE3MU1         
 MDG001 =   3.99999991E-02  ; GTE3MU1         
 MDS002 =   7.50000000      ; GTE4MU1         
 MDR002 =   11.2500000      ; GTE4MU1         
 MDG002 =   3.50000001E-02  ; GTE4MU1         
 MDS003 =   7.00000000      ; GTE4MU2         
 MDR003 =  -12.0524569      ; GTE4MU2         
 MDG003 =   3.50000001E-02  ; GTE4MU2         
 MDS004 =   3.77189994      ; GTE5MU0         
 MDR004 =  -21.3375092      ; GTE5MU0         
 MDG004 =   3.99999991E-02  ; GTE5MU0         
 MDS005 =   6.50000000      ; GE01MU4I        
 MDR005 =  -10.5769997      ; GE01MU4I        
 MDG005 =   1.99999996E-02  ; GE01MU4I        
;---------------------------
;
; new mode with small focus on TE3UF, H. Geissel 29.03.2021
 MQS001 =  0.226839095      *BRHO/6.62436835; GTE1QD11        
 MQS002 = -0.245030180      *BRHO/6.62436835; GTE1QD12        
 MQS003 =   6.20027855E-02  *BRHO/6.62436835; GTE2QT11        
 MQS004 = -0.195458934      *BRHO/6.62436835; GTE2QT12        
 MQS005 =  0.207069993      *BRHO/6.62436835; GTE2QT13        
 MQS006 =  0.198365897      *BRHO/6.62436835; GTE3QD11        
 MQS007 = -0.220464170      *BRHO/6.62436835; GTE3QD12        
 MQS008 = -0.207067579      *BRHO/6.62436835; GTE4QD11        
 MQS009 =  0.137642503      *BRHO/6.62436835; GTE4QD12        
 MQS010 =   7.44464919E-02  *BRHO/6.62436835; GTE4QT21        
 MQS011 = -0.137685254      *BRHO/6.62436835; GTE4QT22        
 MQS012 =   9.01356563E-02  *BRHO/6.62436835; GTE4QT23        
 MQS013 =  -3.97465331E-03  *BRHO/6.62436835; GTE4QT31        
 MQS014 =  0.137549922      *BRHO/6.62436835; GTE4QT32        
 MQS015 = -0.117877714      *BRHO/6.62436835; GTE4QT33        
 MQS017 =  0.103170395      *BRHO/6.62436835; GTE5QD11        
 MQS018 = -0.110985421      *BRHO/6.62436835; GTE5QD12        
 MQS019 = -0.134439200      *BRHO/6.62436835; GTE5QD21        
 MQS020 =  0.193664759      *BRHO/6.62436835; GTE5QD22     
;
;parammodi export on 2.5.2021 for U91+ injection at 300 MeV/u
GTE1QD11 = 0.2017 ;
GTE1QD12 = -0.2374 ;
GTE2QT11 = 0.2487 ;
GTE2QT12 = -0.4301 ;
GTE2QT13 = 0.3493 ;
GTE3QD11 = 0.4885 ;
GTE3QD12 = -0.5615 ;
GTE4QD11 = -0.5625 ;
GTE4QD12 = 0.4554 ;
GTE4QT21 = 0.3805 ;
GTE4QT22 = -0.4588 ;
GTE4QT23 = 0.2175 ;
GTE4QT31 = -0.0032 ;
GTE4QT32 = 0.2113 ;
GTE4QT33 = -0.2073 ;
GTE5QD11 = 0.4 ;
GTE5QD12 = -0.47 ;
GTE5QD21 = -0.9 ;
GTE5QD22 = 0.68 ;
;
 MQS001 = GTE1QD11 / 0.666 * 0.060 * BRHO ; 
 MQS002 = GTE1QD12 / 0.666 * 0.060 * BRHO ; 
 MQS003 = GTE2QT11 / 1.000 * 0.060 * BRHO ; 
 MQS004 = GTE2QT12 / 1.000 * 0.060 * BRHO ; 
 MQS005 = GTE2QT13 / 1.000 * 0.060 * BRHO ; 
 MQS006 = GTE3QD11 / 1.000 * 0.060 * BRHO ; 
 MQS007 = GTE3QD12 / 1.000 * 0.060 * BRHO ; 
 MQS008 = GTE4QD11 / 1.000 * 0.060 * BRHO ; 
 MQS009 = GTE4QD12 / 1.000 * 0.060 * BRHO ; 
 MQS010 = GTE4QT21 / 1.000 * 0.060 * BRHO ; 
 MQS011 = GTE4QT22 / 1.000 * 0.060 * BRHO ; 
 MQS012 = GTE4QT23 / 1.000 * 0.060 * BRHO ; 
 MQS013 = GTE4QT31 / 1.000 * 0.060 * BRHO ; 
 MQS014 = GTE4QT32 / 1.000 * 0.060 * BRHO ; 
 MQS015 = GTE4QT33 / 1.000 * 0.060 * BRHO ; 
 MQS017 = GTE5QD11 / 1.0482* 0.085 * BRHO ; 
 MQS018 = GTE5QD12 / 1.0482* 0.085 * BRHO ; 
 MQS019 = GTE5QD21 / 1.000 * 0.060 * BRHO ; 
 MQS020 = GTE5QD22 / 1.000 * 0.060 * BRHO ;    
;
; ******** ESR dipoles ******
DIPGAP = 0.035 ; vertical aperture
N1 = 4.55401464E-03  ; n1 corresponds to the quadrupole error
N2 = 0.025991595717  ; from O.Gorda 3D simulations
N3 =-2.125422821E-03 ;
N4 =-4.952942899E-03 ;
N5 = 1.36464659E-03 ;
EDANGLE = 7.500 ;
DIPRADIUS = 6.35703 ; effective radius, geometrical 6.25
;
; ******** ESR quadrupoles *****
QUAGAP = 0.09 ; vertical aperture
;
;input in K'L as in parammodi
;
;----------std mode like 05.05.2021 ----------------
E01QS0D = -0.4175764 ; [1/m]
E01QS1F =  0.3833432 ;
E01QS2F =  0.2769876 ;
E01QS3D = -0.5628948 ;
E01QS4F =  0.3481972 ;
E01QS5F = E01QS4F ; 
E01QS6D = E01QS3D ;
E01QS7F = E01QS2F ;
E01QS8F = E01QS1F ;
E01QS9D = E01QS0D ;
;
;----------isoc--old-(ip-0)----------------
E01QS0D = -0.392974515278 ; [1/m]
E01QS1F =  0.394063234647 ;
E01QS2F =  0.0 ;
E01QS3D = -0.380833880289 ;
E01QS4F =  0.269288838358 ;
E01QS5F = E01QS4F ; 
E01QS6D = E01QS3D ;
E01QS7F = E01QS2F ;
E01QS8F = E01QS1F ;
E01QS9D = E01QS0D ;
;
QL01 = 0.8216; [m]
QL02 = 0.8346;
QL03 = 0.8216;
QL04 = 1.2404;
QL05 = 0.8216;
QL06 = 0.8216;
QL07 = 1.2404;
QL08 = 0.8216;
QL09 = 0.8346;
QL10 = 0.8216;
;
Q01 = E01QS0D * QUAGAP /QL01 * BRHO ;
Q02 = E01QS1F * QUAGAP /QL02 * BRHO ;
Q03 = E01QS2F * QUAGAP /QL03 * BRHO ;
Q04 = E01QS3D * QUAGAP /QL04 * BRHO ;
Q05 = E01QS4F * QUAGAP /QL05 * BRHO ;
Q06 = E01QS5F * QUAGAP /QL06 * BRHO ;
Q07 = E01QS6D * QUAGAP /QL07 * BRHO ;
Q08 = E01QS7F * QUAGAP /QL08 * BRHO ;
Q09 = E01QS8F * QUAGAP /QL09 * BRHO ;
Q10 = E01QS9D * QUAGAP /QL10 * BRHO ;
;
; Sergey asymm. isoc g_t ~ 1.407
; Q01=-2.956832426E-01 *BRHO/8.051237838 ;
; Q02= 3.056272295E-01 *BRHO/8.051237838;
; Q03= 1.900693277E-03 *BRHO/8.051237838;
; Q04=-2.172814153E-01 *BRHO/8.051237838;
; Q05= 1.120797096E-01 *BRHO/8.051237838;
; Q06= 2.545596870E-01 *BRHO/8.051237838;
; Q07=-1.782833793E-01 *BRHO/8.051237838;
; Q08= 1.900693277E-03 *BRHO/8.051237838;
; Q09= 2.219389699E-01 *BRHO/8.051237838;
; Q10=-2.245121342E-02 *BRHO/8.051237838;
;
; Q03= 0.0002360747 *BRHO ; the ESR cannot really accept zero
; Q08= 0.0002360747 *BRHO ;  
;
; ******** hexapole variables ********
 HEXLEN = 0.34 ;
 HEXGAP = 0.16 ; vertical and horizontal
 ;
 SEX1= 0.000000000E+00;
 SEX2= 0.0;
 SEX3= 0.010000000E+00;
 SEX4= 0.000000000E+00;
 SEX5= 0.000000000E+00;
 SEX6= 0.000000000E+00;
 SEX7= 0.0;
 SEX8= 0.000000000E+00;
;
;----------------------------------------------
S S ;
[X,D] = XD0 ;
[A,D] = AD0 ;
D L 0 ;
G L TETARGET ;
;G L COOLER ;
D L 0 ;
 ;                                    16  "PSE"            
 ;                                    12  DISP-MAT         
 ;                                   -37  Labels           
 D L    3.9057000 ;
 ;                                    22  GTE1KY1          
 D L    0.8420000 ;
 ;S B   -1.00539997E-03   0.00000      0.0 0.0 ;   TE1QD11-x       
 ;S B    0.0 0.0    3.03649995E-02   0.00      ;   TE1QD11-y       
 M Q    0.66600000      MQS001    0.060 ;  GTE1QD11        
 D L    0.1670000 ;
 ;                                     1  GTE1DK1          
 D L    0.1700000 ;
 ;                                    29  GTE1DG1          
 D L    0.0000000 ;
 D L    0.6470000 ;
 ;S B   -1.05189998E-03   0.00000000      0.0 0.0 ;   TE1QD12-x       
 ;S B    0.0 0.0    3.01099997E-02   0.00000      ;   TE1QD12-y       
 M Q    0.66600000      MQS002    0.060 ;  GTE1QD12        
 D L    0.4094942 ;
 D L    1.1706057 ;
 ;                                    16  "VZP31"          
 ;                                    21  GTS1MU1          
 D L   -1.1706057 ;
 D L    2.34121132      ; slit                 
 A S P  6.49999976E-02   1.00000000      ;                
 D L   -2.3412113 ;
 D L    2.34121132      ; slit                 
 A S P  1.00000000       3.50000001E-02  ;                
 D L   -1.1706057 ;
 D L    7.1270976 ;
 ;                                    21  GTE2KX1          
 D L    4.0826998 ;
 M Q    1.00000000      MQS003    0.060 ;  GTE2QT11        
 D L    1.0004001 ;
 M Q    1.00000000      MQS004    0.060 ;  GTE2QT12        
 D L    1.0059000 ;
 M Q    1.00000000      MQS005    0.060 ;  GTE2QT13        
 D L    0.3909000 ;
 ;                                     1  GTE2DK4          
 D L    0.1700000 ;
 ;                                    29  GTE2DG4          
 D L    0.2596000 ;
 ;                                    29  GTE2DF4          
 D L    2.9633996 ;
 ;                                    16  "VZP33"          
 D L   -1.1712610 ;
 F F 0  3.75000000      ;
 M S MDR001 MDS001 MDG001 ;  GTE3MU1         
 F F 0  3.75000000      ;
 D L    0.0000000 ;
 D L    4.6407251 ;
 ;                                    22  GTE3KY1          
 D L    0.5755000 ;
 M Q    1.00000000      MQS006    0.060 ;  GTE3QD11        
 D L    0.9994000 ;
 M Q    1.00000000      MQS007    0.060 ;  GTE3QD12        
 D L    2.1566000 ;
 ;                                     1  GTE3DK3          
 D L    0.1830000 ;
 ;                                    29  GTE3DG3          
 D L    1.1531496 ;
 ;
 TETARGET: ;                          33  TE3UF
 ;
 A S P 0.03 0.03 ;
 ;
 D L    3.5000000 ;
 M Q    1.00000000      MQS008    0.060 ;  GTE4QD11        
 D L    1.0000000 ;
 M Q    1.00000000      MQS009    0.060 ;  GTE4QD12        
 D L    1.0000000 ;
 F F 0    3.75000000      ;
 M S MDR002 MDS002 MDG002 ;  GTE4MU1         
 F F 0    3.75000000      ;
 D L    7.0000000 ;
 D L   -0.0550000 ;
 A S P    6.49999976E-02   1.00000000      ;GTE4DS5H        
 D L    0.3279000 ;
 ;                                    29  GTE4DG5          
 D L    2.2911787 ;
 ;                                    22  GTE4KY1          
 D L    1.4360000 ;
 M Q    1.00000000      MQS010    0.060 ;  GTE4QT21        
 D L    1.0000000 ;
 M Q    1.00000000      MQS011    0.060 ;  GTE4QT22        
 D L    1.0000000 ;
 M Q    1.00000000      MQS012    0.060 ;  GTE4QT23        
 D L    0.7839000 ;
 ;                                     1  GTE4DK8          
 D L    0.1700000 ;
 ;                                    29  GTE4DG8          
 D L    1.3929775 ;
 F F 0    3.50000000      ;
 M S MDR003 MDS003 MDG003 ;  GTE4MU2         
 F F 0    3.50000000      ;
 D L    0.8890000 ;
 D L    0.6000000 ;
 ;                                    22  GTE4KY2          
 D L    1.1859000 ;
 ;                                     1  GTE4DK9          
 D L    0.1700000 ;
 ;                                    29  GTE4DG9          
 D L    4.4550977 ;
 M Q    1.00000000      MQS013    0.060 ;  GTE4QT31        
 D L    1.0000000 ;
 M Q    1.00000000      MQS014    0.060 ;  GTE4QT32        
 D L    1.0000000 ;
 M Q    1.00000000      MQS015    0.060 ;  GTE4QT33        
 D L    1.7719997 ;
 ;                                    21  GTE4KX3          
 D L    0.8000000 ;
 ;                                    22  GTE4KY3          
 D L    0.8859000 ;
 ;                                     1  GTE4DKC          
 D L    0.1700000 ;
 ;                                    29  GTE4DGC          
 D L    4.3395143 ;
 ;                                    21  GTS6MU1          
 ;                                    38  A-FRS-Q1         
 ;                                    38   FF#1_001        
 ;                                    16  "VZP36"          
 ;                                   -16  VZP36?           
 D L    3.0144279 ;
 D L    0.6355918 ;
 ;                                    21  GTE5KS1          
 M Q   0.250000000      0   0.118799999 ; dummy aperture 
 D L    0.1109000 ;
 ;S B    4.35790000E-03   0.00000      0.0 0.0 ;   TE5QD11-x       
 ;S B  0.0 0.0    1.02700004E-02   0.00000     ;   TE5QD11-y       
 M Q    1.04820      MQS017    0.085  ;  GTE5QD11        
 ;                                     0  QVK              
 D L    0.4518000 ;
 M Q    1.04820      MQS018    0.085  ;  GTE5QD12        
 ;                                     0  QVK              
 D L    1.1119000 ;
 ;                                    22  GTE5KY1          
 D L    0.6810000 ;
 ;                                     1  GTE5DKA          
 D L    0.1700000 ;
 A S P    4.45000008E-02   1.00000000  ; GTE5DSAH        
 D L    1.2689791 ;
 D L    0.0200000 ;
 ;                                    29  GTE5DGBG         
 D L    1.2180661 ;
 D L   -0.7026000 ;
 F F 0    1.88600004      ;
 M S MDR004 MDS004 MDG004 ;  GTE5MU0         
 F F 0    1.88600004      ;
 D L    0.0000000 ;
 D L    1.1861100 ;
 ;S B    5.75790042E-03   0.00000000      0.0 0.0 ;   TE5QD21-x       
 ;S B    0.0 0.0    7.05000013E-03   0.00000000   ;   TE5QD21-y       
 M Q    1.00000000      MQS019    0.060 ;  GTE5QD21        
 D L    0.6600000 ;
 ;S B    7.39589985E-03   0.00000000      0.0 0.0 ;   TE5QD22-x       
 ;S B    0.0 0.0    6.44000014E-03   0.00000000   ;   TE5QD22-y       
 M Q    1.00000000      MQS020    0.060 ;  GTE5QD22        
 ;D L    2.4324179 ;
 ;
D L 0.470 ;
;
;  F22 = (TXA$ -14.52)^2*999 ; 
;  F23 = (TXB$ -63.06)^2*9 ;   
;  F24 = (TYA$ +1.057)^2*9999 ;
;  F25 = (TYB$ -2.425)^2*99 ;
;
;  FESR = F22 + F23 + F24 + F25 + F21 ;
;  F V FESR ;
;  F E 1E-20 1000 6;
;
;----------------- P. Spillers take over point ------------
TAKEOVER: ; (old position of end of TE5MU0)
;D H E (X,A) 10000 0.10 0.025 1 1 ;
;D H E (Y,B) 10000 0.10 0.025 1 1 ;
;
D L 1.971 ; from TOP, from drawing
;
;stray field matrix composed of dipoles and thin lenses, zero total length
; B. Schillinger thesis, TUD p.138
;
;dispersion in many steps of 0.1m length, 1st half
D L -1.200 ;
M S 781.25 0.00733385977767454 0.1 ;
M S 625.00 0.00916732472209317 0.1 ;
M S 250.00 0.0229183118052329 0.1 ;
M S 164.473684210526 0.0348358339439541 0.1 ;
M S 122.549019607843 0.0467533560826752 0.1 ;
M S 102.459016393443 0.0559206808047683 0.1 ;
M S 89.2857142857143 0.0641712730546522 0.1 ;
M S 78.125 0.0733385977767454 0.1 ;
M S 74.4047619047619 0.0770055276655826 0.1 ;
M S 71.0227272727273 0.0806724575544199 0.1 ;
M S 63.7755102040816 0.0898397822765131 0.1 ;
M S 58.9622641509434 0.0971736420541876 0.1 ;
;
; create matrix in X
HD1= -5.217085678E-01 ;
HD2=  9.178422156E-01 ;
HM1= -3.608900793E-01 ;
HM2= -8.637857573E-02 ;
D L  HD1 ;
M T  HM1 0 ;
D L  HD2 ;
M T  HM2 0 ;
D L  (-HD1-HD2) ;
;
; create matrix in Y
HD1= -5.749341413E-01 ;
HD2=  7.481637125E-01 ;
HM1=  2.756925401E-01 ;
HM2=  1.558595713E-01 ;
D L  HD1 ;
M T  0 HM1 ;
D L  HD2 ;
M T  0 HM2 ;
D L  (-HD1-HD2) ;
;
;dispersion in many steps of 0.1m length, 2nd half
M S 50.4032258064516 0.113674826553955 0.1 ;
M S 45.9558823529412 0.124675616220467 0.1 ;
M S 38.5802469135802 0.148510660497909 0.1 ;
M S 34.3406593406593 0.166845309942096 0.1 ;
M S 28.8018433179724 0.198930946469422 0.1 ;
M S 25.3036437246964 0.226432920635701 0.1 ;
M S 22.4014336917563 0.255768359746399 0.1 ;
M S 19.9680511182109 0.286937263801516 0.1 ;
M S 25.7201646090535 0.222765990746864 0.1 ;
M S 60.0961538461538 0.095340177109769 0.1 ;
M S 195.3125 0.0293354391106982 0.1 ;
M S 694.444444444444 0.00825059224988386 0.1 ;
D L -1.200 ;
;
D L 0.876 ; from drawing, adjusted Jan 2016
M S (-1.2*180/6.5/PI$) 6.5 0.05 ; septum magnet, length 1.2m
;
;*********************************************************
;   the ESR - starting behind septum
;*********************************************************
EXITSEPTUM: ;
E Q 0 0 0.19 ; exit of septum
;D H E (X,Y) 10000 0.050 0.050 1 1 ;
P E ;
;S B 0.107 0.0064 0.0 0.0 ;  shift at exit of septum
;
;------- after septum ref. point ---------
 D L 0.242700 ; rough from drawing
 D L 0.095000 ;
 F F 1 ;
 M Q 0.834600 Q02 QUAGAP ; 
 F F 1 ;
 D L 0.095000 ;
 D L 0.325400 ;
 D L 0.095000 ;
 F F 1 ;
 M Q 0.821600 Q01 QUAGAP ;
 F F 1 ;
 D L 0.095000 ;
 D L 0.205000 ;
 D L 0.797700 ;
 D L 0.600000 ; Solenoid
 D L 0.295000 ;
 D L 0.878000 ;
 D L 2.100000 ; Solenoid
;
COOLER: ;
;--------- center of cooler ----------
D H E (X,A) 10000 0.03 0.003 1 1 ;
D H E (Y,B) 10000 0.03 0.003 1 1 ;
;
;==========half of the ring
B B HALF ;
 D L 2.1 ; GECEMO3C
 D L 0.0 ; GECEMT4K
 D L 0.878 ;
 D L 0.0 ; GECEKX2
 D L 0.295 ;
 D L 0.6 ; GECEMO1P
 D L 0.7977 ;
 D L 0.205 ;
 D L 0.095 ;
 ; F F 1;
 M Q 0.8216 Q01 QUAGAP ; Q-1
 ; F F 1; 
 D L 0.095 ;
 D L 0.1627 ;
 D L 0.1627 ;
 D L 0.0950 ;
 ; F F 1;
 M Q 0.8346 Q02 QUAGAP ;  Q-2
 ; F F 1;
 D L 0.0950 ;
 D L 0.48135 ;
;------septum-(mirror position)!!!--------
;M S (-1.2*180/6.5/PI$) 6.5 0.05 ; septum magnet, length 1.2m
; D L -0.600 ;
; M Q 0.6 0 0.026 ; until exit of septum
; S B 0.0 0.00 0.0 0.0 ;
;  P S 'SEPT-TWISS-X =',TXA,TXB ;
;  P S 'SEPT-TWISS-Y =',TYA,TYB ;
MUSEP =ATAND([X,A]/([A,A]*TXB$+[X,A]*TXA$)) ;
;-------------septum---------
 D L 0.48135 ;
 D L 1.0 ;
 ;
 D L 0.0439592 ; DRIFT108
 F F 0 EDANGLE ;
 M S DIPRADIUS 60.0 DIPGAP N1 N2 N3 N4 N5; DIP-1
 F F 0 EDANGLE ;
 D L 0.0439592 ; DRIFT108
 ;
 D L 0.350 ;
 D L 0.162700 ;
 D L 0.0950 ;
 ; F F 1;
 M Q 0.8216 Q03 QUAGAP ; Q-3 
 ; F F 1; 
 D L 0.095000 ;
 D L 0.006000 ;
 M H HEXLEN SEX1 HEXGAP ; SEX-1
 D L 0.006000 ;
 D L 0.095000 ;
 ; F F 1;
 M Q 1.2404 Q04 QUAGAP ; Q-4
 ; F F 1;
 D L 0.095000 ;
 D L 0.326000 ;
 D L 0.095000 ;
 ; F F 1;
 M Q 0.8216 Q05 QUAGAP ; Q-5
 ; F F 1;
 D L 0.095000 ;  
 D L 0.0597 ;
 D L 0.006000 ;
 M H HEXLEN SEX2 HEXGAP ; SEX-2
 D L 0.006000 ;
 D L 0.174 ;
 D L 0.2627229 ;
 D L 1.07525 ;
;==============kicker=============
 A S P 0.113 0.025 ;
;   S B 0 0.005 0 0 ;
;  E K (-180/PI$*0.005) ;     KICKER 
MUKICK =ATAND([X,A]/([A,A]*TXB$+[X,A]*TXA$)) ;
;==============kicker=============
 D L 1.07525 ;
 D L 0.129301 ;
 ;
 D L 0.0439592 ; DRIFT108
 F F 0 EDANGLE ;
 M S DIPRADIUS 60.00 DIPGAP N1 N2 N3 N4 N5;  DIP-2
 F F 0 EDANGLE ;
 D L 0.0439592 ; DRIFT108 ;
 ;
 D L 0.70000 ;
 D L 1.8425234 ;
 ; Y-Steerer
 D L 0.174 ;
 D L 0.006000 ;
 M H HEXLEN SEX3 HEXGAP ; SEX-3
 D L 0.006000 ;
 D L 0.0597 ;
 D L 0.095000 ;
 ; F F 1;
 M Q 0.8216 Q06 QUAGAP ; Q-6
 ; F F 1;
 D L 0.095000 ;
 D L 0.326000 ;
 D L 0.095000 ;
 ; F F 1;
 M Q 1.2404 Q07 QUAGAP ; Q-7
 ; F F 1;
  BYD3 = (1/TYB)*(([Y,Y]*TYB)^2+[Y,B]^2);
 D L 0.095000 ;
 D L 0.006 ;
 M H HEXLEN SEX4 HEXGAP ; SEX-4
 D L 0.006;
 D L 0.095000 ;
 ; F F 1;
 M Q 0.8216 Q08 QUAGAP ; Q-8
 ; F F 1;
 D L 0.095000 ;
 D L 0.162700 ;
 D L 0.350000 ;
 ;
 D L 0.0439592 ; DRIFT108 
 F F 0 EDANGLE ;
 M S DIPRADIUS 60.0 DIPGAP N1 N2 N3 N4 N5; DIP-3
 F F 0 EDANGLE ;
 D L 0.0439592 ; DRIFT108
 ;
  D L 0.202320 ;
 D L 0.110000 ;
 D L 0.290000 ;
 D L 0.397680 ;
 D L 0.962700 ;
 D L 0.095000 ;
 ; F F 1;
 M Q 0.8346 Q09 QUAGAP ; Q-9
 ; F F 1;
 D L 0.095000 ;
 D L 0.325400 ;
 D L 0.095000 ;
 ; F F 1;
 M Q 0.8216 Q10 QUAGAP ; Q-10
 ; F F 1;
 D L 0.095000 ;
 D L 0.205000 ;
 D L 4.6706992 ;
;
B E HALF ;
;
B I HALF ;
B I HALF R ;
B I HALF ;
B I HALF R ;
B I HALF ;
B I HALF R ;
;
;output of beam parameters
XD = [X,D] ;
AD = [A,D] ;
TXB = TXB$ ;
TXA = TXA$ ;
TYB = TYB$ ;
TYA = TYA$ ;
P S 'BRHO = ',BRHO,' Tm' ;
P S 'X: ',TXB, TXA ;
P S 'Y: ',TYB, TYA ;
P S 'D: ',XD, AD ;
;
;---------------------------------------
; export for parammodi
;
GTE1QD11 =  MQS001/0.060*0.666 /BRHO; 
GTE1QD12 =  MQS002/0.060*0.666 /BRHO; 
GTE2QT11 =  MQS003/0.060*1.000 /BRHO; 
GTE2QT12 =  MQS004/0.060*1.000 /BRHO; 
GTE2QT13 =  MQS005/0.060*1.000 /BRHO; 
GTE3QD11 =  MQS006/0.060*1.000 /BRHO; 
GTE3QD12 =  MQS007/0.060*1.000 /BRHO; 
GTE4QD11 =  MQS008/0.060*1.000 /BRHO; 
GTE4QD12 =  MQS009/0.060*1.000 /BRHO; 
GTE4QT21 =  MQS010/0.060*1.000 /BRHO; 
GTE4QT22 =  MQS011/0.060*1.000 /BRHO; 
GTE4QT23 =  MQS012/0.060*1.000 /BRHO; 
GTE4QT31 =  MQS013/0.060*1.000 /BRHO;
GTE4QT32 =  MQS014/0.060*1.000 /BRHO;
GTE4QT33 =  MQS015/0.060*1.000 /BRHO;
GTE5QD11 =  MQS017/0.085*1.0482/BRHO;
GTE5QD12 =  MQS018/0.085*1.0482/BRHO;
GTE5QD21 =  MQS019/0.006*1.000 /BRHO;
GTE5QD22 =  MQS020/0.006*1.000 /BRHO;
;
P F '# Version: 1.0';
P F '# Comment: ParamModi Export SIS-TE-ESR' ;
P F '# Context: SIS18_FAST.C1' ;
P F '# Comment: std. mode 1998, H. Weick 02.05.2021';
P F '# Columns: PARAMETERNAME,VALUE,UNIT,BEAMPROCPU' ;
P F 'GTE1QD11/KL,',GTE1QD11, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE1QD12/KL,',GTE1QD12, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE2QT11/KL,',GTE2QT11, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE2QT12/KL,',GTE2QT12, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE2QT13/KL,',GTE2QT13, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE3QD11/KL,',GTE3QD11, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE3QD12/KL,',GTE3QD12, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE4QD11/KL,',GTE4QD11, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE4QD12/KL,',GTE4QD12, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE4QT21/KL,',GTE4QT21, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE4QT23/KL,',GTE4QT22, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE4QT23/KL,',GTE4QT23, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE4QT31/KL,',GTE4QT31, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE4QT13/KL,',GTE4QT32, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE4QT33/KL,',GTE4QT33, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE5QD11/KL,',GTE5QD11, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE5QD12/KL,',GTE5QD12, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE5QD21/KL,',GTE5QD21, ',1/m,TRANSFER_EXTRACTION' ;
P F 'GTE5QD22/KL,',GTE5QD22, ',1/m,TRANSFER_EXTRACTION' ;
;
FINI: ;
;                 x a g d y b n
;D B 0.07 0.07 100 3 3 1 1 3 3 2 ;
D S 1.0 2 80 3 3 1 3 ;
D M 0.07 0.07 300 1 2000 ;
;
END ;
Attachment 2: TE-ESR.JPG  95 kB  Uploaded Thu May 6 01:39:36 2021  | Hide | Hide all
TE-ESR.JPG
ELOG V3.1.5-fc6679b