LBVEXE:=2.0; // length (m) BBVEXE:=8.33910238; // field (kG) ABVEXE:=BBVEXE*Bscl*LBVEXE/BRHO; // angle (rad) GBVEXE:=0.186; // full gap (m) BVEX1E:sbend, L:=LBVEXE, ANGLE:=ABVEXE, E1:=ABVEXE/2, E2:=ABVEXE/2, TILT=PI/2., HGAP:=GBVEXE/2, FINT:=0.5, FINTX:=0.5; BVEX2E:sbend, L:=LBVEXE, ANGLE:=ABVEXE, E1:=ABVEXE/2, E2:=ABVEXE/2, TILT=PI/2., HGAP:=GBVEXE/2, FINT:=0.5, FINTX:=0.5; BVEX3E:sbend, L:=LBVEXE, ANGLE:=-ABVEXE, E1:=-ABVEXE/2, E2:=-ABVEXE/2, TILT=PI/2., HGAP:=GBVEXE/2, FINT:=0.5, FINTX:=0.5; BVEX4E:sbend, L:=LBVEXE, ANGLE:=-ABVEXE, E1:=-ABVEXE/2, E2:=-ABVEXE/2, TILT=PI/2., HGAP:=GBVEXE/2, FINT:=0.5, FINTX:=0.5; BVEX5E:sbend, L:=LBVEXE, ANGLE:=-ABVEXE, E1:=-ABVEXE/2, E2:=-ABVEXE/2, TILT=PI/2., HGAP:=GBVEXE/2, FINT:=0.5, FINTX:=0.5; BVEX6E:sbend, L:=LBVEXE, ANGLE:=-ABVEXE, E1:=-ABVEXE/2, E2:=-ABVEXE/2, TILT=PI/2., HGAP:=GBVEXE/2, FINT:=0.5, FINTX:=0.5; BVEX7E:sbend, L:=LBVEXE, ANGLE:=ABVEXE, E1:=ABVEXE/2, E2:=ABVEXE/2, TILT=PI/2., HGAP:=GBVEXE/2, FINT:=0.5, FINTX:=0.5; BVEX8E:sbend, L:=LBVEXE, ANGLE:=ABVEXE, E1:=ABVEXE/2, E2:=ABVEXE/2, TILT=PI/2., HGAP:=GBVEXE/2, FINT:=0.5, FINTX:=0.5; LBVEXP:=2.0; BBVEXP:=8.33910238; ABVEXP:=BBVEXP*Bscl*LBVEXP/BRHO; GBVEXP:=0.358; BVEX1P:sbend, L:=LBVEXP, ANGLE:=ABVEXP, E1:=ABVEXP/2, E2:=ABVEXP/2, TILT=PI/2., HGAP:=GBVEXP/2, FINT:=0.5, FINTX:=0.5; BVEX2P:sbend, L:=LBVEXP, ANGLE:=-ABVEXP, E1:=-ABVEXP/2, E2:=-ABVEXP/2, TILT=PI/2., HGAP:=GBVEXP/2, FINT:=0.5, FINTX:=0.5; BVEX3P:sbend, L:=LBVEXP, ANGLE:=-ABVEXP, E1:=-ABVEXP/2, E2:=-ABVEXP/2, TILT=PI/2., HGAP:=GBVEXP/2, FINT:=0.5, FINTX:=0.5; BVEX4P:sbend, L:=LBVEXP, ANGLE:=ABVEXP, E1:=ABVEXP/2, E2:=ABVEXP/2, TILT=PI/2., HGAP:=GBVEXP/2, FINT:=0.5, FINTX:=0.5; LWEX:=1.0; BWEX:=0.0; WEX1:sbend, L:=LWEX, ANGLE:=0; WEX2:sbend, L:=LWEX, ANGLE:=0; LBLEX:=1.0; BBLEX:=0.0; ABLEX:=BBLEX*Bscl*LBLEX/BRHO; GBLEX:=0.174; BLEX1:sbend, L:=LBLEX, ANGLE:=0, TILT=PI/2.; BLEX2:sbend, L:=LBLEX, ANGLE:=0, TILT=PI/2.; BLEX3:sbend, L:=LBLEX, ANGLE:=0, TILT=PI/2.; BLEX4:sbend, L:=LBLEX, ANGLE:=0, TILT=PI/2.; BQFEX1A:=5.0; BQFEX1B:=12.0; BQFEX1C:=BQFEX1B; BQDEX2A:=-12.0; BQDEX2B:=-12.0; BQDEX2C:=BQDEX2B; BQFEX3A:=12.0; BQFEX3B:=BQFEX3A; BQFEX3C:=BQFEX3A; BQDEX4A:=-12.0; BQDEX4B:=BQDEX4A; BQDEX4C:=BQDEX4A; BQDEX4D:=BQDEX4A; BQFEX5:=12.0; BQDEX6A:=-8.0; BQDEX6B:=BQDEX6A; BQDEX6C:=BQDEX6A; BQFEX7A:=8.0; BQFEX7B:=BQFEX7A; BQFEX7C:=BQFEX7A; LQFEX1A:=2.2; LQFEX1B:=1.70742; LQFEX1C:=LQFEX1B; LIPEX:=3.51; // distance from IP to 1st quad LQDEX2A:=11.5-LIPEX-QFEX1A->L-QFEX1B->L-QFEX1C->L-DEXQ1A->L-DEXQ1B->L- DEXQ1C->L; LQDEX2B:=3.478924824375; LQDEX2C:=LQDEX2B; LQFEX3A:=3.275230496094; LQFEX3B:=LQFEX3A; LQFEX3C:=LQFEX3A; LQDEX4A:=2.840920133401; LQDEX4B:=LQDEX4A; LQDEX4C:=LQDEX4A; LQDEX4D:=LQDEX4A; LQFEX5:=3.219106707621; LQDEX6A:=3.563134880416; LQDEX6B:=LQDEX6A; LQDEX6C:=LQDEX6A; LQFEX7A:=3.187235727241; LQFEX7B:=LQFEX7A; LQFEX7C:=LQFEX7A; LDEXQ:=0.3; LDEXQ1A:=LDEXQ; LDEXQ1B:=LDEXQ; LDEXQ1C:=LDEXQ; LDEXQ2A:=1.75; LDEXQ2B:=LDEXQ; LDEXQ2C:=LDEXQ; LDEXQ3A:=LDEXQ; LDEXQ3B:=LDEXQ; LDEXQ3C:=LDEXQ; LDEXQ4A:=LDEXQ; LDEXQ4B:=LDEXQ; LDEXQ4C:=LDEXQ; LDEXQ4D:=LDEXQ; APHOT:=1.25e-3; // maximum photon angle at IP ABEAM:=2.00e-3; // maximum electron angle at IP RPQFEX1A:=(LIPEX +LQFEX1A)*APHOT; RPQFEX1B:=RPQFEX1A+(LDEXQ1A+LQFEX1B)*APHOT; RPQFEX1C:=RPQFEX1B+(LDEXQ1B+LQFEX1C)*APHOT; RPQDEX2A:=RPQFEX1C+(LDEXQ1C+LQDEX2A)*APHOT; RPQDEX2B:=RPQDEX2A+(LDEXQ2A+LQDEX2B)*APHOT; RPQDEX2C:=RPQDEX2B+(LDEXQ2B+LQDEX2C)*APHOT; RPQFEX3A:=RPQDEX2C+(LDEXQ2C+LQFEX3A)*APHOT; RPQFEX3B:=RPQFEX3A+(LDEXQ3A+LQFEX3B)*APHOT; RPQFEX3C:=RPQFEX3B+(LDEXQ3B+LQFEX3C)*APHOT; RPQDEX4A:=RPQFEX3C+(LDEXQ3C+LQDEX4A)*APHOT; RPQDEX4B:=RPQDEX4A+(LDEXQ4A+LQDEX4B)*APHOT; RPQDEX4C:=RPQDEX4B+(LDEXQ4B+LQDEX4C)*APHOT; RPQDEX4D:=RPQDEX4C+(LDEXQ4C+LQDEX4D)*APHOT; RPQFEX5:=RPQDEX4D+(LDEXQ4D+LQFEX5)*APHOT; RBQFEX1A:=(LIPEX +LQFEX1A)*ABEAM; RBQFEX1B:=RBQFEX1A+(LDEXQ1A+LQFEX1B)*ABEAM; RBQFEX1C:=RBQFEX1B+(LDEXQ1B+LQFEX1C)*ABEAM; RBQDEX2A:=RBQFEX1C+(LDEXQ1C+LQDEX2A)*ABEAM; RBQDEX2B:=RBQDEX2A+(LDEXQ2A+LQDEX2B)*ABEAM; RBQDEX2C:=RBQDEX2B+(LDEXQ2B+LQDEX2C)*ABEAM; RBQFEX3A:=RBQDEX2C+(LDEXQ2C+LQFEX3A)*ABEAM; RBQFEX3B:=RBQFEX3A+(LDEXQ3A+LQFEX3B)*ABEAM; RBQFEX3C:=RBQFEX3B+(LDEXQ3B+LQFEX3C)*ABEAM; RBQDEX4A:=RBQFEX3C+(LDEXQ3C+LQDEX4A)*ABEAM; RBQDEX4B:=RBQDEX4A+(LDEXQ4A+LQDEX4B)*ABEAM; RBQDEX4C:=RBQDEX4B+(LDEXQ4B+LQDEX4C)*ABEAM; RBQDEX4D:=RBQDEX4C+(LDEXQ4C+LQDEX4D)*ABEAM; RBQFEX5:=RBQDEX4D+(LDEXQ4D+LQFEX5)*ABEAM; RQFEX1A:=0.012; RQFEX1B:=0.017; RQFEX1C:=0.024; RQDEX2A:=0.030; RQDEX2B:=0.043; RQDEX2C:=0.043; RQFEX3A:=0.043; RQFEX3B:=0.046; RQFEX3C:=0.058; RQDEX4A:=0.071; RQDEX4B:=0.077; RQDEX4C:=0.077; RQDEX4D:=0.077; RQFEX5:=0.071; LDEX2:=0.5; LDEX3:=15.0; LDEX4:=18.0; LDEX5:=10.0; LDEX6:=LDEX4; LDEX7:=2.0; LDEXQ6A:=LDEXQ; LDEXQ6B:=LDEXQ; LDEXQ6C:=LDEXQ; LDEXQ7A:=LDEXQ; LDEXQ7B:=LDEXQ; LPART1D:=LIPEX+DEXQ1A->L+DEXQ1B->L+DEXQ1C->L+DEXQ2A->L+DEXQ2B->L+ DEXQ2C->L+DEXQ3A->L+ DEXQ3B->L+DEXQ3C->L+DEXQ4A->L+DEXQ4B->L+DEXQ4C->L+DEXQ4D->L+LDEX2+ DEXB1E->L+DEXB2E->L+ DEXL1E->L+DEXW1E->L+DEXL2E->L+DEXB3E->L+DEXB4E->L+DEXB5E->L+ DEXB6E->L+DEXL3E->L+DEXW2E->L+ DEXL4E->L+DEXB7E->L+LDEX3+LDEX4+LDEX5+LDEX6+LDEX7; LPART1M:=QFEX1A->L+QFEX1B->L+QFEX1C->L+QDEX2A->L+QDEX2B->L+ QDEX2C->L+QFEX3A->L+ QFEX3B->L+QFEX3C->L+QDEX4A->L+QDEX4B->L+QDEX4C->L+QDEX4D->L+ QFEX5->L+BVEX1E->L+BVEX2E->L+BLEX1->L+ WEX1->L+BLEX2->L+BVEX3E->L+BVEX4E->L+BVEX5E->L+BVEX6E->L+ BLEX3->L+WEX2->L+BLEX4->L+BVEX7E->L+ BVEX8E->L+BVEX1P->L+BVEX2P->L+BVEX3P->L+BVEX4P->L; LPART1:=LPART1D+LPART1M; RPQDEX6A:=(LPART1 +LQDEX6A)*APHOT; RPQDEX6B:=RPQDEX6A+(LDEXQ6A+LQDEX6B)*APHOT; RPQDEX6C:=RPQDEX6B+(LDEXQ6B+LQDEX6C)*APHOT; RPQFEX7A:=RPQDEX6C+(LDEXQ6C+LQFEX7A)*APHOT; RPQFEX7B:=RPQFEX7A+(LDEXQ7A+LQFEX7B)*APHOT; RPQFEX7C:=RPQFEX7B+(LDEXQ7B+LQFEX7C)*APHOT; RQDEX6A:=0.250; // RPQDEX6C RQDEX6B:=0.250; // RPQDEX6C RQDEX6C:=0.250; // RPQDEX6C RQFEX7A:=0.250; // RPQFEX7C RQFEX7B:=0.250; // RPQFEX7C RQFEX7C:=0.250; // RPQFEX7C QFEX1A:quadrupole, L:=LQFEX1A, K1:=BQFEX1A*Bscl/RQFEX1A/BRHO, aperture:=RQFEX1A; QFEX1B:quadrupole, L:=LQFEX1B, K1:=BQFEX1B*Bscl/RQFEX1B/BRHO, aperture:=RQFEX1B; QFEX1C:quadrupole, L:=LQFEX1C, K1:=BQFEX1C*Bscl/RQFEX1C/BRHO, aperture:=RQFEX1C; QDEX2A:quadrupole, L:=LQDEX2A, K1:=BQDEX2A*Bscl/RQDEX2A/BRHO, aperture:=RQDEX2A; QDEX2B:quadrupole, L:=LQDEX2B, K1:=BQDEX2B*Bscl/RQDEX2B/BRHO, aperture:=RQDEX2B; QDEX2C:quadrupole, L:=LQDEX2C, K1:=BQDEX2C*Bscl/RQDEX2C/BRHO, aperture:=RQDEX2C; QFEX3A:quadrupole, L:=LQFEX3A, K1:=BQFEX3A*Bscl/RQFEX3A/BRHO, aperture:=RQFEX3A; QFEX3B:quadrupole, L:=LQFEX3B, K1:=BQFEX3B*Bscl/RQFEX3B/BRHO, aperture:=RQFEX3B; QFEX3C:quadrupole, L:=LQFEX3C, K1:=BQFEX3C*Bscl/RQFEX3C/BRHO, aperture:=RQFEX3C; QDEX4A:quadrupole, L:=LQDEX4A, K1:=BQDEX4A*Bscl/RQDEX4A/BRHO, aperture:=RQDEX4A; QDEX4B:quadrupole, L:=LQDEX4B, K1:=BQDEX4B*Bscl/RQDEX4B/BRHO, aperture:=RQDEX4B; QDEX4C:quadrupole, L:=LQDEX4C, K1:=BQDEX4C*Bscl/RQDEX4C/BRHO, aperture:=RQDEX4C; QDEX4D:quadrupole, L:=LQDEX4D, K1:=BQDEX4D*Bscl/RQDEX4D/BRHO, aperture:=RQDEX4D; QFEX5:quadrupole, L:=LQFEX5, K1:=BQFEX5*Bscl/RQFEX5/BRHO, aperture:=RQFEX5; QDEX6A:quadrupole, L:=LQDEX6A, K1:=BQDEX6A*Bscl/RQDEX6A/BRHO, aperture:=RQDEX6A; QDEX6B:quadrupole, L:=LQDEX6B, K1:=BQDEX6B*Bscl/RQDEX6B/BRHO, aperture:=RQDEX6B; QDEX6C:quadrupole, L:=LQDEX6C, K1:=BQDEX6C*Bscl/RQDEX6C/BRHO, aperture:=RQDEX6C; QFEX7A:quadrupole, L:=LQFEX7A, K1:=BQFEX7A*Bscl/RQFEX7A/BRHO, aperture:=RQFEX7A; QFEX7B:quadrupole, L:=LQFEX7B, K1:=BQFEX7B*Bscl/RQFEX7B/BRHO, aperture:=RQFEX7B; QFEX7C:quadrupole, L:=LQFEX7C, K1:=BQFEX7C*Bscl/RQFEX7C/BRHO, aperture:=RQFEX7C; LSOLEX:=3.51; // solenoid length after IP LSOLEXA:=2.50; LSOLEXB:=LSOLEX-LSOLEXA; RSOLEX:=12e-3; // solenoid beam pipe aperture radius (m) ASOLEX:=0.01; // solenoid-to-beam horizontal angle (rad) BLVKEX1:=0; BLVKEX2:=0; VKEX1:vkicker, KICK:=BLVKEX1/BRHO; VKEX2:vkicker, KICK:=BLVKEX2/BRHO; LDEX1:=LIPEX-LSOLEX; LDEXB1E:=0.3; LDEXB2E:=0.3; LDEXL1E:=0.3; LDEXW1E:=0.3; LDEXL2E:=0.3; LDEXB3E:=0.3; LDEXB4E:=0.3; LDEXB5E:=0.3; LDEXB6E:=0.3; LDEXL3E:=0.3; LDEXW2E:=0.3; LDEXL4E:=0.3; LDEXB7E:=0.3; LDEX3S:=LDEX3/15; LDEX4S:=LDEX4/18; LDEX5S:=LDEX5/10; LDEX6S:=LDEX6/18; LDEX7S:=LDEX7/2; LDEX8:=10.0; LDEX8S:=LDEX8/10; RDEX1:=12e-3; RDEXQ1A:=17e-3; RDEXQ1B:=24e-3; RDEXQ1C:=30e-3; RDEXQ2A:=43e-3; RDEXQ2B:=43e-3; RDEXQ2C:=43e-3; RDEXQ3A:=46e-3; RDEXQ3B:=58e-3; RDEXQ3C:=71e-3; RDEXQ4A:=77e-3; RDEXQ4B:=77e-3; RDEXQ4C:=77e-3; RDEXQ4D:=77e-3; RDEX2:=71e-3; XDEXB1E:=63e-3; XDEXB2E:=66e-3; XDEXL1E:=68e-3; XDEXW1E:=69e-3; XDEXL2E:=71e-3; XDEXB3E:=74e-3; XDEXB4E:=77e-3; XDEXB5E:=79e-3; XDEXB6E:=82e-3; XDEXL3E:=84e-3; XDEXW2E:=86e-3; XDEXL4E:=87e-3; XDEXB7E:=90e-3; YDEXB1E:=65e-3; YDEXB2E:=77e-3; YDEXL1E:=86e-3; YDEXW1E:=96e-3; YDEXL2E:=105e-3; YDEXB3E:=116e-3; YDEXB4E:=118e-3; YDEXB5E:=112e-3; YDEXB6E:=97e-3; YDEXL3E:=94e-3; YDEXW2E:=93e-3; YDEXL4E:=92e-3; YDEXB7E:=91e-3; RDEX301:=94e-3; RDEX302:=95e-3; RDEX303:=96e-3; RDEX304:=98e-3; RDEX305:=99e-3; RDEX306:=100e-3; RDEX307:=101e-3; RDEX308:=103e-3; RDEX309:=104e-3; RDEX310:=105e-3; RDEX311:=106e-3; RDEX312:=108e-3; RDEX313:=109e-3; RDEX314:=110e-3; RDEX315:=111e-3; XDEX401:=115e-3; XDEX402:=116e-3; XDEX403:=118e-3; XDEX404:=119e-3; XDEX405:=120e-3; XDEX406:=121e-3; XDEX407:=123e-3; XDEX408:=124e-3; XDEX409:=125e-3; XDEX410:=126e-3; XDEX411:=128e-3; XDEX412:=129e-3; XDEX413:=130e-3; XDEX414:=131e-3; XDEX415:=133e-3; XDEX416:=134e-3; XDEX417:=135e-3; XDEX418:=136e-3; YDEX401:=117e-3; YDEX402:=119e-3; YDEX403:=122e-3; YDEX404:=124e-3; YDEX405:=126e-3; YDEX406:=128e-3; YDEX407:=131e-3; YDEX408:=133e-3; YDEX409:=135e-3; YDEX410:=137e-3; YDEX411:=140e-3; YDEX412:=142e-3; YDEX413:=144e-3; YDEX414:=146e-3; YDEX415:=149e-3; YDEX416:=151e-3; YDEX417:=153e-3; YDEX418:=155e-3; XDEX501:=140e-3; XDEX502:=141e-3; XDEX503:=143e-3; XDEX504:=144e-3; XDEX505:=145e-3; XDEX506:=146e-3; XDEX507:=148e-3; XDEX508:=149e-3; XDEX509:=150e-3; XDEX510:=151e-3; YDEX501:=160e-3; YDEX502:=161e-3; YDEX503:=163e-3; YDEX504:=164e-3; YDEX505:=165e-3; YDEX506:=166e-3; YDEX507:=168e-3; YDEX508:=169e-3; YDEX509:=170e-3; YDEX510:=171e-3; XDEX601:=155e-3; XDEX602:=156e-3; XDEX603:=158e-3; XDEX604:=159e-3; XDEX605:=160e-3; XDEX606:=161e-3; XDEX607:=163e-3; XDEX608:=164e-3; XDEX609:=165e-3; XDEX610:=166e-3; XDEX611:=168e-3; XDEX612:=169e-3; XDEX613:=170e-3; XDEX614:=171e-3; XDEX615:=173e-3; XDEX616:=174e-3; XDEX617:=175e-3; XDEX618:=176e-3; YDEX601:=173e-3; YDEX602:=173e-3; YDEX603:=174e-3; YDEX604:=174e-3; YDEX605:=174e-3; YDEX606:=174e-3; YDEX607:=175e-3; YDEX608:=175e-3; YDEX609:=175e-3; YDEX610:=175e-3; YDEX611:=176e-3; YDEX612:=176e-3; YDEX613:=176e-3; YDEX614:=176e-3; YDEX615:=177e-3; YDEX616:=177e-3; YDEX617:=177e-3; YDEX618:=177e-3; RDEX701:=215e-3; RDEX702:=250e-3; RDEXQ6A:=250e-3; RDEXQ6B:=250e-3; RDEXQ6C:=250e-3; RDEXQ7A:=250e-3; RDEXQ7B:=250e-3; RDEX801:=250e-3; RDEX802:=250e-3; RDEX803:=250e-3; RDEX804:=250e-3; RDEX805:=250e-3; RDEX806:=250e-3; RDEX807:=250e-3; RDEX808:=250e-3; RDEX809:=250e-3; RDEX810:=250e-3; SOLEXA:DRIFT, L:=LSOLEXA; //, XSIZE= RSOLEX, YSIZE= RSOLEX SOLEXB:DRIFT, L:=LSOLEXB; //, XSIZE= RSOLEX, YSIZE= RSOLEX DEX1:DRIFT, L:=LDEX1; //, XSIZE= RDEX1, YSIZE= RDEX1 DEXQ1A:DRIFT, L:=LDEXQ1A; //, XSIZE= RDEXQ1A, YSIZE= RDEXQ1A DEXQ1B:DRIFT, L:=LDEXQ1B; //, XSIZE= RDEXQ1B, YSIZE= RDEXQ1B DEXQ1C:DRIFT, L:=LDEXQ1C; //, XSIZE= RDEXQ1C, YSIZE= RDEXQ1C DEXQ2A:DRIFT, L:=LDEXQ2A; //, XSIZE= RDEXQ2A, YSIZE= RDEXQ2A DEXQ2B:DRIFT, L:=LDEXQ2B; //, XSIZE= RDEXQ2B, YSIZE= RDEXQ2B DEXQ2C:DRIFT, L:=LDEXQ2C; //, XSIZE= RDEXQ2C, YSIZE= RDEXQ2C DEXQ3A:DRIFT, L:=LDEXQ3A; //, XSIZE= RDEXQ3A, YSIZE= RDEXQ3A DEXQ3B:DRIFT, L:=LDEXQ3B; //, XSIZE= RDEXQ3B, YSIZE= RDEXQ3B DEXQ3C:DRIFT, L:=LDEXQ3C; //, XSIZE= RDEXQ3C, YSIZE= RDEXQ3C DEXQ4A:DRIFT, L:=LDEXQ4A; //, XSIZE= RDEXQ4A, YSIZE= RDEXQ4A DEXQ4B:DRIFT, L:=LDEXQ4B; //, XSIZE= RDEXQ4B, YSIZE= RDEXQ4B DEXQ4C:DRIFT, L:=LDEXQ4C; //, XSIZE= RDEXQ4C, YSIZE= RDEXQ4C DEXQ4D:DRIFT, L:=LDEXQ4D; //, XSIZE= RDEXQ4D, YSIZE= RDEXQ4D DEX2:DRIFT, L:=LDEX2; //, XSIZE= RDEX2, YSIZE= RDEX2 DEXB1E:DRIFT, L:=LDEXB1E; //, XSIZE= XDEXB1E, YSIZE= YDEXB1E DEXB2E:DRIFT, L:=LDEXB2E; //, XSIZE= XDEXB2E, YSIZE= YDEXB2E DEXL1E:DRIFT, L:=LDEXL1E; //, XSIZE= XDEXL1E, YSIZE= YDEXL1E DEXW1E:DRIFT, L:=LDEXW1E; //, XSIZE= XDEXW1E, YSIZE= YDEXW1E DEXL2E:DRIFT, L:=LDEXL2E; //, XSIZE= XDEXL2E, YSIZE= YDEXL2E DEXB3E:DRIFT, L:=LDEXB3E; //, XSIZE= XDEXB3E, YSIZE= YDEXB3E DEXB4E:DRIFT, L:=LDEXB4E; //, XSIZE= XDEXB4E, YSIZE= YDEXB4E DEXB5E:DRIFT, L:=LDEXB5E; //, XSIZE= XDEXB5E, YSIZE= YDEXB5E DEXB6E:DRIFT, L:=LDEXB6E; //, XSIZE= XDEXB6E, YSIZE= YDEXB6E DEXL3E:DRIFT, L:=LDEXL3E; //, XSIZE= XDEXL3E, YSIZE= YDEXL3E DEXW2E:DRIFT, L:=LDEXW2E; //, XSIZE= XDEXW2E, YSIZE= YDEXW2E DEXL4E:DRIFT, L:=LDEXL4E; //, XSIZE= XDEXL4E, YSIZE= YDEXL4E DEXB7E:DRIFT, L:=LDEXB7E; //, XSIZE= XDEXB7E, YSIZE= YDEXB7E DEX301:DRIFT, L:=LDEX3S; //, XSIZE= RDEX301, YSIZE= RDEX301 DEX302:DRIFT, L:=LDEX3S; //, XSIZE= RDEX302, YSIZE= RDEX302 DEX303:DRIFT, L:=LDEX3S; //, XSIZE= RDEX303, YSIZE= RDEX303 DEX304:DRIFT, L:=LDEX3S; //, XSIZE= RDEX304, YSIZE= RDEX304 DEX305:DRIFT, L:=LDEX3S; //, XSIZE= RDEX305, YSIZE= RDEX305 DEX306:DRIFT, L:=LDEX3S; //, XSIZE= RDEX306, YSIZE= RDEX306 DEX307:DRIFT, L:=LDEX3S; //, XSIZE= RDEX307, YSIZE= RDEX307 DEX308:DRIFT, L:=LDEX3S; //, XSIZE= RDEX308, YSIZE= RDEX308 DEX309:DRIFT, L:=LDEX3S; //, XSIZE= RDEX309, YSIZE= RDEX309 DEX310:DRIFT, L:=LDEX3S; //, XSIZE= RDEX310, YSIZE= RDEX310 DEX311:DRIFT, L:=LDEX3S; //, XSIZE= RDEX311, YSIZE= RDEX311 DEX312:DRIFT, L:=LDEX3S; //, XSIZE= RDEX312, YSIZE= RDEX312 DEX313:DRIFT, L:=LDEX3S; //, XSIZE= RDEX313, YSIZE= RDEX313 DEX314:DRIFT, L:=LDEX3S; //, XSIZE= RDEX314, YSIZE= RDEX314 DEX315:DRIFT, L:=LDEX3S; //, XSIZE= RDEX315, YSIZE= RDEX315 DEX401:DRIFT, L:=LDEX4S; //, XSIZE= XDEX401, YSIZE= YDEX401 DEX402:DRIFT, L:=LDEX4S; //, XSIZE= XDEX402, YSIZE= YDEX402 DEX403:DRIFT, L:=LDEX4S; //, XSIZE= XDEX403, YSIZE= YDEX403 DEX404:DRIFT, L:=LDEX4S; //, XSIZE= XDEX404, YSIZE= YDEX404 DEX405:DRIFT, L:=LDEX4S; //, XSIZE= XDEX405, YSIZE= YDEX405 DEX406:DRIFT, L:=LDEX4S; //, XSIZE= XDEX406, YSIZE= YDEX406 DEX407:DRIFT, L:=LDEX4S; //, XSIZE= XDEX407, YSIZE= YDEX407 DEX408:DRIFT, L:=LDEX4S; //, XSIZE= XDEX408, YSIZE= YDEX408 DEX409:DRIFT, L:=LDEX4S; //, XSIZE= XDEX409, YSIZE= YDEX409 DEX410:DRIFT, L:=LDEX4S; //, XSIZE= XDEX410, YSIZE= YDEX410 DEX411:DRIFT, L:=LDEX4S; //, XSIZE= XDEX411, YSIZE= YDEX411 DEX412:DRIFT, L:=LDEX4S; //, XSIZE= XDEX412, YSIZE= YDEX412 DEX413:DRIFT, L:=LDEX4S; //, XSIZE= XDEX413, YSIZE= YDEX413 DEX414:DRIFT, L:=LDEX4S; //, XSIZE= XDEX414, YSIZE= YDEX414 DEX415:DRIFT, L:=LDEX4S; //, XSIZE= XDEX415, YSIZE= YDEX415 DEX416:DRIFT, L:=LDEX4S; //, XSIZE= XDEX416, YSIZE= YDEX416 DEX417:DRIFT, L:=LDEX4S; //, XSIZE= XDEX417, YSIZE= YDEX417 DEX418:DRIFT, L:=LDEX4S; //, XSIZE= XDEX418, YSIZE= YDEX418 DEX501:DRIFT, L:=LDEX5S; //, XSIZE= XDEX501, YSIZE= YDEX501 DEX502:DRIFT, L:=LDEX5S; //, XSIZE= XDEX502, YSIZE= YDEX502 DEX503:DRIFT, L:=LDEX5S; //, XSIZE= XDEX503, YSIZE= YDEX503 DEX504:DRIFT, L:=LDEX5S; //, XSIZE= XDEX504, YSIZE= YDEX504 DEX505:DRIFT, L:=LDEX5S; //, XSIZE= XDEX505, YSIZE= YDEX505 DEX506:DRIFT, L:=LDEX5S; //, XSIZE= XDEX506, YSIZE= YDEX506 DEX507:DRIFT, L:=LDEX5S; //, XSIZE= XDEX507, YSIZE= YDEX507 DEX508:DRIFT, L:=LDEX5S; //, XSIZE= XDEX508, YSIZE= YDEX508 DEX509:DRIFT, L:=LDEX5S; //, XSIZE= XDEX509, YSIZE= YDEX509 DEX510:DRIFT, L:=LDEX5S; //, XSIZE= XDEX510, YSIZE= YDEX510 DEX601:DRIFT, L:=LDEX6S; //, XSIZE= XDEX601, YSIZE= YDEX601 DEX602:DRIFT, L:=LDEX6S; //, XSIZE= XDEX602, YSIZE= YDEX602 DEX603:DRIFT, L:=LDEX6S; //, XSIZE= XDEX603, YSIZE= YDEX603 DEX604:DRIFT, L:=LDEX6S; //, XSIZE= XDEX604, YSIZE= YDEX604 DEX605:DRIFT, L:=LDEX6S; //, XSIZE= XDEX605, YSIZE= YDEX605 DEX606:DRIFT, L:=LDEX6S; //, XSIZE= XDEX606, YSIZE= YDEX606 DEX607:DRIFT, L:=LDEX6S; //, XSIZE= XDEX607, YSIZE= YDEX607 DEX608:DRIFT, L:=LDEX6S; //, XSIZE= XDEX608, YSIZE= YDEX608 DEX609:DRIFT, L:=LDEX6S; //, XSIZE= XDEX609, YSIZE= YDEX609 DEX610:DRIFT, L:=LDEX6S; //, XSIZE= XDEX610, YSIZE= YDEX610 DEX611:DRIFT, L:=LDEX6S; //, XSIZE= XDEX611, YSIZE= YDEX611 DEX612:DRIFT, L:=LDEX6S; //, XSIZE= XDEX612, YSIZE= YDEX612 DEX613:DRIFT, L:=LDEX6S; //, XSIZE= XDEX613, YSIZE= YDEX613 DEX614:DRIFT, L:=LDEX6S; //, XSIZE= XDEX614, YSIZE= YDEX614 DEX615:DRIFT, L:=LDEX6S; //, XSIZE= XDEX615, YSIZE= YDEX615 DEX616:DRIFT, L:=LDEX6S; //, XSIZE= XDEX616, YSIZE= YDEX616 DEX617:DRIFT, L:=LDEX6S; //, XSIZE= XDEX617, YSIZE= YDEX617 DEX618:DRIFT, L:=LDEX6S; //, XSIZE= XDEX618, YSIZE= YDEX618 DEX701:DRIFT, L:=LDEX7S; //, XSIZE= RDEX701, YSIZE= RDEX701 DEX702:DRIFT, L:=LDEX7S; //, XSIZE= RDEX702, YSIZE= RDEX702 DEXQ6A:DRIFT, L:=LDEXQ6A; //, XSIZE= RDEXQ6A, YSIZE= RDEXQ6A DEXQ6B:DRIFT, L:=LDEXQ6B; //, XSIZE= RDEXQ6B, YSIZE= RDEXQ6B DEXQ6C:DRIFT, L:=LDEXQ6C; //, XSIZE= RDEXQ6C, YSIZE= RDEXQ6C DEXQ7A:DRIFT, L:=LDEXQ7A; //, XSIZE= RDEXQ7A, YSIZE= RDEXQ7A DEXQ7B:DRIFT, L:=LDEXQ7B; //, XSIZE= RDEXQ7B, YSIZE= RDEXQ7B DEX801:DRIFT, L:=LDEX8S; //, XSIZE= RDEX801, YSIZE= RDEX801 DEX802:DRIFT, L:=LDEX8S; //, XSIZE= RDEX802, YSIZE= RDEX802 DEX803:DRIFT, L:=LDEX8S; //, XSIZE= RDEX803, YSIZE= RDEX803 DEX804:DRIFT, L:=LDEX8S; //, XSIZE= RDEX804, YSIZE= RDEX804 DEX805:DRIFT, L:=LDEX8S; //, XSIZE= RDEX805, YSIZE= RDEX805 DEX806:DRIFT, L:=LDEX8S; //, XSIZE= RDEX806, YSIZE= RDEX806 DEX807:DRIFT, L:=LDEX8S; //, XSIZE= RDEX807, YSIZE= RDEX807 DEX808:DRIFT, L:=LDEX8S; //, XSIZE= RDEX808, YSIZE= RDEX808 DEX809:DRIFT, L:=LDEX8S; //, XSIZE= RDEX809, YSIZE= RDEX809 DEX810:DRIFT, L:=LDEX8S; //, XSIZE= RDEX810, YSIZE= RDEX810 MIP:MARKER; // at IP MEXFOC:MARKER; // at focal point at mid-chicane MEXDUMP:MARKER; // at the dump BENDS:LINE=( DEX2, BVEX1E, DEXB1E, BVEX2E, DEXB2E, BLEX1, DEXL1E, WEX1, DEXW1E, BLEX2, DEXL2E, BVEX3E, DEXB3E, BVEX4E, DEXB4E, BVEX5E, DEXB5E, BVEX6E, DEXB6E, BLEX3, DEXL3E, WEX2, DEXW2E, BLEX4, DEXL4E, BVEX7E, DEXB7E, BVEX8E, DEX301, DEX302, DEX303, DEX304, DEX305, DEX306, DEX307, DEX308, DEX309, DEX310, DEX311, DEX312, DEX313, DEX314, DEX315, BVEX1P, DEX401, DEX402, DEX403, DEX404, DEX405, DEX406, DEX407, DEX408, DEX409, DEX410, DEX411, DEX412, DEX413, DEX414, DEX415, DEX416, DEX417, DEX418, BVEX2P, DEX501, DEX502, DEX503, DEX504, DEX505, MEXFOC, DEX506, DEX507, DEX508, DEX509, DEX510, BVEX3P, DEX601, DEX602, DEX603, DEX604, DEX605, DEX606, DEX607, DEX608, DEX609, DEX610, DEX611, DEX612, DEX613, DEX614, DEX615, DEX616, DEX617, DEX618, BVEX4P, DEX701, DEX702 ); PART1:LINE=( MIP, SOLEXA, VKEX1, SOLEXB, DEX1, VKEX2, QFEX1A, DEXQ1A, QFEX1B, DEXQ1B, QFEX1C, DEXQ1C, QDEX2A, DEXQ2A, QDEX2B, DEXQ2B, QDEX2C, DEXQ2C, QFEX3A, DEXQ3A, QFEX3B, DEXQ3B, QFEX3C, DEXQ3C, QDEX4A, DEXQ4A, QDEX4B, DEXQ4B, QDEX4C, DEXQ4C, QDEX4D, DEXQ4D, QFEX5, BENDS ); PART2:LINE=( QDEX6A, DEXQ6A, QDEX6B, DEXQ6B, QDEX6C, DEXQ6C, QFEX7A, DEXQ7A, QFEX7B, DEXQ7B, QFEX7C, DEX801, DEX802, DEX803, DEX804, DEX805, DEX806, DEX807, DEX808, DEX809, DEX810, MEXDUMP ); EXLINE:LINE=( PART1, PART2 ); BVEXEh:sbend, L:=LBVEXE/2, HGAP:=GBVEXE/2, TILT=PI/2.; BVEX1Ea:BVEXEh, ANGLE:=+ABVEXE/2, E1:=+ABVEXE/2, FINT:=0.5, FINTX:=0; BVEX1Eb:BVEXEh, ANGLE:=+ABVEXE/2, E2:=+ABVEXE/2, FINT:=0, FINTX:=0.5; BVEX1Es:LINE=(BVEX1Ea,BVEX1Eb); BVEX2Ea:BVEXEh, ANGLE:=+ABVEXE/2, E1:=+ABVEXE/2, FINT:=0.5, FINTX:=0; BVEX2Eb:BVEXEh, ANGLE:=+ABVEXE/2, E2:=+ABVEXE/2, FINT:=0, FINTX:=0.5; BVEX2Es:LINE=(BVEX2Ea,BVEX2Eb); BVEX3Ea:BVEXEh, ANGLE:=-ABVEXE/2, E1:=-ABVEXE/2, FINT:=0.5, FINTX:=0; BVEX3Eb:BVEXEh, ANGLE:=-ABVEXE/2, E2:=-ABVEXE/2, FINT:=0, FINTX:=0.5; BVEX3Es:LINE=(BVEX3Ea,BVEX3Eb); BVEX4Ea:BVEXEh, ANGLE:=-ABVEXE/2, E1:=-ABVEXE/2, FINT:=0.5, FINTX:=0; BVEX4Eb:BVEXEh, ANGLE:=-ABVEXE/2, E2:=-ABVEXE/2, FINT:=0, FINTX:=0.5; BVEX4Es:LINE=(BVEX4Ea,BVEX4Eb); BVEX5Ea:BVEXEh, ANGLE:=-ABVEXE/2, E1:=-ABVEXE/2, FINT:=0.5, FINTX:=0; BVEX5Eb:BVEXEh, ANGLE:=-ABVEXE/2, E2:=-ABVEXE/2, FINT:=0, FINTX:=0.5; BVEX5Es:LINE=(BVEX5Ea,BVEX5Eb); BVEX6Ea:BVEXEh, ANGLE:=-ABVEXE/2, E1:=-ABVEXE/2, FINT:=0.5, FINTX:=0; BVEX6Eb:BVEXEh, ANGLE:=-ABVEXE/2, E2:=-ABVEXE/2, FINT:=0, FINTX:=0.5; BVEX6Es:LINE=(BVEX6Ea,BVEX6Eb); BVEX7Ea:BVEXEh, ANGLE:=+ABVEXE/2, E1:=+ABVEXE/2, FINT:=0.5, FINTX:=0; BVEX7Eb:BVEXEh, ANGLE:=+ABVEXE/2, E2:=+ABVEXE/2, FINT:=0, FINTX:=0.5; BVEX7Es:LINE=(BVEX7Ea,BVEX7Eb); BVEX8Ea:BVEXEh, ANGLE:=+ABVEXE/2, E1:=+ABVEXE/2, FINT:=0.5, FINTX:=0; BVEX8Eb:BVEXEh, ANGLE:=+ABVEXE/2, E2:=+ABVEXE/2, FINT:=0, FINTX:=0.5; BVEX8Es:LINE=(BVEX8Ea,BVEX8Eb); BVEXPh:sbend, L:=LBVEXP/2, HGAP:=GBVEXP/2, TILT=PI/2.; BVEX1Pa:BVEXPh, ANGLE:=+ABVEXP/2, E1:=+ABVEXP/2, FINT:=0.5, FINTX:=0; BVEX1Pb:BVEXPh, ANGLE:=+ABVEXP/2, E2:=+ABVEXP/2, FINT:=0, FINTX:=0.5; BVEX1Ps:LINE=(BVEX1Pa,BVEX1Pb); BVEX2Pa:BVEXPh, ANGLE:=-ABVEXP/2, E1:=-ABVEXP/2, FINT:=0.5, FINTX:=0; BVEX2Pb:BVEXPh, ANGLE:=-ABVEXP/2, E2:=-ABVEXP/2, FINT:=0, FINTX:=0.5; BVEX2Ps:LINE=(BVEX2Pa,BVEX2Pb); BVEX3Pa:BVEXPh, ANGLE:=-ABVEXP/2, E1:=-ABVEXP/2, FINT:=0.5, FINTX:=0; BVEX3Pb:BVEXPh, ANGLE:=-ABVEXP/2, E2:=-ABVEXP/2, FINT:=0, FINTX:=0.5; BVEX3Ps:LINE=(BVEX3Pa,BVEX3Pb); BVEX4Pa:BVEXPh, ANGLE:=+ABVEXP/2, E1:=+ABVEXP/2, FINT:=0.5, FINTX:=0; BVEX4Pb:BVEXPh, ANGLE:=+ABVEXP/2, E2:=+ABVEXP/2, FINT:=0, FINTX:=0.5; BVEX4Ps:LINE=(BVEX4Pa,BVEX4Pb); WEX1h:sbend, L:=LWEX/2, ANGLE:=0; WEX2h:sbend, L:=LWEX/2, ANGLE:=0; WEX1s:LINE=(2*WEX1h); WEX2s:LINE=(2*WEX2h); BLEX1h:sbend, L:=LBLEX/2, ANGLE:=0, TILT=PI/2.; BLEX2h:sbend, L:=LBLEX/2, ANGLE:=0, TILT=PI/2.; BLEX3h:sbend, L:=LBLEX/2, ANGLE:=0, TILT=PI/2.; BLEX4h:sbend, L:=LBLEX/2, ANGLE:=0, TILT=PI/2.; BLEX1s:LINE=(2*BLEX1h); BLEX2s:LINE=(2*BLEX2h); BLEX3s:LINE=(2*BLEX3h); BLEX4s:LINE=(2*BLEX4h); QFEX1As:quadrupole, L:=LQFEX1A/2, K1:=BQFEX1A*Bscl/RQFEX1A/BRHO, aperture:=RQFEX1A; QFEX1Bs:quadrupole, L:=LQFEX1B/2, K1:=BQFEX1B*Bscl/RQFEX1B/BRHO, aperture:=RQFEX1B; QFEX1Cs:quadrupole, L:=LQFEX1C/2, K1:=BQFEX1C*Bscl/RQFEX1C/BRHO, aperture:=RQFEX1C; QDEX2As:quadrupole, L:=LQDEX2A/2, K1:=BQDEX2A*Bscl/RQDEX2A/BRHO, aperture:=RQDEX2A; QDEX2Bs:quadrupole, L:=LQDEX2B/2, K1:=BQDEX2B*Bscl/RQDEX2B/BRHO, aperture:=RQDEX2B; QDEX2Cs:quadrupole, L:=LQDEX2C/2, K1:=BQDEX2C*Bscl/RQDEX2C/BRHO, aperture:=RQDEX2C; QFEX3As:quadrupole, L:=LQFEX3A/2, K1:=BQFEX3A*Bscl/RQFEX3A/BRHO, aperture:=RQFEX3A; QFEX3Bs:quadrupole, L:=LQFEX3B/2, K1:=BQFEX3B*Bscl/RQFEX3B/BRHO, aperture:=RQFEX3B; QFEX3Cs:quadrupole, L:=LQFEX3C/2, K1:=BQFEX3C*Bscl/RQFEX3C/BRHO, aperture:=RQFEX3C; QDEX4As:quadrupole, L:=LQDEX4A/2, K1:=BQDEX4A*Bscl/RQDEX4A/BRHO, aperture:=RQDEX4A; QDEX4Bs:quadrupole, L:=LQDEX4B/2, K1:=BQDEX4B*Bscl/RQDEX4B/BRHO, aperture:=RQDEX4B; QDEX4Cs:quadrupole, L:=LQDEX4C/2, K1:=BQDEX4C*Bscl/RQDEX4C/BRHO, aperture:=RQDEX4C; QDEX4Ds:quadrupole, L:=LQDEX4D/2, K1:=BQDEX4D*Bscl/RQDEX4D/BRHO, aperture:=RQDEX4D; QFEX5s:quadrupole, L:=LQFEX5/2, K1:=BQFEX5*Bscl/RQFEX5/BRHO, aperture:=RQFEX5; QDEX6As:quadrupole, L:=LQDEX6A/2, K1:=BQDEX6A*Bscl/RQDEX6A/BRHO, aperture:=RQDEX6A; QDEX6Bs:quadrupole, L:=LQDEX6B/2, K1:=BQDEX6B*Bscl/RQDEX6B/BRHO, aperture:=RQDEX6B; QDEX6Cs:quadrupole, L:=LQDEX6C/2, K1:=BQDEX6C*Bscl/RQDEX6C/BRHO, aperture:=RQDEX6C; QFEX7As:quadrupole, L:=LQFEX7A/2, K1:=BQFEX7A*Bscl/RQFEX7A/BRHO, aperture:=RQFEX7A; QFEX7Bs:quadrupole, L:=LQFEX7B/2, K1:=BQFEX7B*Bscl/RQFEX7B/BRHO, aperture:=RQFEX7B; QFEX7Cs:quadrupole, L:=LQFEX7C/2, K1:=BQFEX7C*Bscl/RQFEX7C/BRHO, aperture:=RQFEX7C; BEGEDL1:marker; ENDEDL1:marker; EDL1:LINE=( BEGEDL1, MIP, SOLEXA, VKEX1, SOLEXB, DEX1, VKEX2, 2*QFEX1As, DEXQ1A, 2*QFEX1Bs, DEXQ1B, 2*QFEX1Cs, DEXQ1C, 2*QDEX2As, DEXQ2A, 2*QDEX2Bs, DEXQ2B, 2*QDEX2Cs, DEXQ2C, 2*QFEX3As, DEXQ3A, 2*QFEX3Bs, DEXQ3B, 2*QFEX3Cs, DEXQ3C, 2*QDEX4As, DEXQ4A, 2*QDEX4Bs, DEXQ4B, 2*QDEX4Cs, DEXQ4C, 2*QDEX4Ds, DEXQ4D, 2*QFEX5s, DEX2, BVEX1Es, DEXB1E, BVEX2Es, DEXB2E, BLEX1s, DEXL1E, WEX1s, DEXW1E, BLEX2s, DEXL2E, BVEX3Es, DEXB3E, BVEX4Es, DEXB4E, BVEX5Es, DEXB5E, BVEX6Es, DEXB6E, BLEX3s, DEXL3E, WEX2s, DEXW2E, BLEX4s, DEXL4E, BVEX7Es, DEXB7E, BVEX8Es, DEX301, DEX302, DEX303, DEX304, DEX305, DEX306, DEX307, DEX308, DEX309, DEX310, DEX311, DEX312, DEX313, DEX314, DEX315, BVEX1Ps, DEX401, DEX402, DEX403, DEX404, DEX405, DEX406, DEX407, DEX408, DEX409, DEX410, DEX411, DEX412, DEX413, DEX414, DEX415, DEX416, DEX417, DEX418, BVEX2Ps, DEX501, DEX502, DEX503, DEX504, DEX505, MEXFOC, DEX506, DEX507, DEX508, DEX509, DEX510, BVEX3Ps, DEX601, DEX602, DEX603, DEX604, DEX605, DEX606, DEX607, DEX608, DEX609, DEX610, DEX611, DEX612, DEX613, DEX614, DEX615, DEX616, DEX617, DEX618, BVEX4Ps, DEX701, DEX702, 2*QDEX6As, DEXQ6A, 2*QDEX6Bs, DEXQ6B, 2*QDEX6Cs, DEXQ6C, 2*QFEX7As, DEXQ7A, 2*QFEX7Bs, DEXQ7B, 2*QFEX7Cs, DEX801, DEX802, DEX803, DEX804, DEX805, DEX806, DEX807, DEX808, DEX809, DEX810, MEXDUMP, ENDEDL1 ); RETURN;