! BMAD input file 
 
lattice := 6wigs_lum 
call, file=BMAD_LAYOUT:cesr_c1_layout.bmad 
!this is the layout as of 3/18/03	 
 
taylor_order = 3 
 
! cleo solenoid 
 
beam, energy =   1.88 
solenoid_tesla = 1.0 
ks_solenoid    = -1.0e-9 * clight * solenoid_tesla / beam[energy] 
cleo_sol: solenoid, l = 3.51, ks = ks_solenoid, superimpose 
 
wig_w[b_max] = 0.0 
wig_e[b_max] = 0.0 
 
 
wig_damp_drift: drift, l=1.6 
dwig: drift, l=0.065 
 
!species:= electron 
call, file=BMAD_LAYOUT:6wig_track.bmad 
 
 
! element attributes 
 
!sc_Q01 : overlay = {sc_Q01W, sc_Q01E}, K1 = -1.98303E+00 
sc_Q01W[K1]:= -1.98303E+00                                                                          
sc_Q01E[K1]:= -1.98303E+00                                                                          
!sc_Q02 : overlay = {sc_Q02W, sc_Q02E}, K1 =  1.35024E+00 
sc_Q02W[K1]:= 1.35024E+00                                                                           
sc_Q02E[K1]:= 1.35024E+00                                                                           
Q03W[K1] =  -2.78192E-01 
Q03E[K1] =  -2.62847E-01 
Q04W[K1] =   4.79862E-01 
Q04E[K1] =   4.88491E-01 
Q05W[K1] =  -3.59198E-01 
Q05E[K1] =  -3.87454E-01 
Q06W[K1] =   3.83169E-01 
Q06E[K1] =   3.77751E-01 
Q07W[K1]=  -2.71399E-01 
Q07E[K1]=  -2.14068E-01 
Q08W[K1]=   2.14019E-01 
Q08E[K1]=   1.50090E-01 
!Q07 : overlay = {Q07W, Q07E}, K1 = -3.05492E-01 
!Q08 : overlay = {Q08W, Q08E}, K1 = 1.67364E-01 
!Q09 : overlay = {Q09W, Q09E}, K1 = -1.45757E-01 
!Q10 : overlay = {Q10W, Q10E}, K1 =  2.06639E-01 
!Q11 : overlay = {Q11W, Q11E}, K1 = -1.76085E-01 
!Q12 : overlay = {Q12W, Q12E}, K1 =  1.73899E-01 
Q08AW[K1]:= -3.23141E-02 
Q09W[K1]:= -2.35582E-01 
Q10W[K1]:=  2.47552E-01 
Q11W[K1]:= -2.60681E-01 
Q12W[K1]:=  2.24697E-01 
Q09E[K1]:= -1.98794E-01 
Q10E[K1]:=  2.17629E-01 
Q11E[K1]:= -1.78127E-01 
Q12E[K1]:=  1.43562E-01 
Q13W[K1]:= -2.28144E-01 
Q14W[K1]:=  2.74811E-01 
Q15W[K1]:= -2.17422E-01 
Q16W[K1]:=  2.62891E-01 
Q17W[K1]:= -2.23025E-01 
Q18W[K1]:=  2.01083E-01 
Q19W[K1]:= -2.14073E-01 
Q20W[K1]:=  2.16538E-01 
Q21W[K1]:= -2.29940E-01 
Q22W[K1]:=  2.58280E-01 
Q23W[K1]:= -2.27932E-01 
Q24W[K1]:=  2.30348E-01 
Q25W[K1]:= -3.20957E-01 
Q26W[K1]:=  2.84994E-01 
Q13E[K1]:= -9.74037E-02 
Q14E[K1]:=  2.42172E-01 
Q15E[K1]:= -2.16603E-01 
Q16E[K1]:=  2.95447E-01 
Q17E[K1]:= -3.53461E-01 
Q18E[K1]:=  2.41285E-01 
Q19E[K1]:= -1.57963E-01 
Q20E[K1]:=  2.00113E-01 
Q21E[K1]:= -2.32110E-01 
Q22E[K1]:=  2.50502E-01 
Q23E[K1]:= -1.80716E-01 
Q24E[K1]:=  2.14907E-01 
Q25E[K1]:= -2.89957E-01 
Q26E[K1]:=  2.60815E-01 
Q27W[K1]:= -2.74746E-01 
Q28W[K1]:=  2.55869E-01 
Q29W[K1]:= -1.87899E-01 
Q30W[K1]:=  2.27300E-01 
Q27E[K1]:= -2.69425E-01 
Q28E[K1]:=  2.14185E-01 
Q29E[K1]:= -1.84508E-01 
Q30E[K1]:=  2.31993E-01 
Q31W[K1]:= -1.88338E-01 
Q32W[K1]:=  2.11256E-01 
Q33W[K1]:= -1.87106E-01 
Q34W[K1]:=  2.34912E-01 
Q35W[K1]:= -1.55223E-01 
Q36W[K1]:=  1.78037E-01 
Q37W[K1]:= -2.11613E-01 
Q38W[K1]:=  2.22071E-01 
Q39W[K1]:= -2.43877E-01 
Q40W[K1]:=  2.54836E-01 
Q31E[K1]:= -1.90695E-01 
Q32E[K1]:=  1.96741E-01 
Q33E[K1]:= -1.97887E-01 
Q34E[K1]:=  2.34021E-01 
Q35E[K1]:= -1.52721E-01 
Q36E[K1]:=  1.78620E-01 
Q37E[K1]:= -2.10368E-01 
Q38E[K1]:=  2.39891E-01 
Q39E[K1]:= -2.36770E-01 
Q40E[K1]:=  2.58325E-01 
Q41W[K1]:= -2.38245E-01 
Q42W[K1]:=  2.28496E-01 
Q43W[K1]:= -2.36644E-01 
Q43AW[K1]:=  2.40095E-01 
Q44W[K1]:= -1.92275E-01 
Q45W[K1]:=  2.87469E-01 
Q46W[K1]:= -2.42572E-01 
Q47W[K1]:=  4.78646E-01 
Q47aW[K1]:= -3.62095E-01 
Q41E[K1]:= -2.29309E-01 
Q42E[K1]:=  2.22587E-01 
Q43E[K1]:= -2.38956E-01 
Q43AE[K1]:=  2.49035E-01 
Q44E[K1]:= -1.88854E-01 
Q45E[K1]:=  2.86163E-01 
Q46E[K1]:= -2.22649E-01 
Q47E[K1]:=  4.39614E-01 
Q47aE[K1]:= -3.52420E-01 
Q48W[K1]:=  5.74976E-01 
Q48E[K1]:=  5.78136E-01 
Q49aW[K1]:=  0.0 
Q49aE[K1]:=  0.0 
Q49W[K1]:= -2.77395E-01 
Q49E[K1]:= -2.75427E-01 
 
