Iwire  :=  
        267 epsN/(3.75 10^(-6));
dy  :=  
        21.42 Sqrt[epsN/(3.75 10^(-6))] Sqrt[
            26/Momentum];

sigmabblr1  :=  
        21.42/9.5 Sqrt[26/Momentum];
sigmabblr2  :=  21.10/9.5 Sqrt[26/Momentum];

nominal distance wire center to beam = 20.27 mm 0 orbit

distance  :=  
      Sqrt[beta 1/(2 Pi (Momentum/
                    0.938) 3 10^8 1.6 10^(-19) /(1.5 10^(-18)))  Iwire0 1.2 / (DeltaQ)]

betay_BBLR1  := 51.2
betay_BBLR2 :=  45.0
betax_BBLR1 := 47.6
betax_BBLR2 := 54.1

.014/Sqrt[51.2 1.5 10^(-6)/26  .938]

.009/Sqrt[51.2 1.5 10^(-6)/37  .938]

distancekick  :=  
      2 Iwire0 1.2 1.5 10^(-18)/(Momentum/ .938)/(1.6 10^(-19)) / (3 10^8)/
          kickangle

distancekick  //. {Iwire0 -> 100, Momentum -> 37, 
        kickangle -> 0.0000166 1.439}

distance  //. {Iwire0 -> 30, Momentum -> 37,  
        DeltaQ -> 0.0059,  beta -> 47.6}

distance  //. {Iwire0 -> 30, Momentum -> 37,  
        DeltaQ -> 0.0086,  beta -> 51.2}

distance  //. {Iwire0 -> 200, Momentum -> 26,  
        DeltaQ -> 0.0108,  beta -> 47.6}

Iwire //. {epsN -> 1.8 10^(-6)}

dy //. {epsN -> 1.5 10^(-6), 
        Momentum -> 37}

1.5 27/22 // N
1.8/99 83 // N

0.00090^2/22 26/ .938

0.0020^2/99 26/ .938