\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2}
\begin{array}{l}
t_0 := \left(\beta + \alpha\right) + 2\\
\mathbf{if}\;\frac{\beta - \alpha}{t_0} \leq -0.9999999999999998:\\
\;\;\;\;\frac{\frac{2 + \beta \cdot 2}{\alpha}}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{1 + \frac{1}{\frac{t_0}{\beta - \alpha}}}{2}\\
\end{array}
(FPCore (alpha beta) :precision binary64 (/ (+ (/ (- beta alpha) (+ (+ alpha beta) 2.0)) 1.0) 2.0))
(FPCore (alpha beta)
:precision binary64
(let* ((t_0 (+ (+ beta alpha) 2.0)))
(if (<= (/ (- beta alpha) t_0) -0.9999999999999998)
(/ (/ (+ 2.0 (* beta 2.0)) alpha) 2.0)
(/ (+ 1.0 (/ 1.0 (/ t_0 (- beta alpha)))) 2.0))))double code(double alpha, double beta) {
return (((beta - alpha) / ((alpha + beta) + 2.0)) + 1.0) / 2.0;
}
double code(double alpha, double beta) {
double t_0 = (beta + alpha) + 2.0;
double tmp;
if (((beta - alpha) / t_0) <= -0.9999999999999998) {
tmp = ((2.0 + (beta * 2.0)) / alpha) / 2.0;
} else {
tmp = (1.0 + (1.0 / (t_0 / (beta - alpha)))) / 2.0;
}
return tmp;
}



Bits error versus alpha



Bits error versus beta
Results
if (/.f64 (-.f64 beta alpha) (+.f64 (+.f64 alpha beta) 2)) < -0.99999999999999978Initial program 60.6
Taylor expanded around inf 0.0
if -0.99999999999999978 < (/.f64 (-.f64 beta alpha) (+.f64 (+.f64 alpha beta) 2)) Initial program 0.4
rmApplied clear-num_binary640.4
Final simplification0.3
herbie shell --seed 2021196
(FPCore (alpha beta)
:name "Octave 3.8, jcobi/1"
:precision binary64
:pre (and (> alpha -1.0) (> beta -1.0))
(/ (+ (/ (- beta alpha) (+ (+ alpha beta) 2.0)) 1.0) 2.0))