q00_tilt :=    0.0785 
 
sc_q01w[tilt] = q00_tilt 
sc_q02w[tilt] = q00_tilt 
sc_sk_Q01w[tilt] = q00_tilt + pi/4 
sc_sk_Q02w[tilt] = q00_tilt + pi/4 
 
sc_q01e[tilt] = -q00_tilt 
sc_q02e[tilt] = -q00_tilt 
sc_sk_Q01e[tilt] = -q00_tilt - pi/4 
sc_sk_Q02e[tilt] = -q00_tilt - pi/4 
 
 
!SK_Q02 : overlay = {SK_Q02W, SK_Q03W, SK_Q02E/-1, SK_Q03E/-1}, k1 = -1.02201E-01 
SK_Q02W[k1]:= -1.02201E-01                                                                          
SK_Q03W[k1]:= -1.02201E-01                                                                          
SK_Q02E[k1]:= -1.02201E-01*-1                                                                       
SK_Q03E[k1]:= -1.02201E-01*-1                                                                       
!sc_SK_q02 : overlay = {sc_SK_q02W, sc_SK_q02E}, K1 =  2.18734E-01 
sc_SK_q02W[K1]:= 2.18734E-01                                                                        
sc_SK_q02E[K1]:= 2.18734E-01                                                                        
!Sc_sK_q01 : overlay = {sc_SK_q01W, sc_SK_q01E}, K1 = -1.02199E-01 
sc_SK_q01W[K1]:= -1.02199E-01                                                                       
sc_SK_q01E[K1]:= -1.02199E-01                                                                       
SK_Q04W[k1]:=0. ; SK_Q04E[K1]:= 0. 
 
