Octave 3.8, jcobi/2

Percentage Accurate: 63.6% → 97.6%
Time: 13.6s
Alternatives: 15
Speedup: 1.1×

Specification

?
\[\left(\alpha > -1 \land \beta > -1\right) \land i > 0\]
\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ \frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{t\_0 + 2} + 1}{2} \end{array} \end{array} \]
(FPCore (alpha beta i)
 :precision binary64
 (let* ((t_0 (+ (+ alpha beta) (* 2.0 i))))
   (/ (+ (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ t_0 2.0)) 1.0) 2.0)))
double code(double alpha, double beta, double i) {
	double t_0 = (alpha + beta) + (2.0 * i);
	return (((((alpha + beta) * (beta - alpha)) / t_0) / (t_0 + 2.0)) + 1.0) / 2.0;
}
real(8) function code(alpha, beta, i)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    real(8), intent (in) :: i
    real(8) :: t_0
    t_0 = (alpha + beta) + (2.0d0 * i)
    code = (((((alpha + beta) * (beta - alpha)) / t_0) / (t_0 + 2.0d0)) + 1.0d0) / 2.0d0
end function
public static double code(double alpha, double beta, double i) {
	double t_0 = (alpha + beta) + (2.0 * i);
	return (((((alpha + beta) * (beta - alpha)) / t_0) / (t_0 + 2.0)) + 1.0) / 2.0;
}
def code(alpha, beta, i):
	t_0 = (alpha + beta) + (2.0 * i)
	return (((((alpha + beta) * (beta - alpha)) / t_0) / (t_0 + 2.0)) + 1.0) / 2.0
function code(alpha, beta, i)
	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
	return Float64(Float64(Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(t_0 + 2.0)) + 1.0) / 2.0)
end
function tmp = code(alpha, beta, i)
	t_0 = (alpha + beta) + (2.0 * i);
	tmp = (((((alpha + beta) * (beta - alpha)) / t_0) / (t_0 + 2.0)) + 1.0) / 2.0;
end
code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, N[(N[(N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(t$95$0 + 2.0), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{t\_0 + 2} + 1}{2}
\end{array}
\end{array}

Sampling outcomes in binary64 precision:

Local Percentage Accuracy vs ?

The average percentage accuracy by input value. Horizontal axis shows value of an input variable; the variable is choosen in the title. Vertical axis is accuracy; higher is better. Red represent the original program, while blue represents Herbie's suggestion. These can be toggled with buttons below the plot. The line is an average while dots represent individual samples.

Accuracy vs Speed?

Herbie found 15 alternatives:

AlternativeAccuracySpeedup
The accuracy (vertical axis) and speed (horizontal axis) of each alternatives. Up and to the right is better. The red square shows the initial program, and each blue circle shows an alternative.The line shows the best available speed-accuracy tradeoffs.

Initial Program: 63.6% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ \frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{t\_0 + 2} + 1}{2} \end{array} \end{array} \]
(FPCore (alpha beta i)
 :precision binary64
 (let* ((t_0 (+ (+ alpha beta) (* 2.0 i))))
   (/ (+ (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ t_0 2.0)) 1.0) 2.0)))
double code(double alpha, double beta, double i) {
	double t_0 = (alpha + beta) + (2.0 * i);
	return (((((alpha + beta) * (beta - alpha)) / t_0) / (t_0 + 2.0)) + 1.0) / 2.0;
}
real(8) function code(alpha, beta, i)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    real(8), intent (in) :: i
    real(8) :: t_0
    t_0 = (alpha + beta) + (2.0d0 * i)
    code = (((((alpha + beta) * (beta - alpha)) / t_0) / (t_0 + 2.0d0)) + 1.0d0) / 2.0d0
end function
public static double code(double alpha, double beta, double i) {
	double t_0 = (alpha + beta) + (2.0 * i);
	return (((((alpha + beta) * (beta - alpha)) / t_0) / (t_0 + 2.0)) + 1.0) / 2.0;
}
def code(alpha, beta, i):
	t_0 = (alpha + beta) + (2.0 * i)
	return (((((alpha + beta) * (beta - alpha)) / t_0) / (t_0 + 2.0)) + 1.0) / 2.0
function code(alpha, beta, i)
	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
	return Float64(Float64(Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(t_0 + 2.0)) + 1.0) / 2.0)
end
function tmp = code(alpha, beta, i)
	t_0 = (alpha + beta) + (2.0 * i);
	tmp = (((((alpha + beta) * (beta - alpha)) / t_0) / (t_0 + 2.0)) + 1.0) / 2.0;
end
code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, N[(N[(N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(t$95$0 + 2.0), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{t\_0 + 2} + 1}{2}
\end{array}
\end{array}

Alternative 1: 97.6% accurate, 0.6× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq -0.5:\\ \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\alpha + \beta}{\alpha + \left(\beta + \mathsf{fma}\left(2, i, 2\right)\right)}, 1\right)}{2}\\ \end{array} \end{array} \]
(FPCore (alpha beta i)
 :precision binary64
 (let* ((t_0 (+ (+ alpha beta) (* 2.0 i))))
   (if (<= (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0)) -0.5)
     (* -0.5 (/ (- (- -2.0 (fma 2.0 i beta)) (fma 2.0 i beta)) alpha))
     (/
      (fma
       (/ (- beta alpha) (+ alpha (fma 2.0 i beta)))
       (/ (+ alpha beta) (+ alpha (+ beta (fma 2.0 i 2.0))))
       1.0)
      2.0))))
double code(double alpha, double beta, double i) {
	double t_0 = (alpha + beta) + (2.0 * i);
	double tmp;
	if (((((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0)) <= -0.5) {
		tmp = -0.5 * (((-2.0 - fma(2.0, i, beta)) - fma(2.0, i, beta)) / alpha);
	} else {
		tmp = fma(((beta - alpha) / (alpha + fma(2.0, i, beta))), ((alpha + beta) / (alpha + (beta + fma(2.0, i, 2.0)))), 1.0) / 2.0;
	}
	return tmp;
}
function code(alpha, beta, i)
	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
	tmp = 0.0
	if (Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0)) <= -0.5)
		tmp = Float64(-0.5 * Float64(Float64(Float64(-2.0 - fma(2.0, i, beta)) - fma(2.0, i, beta)) / alpha));
	else
		tmp = Float64(fma(Float64(Float64(beta - alpha) / Float64(alpha + fma(2.0, i, beta))), Float64(Float64(alpha + beta) / Float64(alpha + Float64(beta + fma(2.0, i, 2.0)))), 1.0) / 2.0);
	end
	return tmp
end
code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision], -0.5], N[(-0.5 * N[(N[(N[(-2.0 - N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision] - N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision] / alpha), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(beta - alpha), $MachinePrecision] / N[(alpha + N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(N[(alpha + beta), $MachinePrecision] / N[(alpha + N[(beta + N[(2.0 * i + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
\mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq -0.5:\\
\;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\

\mathbf{else}:\\
\;\;\;\;\frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\alpha + \beta}{\alpha + \left(\beta + \mathsf{fma}\left(2, i, 2\right)\right)}, 1\right)}{2}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < -0.5

    1. Initial program 3.3%

      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
    2. Add Preprocessing
    3. Taylor expanded in alpha around -inf

      \[\leadsto \color{blue}{\frac{-1}{2} \cdot \frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha}} \]
    4. Step-by-step derivation
      1. *-commutativeN/A

        \[\leadsto \color{blue}{\frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha} \cdot \frac{-1}{2}} \]
      2. *-lowering-*.f64N/A

        \[\leadsto \color{blue}{\frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha} \cdot \frac{-1}{2}} \]
    5. Simplified94.8%

      \[\leadsto \color{blue}{\frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha} \cdot -0.5} \]

    if -0.5 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

    1. Initial program 81.6%

      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. associate-/l/N/A

        \[\leadsto \frac{\color{blue}{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot i\right)}} + 1}{2} \]
      2. *-commutativeN/A

        \[\leadsto \frac{\frac{\color{blue}{\left(\beta - \alpha\right) \cdot \left(\alpha + \beta\right)}}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} + 1}{2} \]
      3. *-commutativeN/A

        \[\leadsto \frac{\frac{\left(\beta - \alpha\right) \cdot \left(\alpha + \beta\right)}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) \cdot \left(\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2\right)}} + 1}{2} \]
      4. times-fracN/A

        \[\leadsto \frac{\color{blue}{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i} \cdot \frac{\alpha + \beta}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}} + 1}{2} \]
      5. accelerator-lowering-fma.f64N/A

        \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i}, \frac{\alpha + \beta}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}, 1\right)}}{2} \]
    4. Applied egg-rr100.0%

      \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\alpha + \beta}{\alpha + \left(\beta + \mathsf{fma}\left(2, i, 2\right)\right)}, 1\right)}}{2} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification98.8%

    \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq -0.5:\\ \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\alpha + \beta}{\alpha + \left(\beta + \mathsf{fma}\left(2, i, 2\right)\right)}, 1\right)}{2}\\ \end{array} \]
  5. Add Preprocessing

Alternative 2: 95.0% accurate, 0.4× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\ \mathbf{if}\;t\_1 \leq -0.5:\\ \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\ \mathbf{elif}\;t\_1 \leq 10^{-51}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\alpha \cdot \alpha}{\mathsf{fma}\left(2, i, \alpha\right) \cdot \left(-2 - \mathsf{fma}\left(2, i, \alpha\right)\right)}, 0.5, 0.5\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\ \end{array} \end{array} \]
(FPCore (alpha beta i)
 :precision binary64
 (let* ((t_0 (+ (+ alpha beta) (* 2.0 i)))
        (t_1 (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0))))
   (if (<= t_1 -0.5)
     (* -0.5 (/ (- (- -2.0 (fma 2.0 i beta)) (fma 2.0 i beta)) alpha))
     (if (<= t_1 1e-51)
       (fma
        (/ (* alpha alpha) (* (fma 2.0 i alpha) (- -2.0 (fma 2.0 i alpha))))
        0.5
        0.5)
       (fma (/ (- beta alpha) (+ (+ alpha beta) 2.0)) 0.5 0.5)))))
double code(double alpha, double beta, double i) {
	double t_0 = (alpha + beta) + (2.0 * i);
	double t_1 = (((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0);
	double tmp;
	if (t_1 <= -0.5) {
		tmp = -0.5 * (((-2.0 - fma(2.0, i, beta)) - fma(2.0, i, beta)) / alpha);
	} else if (t_1 <= 1e-51) {
		tmp = fma(((alpha * alpha) / (fma(2.0, i, alpha) * (-2.0 - fma(2.0, i, alpha)))), 0.5, 0.5);
	} else {
		tmp = fma(((beta - alpha) / ((alpha + beta) + 2.0)), 0.5, 0.5);
	}
	return tmp;
}
function code(alpha, beta, i)
	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
	t_1 = Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0))
	tmp = 0.0
	if (t_1 <= -0.5)
		tmp = Float64(-0.5 * Float64(Float64(Float64(-2.0 - fma(2.0, i, beta)) - fma(2.0, i, beta)) / alpha));
	elseif (t_1 <= 1e-51)
		tmp = fma(Float64(Float64(alpha * alpha) / Float64(fma(2.0, i, alpha) * Float64(-2.0 - fma(2.0, i, alpha)))), 0.5, 0.5);
	else
		tmp = fma(Float64(Float64(beta - alpha) / Float64(Float64(alpha + beta) + 2.0)), 0.5, 0.5);
	end
	return tmp
