ビームトランスポート！

ラティスファイル

!********************************************************************
!
!    beam transport line
!    v1_7     03-AUG-99
!
!********************************************************************

MOMENTUM=1.0 GEV
;
MARK
       MARKTI  = ()
       MARKTE  = ()

       MARKA1 = ()
       MARKA2 = ()
       MARKB  = ()
       MARKC  = ()
       MARKE  = ()
       MARKD  = ()
;
BEND
       BH1 =(L = 0.58  ANGLE = -15  DEG   E1 = 0.0   E2 = 0.0 )
!       BH1 =(L = 1.16  ANGLE = -30  DEG   E1 = 0.0   E2 = 0.0 )
       BH2 =(L = 1.16  ANGLE = -30  DEG   E1 = 0.0   E2 = 0.0 )
       BH3 =(L = 1.74  ANGLE = -45  DEG   E1 = 0.0   E2 = 0.0 )
       BV1 =(L = 1.16  ANGLE =  30  DEG   E1 = 0.0   E2 = 0.0 ROTATE = 90 DEG)
       BV2 =(L = 1.16  ANGLE =  30  DEG   E1 = 0.0   E2 = 0.0 ROTATE = -90 DEG)
       BH4  =(L = 1.0  ANGLE = -20  DEG   E1 = 0.0   E2 = 0.0 )
       SEP1 =(L = 0.5  ANGLE =  10  DEG   E1 = 0.0   E2 = 0.0 )
       SEP2 =(L = 0.83 ANGLE =  10  DEG   E1 = 0.0   E2 = 0.0 )
;
DRIFT
       DA1      =(L =2.0 )
       DA2      =(L =2.5 )

       DB1      =(L =3.0 )

       DC1      =(L =0.6 )
       DC2      =(L =1.0 )
       DC3      =(L =1.2 )

       DD1      =(L =1.75 )
       DD2      =(L =1.3 )
       DD3      =(L =1.762988 )

       DE1      =(L =0.5 )
       DE2      =(L =0.4 )
       DE3      =(L =0.9 )
       DE4      =(L =0.55 )
       DE5      =(L =1.55 )
;
 QUAD   QE5     =(L =.2   K1 =-.0954008823917 )
        QE4     =(L =.2   K1 =.1298191690455 )
        QE3     =(L =.2   K1 =-.0611845780506 )
        QE2     =(L =.2   K1 =.1019194821634 )
        QE1     =(L =.2   K1 =-.2395427075586 )
        QD6     =(L =.3   K1 =-.7970176321709 )
        QD5     =(L =.3   K1 =.6921504348101 )
        QD4     =(L =.3   K1 =-.457481087354 )
        QD3     =(L =.3   K1 =-.4677166786059 )
        QD2     =(L =.3   K1 =.6372619737786 )
        QD1     =(L =.3   K1 =-.849899094022 )
        QC7     =(L =.2   K1 =-.0461358670773 )
        QC6     =(L =.2   K1 =.0223339875459 )
        QC5     =(L =.2   K1 =.0411916607501 )
        QC4     =(L =.2   K1 =-.1963051206231 )
        QC3     =(L =.2   K1 =.3484584133489 )
        QC2     =(L =.2   K1 =-.1340714010399 )
        QC1     =(L =.2   K1 =-.0819990886524 )
        QB5     =(L =.2   K1 =-.1209317006552 )
        QB4     =(L =.2   K1 =-.0685114514356 )
        QB3     =(L =.2   K1 =-.0802474856912 )
        QB2     =(L =.2   K1 =.3446767164058 )
        QB1     =(L =.2   K1 =-.273021769037 )
        QA6     =(L =.3   K1 =.5001502775836 )
        QA5     =(L =.3   K1 =-.4932931561198 )
        QA4     =(L =.3   K1 =.5001502775835 )
        QA3     =(L =.2   K1 =-.4218051928334 )
        QA2     =(L =.2   K1 =.2558714601032 )
        QA1     =(L =.2   K1 =.0863021190367 )
;
LINE
        TRANS  = (MARKTI PARTA PARTB PARTC PARTD PARTE MARKTE)
!        TRANS  = (MARKTI PARTC PARTD PARTE MARKTE)

        PARTA  = (MARKA1
                        DA1 QA1 DA1 QA2 DA1 QA3 DA1
                  MARKA2
                        BH1
                        DA2 QA4 DA2 QA5 DA2 QA6 DA2
                        BH1
                 )
        PARTB  = (MARKB
                        DB1 QB1 DB1 QB2 DB1 QB3 DB1 QB4 DB1 QB5 DB1
                 )
        PARTC  = (MARKC
                        BH2
                        DC1 QC1 DC1
                        BH2
                        DC2 QC2 DC2 QC3 DC2
                        BH3
                        DC1 QC4 DC1
                        BH3
                        DC3 QC5 DC3 QC6 DC3 QC7 DC3
                 )
        PARTD  = (MARKD
                        BV1
                        DD1 QD1 DD2 QD2 DD2 QD3
                        DD2 QD4 DD2 QD5 DD2 QD6
                        DD3
                        BV2
                 )
        PARTE  = (MARKE
                        DE1 QE1 DE2 QE2 DE2 QE3 DE1
                        BH4
                        DE3 QE4 DE3
                        SEP1
                        DE4 QE5 DE5
                        SEP2
                 )

        TRANSM  = (-TRANS)
;