fact = 18./20 
!H_SEP_08 : overlay = {H_SEP_08W,H_SEP_08E/-1}, HKICK = 3.05903E-04 
H_SEP_08W[HKICK]:=  4.38072E-04 
H_SEP_08E[HKICK]:= -1.47800E-04 
!H_SEP_45 : overlay = {H_SEP_45W,H_SEP_45E/-1}, HKICK = -5.85776E-04 
H_SEP_45W[HKICK]:= -7.05631E-04 
H_SEP_45E[HKICK]:=  6.39822E-04 
!V_SEP_48 : overlay = {V_SEP_48W,V_SEP_48E}, VKICK =  0.0 
V_SEP_48W[VKICK]:=  9.79650E-04 
V_SEP_48E[VKICK]:=  9.80296E-04 
 
QTUNE5 : GROUP = {Q15w,Q17w,Q19w,Q21w,& 
Q23w,Q25w,Q27w,Q29w,Q31w,Q33w,Q35w,Q37w, Q39w,Q41w,Q43w,Q44w,Q15e,Q17e,Q19e,Q21e,& 
Q23e,Q25e,Q27e,Q29e,Q31e,Q33e,Q35e,Q37e, Q39e,Q41e,Q43e,Q44e,Q46w,Q47Aw,Q49w,Q46e,Q47Ae,Q49e}, K1 
 
QTUNE6 : GROUP = { Q16w,Q18w,Q20w,Q22w,& 
Q24w,Q26w,Q28w,Q30w,Q32w,Q34w,Q36w,Q38w, Q40w,Q42w,Q43Aw,Q16e,Q18e,Q20e,Q22e,& 
Q24e,Q26e,Q28e,Q30e,Q32e,Q34e,Q36e,Q38e, Q40e,Q42e,Q43Ae,Q45w,Q47w,Q48w,Q49Aw,& 
Q45e,Q47e,Q48e,Q49Ae}, K1 
 
 
k1_00 := -9.57309 / beam[energy] 
 
