! BMAD input file no_digested lattice := FODO beam, energy = 1 !beginning[beta_x] =0.5 !beginning[beta_y] = 0.5 !beginning[alpha_x]= 0 !beginning[alpha_y]= 0 !beginning[eta_x] = 0 !beginning[etap_x] = 0 !beginning[beta_x] =11.27161797 !beginning[beta_y] = 4.31731041 !beginning[alpha_x]= 1.61152116 !beginning[alpha_y]=-0.67030841 !beginning[eta_x] = 2.65296216 !beginning[etap_x] =-0.38439728 !PARAMETER[LATTICE_TYPE] = LINEAR_LATTICE bunch_start[x] = .01 ip: marker d0 : drift, l=0.10 d1 : drift, l=0.25 d2 : drift, l=1.0 d3 : drift, l=4.0 bend: sbend, l=2.5, angle = pi*2/40 db: drift, l=2.5 ! drift for the missing bend scheme Quad_x: quadrupole, l = 0.50 Quad_y: quadrupole, l = 0.50 Quad_x[k1]= 5.7264354E-01 Quad_y[k1]=-5.9079362E-01 Quad_x0: quadrupole, l = 0.50 Quad_y0: quadrupole, l = 0.50 Quad_x1: quadrupole, l = 0.50 Quad_y1: quadrupole, l = 0.50 Quad_x0[k1]= 5.7264354E-01 Quad_y0[k1]=-3.1166922E-01 Quad_x1[k1]= 4.0289801E-01 Quad_y1[k1]=-5.4692642E-01 Quad_x2: quadrupole, l = 0.50 Quad_y2: quadrupole, l = 0.50 Quad_x3: quadrupole, l = 0.50 Quad_y3: quadrupole, l = 0.50 Quad_x2[k1]= 3.8627593E-01 Quad_y2[k1]=-3.0245450E-01 Quad_x3[k1]= 4.0901026E-01 Quad_y3[k1]=-5.0052548E-01 Quad_1: quadrupole, l = 0.50 Quad_2: quadrupole, l = 0.50 quad_3: quadrupole, l = 0.50 Quad_4: quadrupole, l = 0.50 Quad_1[k1]= 2.1406135E-01 Quad_2[k1]=-5.3874299E-01 Quad_3[k1]= 1.5367782E+00 Quad_4[k1]=-2.3965273E+00 Quad_a: quadrupole, l = 0.50 Quad_a[k1]= -8.7054467E-02 Sext_x: sextupole, l = 0.05 Sext_y: sextupole, l = 0.05 Sext_x[k2]= 5.6603656E+00 Sext_y[k2]=-6.9874000E+00 det_y: MARKER, ALIAS = "det_y" det_x: MARKER, ALIAS = "det_x" fodo: line = (Quad_x, d0,Sext_x,d0, bend, d1, Quad_y, d0,Sext_y,d0, bend, d1) fodo0: line = (Quad_x0, d0,Sext_x,d0, db, d1, Quad_y0, d0,Sext_y,d0, bend, d1) fodo1: line = (Quad_x1, d0,Sext_x,d0, db, d1, Quad_y1, d0,Sext_y,d0, bend, d1) mfodo2: line = (d1, db, d0,Sext_y,d0, Quad_y2, d1, bend, d0,Sext_x,d0, Quad_x2) mfodo3: line = (d1, db, d0,Sext_y,d0, Quad_y3, det_y, d1, bend, d0,Sext_x,d0, Quad_x3, det_x) insert_ip: line = (Quad_1, d2, Quad_2, d2, Quad_3, d2, Quad_4, d2, ip) minsert: line = (d2, Quad_a, d3, ip) ring: line = (-insert_ip, -fodo1, -fodo0, -8*fodo, mfodo2, mfodo3, minsert, -minsert, -mfodo3, -mfodo2, 8*fodo, fodo0, fodo1, insert_ip) use, ring