no_digested
BEGINNING[BETA_A]  = 50
BEGINNING[ALPHA_A]=  0
BEGINNING[BETA_B] = 50
BEGINNING[ALPHA_B] = 0

PARAMETER[PARTICLE] = ELECTRON
parameter[absolute_time_tracking]=true
PARAMETER[geometry] = open
BEGINNING[E_TOT]  = 84e6

radius = 0.05

P0: PIPE, L = 2.0
P0[wall] = {
	section = { s = 0,
	  v(1) = {0, 0, radius}},
	section = { s = P0[L],
	  v(1) = {0, 0, radius}}}

P1: PIPE, L = 0.1
P1[wall] = {
	section = { s = 0,
	  v(1) = {0, 0, radius}},
	section = { s = P1[L],
	  v(1) = {0, 0, radius}}}

P2: PIPE, L = 0.1
P2[wall] = {
	section = { s = 0,
	  v(1) = {0, 0, radius/100}},
	section = { s = P2[L],
	  v(1) = {0, 0, radius/100}}}

B1: SBEND, L = 0.2, angle = (30*pi/180)*(6/84), n_ref_pass =1, ref_orbit = match_at_entrance
B1[e2] = -pi/4

!b1[tracking_method] = taylor

linac: LCAVITY, L=0.115305, voltage=-78e6, rf_frequency = 1.3e9 !Half-wave cavity
linac[wall] = {
	section = { s = 0,
	  v(1) = {0, 0, radius}},
	section = { s = linac[L],
	  v(1) = {0, 0, radius}}}


height = 0.0254/2
B1[wall] = {
section = { s = 0,
  v(1) = {radius, height},
  v(2) = {-radius, height}},
section = { s = B1[L]*1/4,
  v(1) = {radius, height},
  v(2) = {-radius, height}},
section = { s = B1[L]*2/4,
  v(1) = {1*radius, height},
  v(2) = {-1*radius, height}},
section = { s = B1[L]*3/4,
  v(1) = {1*radius, height},
  v(2) = {-1*radius, height}},
section = { s = B1[L],
  v(1) = {1*radius, height},
  v(2) = {-1*radius, height}}}


RECIRCULATE: floor_position
demer: line[multipass] = (B1)

lat: line = (demer, P1, linac, recirculate, demer, P2)

USE, lat