Q00W[K1] =  k1_00 ; Q00E[K1] = Q00W[K1] 
Q00W[TILT] = q00_tilt ;  Q00E[TILT] = -Q00W[TILT] 
 
 
RF_W1[VOLT] := 1.5e6 *1.88/5.289 
RF_W2[VOLT] := 1.5e6 *1.88/5.289 
RF_E1[VOLT] := 1.5e6 *1.88/5.289 
RF_E2[VOLT] := 1.5e6 *1.88/5.289 
RF_W1[HARMON] := 1281 
RF_W2[HARMON] := 1281 
RF_E1[HARMON] := 1281 
RF_E2[HARMON] := 1281 
 
 
!20030903 mjf -- sexts orig'ed from pretzel on 1/3 
SEX_08W[K2] = 0.401041E+00; SEX_08E[K2] = 0.412734E+00 
SEX_09W[K2] = 0.189393E-01; SEX_09E[K2] = 0.190662E-01 
SEX_10W[K2] = -.535136E-01; SEX_10E[K2] = -.637683E-01 
SEX_11W[K2] = -.290184E+00; SEX_11E[K2] = -.300085E+00 
SEX_12W[K2] = 0.539543E+00; SEX_12E[K2] = 0.522905E+00 
SEX_13W[K2] = -.575076E+00; SEX_13E[K2] = -.581800E+00 
SEX_14W[K2] = 0.133722E+01; SEX_14E[K2] = 0.136702E+01 
SEX_15W[K2] = 0.805483E+00; SEX_15E[K2] = 0.814405E+00 
SEX_16W[K2] = 0.439458E+00; SEX_16E[K2] = 0.422647E+00 
SEX_17W[K2] = -.518640E+00; SEX_17E[K2] = -.503937E+00 
SEX_18W[K2] = 0.548472E+00; SEX_18E[K2] = 0.581010E+00 
SEX_19W[K2] = -.720946E+00; SEX_19E[K2] = -.720458E+00 
SEX_20W[K2] = 0.465640E+00; SEX_20E[K2] = 0.465295E+00 
SEX_21W[K2] = -.296255E+00; SEX_21E[K2] = -.302704E+00 
SEX_22W[K2] = 0.727189E+00; SEX_22E[K2] = 0.713802E+00 
SEX_23W[K2] = -.962043E+00; SEX_23E[K2] = -.952219E+00 
SEX_24W[K2] = 0.589090E+00; SEX_24E[K2] = 0.621698E+00 
SEX_25W[K2] = -.160046E+01; SEX_25E[K2] = -.157991E+01 
SEX_26W[K2] = 0.553199E+00; SEX_26E[K2] = 0.520956E+00 
SEX_27W[K2] = -.139361E+01; SEX_27E[K2] = -.139349E+01 
SEX_28W[K2] = 0.495823E+00; SEX_28E[K2] = 0.502548E+00 
SEX_29W[K2] = -.956056E+00; SEX_29E[K2] = -.977161E+00 
SEX_30W[K2] = 0.387882E+00; SEX_30E[K2] = 0.377337E+00 
SEX_31W[K2] = -.312843E+00; SEX_31E[K2] = -.319286E+00 
SEX_32W[K2] = 0.253732E+00; SEX_32E[K2] = 0.256507E+00 
SEX_33W[K2] = -.212676E+01; SEX_33E[K2] = -.210140E+01 
SEX_34W[K2] = 0.571125E+00; SEX_34E[K2] = 0.608649E+00 
SEX_35W[K2] = -.577112E+00; SEX_35E[K2] = -.541782E+00 
SEX_36W[K2] = 0.476189E+00; SEX_36E[K2] = 0.463026E+00 
SEX_37W[K2] = -.208251E+01; SEX_37E[K2] = -.206177E+01 
SEX_38W[K2] = 0.116221E+01; SEX_38E[K2] = 0.116616E+01 
SEX_39W[K2] = -.334831E+01; SEX_39E[K2] = -.333754E+01 
SEX_40W[K2] = 0.102094E+01; SEX_40E[K2] = 0.103602E+01 
SEX_41W[K2] = -.256274E+01; SEX_41E[K2] = -.260348E+01 
SEX_42W[K2] = 0.868132E+00; SEX_42E[K2] = 0.829089E+00 
SEX_43W[K2] = -.153364E+01; SEX_43E[K2] = -.153745E+01 
SEX_44W[K2] = -.193568E+00; SEX_44E[K2] = -.191784E+00 
SEX_45W[K2] = 0.488430E+00; SEX_45E[K2] = 0.478217E+00 
 
raw_xquneing_1 : group = {& 
 SEX_08W/0.1438E-01,SEX_08E/-.6728E-02, & 
 SEX_09W/-.1092E+00,SEX_09E/-.1144E+00, & 
 SEX_10W/-.5887E-02,SEX_10E/-.6465E-02, & 
 SEX_11W/0.1170E+00,SEX_11E/0.1172E+00, & 
 SEX_12W/-.1355E+00,SEX_12E/-.1293E+00, & 
 SEX_13W/0.1632E+00,SEX_13E/0.1700E+00, & 
 SEX_14W/-.5594E-02,SEX_14E/0.7503E-02, & 
 SEX_15W/0.4201E+00,SEX_15E/0.4212E+00, & 
 SEX_16W/-.2729E-02,SEX_16E/-.1323E-01, & 
 SEX_17W/0.8656E-01,SEX_17E/0.8056E-01, & 
 SEX_18W/-.6003E-01,SEX_18E/-.7601E-01, & 
 SEX_19W/0.3072E+00,SEX_19E/0.3019E+00, & 
 SEX_20W/0.1749E-01,SEX_20E/0.1724E-01, & 
 SEX_21W/0.1950E+00,SEX_21E/0.1960E+00, & 
 SEX_22W/0.2723E-01,SEX_22E/0.3877E-01, & 
 SEX_23W/-.3515E-01,SEX_23E/-.3174E-01, & 
 SEX_24W/0.2707E-01,SEX_24E/0.3196E-01, & 
 SEX_25W/-.2381E+00,SEX_25E/-.2346E+00, & 
 SEX_26W/0.7260E-02,SEX_26E/0.3316E-02, & 
 SEX_27W/-.9240E-01,SEX_27E/-.9414E-01, & 
 SEX_28W/-.5631E-02,SEX_28E/-.1752E-01, & 
 SEX_29W/-.1047E+00,SEX_29E/-.1127E+00, & 
 SEX_30W/0.9163E-02,SEX_30E/0.8112E-02, & 
 SEX_31W/-.1465E+00,SEX_31E/-.1445E+00, & 
 SEX_32W/-.1963E-01,SEX_32E/-.1394E-01, & 
 SEX_33W/-.1366E+00,SEX_33E/-.1321E+00, & 
 SEX_34W/0.4839E-01,SEX_34E/0.5795E-01, & 
 SEX_35W/-.3428E-01,SEX_35E/-.2813E-01, & 
 SEX_36W/0.3212E-01,SEX_36E/0.3197E-01, & 
 SEX_37W/-.7932E-01,SEX_37E/-.8257E-01, & 
 SEX_38W/0.9732E-01,SEX_38E/0.8469E-01, & 
 SEX_39W/-.3824E+00,SEX_39E/-.3858E+00, & 
 SEX_40W/0.3310E-01,SEX_40E/0.2567E-01, & 
 SEX_41W/-.1464E+00,SEX_41E/-.1479E+00, & 
 SEX_42W/-.2087E-01,SEX_42E/-.8941E-02, & 
 SEX_43W/-.6123E-01,SEX_43E/-.5320E-01, & 
 SEX_44W/-.3488E-01,SEX_44E/-.3042E-01, & 
 SEX_45W/-.9402E-03,SEX_45E/0.6422E-02}, k2 