end
code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -0.5], N[(-0.5 * N[(N[(N[(-2.0 - N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision] - N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision] / alpha), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 1e-51], N[(N[(N[(alpha * alpha), $MachinePrecision] / N[(N[(2.0 * i + alpha), $MachinePrecision] * N[(-2.0 - N[(2.0 * i + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * 0.5 + 0.5), $MachinePrecision], N[(N[(N[(beta - alpha), $MachinePrecision] / N[(N[(alpha + beta), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision] * 0.5 + 0.5), $MachinePrecision]]]]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\
\mathbf{if}\;t\_1 \leq -0.5:\\
\;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\

\mathbf{elif}\;t\_1 \leq 10^{-51}:\\
\;\;\;\;\mathsf{fma}\left(\frac{\alpha \cdot \alpha}{\mathsf{fma}\left(2, i, \alpha\right) \cdot \left(-2 - \mathsf{fma}\left(2, i, \alpha\right)\right)}, 0.5, 0.5\right)\\

\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < -0.5

    1. Initial program 3.3%

      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
    2. Add Preprocessing
    3. Taylor expanded in alpha around -inf

      \[\leadsto \color{blue}{\frac{-1}{2} \cdot \frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha}} \]
    4. Step-by-step derivation
      1. *-commutativeN/A

        \[\leadsto \color{blue}{\frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha} \cdot \frac{-1}{2}} \]
      2. *-lowering-*.f64N/A

        \[\leadsto \color{blue}{\frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha} \cdot \frac{-1}{2}} \]
    5. Simplified94.8%

      \[\leadsto \color{blue}{\frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha} \cdot -0.5} \]

    if -0.5 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < 1e-51

    1. Initial program 100.0%

      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
    2. Add Preprocessing
    3. Taylor expanded in beta around 0

      \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(1 + -1 \cdot \frac{{\alpha}^{2}}{\left(2 + \left(\alpha + 2 \cdot i\right)\right) \cdot \left(\alpha + 2 \cdot i\right)}\right)} \]
    4. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(-1 \cdot \frac{{\alpha}^{2}}{\left(2 + \left(\alpha + 2 \cdot i\right)\right) \cdot \left(\alpha + 2 \cdot i\right)} + 1\right)} \]
      2. distribute-rgt-inN/A

        \[\leadsto \color{blue}{\left(-1 \cdot \frac{{\alpha}^{2}}{\left(2 + \left(\alpha + 2 \cdot i\right)\right) \cdot \left(\alpha + 2 \cdot i\right)}\right) \cdot \frac{1}{2} + 1 \cdot \frac{1}{2}} \]
      3. metadata-evalN/A

        \[\leadsto \left(-1 \cdot \frac{{\alpha}^{2}}{\left(2 + \left(\alpha + 2 \cdot i\right)\right) \cdot \left(\alpha + 2 \cdot i\right)}\right) \cdot \frac{1}{2} + \color{blue}{\frac{1}{2}} \]
      4. accelerator-lowering-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(-1 \cdot \frac{{\alpha}^{2}}{\left(2 + \left(\alpha + 2 \cdot i\right)\right) \cdot \left(\alpha + 2 \cdot i\right)}, \frac{1}{2}, \frac{1}{2}\right)} \]
    5. Simplified99.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\alpha \cdot \alpha}{\mathsf{fma}\left(2, i, \alpha\right) \cdot \left(-2 - \mathsf{fma}\left(2, i, \alpha\right)\right)}, 0.5, 0.5\right)} \]

    if 1e-51 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

    1. Initial program 47.3%

      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
    2. Add Preprocessing
    3. Taylor expanded in i around 0

      \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
    4. Step-by-step derivation
      1. associate--l+N/A

        \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
      2. div-subN/A

        \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
      3. distribute-lft-inN/A

        \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
      4. metadata-evalN/A

        \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
      5. +-lowering-+.f64N/A

        \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
      6. *-lowering-*.f64N/A

        \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
      7. /-lowering-/.f64N/A

        \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
      8. --lowering--.f64N/A

        \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
      9. +-lowering-+.f64N/A

        \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
      10. +-commutativeN/A

        \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
      11. +-lowering-+.f6496.7

        \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
    5. Simplified96.7%

      \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
    6. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} + \frac{1}{2}} \]
      2. *-commutativeN/A

        \[\leadsto \color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} \cdot \frac{1}{2}} + \frac{1}{2} \]
      3. accelerator-lowering-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right)} \]
      4. /-lowering-/.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
      5. --lowering--.f64N/A

        \[\leadsto \mathsf{fma}\left(\frac{\color{blue}{\beta - \alpha}}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right) \]
      6. +-lowering-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{\color{blue}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
      7. +-lowering-+.f6496.7

        \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}}, 0.5, 0.5\right) \]
    7. Applied egg-rr96.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, 0.5, 0.5\right)} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification97.7%

    \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq -0.5:\\ \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\ \mathbf{elif}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq 10^{-51}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\alpha \cdot \alpha}{\mathsf{fma}\left(2, i, \alpha\right) \cdot \left(-2 - \mathsf{fma}\left(2, i, \alpha\right)\right)}, 0.5, 0.5\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\ \end{array} \]
  5. Add Preprocessing

Alternative 3: 94.8% accurate, 0.5× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\ \mathbf{if}\;t\_1 \leq -0.5:\\ \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\ \mathbf{elif}\;t\_1 \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\ \end{array} \end{array} \]
(FPCore (alpha beta i)
 :precision binary64
 (let* ((t_0 (+ (+ alpha beta) (* 2.0 i)))
        (t_1 (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0))))
   (if (<= t_1 -0.5)
     (* -0.5 (/ (- (- -2.0 (fma 2.0 i beta)) (fma 2.0 i beta)) alpha))
     (if (<= t_1 1e-51)
       0.5
       (fma (/ (- beta alpha) (+ (+ alpha beta) 2.0)) 0.5 0.5)))))
double code(double alpha, double beta, double i) {
	double t_0 = (alpha + beta) + (2.0 * i);
	double t_1 = (((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0);
	double tmp;
	if (t_1 <= -0.5) {
		tmp = -0.5 * (((-2.0 - fma(2.0, i, beta)) - fma(2.0, i, beta)) / alpha);
	} else if (t_1 <= 1e-51) {
		tmp = 0.5;
	} else {
		tmp = fma(((beta - alpha) / ((alpha + beta) + 2.0)), 0.5, 0.5);
	}
	return tmp;
}
function code(alpha, beta, i)
	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
	t_1 = Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0))
	tmp = 0.0
	if (t_1 <= -0.5)
		tmp = Float64(-0.5 * Float64(Float64(Float64(-2.0 - fma(2.0, i, beta)) - fma(2.0, i, beta)) / alpha));
	elseif (t_1 <= 1e-51)
		tmp = 0.5;
	else
		tmp = fma(Float64(Float64(beta - alpha) / Float64(Float64(alpha + beta) + 2.0)), 0.5, 0.5);
	end
	return tmp
