Close the lattice (in hsr.tao, not the lattice file)

Author: J. Scott Berg

hsr-275-10.bmad

@@ -7,19 +7,9 @@ call, file='ir8c-str-275-10.bmad'
 call, file='ir10-str-275-10.bmad'
 call, file='ir12-str-275-10.bmad'
 
-parameter[geometry]        = open            
-parameter[particle]        = antiproton
-parameter[ptc_exact_model] = t
 beginning[e_tot]           = e275
 
-beginning[x_position] =  -581.034604448580808
-beginning[z_position] =  198.301464555407989
-beginning[theta_position] =  -2.92938609211768686+twopi
-beginning[eta_x] =  +1.04125911010660821E+00
-beginning[etap_x] =  -4.38068501621277015E-02
-beginning[beta_a] = 4.16917285369697765E+01
-beginning[alpha_a] = -2.00180204981945575E+00
-beginning[beta_b] = 1.20450836994714052E+01
-beginning[alpha_b] =  -1.94874345958573625E+00
+beginning[beta_a] = 80e-2
+beginning[beta_b] = 7.2e-2
 
 use, hsr

hsr.bmad

@@ -14,6 +14,11 @@ call, file='ir10-ps.bmad'
 
 ip6d: marker
 ip6w: marker
+
+parameter[geometry]        = open
+parameter[particle]        = antiproton
+parameter[ptc_exact_model] = t
+
 hsr: line=(ip6d,hsr6d,
  arc07y,ir8,arc09y,
  ins09y,ir10,ins10b,

hsr.tao

@@ -1,4 +1,4 @@
-set branch [10:20]@0 geometry=closed
+set branch [1,10:20]@0 geometry=closed
 ! RHIC geometry calculations
 set sym xd0 = lcendx*tan(0.5*thdx) + lcendxd0*tan(thdx) + lcend0*tan(0.5*(thdx+thd0))
 set sym zd0 = lcenxdx + lcendx + lcendxd0 + lcend0
@@ -146,5 +146,5 @@ set ele 21@0 beta_a = 15@lat::beta.a[0]
 set ele 21@0 alpha_a = 15@lat::alpha.a[0]
 set ele 21@0 beta_b = 15@lat::beta.b[0]
 set ele 21@0 alpha_b = 15@lat::alpha.b[0]
-set particle_start [1:9,21:24]@x = 0
-set particle_start [1:9,21:24]@px = 0
+set particle_start [2:9,21:24]@x = 0
+set particle_start [2:9,21:24]@px = 0