raw_xquneing_1[type]:="CSR XQUNEING   1" 
 
raw_xquneing_2 : group = {& 
 SEX_08W/0.1390E-01,SEX_08E/-.6536E-02, & 
 SEX_09W/-.6632E-01,SEX_09E/-.7153E-01, & 
 SEX_10W/-.2529E-01,SEX_10E/-.2534E-01, & 
 SEX_11W/0.9480E-01,SEX_11E/0.9495E-01, & 
 SEX_12W/-.2155E+00,SEX_12E/-.2101E+00, & 
 SEX_13W/0.1155E+00,SEX_13E/0.1227E+00, & 
 SEX_14W/0.1384E-01,SEX_14E/0.2403E-01, & 
 SEX_15W/0.3673E+00,SEX_15E/0.3678E+00, & 
 SEX_16W/-.4332E-02,SEX_16E/-.1379E-01, & 
 SEX_17W/0.6743E-01,SEX_17E/0.6043E-01, & 
 SEX_18W/-.5883E-01,SEX_18E/-.7436E-01, & 
 SEX_19W/0.2251E+00,SEX_19E/0.2190E+00, & 
 SEX_20W/0.2755E-01,SEX_20E/0.2658E-01, & 
 SEX_21W/0.2006E+00,SEX_21E/0.2019E+00, & 
 SEX_22W/0.6564E-01,SEX_22E/0.7647E-01, & 
 SEX_23W/0.3548E-01,SEX_23E/0.3979E-01, & 
 SEX_24W/0.3702E-01,SEX_24E/0.4224E-01, & 
 SEX_25W/-.2150E+00,SEX_25E/-.2112E+00, & 
 SEX_26W/0.1377E-01,SEX_26E/0.1175E-01, & 
 SEX_27W/-.5563E-01,SEX_27E/-.5738E-01, & 
 SEX_28W/0.2678E-02,SEX_28E/-.9494E-02, & 
 SEX_29W/-.8898E-01,SEX_29E/-.9734E-01, & 
 SEX_30W/0.8968E-02,SEX_30E/0.8324E-02, & 
 SEX_31W/-.1245E+00,SEX_31E/-.1216E+00, & 
 SEX_32W/-.1331E+00,SEX_32E/-.1276E+00, & 
 SEX_33W/-.4803E-01,SEX_33E/-.4241E-01, & 
 SEX_34W/0.4627E-01,SEX_34E/0.5664E-01, & 
 SEX_35W/-.4995E-01,SEX_35E/-.4246E-01, & 
 SEX_36W/0.3319E-01,SEX_36E/0.3370E-01, & 
 SEX_37W/0.3316E-01,SEX_37E/0.2923E-01, & 
 SEX_38W/0.1051E+00,SEX_38E/0.9336E-01, & 
 SEX_39W/-.2626E+00,SEX_39E/-.2663E+00, & 
 SEX_40W/0.3853E-01,SEX_40E/0.3101E-01, & 
 SEX_41W/-.5507E-01,SEX_41E/-.5711E-01, & 
 SEX_42W/0.8278E-02,SEX_42E/0.1903E-01, & 
 SEX_43W/0.4018E-01,SEX_43E/0.4877E-01, & 
 SEX_44W/-.4492E-01,SEX_44E/-.3980E-01, & 
 SEX_45W/0.2782E-02,SEX_45E/0.9285E-02}, k2 