end
code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -0.5], N[(-0.5 * N[(N[(N[(-2.0 - N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision] - N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision] / alpha), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 1e-51], 0.5, N[(N[(N[(beta - alpha), $MachinePrecision] / N[(N[(alpha + beta), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision] * 0.5 + 0.5), $MachinePrecision]]]]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\
\mathbf{if}\;t\_1 \leq -0.5:\\
\;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\

\mathbf{elif}\;t\_1 \leq 10^{-51}:\\
\;\;\;\;0.5\\

\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < -0.5

    1. Initial program 3.3%

      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
    2. Add Preprocessing
    3. Taylor expanded in alpha around -inf

      \[\leadsto \color{blue}{\frac{-1}{2} \cdot \frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha}} \]
    4. Step-by-step derivation
      1. *-commutativeN/A

        \[\leadsto \color{blue}{\frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha} \cdot \frac{-1}{2}} \]
      2. *-lowering-*.f64N/A

        \[\leadsto \color{blue}{\frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha} \cdot \frac{-1}{2}} \]
    5. Simplified94.8%

      \[\leadsto \color{blue}{\frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha} \cdot -0.5} \]

    if -0.5 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < 1e-51

    1. Initial program 100.0%

      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
    2. Add Preprocessing
    3. Taylor expanded in i around inf

      \[\leadsto \color{blue}{\frac{1}{2}} \]
    4. Step-by-step derivation
      1. Simplified98.9%

        \[\leadsto \color{blue}{0.5} \]

      if 1e-51 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

      1. Initial program 47.3%

        \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
      2. Add Preprocessing
      3. Taylor expanded in i around 0

        \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
      4. Step-by-step derivation
        1. associate--l+N/A

          \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
        2. div-subN/A

          \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
        3. distribute-lft-inN/A

          \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
        4. metadata-evalN/A

          \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
        5. +-lowering-+.f64N/A

          \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
        6. *-lowering-*.f64N/A

          \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
        7. /-lowering-/.f64N/A

          \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
        8. --lowering--.f64N/A

          \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
        9. +-lowering-+.f64N/A

          \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
        10. +-commutativeN/A

          \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
        11. +-lowering-+.f6496.7

          \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
      5. Simplified96.7%

        \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
      6. Step-by-step derivation
        1. +-commutativeN/A

          \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} + \frac{1}{2}} \]
        2. *-commutativeN/A

          \[\leadsto \color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} \cdot \frac{1}{2}} + \frac{1}{2} \]
        3. accelerator-lowering-fma.f64N/A

          \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right)} \]
        4. /-lowering-/.f64N/A

          \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
        5. --lowering--.f64N/A

          \[\leadsto \mathsf{fma}\left(\frac{\color{blue}{\beta - \alpha}}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right) \]
        6. +-lowering-+.f64N/A

          \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{\color{blue}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
        7. +-lowering-+.f6496.7

          \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}}, 0.5, 0.5\right) \]
      7. Applied egg-rr96.7%

        \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, 0.5, 0.5\right)} \]
    5. Recombined 3 regimes into one program.
    6. Final simplification97.3%

      \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq -0.5:\\ \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\ \mathbf{elif}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\ \end{array} \]
    7. Add Preprocessing

    Alternative 4: 94.8% accurate, 0.5× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\ \mathbf{if}\;t\_1 \leq -0.5:\\ \;\;\;\;\frac{0.5 \cdot \left(2 + \mathsf{fma}\left(\beta, 2, i \cdot 4\right)\right)}{\alpha}\\ \mathbf{elif}\;t\_1 \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\ \end{array} \end{array} \]
    (FPCore (alpha beta i)
     :precision binary64
     (let* ((t_0 (+ (+ alpha beta) (* 2.0 i)))
            (t_1 (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0))))
       (if (<= t_1 -0.5)
         (/ (* 0.5 (+ 2.0 (fma beta 2.0 (* i 4.0)))) alpha)
         (if (<= t_1 1e-51)
           0.5
           (fma (/ (- beta alpha) (+ (+ alpha beta) 2.0)) 0.5 0.5)))))
    double code(double alpha, double beta, double i) {
    	double t_0 = (alpha + beta) + (2.0 * i);
    	double t_1 = (((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0);
    	double tmp;
    	if (t_1 <= -0.5) {
    		tmp = (0.5 * (2.0 + fma(beta, 2.0, (i * 4.0)))) / alpha;
    	} else if (t_1 <= 1e-51) {
    		tmp = 0.5;
    	} else {
    		tmp = fma(((beta - alpha) / ((alpha + beta) + 2.0)), 0.5, 0.5);
    	}
    	return tmp;
    }
    
    function code(alpha, beta, i)
    	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
    	t_1 = Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0))
    	tmp = 0.0
    	if (t_1 <= -0.5)
    		tmp = Float64(Float64(0.5 * Float64(2.0 + fma(beta, 2.0, Float64(i * 4.0)))) / alpha);
    	elseif (t_1 <= 1e-51)
    		tmp = 0.5;
    	else
    		tmp = fma(Float64(Float64(beta - alpha) / Float64(Float64(alpha + beta) + 2.0)), 0.5, 0.5);
    	end
    	return tmp
    end
    
    code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -0.5], N[(N[(0.5 * N[(2.0 + N[(beta * 2.0 + N[(i * 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / alpha), $MachinePrecision], If[LessEqual[t$95$1, 1e-51], 0.5, N[(N[(N[(beta - alpha), $MachinePrecision] / N[(N[(alpha + beta), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision] * 0.5 + 0.5), $MachinePrecision]]]]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
    t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\
    \mathbf{if}\;t\_1 \leq -0.5:\\
    \;\;\;\;\frac{0.5 \cdot \left(2 + \mathsf{fma}\left(\beta, 2, i \cdot 4\right)\right)}{\alpha}\\
    
    \mathbf{elif}\;t\_1 \leq 10^{-51}:\\
    \;\;\;\;0.5\\
    
    \mathbf{else}:\\
    \;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 3 regimes
    2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < -0.5

      1. Initial program 3.3%

        \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
      2. Add Preprocessing
      3. Taylor expanded in alpha around inf

        \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right)}{\alpha}} \]
      4. Step-by-step derivation
        1. associate-*r/N/A

          \[\leadsto \color{blue}{\frac{\frac{1}{2} \cdot \left(\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right)\right)}{\alpha}} \]
        2. /-lowering-/.f64N/A

          \[\leadsto \color{blue}{\frac{\frac{1}{2} \cdot \left(\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right)\right)}{\alpha}} \]
        3. *-commutativeN/A

          \[\leadsto \frac{\color{blue}{\left(\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right)\right) \cdot \frac{1}{2}}}{\alpha} \]
        4. distribute-rgt1-inN/A

          \[\leadsto \frac{\left(\color{blue}{\left(-1 + 1\right) \cdot \beta} - -1 \cdot \left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right)\right) \cdot \frac{1}{2}}{\alpha} \]
        5. metadata-evalN/A

          \[\leadsto \frac{\left(\color{blue}{0} \cdot \beta - -1 \cdot \left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right)\right) \cdot \frac{1}{2}}{\alpha} \]
        6. mul0-lftN/A

          \[\leadsto \frac{\left(\color{blue}{0} - -1 \cdot \left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right)\right) \cdot \frac{1}{2}}{\alpha} \]
        7. neg-sub0N/A

          \[\leadsto \frac{\color{blue}{\left(\mathsf{neg}\left(-1 \cdot \left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right)\right)\right)} \cdot \frac{1}{2}}{\alpha} \]
        8. mul-1-negN/A

          \[\leadsto \frac{\left(\mathsf{neg}\left(\color{blue}{\left(\mathsf{neg}\left(\left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right)\right)\right)}\right)\right) \cdot \frac{1}{2}}{\alpha} \]
        9. remove-double-negN/A

          \[\leadsto \frac{\color{blue}{\left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right)} \cdot \frac{1}{2}}{\alpha} \]
        10. *-lowering-*.f64N/A

          \[\leadsto \frac{\color{blue}{\left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right) \cdot \frac{1}{2}}}{\alpha} \]
        11. +-lowering-+.f64N/A

          \[\leadsto \frac{\color{blue}{\left(2 + \left(2 \cdot \beta + 4 \cdot i\right)\right)} \cdot \frac{1}{2}}{\alpha} \]
        12. *-commutativeN/A

          \[\leadsto \frac{\left(2 + \left(\color{blue}{\beta \cdot 2} + 4 \cdot i\right)\right) \cdot \frac{1}{2}}{\alpha} \]
        13. accelerator-lowering-fma.f64N/A

          \[\leadsto \frac{\left(2 + \color{blue}{\mathsf{fma}\left(\beta, 2, 4 \cdot i\right)}\right) \cdot \frac{1}{2}}{\alpha} \]
        14. *-commutativeN/A

          \[\leadsto \frac{\left(2 + \mathsf{fma}\left(\beta, 2, \color{blue}{i \cdot 4}\right)\right) \cdot \frac{1}{2}}{\alpha} \]
        15. *-lowering-*.f6494.8

          \[\leadsto \frac{\left(2 + \mathsf{fma}\left(\beta, 2, \color{blue}{i \cdot 4}\right)\right) \cdot 0.5}{\alpha} \]
      5. Simplified94.8%

        \[\leadsto \color{blue}{\frac{\left(2 + \mathsf{fma}\left(\beta, 2, i \cdot 4\right)\right) \cdot 0.5}{\alpha}} \]

      if -0.5 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < 1e-51

      1. Initial program 100.0%

        \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
      2. Add Preprocessing
      3. Taylor expanded in i around inf

        \[\leadsto \color{blue}{\frac{1}{2}} \]
      4. Step-by-step derivation
        1. Simplified98.9%

          \[\leadsto \color{blue}{0.5} \]

        if 1e-51 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

        1. Initial program 47.3%

          \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
        2. Add Preprocessing
        3. Taylor expanded in i around 0

          \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
        4. Step-by-step derivation
          1. associate--l+N/A

            \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
          2. div-subN/A

            \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
          3. distribute-lft-inN/A

            \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
          4. metadata-evalN/A

            \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
          5. +-lowering-+.f64N/A

            \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
          6. *-lowering-*.f64N/A

            \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
          7. /-lowering-/.f64N/A

            \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
          8. --lowering--.f64N/A

            \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
          9. +-lowering-+.f64N/A

            \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
          10. +-commutativeN/A

            \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
          11. +-lowering-+.f6496.7

            \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
        5. Simplified96.7%

          \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
        6. Step-by-step derivation
          1. +-commutativeN/A

            \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} + \frac{1}{2}} \]
          2. *-commutativeN/A

            \[\leadsto \color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} \cdot \frac{1}{2}} + \frac{1}{2} \]
          3. accelerator-lowering-fma.f64N/A

            \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right)} \]
          4. /-lowering-/.f64N/A

            \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
          5. --lowering--.f64N/A

            \[\leadsto \mathsf{fma}\left(\frac{\color{blue}{\beta - \alpha}}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right) \]
          6. +-lowering-+.f64N/A

            \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{\color{blue}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
          7. +-lowering-+.f6496.7

            \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}}, 0.5, 0.5\right) \]
        7. Applied egg-rr96.7%

          \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, 0.5, 0.5\right)} \]
      5. Recombined 3 regimes into one program.
      6. Final simplification97.3%

        \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq -0.5:\\ \;\;\;\;\frac{0.5 \cdot \left(2 + \mathsf{fma}\left(\beta, 2, i \cdot 4\right)\right)}{\alpha}\\ \mathbf{elif}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\ \end{array} \]
      7. Add Preprocessing

      Alternative 5: 89.0% accurate, 0.5× speedup?

      \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\ \mathbf{if}\;t\_1 \leq -0.999999999998:\\ \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\ \mathbf{elif}\;t\_1 \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\ \end{array} \end{array} \]
      (FPCore (alpha beta i)
       :precision binary64
       (let* ((t_0 (+ (+ alpha beta) (* 2.0 i)))
              (t_1 (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0))))
         (if (<= t_1 -0.999999999998)
           (/ (* -0.5 (- (- -2.0 beta) beta)) alpha)
           (if (<= t_1 1e-51)
             0.5
             (fma (/ (- beta alpha) (+ (+ alpha beta) 2.0)) 0.5 0.5)))))
      double code(double alpha, double beta, double i) {
      	double t_0 = (alpha + beta) + (2.0 * i);
      	double t_1 = (((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0);
      	double tmp;
      	if (t_1 <= -0.999999999998) {
      		tmp = (-0.5 * ((-2.0 - beta) - beta)) / alpha;
      	} else if (t_1 <= 1e-51) {
      		tmp = 0.5;
      	} else {
      		tmp = fma(((beta - alpha) / ((alpha + beta) + 2.0)), 0.5, 0.5);
      	}
      	return tmp;
      }
      
      function code(alpha, beta, i)
      	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
      	t_1 = Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0))
      	tmp = 0.0
      	if (t_1 <= -0.999999999998)
      		tmp = Float64(Float64(-0.5 * Float64(Float64(-2.0 - beta) - beta)) / alpha);
      	elseif (t_1 <= 1e-51)
      		tmp = 0.5;
      	else
      		tmp = fma(Float64(Float64(beta - alpha) / Float64(Float64(alpha + beta) + 2.0)), 0.5, 0.5);
      	end
      	return tmp
      end
      
      code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -0.999999999998], N[(N[(-0.5 * N[(N[(-2.0 - beta), $MachinePrecision] - beta), $MachinePrecision]), $MachinePrecision] / alpha), $MachinePrecision], If[LessEqual[t$95$1, 1e-51], 0.5, N[(N[(N[(beta - alpha), $MachinePrecision] / N[(N[(alpha + beta), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision] * 0.5 + 0.5), $MachinePrecision]]]]]
      
      \begin{array}{l}
      
      \\
      \begin{array}{l}
      t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
      t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\
      \mathbf{if}\;t\_1 \leq -0.999999999998:\\
      \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\
      
      \mathbf{elif}\;t\_1 \leq 10^{-51}:\\
      \;\;\;\;0.5\\
      
      \mathbf{else}:\\
      \;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 3 regimes
      2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < -0.99999999999800004

        1. Initial program 2.7%

          \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
        2. Add Preprocessing
        3. Taylor expanded in i around 0

          \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
        4. Step-by-step derivation
          1. associate--l+N/A

            \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
          2. div-subN/A

            \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
          3. distribute-lft-inN/A

            \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
          4. metadata-evalN/A

            \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
          5. +-lowering-+.f64N/A

            \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
          6. *-lowering-*.f64N/A

            \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
          7. /-lowering-/.f64N/A

            \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
          8. --lowering--.f64N/A

            \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
          9. +-lowering-+.f64N/A

            \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
          10. +-commutativeN/A

            \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
          11. +-lowering-+.f645.5

            \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
        5. Simplified5.5%

          \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
        6. Taylor expanded in alpha around -inf

          \[\leadsto \color{blue}{\frac{-1}{2} \cdot \frac{-1 \cdot \beta - \left(2 + \beta\right)}{\alpha}} \]
        7. Step-by-step derivation
          1. associate-*r/N/A

            \[\leadsto \color{blue}{\frac{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}{\alpha}} \]
          2. /-lowering-/.f64N/A

            \[\leadsto \color{blue}{\frac{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}{\alpha}} \]
          3. *-lowering-*.f64N/A

            \[\leadsto \frac{\color{blue}{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}}{\alpha} \]
          4. associate--r+N/A

            \[\leadsto \frac{\frac{-1}{2} \cdot \color{blue}{\left(\left(-1 \cdot \beta - 2\right) - \beta\right)}}{\alpha} \]
          5. sub-negN/A

            \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-1 \cdot \beta + \left(\mathsf{neg}\left(2\right)\right)\right)} - \beta\right)}{\alpha} \]
          6. mul-1-negN/A

            \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\color{blue}{\left(\mathsf{neg}\left(\beta\right)\right)} + \left(\mathsf{neg}\left(2\right)\right)\right) - \beta\right)}{\alpha} \]
          7. distribute-neg-inN/A

            \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(\mathsf{neg}\left(\left(\beta + 2\right)\right)\right)} - \beta\right)}{\alpha} \]
          8. +-commutativeN/A

            \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\mathsf{neg}\left(\color{blue}{\left(2 + \beta\right)}\right)\right) - \beta\right)}{\alpha} \]
          9. mul-1-negN/A

            \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{-1 \cdot \left(2 + \beta\right)} - \beta\right)}{\alpha} \]
          10. --lowering--.f64N/A

            \[\leadsto \frac{\frac{-1}{2} \cdot \color{blue}{\left(-1 \cdot \left(2 + \beta\right) - \beta\right)}}{\alpha} \]
          11. distribute-lft-inN/A

            \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-1 \cdot 2 + -1 \cdot \beta\right)} - \beta\right)}{\alpha} \]
          12. metadata-evalN/A

            \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\color{blue}{-2} + -1 \cdot \beta\right) - \beta\right)}{\alpha} \]
          13. mul-1-negN/A

            \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(-2 + \color{blue}{\left(\mathsf{neg}\left(\beta\right)\right)}\right) - \beta\right)}{\alpha} \]
          14. unsub-negN/A

            \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-2 - \beta\right)} - \beta\right)}{\alpha} \]
          15. --lowering--.f6470.4

            \[\leadsto \frac{-0.5 \cdot \left(\color{blue}{\left(-2 - \beta\right)} - \beta\right)}{\alpha} \]
        8. Simplified70.4%

          \[\leadsto \color{blue}{\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}} \]

        if -0.99999999999800004 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < 1e-51

        1. Initial program 99.5%

          \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
        2. Add Preprocessing
        3. Taylor expanded in i around inf

          \[\leadsto \color{blue}{\frac{1}{2}} \]
        4. Step-by-step derivation
          1. Simplified98.2%

            \[\leadsto \color{blue}{0.5} \]

          if 1e-51 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

          1. Initial program 47.3%

            \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
          2. Add Preprocessing
          3. Taylor expanded in i around 0

            \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
          4. Step-by-step derivation
            1. associate--l+N/A

              \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
            2. div-subN/A

              \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
            3. distribute-lft-inN/A

              \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
            4. metadata-evalN/A

              \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
            5. +-lowering-+.f64N/A

              \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
            6. *-lowering-*.f64N/A

              \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
            7. /-lowering-/.f64N/A

              \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
            8. --lowering--.f64N/A

              \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
            9. +-lowering-+.f64N/A

              \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
            10. +-commutativeN/A

              \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
            11. +-lowering-+.f6496.7

              \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
          5. Simplified96.7%

            \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
          6. Step-by-step derivation
            1. +-commutativeN/A

              \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} + \frac{1}{2}} \]
            2. *-commutativeN/A

              \[\leadsto \color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} \cdot \frac{1}{2}} + \frac{1}{2} \]
            3. accelerator-lowering-fma.f64N/A

              \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right)} \]
            4. /-lowering-/.f64N/A

              \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
            5. --lowering--.f64N/A

              \[\leadsto \mathsf{fma}\left(\frac{\color{blue}{\beta - \alpha}}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right) \]
            6. +-lowering-+.f64N/A

              \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{\color{blue}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
            7. +-lowering-+.f6496.7

              \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}}, 0.5, 0.5\right) \]
          7. Applied egg-rr96.7%

            \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, 0.5, 0.5\right)} \]
        5. Recombined 3 regimes into one program.
        6. Final simplification91.3%

          \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq -0.999999999998:\\ \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\ \mathbf{elif}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}, 0.5, 0.5\right)\\ \end{array} \]
        7. Add Preprocessing

        Alternative 6: 89.0% accurate, 0.5× speedup?

        \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\ \mathbf{if}\;t\_1 \leq -0.999999999998:\\ \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\ \mathbf{elif}\;t\_1 \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\beta - \alpha, \frac{0.5}{\beta + \left(\alpha + 2\right)}, 0.5\right)\\ \end{array} \end{array} \]
        (FPCore (alpha beta i)
         :precision binary64
         (let* ((t_0 (+ (+ alpha beta) (* 2.0 i)))
                (t_1 (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0))))
           (if (<= t_1 -0.999999999998)
             (/ (* -0.5 (- (- -2.0 beta) beta)) alpha)
             (if (<= t_1 1e-51)
               0.5
               (fma (- beta alpha) (/ 0.5 (+ beta (+ alpha 2.0))) 0.5)))))
        double code(double alpha, double beta, double i) {
        	double t_0 = (alpha + beta) + (2.0 * i);
        	double t_1 = (((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0);
        	double tmp;
        	if (t_1 <= -0.999999999998) {
        		tmp = (-0.5 * ((-2.0 - beta) - beta)) / alpha;
        	} else if (t_1 <= 1e-51) {
        		tmp = 0.5;
        	} else {
        		tmp = fma((beta - alpha), (0.5 / (beta + (alpha + 2.0))), 0.5);
        	}
        	return tmp;
        }
        
        function code(alpha, beta, i)
        	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
        	t_1 = Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0))
        	tmp = 0.0
        	if (t_1 <= -0.999999999998)
        		tmp = Float64(Float64(-0.5 * Float64(Float64(-2.0 - beta) - beta)) / alpha);
        	elseif (t_1 <= 1e-51)
        		tmp = 0.5;
        	else
        		tmp = fma(Float64(beta - alpha), Float64(0.5 / Float64(beta + Float64(alpha + 2.0))), 0.5);
        	end
        	return tmp
        end
        
        code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -0.999999999998], N[(N[(-0.5 * N[(N[(-2.0 - beta), $MachinePrecision] - beta), $MachinePrecision]), $MachinePrecision] / alpha), $MachinePrecision], If[LessEqual[t$95$1, 1e-51], 0.5, N[(N[(beta - alpha), $MachinePrecision] * N[(0.5 / N[(beta + N[(alpha + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 0.5), $MachinePrecision]]]]]
        
        \begin{array}{l}
        
        \\
        \begin{array}{l}
        t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
        t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\
        \mathbf{if}\;t\_1 \leq -0.999999999998:\\
        \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\
        
        \mathbf{elif}\;t\_1 \leq 10^{-51}:\\
        \;\;\;\;0.5\\
        
        \mathbf{else}:\\
        \;\;\;\;\mathsf{fma}\left(\beta - \alpha, \frac{0.5}{\beta + \left(\alpha + 2\right)}, 0.5\right)\\
        
        
        \end{array}
        \end{array}
        
        Derivation
        1. Split input into 3 regimes
        2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < -0.99999999999800004

          1. Initial program 2.7%

            \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
          2. Add Preprocessing
          3. Taylor expanded in i around 0

            \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
          4. Step-by-step derivation
            1. associate--l+N/A

              \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
            2. div-subN/A

              \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
            3. distribute-lft-inN/A

              \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
            4. metadata-evalN/A

              \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
            5. +-lowering-+.f64N/A

              \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
            6. *-lowering-*.f64N/A

              \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
            7. /-lowering-/.f64N/A

              \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
            8. --lowering--.f64N/A

              \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
            9. +-lowering-+.f64N/A

              \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
            10. +-commutativeN/A

              \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
            11. +-lowering-+.f645.5

              \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
          5. Simplified5.5%

            \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
          6. Taylor expanded in alpha around -inf

            \[\leadsto \color{blue}{\frac{-1}{2} \cdot \frac{-1 \cdot \beta - \left(2 + \beta\right)}{\alpha}} \]
          7. Step-by-step derivation
            1. associate-*r/N/A

              \[\leadsto \color{blue}{\frac{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}{\alpha}} \]
            2. /-lowering-/.f64N/A

              \[\leadsto \color{blue}{\frac{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}{\alpha}} \]
            3. *-lowering-*.f64N/A

              \[\leadsto \frac{\color{blue}{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}}{\alpha} \]
            4. associate--r+N/A

              \[\leadsto \frac{\frac{-1}{2} \cdot \color{blue}{\left(\left(-1 \cdot \beta - 2\right) - \beta\right)}}{\alpha} \]
            5. sub-negN/A

              \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-1 \cdot \beta + \left(\mathsf{neg}\left(2\right)\right)\right)} - \beta\right)}{\alpha} \]
            6. mul-1-negN/A

              \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\color{blue}{\left(\mathsf{neg}\left(\beta\right)\right)} + \left(\mathsf{neg}\left(2\right)\right)\right) - \beta\right)}{\alpha} \]
            7. distribute-neg-inN/A

              \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(\mathsf{neg}\left(\left(\beta + 2\right)\right)\right)} - \beta\right)}{\alpha} \]
            8. +-commutativeN/A

              \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\mathsf{neg}\left(\color{blue}{\left(2 + \beta\right)}\right)\right) - \beta\right)}{\alpha} \]
            9. mul-1-negN/A

              \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{-1 \cdot \left(2 + \beta\right)} - \beta\right)}{\alpha} \]
            10. --lowering--.f64N/A

              \[\leadsto \frac{\frac{-1}{2} \cdot \color{blue}{\left(-1 \cdot \left(2 + \beta\right) - \beta\right)}}{\alpha} \]
            11. distribute-lft-inN/A

              \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-1 \cdot 2 + -1 \cdot \beta\right)} - \beta\right)}{\alpha} \]
            12. metadata-evalN/A

              \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\color{blue}{-2} + -1 \cdot \beta\right) - \beta\right)}{\alpha} \]
            13. mul-1-negN/A

              \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(-2 + \color{blue}{\left(\mathsf{neg}\left(\beta\right)\right)}\right) - \beta\right)}{\alpha} \]
            14. unsub-negN/A

              \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-2 - \beta\right)} - \beta\right)}{\alpha} \]
            15. --lowering--.f6470.4

              \[\leadsto \frac{-0.5 \cdot \left(\color{blue}{\left(-2 - \beta\right)} - \beta\right)}{\alpha} \]
          8. Simplified70.4%

            \[\leadsto \color{blue}{\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}} \]

          if -0.99999999999800004 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < 1e-51

          1. Initial program 99.5%

            \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
          2. Add Preprocessing
          3. Taylor expanded in i around inf

            \[\leadsto \color{blue}{\frac{1}{2}} \]
          4. Step-by-step derivation
            1. Simplified98.2%

              \[\leadsto \color{blue}{0.5} \]

            if 1e-51 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

            1. Initial program 47.3%

              \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
            2. Add Preprocessing
            3. Taylor expanded in i around 0

              \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
            4. Step-by-step derivation
              1. associate--l+N/A

                \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
              2. div-subN/A

                \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
              3. distribute-lft-inN/A

                \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
              4. metadata-evalN/A

                \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
              5. +-lowering-+.f64N/A

                \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
              6. *-lowering-*.f64N/A

                \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
              7. /-lowering-/.f64N/A

                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
              8. --lowering--.f64N/A

                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
              9. +-lowering-+.f64N/A

                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
              10. +-commutativeN/A

                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
              11. +-lowering-+.f6496.7

                \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
            5. Simplified96.7%

              \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
            6. Step-by-step derivation
              1. +-commutativeN/A

                \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} + \frac{1}{2}} \]
              2. *-commutativeN/A

                \[\leadsto \color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} \cdot \frac{1}{2}} + \frac{1}{2} \]
              3. accelerator-lowering-fma.f64N/A

                \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right)} \]
              4. /-lowering-/.f64N/A

                \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
              5. --lowering--.f64N/A

                \[\leadsto \mathsf{fma}\left(\frac{\color{blue}{\beta - \alpha}}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right) \]
              6. +-lowering-+.f64N/A

                \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{\color{blue}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
              7. +-lowering-+.f6496.7

                \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}}, 0.5, 0.5\right) \]
            7. Applied egg-rr96.7%

              \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, 0.5, 0.5\right)} \]
            8. Step-by-step derivation
              1. associate-*l/N/A

                \[\leadsto \color{blue}{\frac{\left(\beta - \alpha\right) \cdot \frac{1}{2}}{2 + \left(\beta + \alpha\right)}} + \frac{1}{2} \]
              2. associate-/l*N/A

                \[\leadsto \color{blue}{\left(\beta - \alpha\right) \cdot \frac{\frac{1}{2}}{2 + \left(\beta + \alpha\right)}} + \frac{1}{2} \]
              3. accelerator-lowering-fma.f64N/A

                \[\leadsto \color{blue}{\mathsf{fma}\left(\beta - \alpha, \frac{\frac{1}{2}}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}\right)} \]
              4. --lowering--.f64N/A

                \[\leadsto \mathsf{fma}\left(\color{blue}{\beta - \alpha}, \frac{\frac{1}{2}}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}\right) \]
              5. /-lowering-/.f64N/A

                \[\leadsto \mathsf{fma}\left(\beta - \alpha, \color{blue}{\frac{\frac{1}{2}}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}\right) \]
              6. +-commutativeN/A

                \[\leadsto \mathsf{fma}\left(\beta - \alpha, \frac{\frac{1}{2}}{\color{blue}{\left(\beta + \alpha\right) + 2}}, \frac{1}{2}\right) \]
              7. associate-+l+N/A

                \[\leadsto \mathsf{fma}\left(\beta - \alpha, \frac{\frac{1}{2}}{\color{blue}{\beta + \left(\alpha + 2\right)}}, \frac{1}{2}\right) \]
              8. +-lowering-+.f64N/A

                \[\leadsto \mathsf{fma}\left(\beta - \alpha, \frac{\frac{1}{2}}{\color{blue}{\beta + \left(\alpha + 2\right)}}, \frac{1}{2}\right) \]
              9. +-lowering-+.f6496.6

                \[\leadsto \mathsf{fma}\left(\beta - \alpha, \frac{0.5}{\beta + \color{blue}{\left(\alpha + 2\right)}}, 0.5\right) \]
            9. Applied egg-rr96.6%

              \[\leadsto \color{blue}{\mathsf{fma}\left(\beta - \alpha, \frac{0.5}{\beta + \left(\alpha + 2\right)}, 0.5\right)} \]
          5. Recombined 3 regimes into one program.
          6. Final simplification91.3%

            \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq -0.999999999998:\\ \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\ \mathbf{elif}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\beta - \alpha, \frac{0.5}{\beta + \left(\alpha + 2\right)}, 0.5\right)\\ \end{array} \]
          7. Add Preprocessing

          Alternative 7: 88.5% accurate, 0.5× speedup?

          \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\ \mathbf{if}\;t\_1 \leq -0.999999999998:\\ \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\ \mathbf{elif}\;t\_1 \leq 10^{-5}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\beta - \alpha, \frac{0.5}{\alpha + \beta}, 0.5\right)\\ \end{array} \end{array} \]
          (FPCore (alpha beta i)
           :precision binary64
           (let* ((t_0 (+ (+ alpha beta) (* 2.0 i)))
                  (t_1 (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0))))
             (if (<= t_1 -0.999999999998)
               (/ (* -0.5 (- (- -2.0 beta) beta)) alpha)
               (if (<= t_1 1e-5) 0.5 (fma (- beta alpha) (/ 0.5 (+ alpha beta)) 0.5)))))
          double code(double alpha, double beta, double i) {
          	double t_0 = (alpha + beta) + (2.0 * i);
          	double t_1 = (((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0);
          	double tmp;
          	if (t_1 <= -0.999999999998) {
          		tmp = (-0.5 * ((-2.0 - beta) - beta)) / alpha;
          	} else if (t_1 <= 1e-5) {
          		tmp = 0.5;
          	} else {
          		tmp = fma((beta - alpha), (0.5 / (alpha + beta)), 0.5);
          	}
          	return tmp;
          }
          
          function code(alpha, beta, i)
          	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
          	t_1 = Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0))
          	tmp = 0.0
          	if (t_1 <= -0.999999999998)
          		tmp = Float64(Float64(-0.5 * Float64(Float64(-2.0 - beta) - beta)) / alpha);
          	elseif (t_1 <= 1e-5)
          		tmp = 0.5;
          	else
          		tmp = fma(Float64(beta - alpha), Float64(0.5 / Float64(alpha + beta)), 0.5);
          	end
          	return tmp
          end
          
          code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -0.999999999998], N[(N[(-0.5 * N[(N[(-2.0 - beta), $MachinePrecision] - beta), $MachinePrecision]), $MachinePrecision] / alpha), $MachinePrecision], If[LessEqual[t$95$1, 1e-5], 0.5, N[(N[(beta - alpha), $MachinePrecision] * N[(0.5 / N[(alpha + beta), $MachinePrecision]), $MachinePrecision] + 0.5), $MachinePrecision]]]]]
          
          \begin{array}{l}
          
          \\
          \begin{array}{l}
          t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
          t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\
          \mathbf{if}\;t\_1 \leq -0.999999999998:\\
          \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\
          
          \mathbf{elif}\;t\_1 \leq 10^{-5}:\\
          \;\;\;\;0.5\\
          
          \mathbf{else}:\\
          \;\;\;\;\mathsf{fma}\left(\beta - \alpha, \frac{0.5}{\alpha + \beta}, 0.5\right)\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 3 regimes
          2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < -0.99999999999800004

            1. Initial program 2.7%

              \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
            2. Add Preprocessing
            3. Taylor expanded in i around 0

              \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
            4. Step-by-step derivation
              1. associate--l+N/A

                \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
              2. div-subN/A

                \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
              3. distribute-lft-inN/A

                \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
              4. metadata-evalN/A

                \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
              5. +-lowering-+.f64N/A

                \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
              6. *-lowering-*.f64N/A

                \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
              7. /-lowering-/.f64N/A

                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
              8. --lowering--.f64N/A

                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
              9. +-lowering-+.f64N/A

                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
              10. +-commutativeN/A

                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
              11. +-lowering-+.f645.5

                \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
            5. Simplified5.5%

              \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
            6. Taylor expanded in alpha around -inf

              \[\leadsto \color{blue}{\frac{-1}{2} \cdot \frac{-1 \cdot \beta - \left(2 + \beta\right)}{\alpha}} \]
            7. Step-by-step derivation
              1. associate-*r/N/A

                \[\leadsto \color{blue}{\frac{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}{\alpha}} \]
              2. /-lowering-/.f64N/A

                \[\leadsto \color{blue}{\frac{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}{\alpha}} \]
              3. *-lowering-*.f64N/A

                \[\leadsto \frac{\color{blue}{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}}{\alpha} \]
              4. associate--r+N/A

                \[\leadsto \frac{\frac{-1}{2} \cdot \color{blue}{\left(\left(-1 \cdot \beta - 2\right) - \beta\right)}}{\alpha} \]
              5. sub-negN/A

                \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-1 \cdot \beta + \left(\mathsf{neg}\left(2\right)\right)\right)} - \beta\right)}{\alpha} \]
              6. mul-1-negN/A

                \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\color{blue}{\left(\mathsf{neg}\left(\beta\right)\right)} + \left(\mathsf{neg}\left(2\right)\right)\right) - \beta\right)}{\alpha} \]
              7. distribute-neg-inN/A

                \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(\mathsf{neg}\left(\left(\beta + 2\right)\right)\right)} - \beta\right)}{\alpha} \]
              8. +-commutativeN/A

                \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\mathsf{neg}\left(\color{blue}{\left(2 + \beta\right)}\right)\right) - \beta\right)}{\alpha} \]
              9. mul-1-negN/A

                \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{-1 \cdot \left(2 + \beta\right)} - \beta\right)}{\alpha} \]
              10. --lowering--.f64N/A

                \[\leadsto \frac{\frac{-1}{2} \cdot \color{blue}{\left(-1 \cdot \left(2 + \beta\right) - \beta\right)}}{\alpha} \]
              11. distribute-lft-inN/A

                \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-1 \cdot 2 + -1 \cdot \beta\right)} - \beta\right)}{\alpha} \]
              12. metadata-evalN/A

                \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\color{blue}{-2} + -1 \cdot \beta\right) - \beta\right)}{\alpha} \]
              13. mul-1-negN/A

                \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(-2 + \color{blue}{\left(\mathsf{neg}\left(\beta\right)\right)}\right) - \beta\right)}{\alpha} \]
              14. unsub-negN/A

                \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-2 - \beta\right)} - \beta\right)}{\alpha} \]
              15. --lowering--.f6470.4

                \[\leadsto \frac{-0.5 \cdot \left(\color{blue}{\left(-2 - \beta\right)} - \beta\right)}{\alpha} \]
            8. Simplified70.4%

              \[\leadsto \color{blue}{\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}} \]

            if -0.99999999999800004 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < 1.00000000000000008e-5

            1. Initial program 99.6%

              \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
            2. Add Preprocessing
            3. Taylor expanded in i around inf

              \[\leadsto \color{blue}{\frac{1}{2}} \]
            4. Step-by-step derivation
              1. Simplified97.6%

                \[\leadsto \color{blue}{0.5} \]

              if 1.00000000000000008e-5 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

              1. Initial program 38.2%

                \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
              2. Add Preprocessing
              3. Taylor expanded in i around 0

                \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
              4. Step-by-step derivation
                1. associate--l+N/A

                  \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
                2. div-subN/A

                  \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
                3. distribute-lft-inN/A

                  \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                4. metadata-evalN/A

                  \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
                5. +-lowering-+.f64N/A

                  \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                6. *-lowering-*.f64N/A

                  \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                7. /-lowering-/.f64N/A

                  \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                8. --lowering--.f64N/A

                  \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
                9. +-lowering-+.f64N/A

                  \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
                10. +-commutativeN/A

                  \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
                11. +-lowering-+.f6496.1

                  \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
              5. Simplified96.1%

                \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
              6. Step-by-step derivation
                1. +-commutativeN/A

                  \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} + \frac{1}{2}} \]
                2. *-commutativeN/A

                  \[\leadsto \color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)} \cdot \frac{1}{2}} + \frac{1}{2} \]
                3. accelerator-lowering-fma.f64N/A

                  \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right)} \]
                4. /-lowering-/.f64N/A

                  \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
                5. --lowering--.f64N/A

                  \[\leadsto \mathsf{fma}\left(\frac{\color{blue}{\beta - \alpha}}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}, \frac{1}{2}\right) \]
                6. +-lowering-+.f64N/A

                  \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{\color{blue}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}, \frac{1}{2}\right) \]
                7. +-lowering-+.f6496.1

                  \[\leadsto \mathsf{fma}\left(\frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}}, 0.5, 0.5\right) \]
              7. Applied egg-rr96.1%

                \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}, 0.5, 0.5\right)} \]
              8. Step-by-step derivation
                1. associate-*l/N/A

                  \[\leadsto \color{blue}{\frac{\left(\beta - \alpha\right) \cdot \frac{1}{2}}{2 + \left(\beta + \alpha\right)}} + \frac{1}{2} \]
                2. associate-/l*N/A

                  \[\leadsto \color{blue}{\left(\beta - \alpha\right) \cdot \frac{\frac{1}{2}}{2 + \left(\beta + \alpha\right)}} + \frac{1}{2} \]
                3. accelerator-lowering-fma.f64N/A

                  \[\leadsto \color{blue}{\mathsf{fma}\left(\beta - \alpha, \frac{\frac{1}{2}}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}\right)} \]
                4. --lowering--.f64N/A

                  \[\leadsto \mathsf{fma}\left(\color{blue}{\beta - \alpha}, \frac{\frac{1}{2}}{2 + \left(\beta + \alpha\right)}, \frac{1}{2}\right) \]
                5. /-lowering-/.f64N/A

                  \[\leadsto \mathsf{fma}\left(\beta - \alpha, \color{blue}{\frac{\frac{1}{2}}{2 + \left(\beta + \alpha\right)}}, \frac{1}{2}\right) \]
                6. +-commutativeN/A

                  \[\leadsto \mathsf{fma}\left(\beta - \alpha, \frac{\frac{1}{2}}{\color{blue}{\left(\beta + \alpha\right) + 2}}, \frac{1}{2}\right) \]
                7. associate-+l+N/A

                  \[\leadsto \mathsf{fma}\left(\beta - \alpha, \frac{\frac{1}{2}}{\color{blue}{\beta + \left(\alpha + 2\right)}}, \frac{1}{2}\right) \]
                8. +-lowering-+.f64N/A

                  \[\leadsto \mathsf{fma}\left(\beta - \alpha, \frac{\frac{1}{2}}{\color{blue}{\beta + \left(\alpha + 2\right)}}, \frac{1}{2}\right) \]
                9. +-lowering-+.f6496.1

                  \[\leadsto \mathsf{fma}\left(\beta - \alpha, \frac{0.5}{\beta + \color{blue}{\left(\alpha + 2\right)}}, 0.5\right) \]
              9. Applied egg-rr96.1%

                \[\leadsto \color{blue}{\mathsf{fma}\left(\beta - \alpha, \frac{0.5}{\beta + \left(\alpha + 2\right)}, 0.5\right)} \]
              10. Taylor expanded in alpha around inf

                \[\leadsto \mathsf{fma}\left(\beta - \alpha, \frac{\frac{1}{2}}{\beta + \color{blue}{\alpha}}, \frac{1}{2}\right) \]
              11. Step-by-step derivation
                1. Simplified95.5%

                  \[\leadsto \mathsf{fma}\left(\beta - \alpha, \frac{0.5}{\beta + \color{blue}{\alpha}}, 0.5\right) \]
              12. Recombined 3 regimes into one program.
              13. Final simplification90.8%

                \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq -0.999999999998:\\ \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\ \mathbf{elif}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq 10^{-5}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\beta - \alpha, \frac{0.5}{\alpha + \beta}, 0.5\right)\\ \end{array} \]
              14. Add Preprocessing

              Alternative 8: 88.6% accurate, 0.5× speedup?

              \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\ \mathbf{if}\;t\_1 \leq -0.999999999998:\\ \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\ \mathbf{elif}\;t\_1 \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(0.5, \frac{\beta}{\beta + 2}, 0.5\right)\\ \end{array} \end{array} \]
              (FPCore (alpha beta i)
               :precision binary64
               (let* ((t_0 (+ (+ alpha beta) (* 2.0 i)))
                      (t_1 (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0))))
                 (if (<= t_1 -0.999999999998)
                   (/ (* -0.5 (- (- -2.0 beta) beta)) alpha)
                   (if (<= t_1 1e-51) 0.5 (fma 0.5 (/ beta (+ beta 2.0)) 0.5)))))
              double code(double alpha, double beta, double i) {
              	double t_0 = (alpha + beta) + (2.0 * i);
              	double t_1 = (((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0);
              	double tmp;
              	if (t_1 <= -0.999999999998) {
              		tmp = (-0.5 * ((-2.0 - beta) - beta)) / alpha;
              	} else if (t_1 <= 1e-51) {
              		tmp = 0.5;
              	} else {
              		tmp = fma(0.5, (beta / (beta + 2.0)), 0.5);
              	}
              	return tmp;
              }
              
              function code(alpha, beta, i)
              	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
              	t_1 = Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0))
              	tmp = 0.0
              	if (t_1 <= -0.999999999998)
              		tmp = Float64(Float64(-0.5 * Float64(Float64(-2.0 - beta) - beta)) / alpha);
              	elseif (t_1 <= 1e-51)
              		tmp = 0.5;
              	else
              		tmp = fma(0.5, Float64(beta / Float64(beta + 2.0)), 0.5);
              	end
              	return tmp
              end
              
              code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -0.999999999998], N[(N[(-0.5 * N[(N[(-2.0 - beta), $MachinePrecision] - beta), $MachinePrecision]), $MachinePrecision] / alpha), $MachinePrecision], If[LessEqual[t$95$1, 1e-51], 0.5, N[(0.5 * N[(beta / N[(beta + 2.0), $MachinePrecision]), $MachinePrecision] + 0.5), $MachinePrecision]]]]]
              
              \begin{array}{l}
              
              \\
              \begin{array}{l}
              t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
              t_1 := \frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0}\\
              \mathbf{if}\;t\_1 \leq -0.999999999998:\\
              \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\
              
              \mathbf{elif}\;t\_1 \leq 10^{-51}:\\
              \;\;\;\;0.5\\
              
              \mathbf{else}:\\
              \;\;\;\;\mathsf{fma}\left(0.5, \frac{\beta}{\beta + 2}, 0.5\right)\\
              
              
              \end{array}
              \end{array}
              
              Derivation
              1. Split input into 3 regimes
              2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < -0.99999999999800004

                1. Initial program 2.7%

                  \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                2. Add Preprocessing
                3. Taylor expanded in i around 0

                  \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
                4. Step-by-step derivation
                  1. associate--l+N/A

                    \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
                  2. div-subN/A

                    \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
                  3. distribute-lft-inN/A

                    \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                  4. metadata-evalN/A

                    \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
                  5. +-lowering-+.f64N/A

                    \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                  6. *-lowering-*.f64N/A

                    \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                  7. /-lowering-/.f64N/A

                    \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                  8. --lowering--.f64N/A

                    \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
                  9. +-lowering-+.f64N/A

                    \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
                  10. +-commutativeN/A

                    \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
                  11. +-lowering-+.f645.5

                    \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
                5. Simplified5.5%

                  \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
                6. Taylor expanded in alpha around -inf

                  \[\leadsto \color{blue}{\frac{-1}{2} \cdot \frac{-1 \cdot \beta - \left(2 + \beta\right)}{\alpha}} \]
                7. Step-by-step derivation
                  1. associate-*r/N/A

                    \[\leadsto \color{blue}{\frac{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}{\alpha}} \]
                  2. /-lowering-/.f64N/A

                    \[\leadsto \color{blue}{\frac{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}{\alpha}} \]
                  3. *-lowering-*.f64N/A

                    \[\leadsto \frac{\color{blue}{\frac{-1}{2} \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}}{\alpha} \]
                  4. associate--r+N/A

                    \[\leadsto \frac{\frac{-1}{2} \cdot \color{blue}{\left(\left(-1 \cdot \beta - 2\right) - \beta\right)}}{\alpha} \]
                  5. sub-negN/A

                    \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-1 \cdot \beta + \left(\mathsf{neg}\left(2\right)\right)\right)} - \beta\right)}{\alpha} \]
                  6. mul-1-negN/A

                    \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\color{blue}{\left(\mathsf{neg}\left(\beta\right)\right)} + \left(\mathsf{neg}\left(2\right)\right)\right) - \beta\right)}{\alpha} \]
                  7. distribute-neg-inN/A

                    \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(\mathsf{neg}\left(\left(\beta + 2\right)\right)\right)} - \beta\right)}{\alpha} \]
                  8. +-commutativeN/A

                    \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\mathsf{neg}\left(\color{blue}{\left(2 + \beta\right)}\right)\right) - \beta\right)}{\alpha} \]
                  9. mul-1-negN/A

                    \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{-1 \cdot \left(2 + \beta\right)} - \beta\right)}{\alpha} \]
                  10. --lowering--.f64N/A

                    \[\leadsto \frac{\frac{-1}{2} \cdot \color{blue}{\left(-1 \cdot \left(2 + \beta\right) - \beta\right)}}{\alpha} \]
                  11. distribute-lft-inN/A

                    \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-1 \cdot 2 + -1 \cdot \beta\right)} - \beta\right)}{\alpha} \]
                  12. metadata-evalN/A

                    \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(\color{blue}{-2} + -1 \cdot \beta\right) - \beta\right)}{\alpha} \]
                  13. mul-1-negN/A

                    \[\leadsto \frac{\frac{-1}{2} \cdot \left(\left(-2 + \color{blue}{\left(\mathsf{neg}\left(\beta\right)\right)}\right) - \beta\right)}{\alpha} \]
                  14. unsub-negN/A

                    \[\leadsto \frac{\frac{-1}{2} \cdot \left(\color{blue}{\left(-2 - \beta\right)} - \beta\right)}{\alpha} \]
                  15. --lowering--.f6470.4

                    \[\leadsto \frac{-0.5 \cdot \left(\color{blue}{\left(-2 - \beta\right)} - \beta\right)}{\alpha} \]
                8. Simplified70.4%

                  \[\leadsto \color{blue}{\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}} \]

                if -0.99999999999800004 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < 1e-51

                1. Initial program 99.5%

                  \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                2. Add Preprocessing
                3. Taylor expanded in i around inf

                  \[\leadsto \color{blue}{\frac{1}{2}} \]
                4. Step-by-step derivation
                  1. Simplified98.2%

                    \[\leadsto \color{blue}{0.5} \]

                  if 1e-51 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

                  1. Initial program 47.3%

                    \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                  2. Add Preprocessing
                  3. Taylor expanded in i around 0

                    \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
                  4. Step-by-step derivation
                    1. associate--l+N/A

                      \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
                    2. div-subN/A

                      \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
                    3. distribute-lft-inN/A

                      \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                    4. metadata-evalN/A

                      \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
                    5. +-lowering-+.f64N/A

                      \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                    6. *-lowering-*.f64N/A

                      \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                    7. /-lowering-/.f64N/A

                      \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                    8. --lowering--.f64N/A

                      \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
                    9. +-lowering-+.f64N/A

                      \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
                    10. +-commutativeN/A

                      \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
                    11. +-lowering-+.f6496.7

                      \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
                  5. Simplified96.7%

                    \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
                  6. Taylor expanded in alpha around 0

                    \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta}{2 + \beta}} \]
                  7. Step-by-step derivation
                    1. +-commutativeN/A

                      \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{\beta}{2 + \beta} + \frac{1}{2}} \]
                    2. accelerator-lowering-fma.f64N/A

                      \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{1}{2}, \frac{\beta}{2 + \beta}, \frac{1}{2}\right)} \]
                    3. /-lowering-/.f64N/A

                      \[\leadsto \mathsf{fma}\left(\frac{1}{2}, \color{blue}{\frac{\beta}{2 + \beta}}, \frac{1}{2}\right) \]
                    4. +-lowering-+.f6494.4

                      \[\leadsto \mathsf{fma}\left(0.5, \frac{\beta}{\color{blue}{2 + \beta}}, 0.5\right) \]
                  8. Simplified94.4%

                    \[\leadsto \color{blue}{\mathsf{fma}\left(0.5, \frac{\beta}{2 + \beta}, 0.5\right)} \]
                5. Recombined 3 regimes into one program.
                6. Final simplification90.7%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq -0.999999999998:\\ \;\;\;\;\frac{-0.5 \cdot \left(\left(-2 - \beta\right) - \beta\right)}{\alpha}\\ \mathbf{elif}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(0.5, \frac{\beta}{\beta + 2}, 0.5\right)\\ \end{array} \]
                7. Add Preprocessing

                Alternative 9: 97.1% accurate, 0.6× speedup?

                \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq -0.5:\\ \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}, 1\right)}{2}\\ \end{array} \end{array} \]
                (FPCore (alpha beta i)
                 :precision binary64
                 (let* ((t_0 (+ (+ alpha beta) (* 2.0 i))))
                   (if (<= (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0)) -0.5)
                     (* -0.5 (/ (- (- -2.0 (fma 2.0 i beta)) (fma 2.0 i beta)) alpha))
                     (/
                      (fma
                       (/ (- beta alpha) (+ alpha (fma 2.0 i beta)))
                       (/ beta (+ 2.0 (fma 2.0 i beta)))
                       1.0)
                      2.0))))
                double code(double alpha, double beta, double i) {
                	double t_0 = (alpha + beta) + (2.0 * i);
                	double tmp;
                	if (((((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0)) <= -0.5) {
                		tmp = -0.5 * (((-2.0 - fma(2.0, i, beta)) - fma(2.0, i, beta)) / alpha);
                	} else {
                		tmp = fma(((beta - alpha) / (alpha + fma(2.0, i, beta))), (beta / (2.0 + fma(2.0, i, beta))), 1.0) / 2.0;
                	}
                	return tmp;
                }
                
                function code(alpha, beta, i)
                	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
                	tmp = 0.0
                	if (Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0)) <= -0.5)
                		tmp = Float64(-0.5 * Float64(Float64(Float64(-2.0 - fma(2.0, i, beta)) - fma(2.0, i, beta)) / alpha));
                	else
                		tmp = Float64(fma(Float64(Float64(beta - alpha) / Float64(alpha + fma(2.0, i, beta))), Float64(beta / Float64(2.0 + fma(2.0, i, beta))), 1.0) / 2.0);
                	end
                	return tmp
                end
                
                code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision], -0.5], N[(-0.5 * N[(N[(N[(-2.0 - N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision] - N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision] / alpha), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(beta - alpha), $MachinePrecision] / N[(alpha + N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(beta / N[(2.0 + N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]]]
                
                \begin{array}{l}
                
                \\
                \begin{array}{l}
                t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
                \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq -0.5:\\
                \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\
                
                \mathbf{else}:\\
                \;\;\;\;\frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}, 1\right)}{2}\\
                
                
                \end{array}
                \end{array}
                
                Derivation
                1. Split input into 2 regimes
                2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < -0.5

                  1. Initial program 3.3%

                    \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                  2. Add Preprocessing
                  3. Taylor expanded in alpha around -inf

                    \[\leadsto \color{blue}{\frac{-1}{2} \cdot \frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha}} \]
                  4. Step-by-step derivation
                    1. *-commutativeN/A

                      \[\leadsto \color{blue}{\frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha} \cdot \frac{-1}{2}} \]
                    2. *-lowering-*.f64N/A

                      \[\leadsto \color{blue}{\frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha} \cdot \frac{-1}{2}} \]
                  5. Simplified94.8%

                    \[\leadsto \color{blue}{\frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha} \cdot -0.5} \]

                  if -0.5 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

                  1. Initial program 81.6%

                    \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                  2. Add Preprocessing
                  3. Step-by-step derivation
                    1. associate-/l/N/A

                      \[\leadsto \frac{\color{blue}{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot i\right)}} + 1}{2} \]
                    2. *-commutativeN/A

                      \[\leadsto \frac{\frac{\color{blue}{\left(\beta - \alpha\right) \cdot \left(\alpha + \beta\right)}}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} + 1}{2} \]
                    3. *-commutativeN/A

                      \[\leadsto \frac{\frac{\left(\beta - \alpha\right) \cdot \left(\alpha + \beta\right)}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) \cdot \left(\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2\right)}} + 1}{2} \]
                    4. times-fracN/A

                      \[\leadsto \frac{\color{blue}{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i} \cdot \frac{\alpha + \beta}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}} + 1}{2} \]
                    5. accelerator-lowering-fma.f64N/A

                      \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i}, \frac{\alpha + \beta}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}, 1\right)}}{2} \]
                  4. Applied egg-rr100.0%

                    \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\alpha + \beta}{\alpha + \left(\beta + \mathsf{fma}\left(2, i, 2\right)\right)}, 1\right)}}{2} \]
                  5. Taylor expanded in alpha around 0

                    \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \color{blue}{\frac{\beta}{2 + \left(\beta + 2 \cdot i\right)}}, 1\right)}{2} \]
                  6. Step-by-step derivation
                    1. /-lowering-/.f64N/A

                      \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \color{blue}{\frac{\beta}{2 + \left(\beta + 2 \cdot i\right)}}, 1\right)}{2} \]
                    2. +-lowering-+.f64N/A

                      \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{\color{blue}{2 + \left(\beta + 2 \cdot i\right)}}, 1\right)}{2} \]
                    3. +-commutativeN/A

                      \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{2 + \color{blue}{\left(2 \cdot i + \beta\right)}}, 1\right)}{2} \]
                    4. accelerator-lowering-fma.f6499.3

                      \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{2 + \color{blue}{\mathsf{fma}\left(2, i, \beta\right)}}, 1\right)}{2} \]
                  7. Simplified99.3%

                    \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \color{blue}{\frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}}, 1\right)}{2} \]
                3. Recombined 2 regimes into one program.
                4. Final simplification98.2%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq -0.5:\\ \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}, 1\right)}{2}\\ \end{array} \]
                5. Add Preprocessing

                Alternative 10: 96.9% accurate, 0.6× speedup?

                \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq -0.5:\\ \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{\beta}{\mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}, 1\right)}{2}\\ \end{array} \end{array} \]
                (FPCore (alpha beta i)
                 :precision binary64
                 (let* ((t_0 (+ (+ alpha beta) (* 2.0 i))))
                   (if (<= (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0)) -0.5)
                     (* -0.5 (/ (- (- -2.0 (fma 2.0 i beta)) (fma 2.0 i beta)) alpha))
                     (/
                      (fma (/ beta (fma 2.0 i beta)) (/ beta (+ 2.0 (fma 2.0 i beta))) 1.0)
                      2.0))))
                double code(double alpha, double beta, double i) {
                	double t_0 = (alpha + beta) + (2.0 * i);
                	double tmp;
                	if (((((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0)) <= -0.5) {
                		tmp = -0.5 * (((-2.0 - fma(2.0, i, beta)) - fma(2.0, i, beta)) / alpha);
                	} else {
                		tmp = fma((beta / fma(2.0, i, beta)), (beta / (2.0 + fma(2.0, i, beta))), 1.0) / 2.0;
                	}
                	return tmp;
                }
                
                function code(alpha, beta, i)
                	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
                	tmp = 0.0
                	if (Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0)) <= -0.5)
                		tmp = Float64(-0.5 * Float64(Float64(Float64(-2.0 - fma(2.0, i, beta)) - fma(2.0, i, beta)) / alpha));
                	else
                		tmp = Float64(fma(Float64(beta / fma(2.0, i, beta)), Float64(beta / Float64(2.0 + fma(2.0, i, beta))), 1.0) / 2.0);
                	end
                	return tmp
                end
                
                code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision], -0.5], N[(-0.5 * N[(N[(N[(-2.0 - N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision] - N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision] / alpha), $MachinePrecision]), $MachinePrecision], N[(N[(N[(beta / N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision] * N[(beta / N[(2.0 + N[(2.0 * i + beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision] / 2.0), $MachinePrecision]]]
                
                \begin{array}{l}
                
                \\
                \begin{array}{l}
                t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
                \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq -0.5:\\
                \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\
                
                \mathbf{else}:\\
                \;\;\;\;\frac{\mathsf{fma}\left(\frac{\beta}{\mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}, 1\right)}{2}\\
                
                
                \end{array}
                \end{array}
                
                Derivation
                1. Split input into 2 regimes
                2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < -0.5

                  1. Initial program 3.3%

                    \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                  2. Add Preprocessing
                  3. Taylor expanded in alpha around -inf

                    \[\leadsto \color{blue}{\frac{-1}{2} \cdot \frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha}} \]
                  4. Step-by-step derivation
                    1. *-commutativeN/A

                      \[\leadsto \color{blue}{\frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha} \cdot \frac{-1}{2}} \]
                    2. *-lowering-*.f64N/A

                      \[\leadsto \color{blue}{\frac{\left(\beta + -1 \cdot \beta\right) - -1 \cdot \left(-1 \cdot \left(2 + \left(\beta + 2 \cdot i\right)\right) + -1 \cdot \left(\beta + 2 \cdot i\right)\right)}{\alpha} \cdot \frac{-1}{2}} \]
                  5. Simplified94.8%

                    \[\leadsto \color{blue}{\frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha} \cdot -0.5} \]

                  if -0.5 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

                  1. Initial program 81.6%

                    \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                  2. Add Preprocessing
                  3. Step-by-step derivation
                    1. associate-/l/N/A

                      \[\leadsto \frac{\color{blue}{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot i\right)}} + 1}{2} \]
                    2. *-commutativeN/A

                      \[\leadsto \frac{\frac{\color{blue}{\left(\beta - \alpha\right) \cdot \left(\alpha + \beta\right)}}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} + 1}{2} \]
                    3. *-commutativeN/A

                      \[\leadsto \frac{\frac{\left(\beta - \alpha\right) \cdot \left(\alpha + \beta\right)}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) \cdot \left(\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2\right)}} + 1}{2} \]
                    4. times-fracN/A

                      \[\leadsto \frac{\color{blue}{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i} \cdot \frac{\alpha + \beta}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}} + 1}{2} \]
                    5. accelerator-lowering-fma.f64N/A

                      \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i}, \frac{\alpha + \beta}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}, 1\right)}}{2} \]
                  4. Applied egg-rr100.0%

                    \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\alpha + \beta}{\alpha + \left(\beta + \mathsf{fma}\left(2, i, 2\right)\right)}, 1\right)}}{2} \]
                  5. Taylor expanded in alpha around 0

                    \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \color{blue}{\frac{\beta}{2 + \left(\beta + 2 \cdot i\right)}}, 1\right)}{2} \]
                  6. Step-by-step derivation
                    1. /-lowering-/.f64N/A

                      \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \color{blue}{\frac{\beta}{2 + \left(\beta + 2 \cdot i\right)}}, 1\right)}{2} \]
                    2. +-lowering-+.f64N/A

                      \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{\color{blue}{2 + \left(\beta + 2 \cdot i\right)}}, 1\right)}{2} \]
                    3. +-commutativeN/A

                      \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{2 + \color{blue}{\left(2 \cdot i + \beta\right)}}, 1\right)}{2} \]
                    4. accelerator-lowering-fma.f6499.3

                      \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{2 + \color{blue}{\mathsf{fma}\left(2, i, \beta\right)}}, 1\right)}{2} \]
                  7. Simplified99.3%

                    \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta - \alpha}{\alpha + \mathsf{fma}\left(2, i, \beta\right)}, \color{blue}{\frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}}, 1\right)}{2} \]
                  8. Taylor expanded in alpha around 0

                    \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{\beta}{\beta + 2 \cdot i}}, \frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}, 1\right)}{2} \]
                  9. Step-by-step derivation
                    1. /-lowering-/.f64N/A

                      \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{\beta}{\beta + 2 \cdot i}}, \frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}, 1\right)}{2} \]
                    2. +-commutativeN/A

                      \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta}{\color{blue}{2 \cdot i + \beta}}, \frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}, 1\right)}{2} \]
                    3. accelerator-lowering-fma.f6498.5

                      \[\leadsto \frac{\mathsf{fma}\left(\frac{\beta}{\color{blue}{\mathsf{fma}\left(2, i, \beta\right)}}, \frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}, 1\right)}{2} \]
                  10. Simplified98.5%

                    \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{\beta}{\mathsf{fma}\left(2, i, \beta\right)}}, \frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}, 1\right)}{2} \]
                3. Recombined 2 regimes into one program.
                4. Final simplification97.6%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq -0.5:\\ \;\;\;\;-0.5 \cdot \frac{\left(-2 - \mathsf{fma}\left(2, i, \beta\right)\right) - \mathsf{fma}\left(2, i, \beta\right)}{\alpha}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{\beta}{\mathsf{fma}\left(2, i, \beta\right)}, \frac{\beta}{2 + \mathsf{fma}\left(2, i, \beta\right)}, 1\right)}{2}\\ \end{array} \]
                5. Add Preprocessing

                Alternative 11: 77.0% accurate, 0.9× speedup?

                \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(0.5, \frac{\beta}{\beta + 2}, 0.5\right)\\ \end{array} \end{array} \]
                (FPCore (alpha beta i)
                 :precision binary64
                 (let* ((t_0 (+ (+ alpha beta) (* 2.0 i))))
                   (if (<= (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0)) 1e-51)
                     0.5
                     (fma 0.5 (/ beta (+ beta 2.0)) 0.5))))
                double code(double alpha, double beta, double i) {
                	double t_0 = (alpha + beta) + (2.0 * i);
                	double tmp;
                	if (((((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0)) <= 1e-51) {
                		tmp = 0.5;
                	} else {
                		tmp = fma(0.5, (beta / (beta + 2.0)), 0.5);
                	}
                	return tmp;
                }
                
                function code(alpha, beta, i)
                	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
                	tmp = 0.0
                	if (Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0)) <= 1e-51)
                		tmp = 0.5;
                	else
                		tmp = fma(0.5, Float64(beta / Float64(beta + 2.0)), 0.5);
                	end
                	return tmp
                end
                
                code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision], 1e-51], 0.5, N[(0.5 * N[(beta / N[(beta + 2.0), $MachinePrecision]), $MachinePrecision] + 0.5), $MachinePrecision]]]
                
                \begin{array}{l}
                
                \\
                \begin{array}{l}
                t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
                \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq 10^{-51}:\\
                \;\;\;\;0.5\\
                
                \mathbf{else}:\\
                \;\;\;\;\mathsf{fma}\left(0.5, \frac{\beta}{\beta + 2}, 0.5\right)\\
                
                
                \end{array}
                \end{array}
                
                Derivation
                1. Split input into 2 regimes
                2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < 1e-51

                  1. Initial program 68.6%

                    \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                  2. Add Preprocessing
                  3. Taylor expanded in i around inf

                    \[\leadsto \color{blue}{\frac{1}{2}} \]
                  4. Step-by-step derivation
                    1. Simplified70.2%

                      \[\leadsto \color{blue}{0.5} \]

                    if 1e-51 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

                    1. Initial program 47.3%

                      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                    2. Add Preprocessing
                    3. Taylor expanded in i around 0

                      \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
                    4. Step-by-step derivation
                      1. associate--l+N/A

                        \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
                      2. div-subN/A

                        \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
                      3. distribute-lft-inN/A

                        \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                      4. metadata-evalN/A

                        \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
                      5. +-lowering-+.f64N/A

                        \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                      6. *-lowering-*.f64N/A

                        \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                      7. /-lowering-/.f64N/A

                        \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                      8. --lowering--.f64N/A

                        \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
                      9. +-lowering-+.f64N/A

                        \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
                      10. +-commutativeN/A

                        \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
                      11. +-lowering-+.f6496.7

                        \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
                    5. Simplified96.7%

                      \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
                    6. Taylor expanded in alpha around 0

                      \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta}{2 + \beta}} \]
                    7. Step-by-step derivation
                      1. +-commutativeN/A

                        \[\leadsto \color{blue}{\frac{1}{2} \cdot \frac{\beta}{2 + \beta} + \frac{1}{2}} \]
                      2. accelerator-lowering-fma.f64N/A

                        \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{1}{2}, \frac{\beta}{2 + \beta}, \frac{1}{2}\right)} \]
                      3. /-lowering-/.f64N/A

                        \[\leadsto \mathsf{fma}\left(\frac{1}{2}, \color{blue}{\frac{\beta}{2 + \beta}}, \frac{1}{2}\right) \]
                      4. +-lowering-+.f6494.4

                        \[\leadsto \mathsf{fma}\left(0.5, \frac{\beta}{\color{blue}{2 + \beta}}, 0.5\right) \]
                    8. Simplified94.4%

                      \[\leadsto \color{blue}{\mathsf{fma}\left(0.5, \frac{\beta}{2 + \beta}, 0.5\right)} \]
                  5. Recombined 2 regimes into one program.
                  6. Final simplification76.6%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq 10^{-51}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(0.5, \frac{\beta}{\beta + 2}, 0.5\right)\\ \end{array} \]
                  7. Add Preprocessing

                  Alternative 12: 76.7% accurate, 0.9× speedup?

                  \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq 10^{-5}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\alpha}{\beta}, -0.5, 1\right)\\ \end{array} \end{array} \]
                  (FPCore (alpha beta i)
                   :precision binary64
                   (let* ((t_0 (+ (+ alpha beta) (* 2.0 i))))
                     (if (<= (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0)) 1e-5)
                       0.5
                       (fma (/ alpha beta) -0.5 1.0))))
                  double code(double alpha, double beta, double i) {
                  	double t_0 = (alpha + beta) + (2.0 * i);
                  	double tmp;
                  	if (((((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0)) <= 1e-5) {
                  		tmp = 0.5;
                  	} else {
                  		tmp = fma((alpha / beta), -0.5, 1.0);
                  	}
                  	return tmp;
                  }
                  
                  function code(alpha, beta, i)
                  	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
                  	tmp = 0.0
                  	if (Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0)) <= 1e-5)
                  		tmp = 0.5;
                  	else
                  		tmp = fma(Float64(alpha / beta), -0.5, 1.0);
                  	end
                  	return tmp
                  end
                  
                  code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision], 1e-5], 0.5, N[(N[(alpha / beta), $MachinePrecision] * -0.5 + 1.0), $MachinePrecision]]]
                  
                  \begin{array}{l}
                  
                  \\
                  \begin{array}{l}
                  t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
                  \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq 10^{-5}:\\
                  \;\;\;\;0.5\\
                  
                  \mathbf{else}:\\
                  \;\;\;\;\mathsf{fma}\left(\frac{\alpha}{\beta}, -0.5, 1\right)\\
                  
                  
                  \end{array}
                  \end{array}
                  
                  Derivation
                  1. Split input into 2 regimes
                  2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < 1.00000000000000008e-5

                    1. Initial program 70.2%

                      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                    2. Add Preprocessing
                    3. Taylor expanded in i around inf

                      \[\leadsto \color{blue}{\frac{1}{2}} \]
                    4. Step-by-step derivation
                      1. Simplified71.2%

                        \[\leadsto \color{blue}{0.5} \]

                      if 1.00000000000000008e-5 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

                      1. Initial program 38.2%

                        \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                      2. Add Preprocessing
                      3. Taylor expanded in i around 0

                        \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
                      4. Step-by-step derivation
                        1. associate--l+N/A

                          \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
                        2. div-subN/A

                          \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
                        3. distribute-lft-inN/A

                          \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                        4. metadata-evalN/A

                          \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
                        5. +-lowering-+.f64N/A

                          \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                        6. *-lowering-*.f64N/A

                          \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                        7. /-lowering-/.f64N/A

                          \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                        8. --lowering--.f64N/A

                          \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
                        9. +-lowering-+.f64N/A

                          \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
                        10. +-commutativeN/A

                          \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
                        11. +-lowering-+.f6496.1

                          \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
                      5. Simplified96.1%

                        \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
                      6. Taylor expanded in beta around inf

                        \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{\beta}} \]
                      7. Step-by-step derivation
                        1. Simplified93.0%

                          \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{\color{blue}{\beta}} \]
                        2. Taylor expanded in beta around inf

                          \[\leadsto \color{blue}{1 + \frac{-1}{2} \cdot \frac{\alpha}{\beta}} \]
                        3. Step-by-step derivation
                          1. +-commutativeN/A

                            \[\leadsto \color{blue}{\frac{-1}{2} \cdot \frac{\alpha}{\beta} + 1} \]
                          2. *-commutativeN/A

                            \[\leadsto \color{blue}{\frac{\alpha}{\beta} \cdot \frac{-1}{2}} + 1 \]
                          3. accelerator-lowering-fma.f64N/A

                            \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\alpha}{\beta}, \frac{-1}{2}, 1\right)} \]
                          4. /-lowering-/.f6493.0

                            \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{\alpha}{\beta}}, -0.5, 1\right) \]
                        4. Simplified93.0%

                          \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{\alpha}{\beta}, -0.5, 1\right)} \]
                      8. Recombined 2 regimes into one program.
                      9. Final simplification76.2%

                        \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq 10^{-5}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{\alpha}{\beta}, -0.5, 1\right)\\ \end{array} \]
                      10. Add Preprocessing

                      Alternative 13: 76.7% accurate, 1.1× speedup?

                      \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\ \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq 10^{-5}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;1\\ \end{array} \end{array} \]
                      (FPCore (alpha beta i)
                       :precision binary64
                       (let* ((t_0 (+ (+ alpha beta) (* 2.0 i))))
                         (if (<= (/ (/ (* (+ alpha beta) (- beta alpha)) t_0) (+ 2.0 t_0)) 1e-5)
                           0.5
                           1.0)))
                      double code(double alpha, double beta, double i) {
                      	double t_0 = (alpha + beta) + (2.0 * i);
                      	double tmp;
                      	if (((((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0)) <= 1e-5) {
                      		tmp = 0.5;
                      	} else {
                      		tmp = 1.0;
                      	}
                      	return tmp;
                      }
                      
                      real(8) function code(alpha, beta, i)
                          real(8), intent (in) :: alpha
                          real(8), intent (in) :: beta
                          real(8), intent (in) :: i
                          real(8) :: t_0
                          real(8) :: tmp
                          t_0 = (alpha + beta) + (2.0d0 * i)
                          if (((((alpha + beta) * (beta - alpha)) / t_0) / (2.0d0 + t_0)) <= 1d-5) then
                              tmp = 0.5d0
                          else
                              tmp = 1.0d0
                          end if
                          code = tmp
                      end function
                      
                      public static double code(double alpha, double beta, double i) {
                      	double t_0 = (alpha + beta) + (2.0 * i);
                      	double tmp;
                      	if (((((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0)) <= 1e-5) {
                      		tmp = 0.5;
                      	} else {
                      		tmp = 1.0;
                      	}
                      	return tmp;
                      }
                      
                      def code(alpha, beta, i):
                      	t_0 = (alpha + beta) + (2.0 * i)
                      	tmp = 0
                      	if ((((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0)) <= 1e-5:
                      		tmp = 0.5
                      	else:
                      		tmp = 1.0
                      	return tmp
                      
                      function code(alpha, beta, i)
                      	t_0 = Float64(Float64(alpha + beta) + Float64(2.0 * i))
                      	tmp = 0.0
                      	if (Float64(Float64(Float64(Float64(alpha + beta) * Float64(beta - alpha)) / t_0) / Float64(2.0 + t_0)) <= 1e-5)
                      		tmp = 0.5;
                      	else
                      		tmp = 1.0;
                      	end
                      	return tmp
                      end
                      
                      function tmp_2 = code(alpha, beta, i)
                      	t_0 = (alpha + beta) + (2.0 * i);
                      	tmp = 0.0;
                      	if (((((alpha + beta) * (beta - alpha)) / t_0) / (2.0 + t_0)) <= 1e-5)
                      		tmp = 0.5;
                      	else
                      		tmp = 1.0;
                      	end
                      	tmp_2 = tmp;
                      end
                      
                      code[alpha_, beta_, i_] := Block[{t$95$0 = N[(N[(alpha + beta), $MachinePrecision] + N[(2.0 * i), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(N[(N[(N[(alpha + beta), $MachinePrecision] * N[(beta - alpha), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(2.0 + t$95$0), $MachinePrecision]), $MachinePrecision], 1e-5], 0.5, 1.0]]
                      
                      \begin{array}{l}
                      
                      \\
                      \begin{array}{l}
                      t_0 := \left(\alpha + \beta\right) + 2 \cdot i\\
                      \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{t\_0}}{2 + t\_0} \leq 10^{-5}:\\
                      \;\;\;\;0.5\\
                      
                      \mathbf{else}:\\
                      \;\;\;\;1\\
                      
                      
                      \end{array}
                      \end{array}
                      
                      Derivation
                      1. Split input into 2 regimes
                      2. if (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64))) < 1.00000000000000008e-5

                        1. Initial program 70.2%

                          \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                        2. Add Preprocessing
                        3. Taylor expanded in i around inf

                          \[\leadsto \color{blue}{\frac{1}{2}} \]
                        4. Step-by-step derivation
                          1. Simplified71.2%

                            \[\leadsto \color{blue}{0.5} \]

                          if 1.00000000000000008e-5 < (/.f64 (/.f64 (*.f64 (+.f64 alpha beta) (-.f64 beta alpha)) (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i))) (+.f64 (+.f64 (+.f64 alpha beta) (*.f64 #s(literal 2 binary64) i)) #s(literal 2 binary64)))

                          1. Initial program 38.2%

                            \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                          2. Add Preprocessing
                          3. Taylor expanded in beta around inf

                            \[\leadsto \color{blue}{1} \]
                          4. Step-by-step derivation
                            1. Simplified92.9%

                              \[\leadsto \color{blue}{1} \]
                          5. Recombined 2 regimes into one program.
                          6. Final simplification76.1%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{2 + \left(\left(\alpha + \beta\right) + 2 \cdot i\right)} \leq 10^{-5}:\\ \;\;\;\;0.5\\ \mathbf{else}:\\ \;\;\;\;1\\ \end{array} \]
                          7. Add Preprocessing

                          Alternative 14: 61.7% accurate, 73.0× speedup?

                          \[\begin{array}{l} \\ 0.5 \end{array} \]
                          (FPCore (alpha beta i) :precision binary64 0.5)
                          double code(double alpha, double beta, double i) {
                          	return 0.5;
                          }
                          
                          real(8) function code(alpha, beta, i)
                              real(8), intent (in) :: alpha
                              real(8), intent (in) :: beta
                              real(8), intent (in) :: i
                              code = 0.5d0
                          end function
                          
                          public static double code(double alpha, double beta, double i) {
                          	return 0.5;
                          }
                          
                          def code(alpha, beta, i):
                          	return 0.5
                          
                          function code(alpha, beta, i)
                          	return 0.5
                          end
                          
                          function tmp = code(alpha, beta, i)
                          	tmp = 0.5;
                          end
                          
                          code[alpha_, beta_, i_] := 0.5
                          
                          \begin{array}{l}
                          
                          \\
                          0.5
                          \end{array}
                          
                          Derivation
                          1. Initial program 63.0%

                            \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                          2. Add Preprocessing
                          3. Taylor expanded in i around inf

                            \[\leadsto \color{blue}{\frac{1}{2}} \]
                          4. Step-by-step derivation
                            1. Simplified59.7%

                              \[\leadsto \color{blue}{0.5} \]
                            2. Add Preprocessing

                            Alternative 15: 3.5% accurate, 73.0× speedup?

                            \[\begin{array}{l} \\ 0 \end{array} \]
                            (FPCore (alpha beta i) :precision binary64 0.0)
                            double code(double alpha, double beta, double i) {
                            	return 0.0;
                            }
                            
                            real(8) function code(alpha, beta, i)
                                real(8), intent (in) :: alpha
                                real(8), intent (in) :: beta
                                real(8), intent (in) :: i
                                code = 0.0d0
                            end function
                            
                            public static double code(double alpha, double beta, double i) {
                            	return 0.0;
                            }
                            
                            def code(alpha, beta, i):
                            	return 0.0
                            
                            function code(alpha, beta, i)
                            	return 0.0
                            end
                            
                            function tmp = code(alpha, beta, i)
                            	tmp = 0.0;
                            end
                            
                            code[alpha_, beta_, i_] := 0.0
                            
                            \begin{array}{l}
                            
                            \\
                            0
                            \end{array}
                            
                            Derivation
                            1. Initial program 63.0%

                              \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2} \]
                            2. Add Preprocessing
                            3. Taylor expanded in i around 0

                              \[\leadsto \color{blue}{\frac{1}{2} \cdot \left(\left(1 + \frac{\beta}{2 + \left(\alpha + \beta\right)}\right) - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)} \]
                            4. Step-by-step derivation
                              1. associate--l+N/A

                                \[\leadsto \frac{1}{2} \cdot \color{blue}{\left(1 + \left(\frac{\beta}{2 + \left(\alpha + \beta\right)} - \frac{\alpha}{2 + \left(\alpha + \beta\right)}\right)\right)} \]
                              2. div-subN/A

                                \[\leadsto \frac{1}{2} \cdot \left(1 + \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}}\right) \]
                              3. distribute-lft-inN/A

                                \[\leadsto \color{blue}{\frac{1}{2} \cdot 1 + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                              4. metadata-evalN/A

                                \[\leadsto \color{blue}{\frac{1}{2}} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)} \]
                              5. +-lowering-+.f64N/A

                                \[\leadsto \color{blue}{\frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                              6. *-lowering-*.f64N/A

                                \[\leadsto \frac{1}{2} + \color{blue}{\frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                              7. /-lowering-/.f64N/A

                                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \color{blue}{\frac{\beta - \alpha}{2 + \left(\alpha + \beta\right)}} \]
                              8. --lowering--.f64N/A

                                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\color{blue}{\beta - \alpha}}{2 + \left(\alpha + \beta\right)} \]
                              9. +-lowering-+.f64N/A

                                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{\color{blue}{2 + \left(\alpha + \beta\right)}} \]
                              10. +-commutativeN/A

                                \[\leadsto \frac{1}{2} + \frac{1}{2} \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
                              11. +-lowering-+.f6465.7

                                \[\leadsto 0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \color{blue}{\left(\beta + \alpha\right)}} \]
                            5. Simplified65.7%

                              \[\leadsto \color{blue}{0.5 + 0.5 \cdot \frac{\beta - \alpha}{2 + \left(\beta + \alpha\right)}} \]
                            6. Taylor expanded in alpha around inf

                              \[\leadsto \frac{1}{2} + \color{blue}{\frac{-1}{2}} \]
                            7. Step-by-step derivation
                              1. Simplified3.5%

                                \[\leadsto 0.5 + \color{blue}{-0.5} \]
                              2. Step-by-step derivation
                                1. metadata-eval3.5

                                  \[\leadsto \color{blue}{0} \]
                              3. Applied egg-rr3.5%

                                \[\leadsto \color{blue}{0} \]
                              4. Add Preprocessing

                              Reproduce

                              ?
                              herbie shell --seed 2024198 
                              (FPCore (alpha beta i)
                                :name "Octave 3.8, jcobi/2"
                                :precision binary64
                                :pre (and (and (> alpha -1.0) (> beta -1.0)) (> i 0.0))
                                (/ (+ (/ (/ (* (+ alpha beta) (- beta alpha)) (+ (+ alpha beta) (* 2.0 i))) (+ (+ (+ alpha beta) (* 2.0 i)) 2.0)) 1.0) 2.0))