raw_xquneing_2[type]:="CSR XQUNEING   2" 
 
raw_xquneing_3 : group = {& 
 SEX_08W/0.9252E-02,SEX_08E/-.8553E-02, & 
 SEX_09W/-.1836E-01,SEX_09E/-.2037E-01, & 
 SEX_10W/-.4093E-01,SEX_10E/-.4277E-01, & 
 SEX_11W/0.1656E+00,SEX_11E/0.1660E+00, & 
 SEX_12W/-.2183E+00,SEX_12E/-.2130E+00, & 
 SEX_13W/0.1806E+00,SEX_13E/0.1840E+00, & 
 SEX_14W/-.4975E-02,SEX_14E/0.7474E-02, & 
 SEX_15W/0.1046E+00,SEX_15E/0.1051E+00, & 
 SEX_16W/-.1300E-01,SEX_16E/-.2401E-01, & 
 SEX_17W/0.7775E-01,SEX_17E/0.7544E-01, & 
 SEX_18W/-.9925E-01,SEX_18E/-.1142E+00, & 
 SEX_19W/0.1205E+00,SEX_19E/0.1180E+00, & 
 SEX_20W/0.2319E-01,SEX_20E/0.2307E-01, & 
 SEX_21W/-.6327E-01,SEX_21E/-.6325E-01, & 
 SEX_22W/0.3463E-01,SEX_22E/0.4324E-01, & 
 SEX_23W/-.1133E+00,SEX_23E/-.1132E+00, & 
 SEX_24W/-.1375E-01,SEX_24E/-.8814E-02, & 
 SEX_25W/0.1975E-02,SEX_25E/0.2675E-02, & 
 SEX_26W/-.2489E-01,SEX_26E/-.2783E-01, & 
 SEX_27W/-.1258E-01,SEX_27E/-.1258E-01, & 
 SEX_28W/-.8036E-02,SEX_28E/-.1636E-01, & 
 SEX_29W/0.4544E-02,SEX_29E/0.2122E-02, & 
 SEX_30W/-.3680E-02,SEX_30E/-.6181E-02, & 
 SEX_31W/0.9083E-01,SEX_31E/0.9106E-01, & 
 SEX_32W/-.3500E-01,SEX_32E/-.3144E-01, & 
 SEX_33W/0.3863E-01,SEX_33E/0.3947E-01, & 
 SEX_34W/0.3374E-01,SEX_34E/0.4389E-01, & 
 SEX_35W/-.5747E-01,SEX_35E/-.5542E-01, & 
 SEX_36W/0.7124E-01,SEX_36E/0.7069E-01, & 
 SEX_37W/-.6742E-01,SEX_37E/-.6874E-01, & 
 SEX_38W/0.1218E+00,SEX_38E/0.1109E+00, & 
 SEX_39W/-.1904E+00,SEX_39E/-.1912E+00, & 
 SEX_40W/0.3115E-01,SEX_40E/0.2430E-01, & 
 SEX_41W/-.2451E-01,SEX_41E/-.2485E-01, & 
 SEX_42W/-.1288E-01,SEX_42E/-.3384E-02, & 
 SEX_43W/-.4791E-01,SEX_43E/-.4501E-01, & 
 SEX_44W/-.2998E-02,SEX_44E/-.1709E-02, & 
 SEX_45W/-.4827E-02,SEX_45E/0.4025E-02}, k2 
raw_xquneing_3[type]:="CSR XQUNEING   3" 
 
raw_xquneing_4 : group = {& 
 SEX_08W/0.2145E-01,SEX_08E/-.1769E-01, & 
 SEX_09W/-.1106E+00,SEX_09E/-.1180E+00, & 
 SEX_10W/-.6245E-01,SEX_10E/-.6483E-01, & 
 SEX_11W/0.2819E+00,SEX_11E/0.2825E+00, & 
 SEX_12W/-.4253E+00,SEX_12E/-.4142E+00, & 
 SEX_13W/0.3351E+00,SEX_13E/0.3457E+00, & 
 SEX_14W/-.3615E-02,SEX_14E/0.2010E-01, & 
 SEX_15W/0.5188E+00,SEX_15E/0.5201E+00, & 
 SEX_16W/-.2499E-01,SEX_16E/-.4541E-01, & 
 SEX_17W/0.1612E+00,SEX_17E/0.1521E+00, & 
 SEX_18W/-.1732E+00,SEX_18E/-.2042E+00, & 
 SEX_19W/0.4088E+00,SEX_19E/0.4004E+00, & 
 SEX_20W/0.3319E-01,SEX_20E/0.3211E-01, & 
 SEX_21W/0.1560E+00,SEX_21E/0.1572E+00, & 
 SEX_22W/0.6756E-01,SEX_22E/0.8785E-01, & 
 SEX_23W/-.8672E-01,SEX_23E/-.8263E-01, & 
 SEX_24W/0.9236E-02,SEX_24E/0.1856E-01, & 
 SEX_25W/-.2039E+00,SEX_25E/-.1997E+00, & 
 SEX_26W/-.2007E-01,SEX_26E/-.2529E-01, & 
 SEX_27W/-.6232E-01,SEX_27E/-.6417E-01, & 
 SEX_28W/-.1661E-01,SEX_28E/-.3735E-01, & 
 SEX_29W/-.7274E-01,SEX_29E/-.8340E-01, & 
 SEX_30W/-.2671E-02,SEX_30E/-.6425E-02, & 
 SEX_31W/-.2321E-01,SEX_31E/-.2050E-01, & 
 SEX_32W/-.1471E+00,SEX_32E/-.1378E+00, & 
 SEX_33W/-.2472E-01,SEX_33E/-.1889E-01, & 
 SEX_34W/0.6927E-01,SEX_34E/0.8848E-01, & 
 SEX_35W/-.8712E-01,SEX_35E/-.7852E-01, & 
 SEX_36W/0.9228E-01,SEX_36E/0.9189E-01, & 
 SEX_37W/-.5776E-01,SEX_37E/-.6297E-01, & 
 SEX_38W/0.2033E+00,SEX_38E/0.1801E+00, & 
 SEX_39W/-.4431E+00,SEX_39E/-.4477E+00, & 
 SEX_40W/0.5374E-01,SEX_40E/0.3887E-01, & 
 SEX_41W/-.7770E-01,SEX_41E/-.7949E-01, & 
 SEX_42W/-.3412E-01,SEX_42E/-.1270E-01, & 
 SEX_43W/-.3147E-01,SEX_43E/-.2001E-01, & 
 SEX_44W/-.3285E-01,SEX_44E/-.2656E-01, & 
 SEX_45W/-.6744E-02,SEX_45E/0.8945E-02}, k2 
raw_xquneing_4[type]:="CSR XQUNEING   4" 
 
RAW_VCROSING_7: GROUP = {Q49W/ 0.013000,Q49E/ 0.013000,Q41W/ 0.011954, & 
        Q41E/ 0.011954,Q42W/-0.006183,Q42E/-0.006183,Q43W/-0.008816, & 
        Q43E/-0.008816,Q44W/ 0.001839,Q44E/ 0.001839,Q45W/ 0.009125, & 
        Q45E/ 0.009125,Q46W/-0.001720,Q46E/-0.001720,Q47W/ 0.008429, & 
        Q47E/ 0.008429,Q47AW/-0.009956,Q47AE/-0.009956,Q48W/-0.012708, & 
        Q48E/-0.012708,Q49AW/-0.007047,Q49AE/-0.007047}, K1, & 
         Type = "CSR VCROSING   7" 
 
raw_pretzing_1 : group = {H_SEP_08W/4.38072E-04, H_SEP_08E/-1.47800E-04, & 
                   H_SEP_45W/-7.05631E-04, H_SEP_45E/6.39822E-04}, HKICK 
raw_pretzing_1[type]:="CSR PRETZING   1" 
 
raw_pretzing_13 : group = {H_SEP_08W/4.38072E-04, H_SEP_08E/-1.47800E-04}, HKICK 
raw_pretzing_13[type]:="CSR PRETZING  13" 
 
!131003-1  minimize energy dependence. det4 big
SEX_08W[K2] = -.892456E+00; SEX_08E[K2] = 0.163928E+00
SEX_09W[K2] = 0.305258E+01; SEX_09E[K2] = 0.105458E+01
SEX_10W[K2] = -.229255E+01; SEX_10E[K2] = -.293775E+00
SEX_11W[K2] = -.607143E+00; SEX_11E[K2] = 0.118641E+01
SEX_12W[K2] = 0.544251E+00; SEX_12E[K2] = 0.327461E+01
SEX_13W[K2] = -.156718E+01; SEX_13E[K2] = -.449346E+01
SEX_14W[K2] = 0.179439E+01; SEX_14E[K2] = 0.248910E+01
SEX_15W[K2] = 0.705252E+00; SEX_15E[K2] = 0.724359E+00
SEX_16W[K2] = 0.863364E+00; SEX_16E[K2] = 0.389718E+00
SEX_17W[K2] = -.323528E+01; SEX_17E[K2] = -.652283E+00
SEX_18W[K2] = 0.176498E+01; SEX_18E[K2] = 0.110420E+01
SEX_19W[K2] = -.372648E+01; SEX_19E[K2] = -.338186E+01
SEX_20W[K2] = 0.112745E+01; SEX_20E[K2] = 0.755230E+00
SEX_21W[K2] = -.892461E+00; SEX_21E[K2] = -.148402E+01
SEX_22W[K2] = 0.795985E+00; SEX_22E[K2] = 0.323953E+00
SEX_23W[K2] = -.337833E+01; SEX_23E[K2] = -.511715E+00
SEX_24W[K2] = 0.185300E+00; SEX_24E[K2] = 0.349323E+00
SEX_25W[K2] = -.215465E+01; SEX_25E[K2] = -.164130E+01
SEX_26W[K2] = 0.857327E-01; SEX_26E[K2] = 0.601605E+00
SEX_27W[K2] = -.154623E+01; SEX_27E[K2] = -.164102E+01
SEX_28W[K2] = 0.946093E+00; SEX_28E[K2] = 0.109865E+01
SEX_29W[K2] = -.139562E+01; SEX_29E[K2] = -.131048E+01
SEX_30W[K2] = 0.114926E+01; SEX_30E[K2] = 0.458931E+00
SEX_31W[K2] = -.631915E+00; SEX_31E[K2] = -.129903E+01
SEX_32W[K2] = 0.794251E-01; SEX_32E[K2] = 0.501872E-01
SEX_33W[K2] = -.622317E+00; SEX_33E[K2] = -.442934E+00
SEX_34W[K2] = 0.257600E+00; SEX_34E[K2] = 0.488437E+00
SEX_35W[K2] = -.435529E+00; SEX_35E[K2] = -.986006E+00
SEX_36W[K2] = 0.102526E+01; SEX_36E[K2] = 0.104220E+01
SEX_37W[K2] = -.147861E+01; SEX_37E[K2] = -.166863E+01
SEX_38W[K2] = 0.165770E+01; SEX_38E[K2] = 0.158377E+01
SEX_39W[K2] = -.279019E+01; SEX_39E[K2] = -.309824E+01
SEX_40W[K2] = 0.900458E+00; SEX_40E[K2] = 0.908756E+00
SEX_41W[K2] = -.172426E+01; SEX_41E[K2] = -.229479E+01
SEX_42W[K2] = 0.769516E+00; SEX_42E[K2] = 0.563786E+00
SEX_43W[K2] = -.100099E+00; SEX_43E[K2] = -.159021E+00
SEX_44W[K2] = -.104063E+01; SEX_44E[K2] = -.839934E+00
SEX_45W[K2] = 0.771479E+00; SEX_45E[K2] = 0.895301E+00



use, cesr 
 
 
 ! Vars not in original file 
 
 
