Octave 3.8, jcobi/3

Percentage Accurate: 94.9% → 99.7%
Time: 14.9s
Alternatives: 26
Speedup: 2.6×

Specification

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

\\
\begin{array}{l}
t_0 := \left(\alpha + \beta\right) + 2 \cdot 1\\
\frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{t\_0}}{t\_0}}{t\_0 + 1}
\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 26 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: 94.9% accurate, 1.0× speedup?

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

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

Alternative 1: 99.7% accurate, 0.8× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := \alpha + \left(\beta + 3\right)\\ t_1 := \alpha + \left(\beta + 2\right)\\ \mathbf{if}\;\beta \leq 4 \cdot 10^{+150}:\\ \;\;\;\;\frac{\frac{\alpha + \mathsf{fma}\left(\alpha + 1, \beta, 1\right)}{t\_1}}{t\_1 \cdot t\_0}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(1 + \left(\left(\alpha + \frac{1}{\beta}\right) + \frac{\alpha}{\beta}\right)\right) + \frac{\alpha + 2}{\beta} \cdot \left(-1 - \alpha\right)}{t\_0} \cdot \frac{1}{t\_1}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (let* ((t_0 (+ alpha (+ beta 3.0))) (t_1 (+ alpha (+ beta 2.0))))
   (if (<= beta 4e+150)
     (/ (/ (+ alpha (fma (+ alpha 1.0) beta 1.0)) t_1) (* t_1 t_0))
     (*
      (/
       (+
        (+ 1.0 (+ (+ alpha (/ 1.0 beta)) (/ alpha beta)))
        (* (/ (+ alpha 2.0) beta) (- -1.0 alpha)))
       t_0)
      (/ 1.0 t_1)))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double t_0 = alpha + (beta + 3.0);
	double t_1 = alpha + (beta + 2.0);
	double tmp;
	if (beta <= 4e+150) {
		tmp = ((alpha + fma((alpha + 1.0), beta, 1.0)) / t_1) / (t_1 * t_0);
	} else {
		tmp = (((1.0 + ((alpha + (1.0 / beta)) + (alpha / beta))) + (((alpha + 2.0) / beta) * (-1.0 - alpha))) / t_0) * (1.0 / t_1);
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	t_0 = Float64(alpha + Float64(beta + 3.0))
	t_1 = Float64(alpha + Float64(beta + 2.0))
	tmp = 0.0
	if (beta <= 4e+150)
		tmp = Float64(Float64(Float64(alpha + fma(Float64(alpha + 1.0), beta, 1.0)) / t_1) / Float64(t_1 * t_0));
	else
		tmp = Float64(Float64(Float64(Float64(1.0 + Float64(Float64(alpha + Float64(1.0 / beta)) + Float64(alpha / beta))) + Float64(Float64(Float64(alpha + 2.0) / beta) * Float64(-1.0 - alpha))) / t_0) * Float64(1.0 / t_1));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := Block[{t$95$0 = N[(alpha + N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(alpha + N[(beta + 2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[beta, 4e+150], N[(N[(N[(alpha + N[(N[(alpha + 1.0), $MachinePrecision] * beta + 1.0), $MachinePrecision]), $MachinePrecision] / t$95$1), $MachinePrecision] / N[(t$95$1 * t$95$0), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(1.0 + N[(N[(alpha + N[(1.0 / beta), $MachinePrecision]), $MachinePrecision] + N[(alpha / beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[(N[(alpha + 2.0), $MachinePrecision] / beta), $MachinePrecision] * N[(-1.0 - alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] * N[(1.0 / t$95$1), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
t_0 := \alpha + \left(\beta + 3\right)\\
t_1 := \alpha + \left(\beta + 2\right)\\
\mathbf{if}\;\beta \leq 4 \cdot 10^{+150}:\\
\;\;\;\;\frac{\frac{\alpha + \mathsf{fma}\left(\alpha + 1, \beta, 1\right)}{t\_1}}{t\_1 \cdot t\_0}\\

\mathbf{else}:\\
\;\;\;\;\frac{\left(1 + \left(\left(\alpha + \frac{1}{\beta}\right) + \frac{\alpha}{\beta}\right)\right) + \frac{\alpha + 2}{\beta} \cdot \left(-1 - \alpha\right)}{t\_0} \cdot \frac{1}{t\_1}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 3.99999999999999992e150

    1. Initial program 98.4%

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

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

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

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \left(\left(\beta + \alpha \cdot \beta\right) + 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      8. distribute-rgt1-inN/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + \color{blue}{2} \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      11. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      12. associate-+l+N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      15. *-commutativeN/A

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

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

    if 3.99999999999999992e150 < beta

    1. Initial program 84.7%

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

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

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

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

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

        \[\leadsto \mathsf{*.f64}\left(\left(\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}\right), \color{blue}{\left(\frac{1}{\left(\alpha + \beta\right) + 2 \cdot 1}\right)}\right) \]
    4. Applied egg-rr84.7%

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

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

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

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(\mathsf{+.f64}\left(1, \left(\alpha + \left(\frac{1}{\beta} + \frac{\alpha}{\beta}\right)\right)\right), \left(\frac{\left(1 + \alpha\right) \cdot \left(2 + \alpha\right)}{\beta}\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
      3. associate-+r+N/A

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(\mathsf{+.f64}\left(1, \left(\left(\alpha + \frac{1}{\beta}\right) + \frac{\alpha}{\beta}\right)\right), \left(\frac{\left(1 + \alpha\right) \cdot \left(2 + \alpha\right)}{\beta}\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
      4. +-lowering-+.f64N/A

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(\mathsf{+.f64}\left(1, \mathsf{+.f64}\left(\left(\alpha + \frac{1}{\beta}\right), \left(\frac{\alpha}{\beta}\right)\right)\right), \left(\frac{\left(1 + \alpha\right) \cdot \left(2 + \alpha\right)}{\beta}\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
      5. +-lowering-+.f64N/A

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(\mathsf{+.f64}\left(1, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \left(\frac{1}{\beta}\right)\right), \left(\frac{\alpha}{\beta}\right)\right)\right), \left(\frac{\left(1 + \alpha\right) \cdot \left(2 + \alpha\right)}{\beta}\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
      6. /-lowering-/.f64N/A

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(\mathsf{+.f64}\left(1, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{/.f64}\left(1, \beta\right)\right), \left(\frac{\alpha}{\beta}\right)\right)\right), \left(\frac{\left(1 + \alpha\right) \cdot \left(2 + \alpha\right)}{\beta}\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
      7. /-lowering-/.f64N/A

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(\mathsf{+.f64}\left(1, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{/.f64}\left(1, \beta\right)\right), \mathsf{/.f64}\left(\alpha, \beta\right)\right)\right), \left(\frac{\left(1 + \alpha\right) \cdot \left(2 + \alpha\right)}{\beta}\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
      8. associate-/l*N/A

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(\mathsf{+.f64}\left(1, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{/.f64}\left(1, \beta\right)\right), \mathsf{/.f64}\left(\alpha, \beta\right)\right)\right), \left(\left(1 + \alpha\right) \cdot \frac{2 + \alpha}{\beta}\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
      9. *-lowering-*.f64N/A

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(\mathsf{+.f64}\left(1, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{/.f64}\left(1, \beta\right)\right), \mathsf{/.f64}\left(\alpha, \beta\right)\right)\right), \mathsf{*.f64}\left(\left(1 + \alpha\right), \left(\frac{2 + \alpha}{\beta}\right)\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
      10. +-lowering-+.f64N/A

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(\mathsf{+.f64}\left(1, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{/.f64}\left(1, \beta\right)\right), \mathsf{/.f64}\left(\alpha, \beta\right)\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left(\frac{2 + \alpha}{\beta}\right)\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
      11. /-lowering-/.f64N/A

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(\mathsf{+.f64}\left(1, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{/.f64}\left(1, \beta\right)\right), \mathsf{/.f64}\left(\alpha, \beta\right)\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{/.f64}\left(\left(2 + \alpha\right), \beta\right)\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
      12. +-lowering-+.f6492.5%

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(\mathsf{+.f64}\left(1, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{/.f64}\left(1, \beta\right)\right), \mathsf{/.f64}\left(\alpha, \beta\right)\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{/.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \beta\right)\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
    7. Simplified92.5%

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

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

Alternative 2: 99.7% accurate, 1.0× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := \frac{\alpha + 1}{\beta}\\ t_1 := \alpha + \left(\beta + 2\right)\\ \mathbf{if}\;\beta \leq 3.5 \cdot 10^{+150}:\\ \;\;\;\;\frac{\frac{\alpha + \mathsf{fma}\left(\alpha + 1, \beta, 1\right)}{t\_1}}{t\_1 \cdot \left(\alpha + \left(\beta + 3\right)\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\left(\alpha + 1\right) + \left(t\_0 + \mathsf{fma}\left(\alpha, -2, -4\right) \cdot t\_0\right)}{\beta}}{1 + \left(2 + \left(\beta + \alpha\right)\right)}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (let* ((t_0 (/ (+ alpha 1.0) beta)) (t_1 (+ alpha (+ beta 2.0))))
   (if (<= beta 3.5e+150)
     (/
      (/ (+ alpha (fma (+ alpha 1.0) beta 1.0)) t_1)
      (* t_1 (+ alpha (+ beta 3.0))))
     (/
      (/ (+ (+ alpha 1.0) (+ t_0 (* (fma alpha -2.0 -4.0) t_0))) beta)
      (+ 1.0 (+ 2.0 (+ beta alpha)))))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double t_0 = (alpha + 1.0) / beta;
	double t_1 = alpha + (beta + 2.0);
	double tmp;
	if (beta <= 3.5e+150) {
		tmp = ((alpha + fma((alpha + 1.0), beta, 1.0)) / t_1) / (t_1 * (alpha + (beta + 3.0)));
	} else {
		tmp = (((alpha + 1.0) + (t_0 + (fma(alpha, -2.0, -4.0) * t_0))) / beta) / (1.0 + (2.0 + (beta + alpha)));
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	t_0 = Float64(Float64(alpha + 1.0) / beta)
	t_1 = Float64(alpha + Float64(beta + 2.0))
	tmp = 0.0
	if (beta <= 3.5e+150)
		tmp = Float64(Float64(Float64(alpha + fma(Float64(alpha + 1.0), beta, 1.0)) / t_1) / Float64(t_1 * Float64(alpha + Float64(beta + 3.0))));
	else
		tmp = Float64(Float64(Float64(Float64(alpha + 1.0) + Float64(t_0 + Float64(fma(alpha, -2.0, -4.0) * t_0))) / beta) / Float64(1.0 + Float64(2.0 + Float64(beta + alpha))));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := Block[{t$95$0 = N[(N[(alpha + 1.0), $MachinePrecision] / beta), $MachinePrecision]}, Block[{t$95$1 = N[(alpha + N[(beta + 2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[beta, 3.5e+150], N[(N[(N[(alpha + N[(N[(alpha + 1.0), $MachinePrecision] * beta + 1.0), $MachinePrecision]), $MachinePrecision] / t$95$1), $MachinePrecision] / N[(t$95$1 * N[(alpha + N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(alpha + 1.0), $MachinePrecision] + N[(t$95$0 + N[(N[(alpha * -2.0 + -4.0), $MachinePrecision] * t$95$0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / beta), $MachinePrecision] / N[(1.0 + N[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
t_0 := \frac{\alpha + 1}{\beta}\\
t_1 := \alpha + \left(\beta + 2\right)\\
\mathbf{if}\;\beta \leq 3.5 \cdot 10^{+150}:\\
\;\;\;\;\frac{\frac{\alpha + \mathsf{fma}\left(\alpha + 1, \beta, 1\right)}{t\_1}}{t\_1 \cdot \left(\alpha + \left(\beta + 3\right)\right)}\\

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


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 3.49999999999999984e150

    1. Initial program 98.4%

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

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

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

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \left(\left(\beta + \alpha \cdot \beta\right) + 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      8. distribute-rgt1-inN/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + \color{blue}{2} \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      11. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      12. associate-+l+N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      15. *-commutativeN/A

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

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

    if 3.49999999999999984e150 < beta

    1. Initial program 84.7%

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

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(\left(-1 \cdot \alpha + -1 \cdot \frac{\left(1 + \alpha\right) - -2 \cdot \left(\left(2 + \alpha\right) \cdot \left(-1 \cdot \alpha - 1\right)\right)}{\beta}\right) - 1\right), \left(-1 \cdot \beta\right)\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
    5. Simplified89.0%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\left(\frac{1 + \alpha}{0 - \beta}\right), \left(\frac{\left(\alpha \cdot -2 + -4\right) \cdot \left(-1 - \alpha\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\alpha}, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      3. sub0-negN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\left(\frac{1 + \alpha}{\mathsf{neg}\left(\beta\right)}\right), \left(\frac{\left(\alpha \cdot -2 + -4\right) \cdot \left(-1 - \alpha\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      4. distribute-frac-neg2N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\left(\mathsf{neg}\left(\frac{1 + \alpha}{\beta}\right)\right), \left(\frac{\left(\alpha \cdot -2 + -4\right) \cdot \left(-1 - \alpha\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      5. distribute-neg-fracN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\left(\frac{\mathsf{neg}\left(\left(1 + \alpha\right)\right)}{\beta}\right), \left(\frac{\left(\alpha \cdot -2 + -4\right) \cdot \left(-1 - \alpha\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      6. distribute-neg-inN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\left(\frac{\left(\mathsf{neg}\left(1\right)\right) + \left(\mathsf{neg}\left(\alpha\right)\right)}{\beta}\right), \left(\frac{\left(\alpha \cdot -2 + -4\right) \cdot \left(-1 - \alpha\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      7. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\left(\frac{-1 + \left(\mathsf{neg}\left(\alpha\right)\right)}{\beta}\right), \left(\frac{\left(\alpha \cdot -2 + -4\right) \cdot \left(-1 - \alpha\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      8. sub-negN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\left(\frac{-1 - \alpha}{\beta}\right), \left(\frac{\left(\alpha \cdot -2 + -4\right) \cdot \left(-1 - \alpha\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      9. /-lowering-/.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\left(-1 - \alpha\right), \beta\right), \left(\frac{\left(\alpha \cdot -2 + -4\right) \cdot \left(-1 - \alpha\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      10. --lowering--.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \left(\frac{\left(\alpha \cdot -2 + -4\right) \cdot \left(-1 - \alpha\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      11. associate-/l*N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \left(\left(\alpha \cdot -2 + -4\right) \cdot \frac{-1 - \alpha}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      12. sub-negN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \left(\left(\alpha \cdot -2 + -4\right) \cdot \frac{-1 + \left(\mathsf{neg}\left(\alpha\right)\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      13. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \left(\left(\alpha \cdot -2 + -4\right) \cdot \frac{\left(\mathsf{neg}\left(1\right)\right) + \left(\mathsf{neg}\left(\alpha\right)\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      14. distribute-neg-inN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \left(\left(\alpha \cdot -2 + -4\right) \cdot \frac{\mathsf{neg}\left(\left(1 + \alpha\right)\right)}{0 - \beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      15. sub0-negN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \left(\left(\alpha \cdot -2 + -4\right) \cdot \frac{\mathsf{neg}\left(\left(1 + \alpha\right)\right)}{\mathsf{neg}\left(\beta\right)}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      16. frac-2negN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \left(\left(\alpha \cdot -2 + -4\right) \cdot \frac{1 + \alpha}{\beta}\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      17. *-lowering-*.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \mathsf{*.f64}\left(\left(\alpha \cdot -2 + -4\right), \left(\frac{1 + \alpha}{\beta}\right)\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      18. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, -2, -4\right), \left(\frac{1 + \alpha}{\beta}\right)\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      19. /-lowering-/.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, -2, -4\right), \mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right)\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      20. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, -2, -4\right), \mathsf{/.f64}\left(\left(\alpha + 1\right), \beta\right)\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      21. +-lowering-+.f6492.4%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\mathsf{\_.f64}\left(\mathsf{/.f64}\left(\mathsf{\_.f64}\left(-1, \alpha\right), \beta\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, -2, -4\right), \mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta\right)\right)\right), \mathsf{\_.f64}\left(-1, \alpha\right)\right), \mathsf{\_.f64}\left(0, \beta\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    7. Applied egg-rr92.4%

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

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

Alternative 3: 99.6% accurate, 1.3× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := \alpha + \left(\beta + 3\right)\\ t_1 := \alpha + \left(\beta + 2\right)\\ \mathbf{if}\;\beta \leq 4 \cdot 10^{+150}:\\ \;\;\;\;\frac{\frac{\alpha + \mathsf{fma}\left(\alpha + 1, \beta, 1\right)}{t\_1}}{t\_1 \cdot t\_0}\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{t\_1} \cdot \frac{\alpha + 1}{t\_0}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (let* ((t_0 (+ alpha (+ beta 3.0))) (t_1 (+ alpha (+ beta 2.0))))
   (if (<= beta 4e+150)
     (/ (/ (+ alpha (fma (+ alpha 1.0) beta 1.0)) t_1) (* t_1 t_0))
     (* (/ 1.0 t_1) (/ (+ alpha 1.0) t_0)))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double t_0 = alpha + (beta + 3.0);
	double t_1 = alpha + (beta + 2.0);
	double tmp;
	if (beta <= 4e+150) {
		tmp = ((alpha + fma((alpha + 1.0), beta, 1.0)) / t_1) / (t_1 * t_0);
	} else {
		tmp = (1.0 / t_1) * ((alpha + 1.0) / t_0);
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	t_0 = Float64(alpha + Float64(beta + 3.0))
	t_1 = Float64(alpha + Float64(beta + 2.0))
	tmp = 0.0
	if (beta <= 4e+150)
		tmp = Float64(Float64(Float64(alpha + fma(Float64(alpha + 1.0), beta, 1.0)) / t_1) / Float64(t_1 * t_0));
	else
		tmp = Float64(Float64(1.0 / t_1) * Float64(Float64(alpha + 1.0) / t_0));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := Block[{t$95$0 = N[(alpha + N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(alpha + N[(beta + 2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[beta, 4e+150], N[(N[(N[(alpha + N[(N[(alpha + 1.0), $MachinePrecision] * beta + 1.0), $MachinePrecision]), $MachinePrecision] / t$95$1), $MachinePrecision] / N[(t$95$1 * t$95$0), $MachinePrecision]), $MachinePrecision], N[(N[(1.0 / t$95$1), $MachinePrecision] * N[(N[(alpha + 1.0), $MachinePrecision] / t$95$0), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
t_0 := \alpha + \left(\beta + 3\right)\\
t_1 := \alpha + \left(\beta + 2\right)\\
\mathbf{if}\;\beta \leq 4 \cdot 10^{+150}:\\
\;\;\;\;\frac{\frac{\alpha + \mathsf{fma}\left(\alpha + 1, \beta, 1\right)}{t\_1}}{t\_1 \cdot t\_0}\\

\mathbf{else}:\\
\;\;\;\;\frac{1}{t\_1} \cdot \frac{\alpha + 1}{t\_0}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 3.99999999999999992e150

    1. Initial program 98.4%

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

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

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

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \left(\left(\beta + \alpha \cdot \beta\right) + 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      8. distribute-rgt1-inN/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + \color{blue}{2} \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      11. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      12. associate-+l+N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      15. *-commutativeN/A

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

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

    if 3.99999999999999992e150 < beta

    1. Initial program 84.7%

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

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

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

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

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

        \[\leadsto \mathsf{*.f64}\left(\left(\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}\right), \color{blue}{\left(\frac{1}{\left(\alpha + \beta\right) + 2 \cdot 1}\right)}\right) \]
    4. Applied egg-rr84.7%

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

      \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\color{blue}{\left(1 + \alpha\right)}, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
    6. Step-by-step derivation
      1. +-lowering-+.f6492.5%

        \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \mathsf{/.f64}\left(1, \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right)\right) \]
    7. Simplified92.5%

      \[\leadsto \frac{\color{blue}{1 + \alpha}}{\alpha + \left(\beta + 3\right)} \cdot \frac{1}{\alpha + \left(\beta + 2\right)} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification96.2%

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

Alternative 4: 99.4% accurate, 1.3× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := 2 + \left(\beta + \alpha\right)\\ t_1 := \alpha + \left(\beta + 2\right)\\ \mathbf{if}\;\beta \leq 3.4 \cdot 10^{+17}:\\ \;\;\;\;\frac{1}{t\_1 \cdot \left(t\_1 \cdot \left(\alpha + \left(\beta + 3\right)\right)\right)} \cdot \left(\alpha + \mathsf{fma}\left(\beta, \alpha + 1, 1\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{t\_0}}{1 + t\_0}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (let* ((t_0 (+ 2.0 (+ beta alpha))) (t_1 (+ alpha (+ beta 2.0))))
   (if (<= beta 3.4e+17)
     (*
      (/ 1.0 (* t_1 (* t_1 (+ alpha (+ beta 3.0)))))
      (+ alpha (fma beta (+ alpha 1.0) 1.0)))
     (/ (/ (+ alpha 1.0) t_0) (+ 1.0 t_0)))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double t_0 = 2.0 + (beta + alpha);
	double t_1 = alpha + (beta + 2.0);
	double tmp;
	if (beta <= 3.4e+17) {
		tmp = (1.0 / (t_1 * (t_1 * (alpha + (beta + 3.0))))) * (alpha + fma(beta, (alpha + 1.0), 1.0));
	} else {
		tmp = ((alpha + 1.0) / t_0) / (1.0 + t_0);
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	t_0 = Float64(2.0 + Float64(beta + alpha))
	t_1 = Float64(alpha + Float64(beta + 2.0))
	tmp = 0.0
	if (beta <= 3.4e+17)
		tmp = Float64(Float64(1.0 / Float64(t_1 * Float64(t_1 * Float64(alpha + Float64(beta + 3.0))))) * Float64(alpha + fma(beta, Float64(alpha + 1.0), 1.0)));
	else
		tmp = Float64(Float64(Float64(alpha + 1.0) / t_0) / Float64(1.0 + t_0));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := Block[{t$95$0 = N[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(alpha + N[(beta + 2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[beta, 3.4e+17], N[(N[(1.0 / N[(t$95$1 * N[(t$95$1 * N[(alpha + N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(alpha + N[(beta * N[(alpha + 1.0), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(alpha + 1.0), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(1.0 + t$95$0), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
t_0 := 2 + \left(\beta + \alpha\right)\\
t_1 := \alpha + \left(\beta + 2\right)\\
\mathbf{if}\;\beta \leq 3.4 \cdot 10^{+17}:\\
\;\;\;\;\frac{1}{t\_1 \cdot \left(t\_1 \cdot \left(\alpha + \left(\beta + 3\right)\right)\right)} \cdot \left(\alpha + \mathsf{fma}\left(\beta, \alpha + 1, 1\right)\right)\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{t\_0}}{1 + t\_0}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 3.4e17

    1. Initial program 99.8%

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

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

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

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

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

        \[\leadsto \mathsf{*.f64}\left(\left(\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}\right), \color{blue}{\left(\frac{1}{\left(\alpha + \beta\right) + 2 \cdot 1}\right)}\right) \]
    4. Applied egg-rr99.7%

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

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

        \[\leadsto \frac{\alpha + \left(\left(\alpha + 1\right) \cdot \beta + 1\right)}{\left(\alpha + \left(\beta + 2\right)\right) \cdot \left(\alpha + \left(\beta + 3\right)\right)} \cdot \frac{1}{\alpha + \left(\beta + 2\right)} \]
      3. frac-timesN/A

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

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

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

        \[\leadsto \mathsf{*.f64}\left(\left(\frac{1}{\left(\left(\alpha + \left(\beta + 2\right)\right) \cdot \left(\alpha + \left(\beta + 3\right)\right)\right) \cdot \left(\alpha + \left(\beta + 2\right)\right)}\right), \color{blue}{\left(\alpha + \left(\left(\alpha + 1\right) \cdot \beta + 1\right)\right)}\right) \]
    6. Applied egg-rr93.4%

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

    if 3.4e17 < beta

    1. Initial program 87.6%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\color{blue}{\left(1 + \alpha\right)}, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    4. Step-by-step derivation
      1. +-lowering-+.f6487.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified87.6%

      \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification91.6%

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

Alternative 5: 99.0% accurate, 1.4× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 2.1 \cdot 10^{-70}:\\ \;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\ \mathbf{elif}\;\beta \leq 10^{+46}:\\ \;\;\;\;\frac{\frac{\beta + 1}{\beta + 2}}{\left(\alpha + \left(\beta + 2\right)\right) \cdot \left(\alpha + \left(\beta + 3\right)\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{-1 - \alpha}{\beta}}{-1 - \left(2 + \left(\beta + \alpha\right)\right)}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 2.1e-70)
   (/ (+ alpha 1.0) (* (fma alpha (+ alpha 4.0) 4.0) (+ alpha 3.0)))
   (if (<= beta 1e+46)
     (/
      (/ (+ beta 1.0) (+ beta 2.0))
      (* (+ alpha (+ beta 2.0)) (+ alpha (+ beta 3.0))))
     (/ (/ (- -1.0 alpha) beta) (- -1.0 (+ 2.0 (+ beta alpha)))))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 2.1e-70) {
		tmp = (alpha + 1.0) / (fma(alpha, (alpha + 4.0), 4.0) * (alpha + 3.0));
	} else if (beta <= 1e+46) {
		tmp = ((beta + 1.0) / (beta + 2.0)) / ((alpha + (beta + 2.0)) * (alpha + (beta + 3.0)));
	} else {
		tmp = ((-1.0 - alpha) / beta) / (-1.0 - (2.0 + (beta + alpha)));
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 2.1e-70)
		tmp = Float64(Float64(alpha + 1.0) / Float64(fma(alpha, Float64(alpha + 4.0), 4.0) * Float64(alpha + 3.0)));
	elseif (beta <= 1e+46)
		tmp = Float64(Float64(Float64(beta + 1.0) / Float64(beta + 2.0)) / Float64(Float64(alpha + Float64(beta + 2.0)) * Float64(alpha + Float64(beta + 3.0))));
	else
		tmp = Float64(Float64(Float64(-1.0 - alpha) / beta) / Float64(-1.0 - Float64(2.0 + Float64(beta + alpha))));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 2.1e-70], N[(N[(alpha + 1.0), $MachinePrecision] / N[(N[(alpha * N[(alpha + 4.0), $MachinePrecision] + 4.0), $MachinePrecision] * N[(alpha + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[beta, 1e+46], N[(N[(N[(beta + 1.0), $MachinePrecision] / N[(beta + 2.0), $MachinePrecision]), $MachinePrecision] / N[(N[(alpha + N[(beta + 2.0), $MachinePrecision]), $MachinePrecision] * N[(alpha + N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(-1.0 - alpha), $MachinePrecision] / beta), $MachinePrecision] / N[(-1.0 - N[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 2.1 \cdot 10^{-70}:\\
\;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\

\mathbf{elif}\;\beta \leq 10^{+46}:\\
\;\;\;\;\frac{\frac{\beta + 1}{\beta + 2}}{\left(\alpha + \left(\beta + 2\right)\right) \cdot \left(\alpha + \left(\beta + 3\right)\right)}\\

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


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if beta < 2.1000000000000001e-70

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6494.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified94.6%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\color{blue}{\left(4 + \alpha \cdot \left(4 + \alpha\right)\right)}, \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    7. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left(\alpha \cdot \left(4 + \alpha\right) + 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      2. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(4 + \alpha\right), 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      3. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(\alpha + 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
      4. +-lowering-+.f6494.7%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \mathsf{+.f64}\left(\alpha, 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    8. Simplified94.7%

      \[\leadsto \frac{1 + \alpha}{\color{blue}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right)} \cdot \left(3 + \alpha\right)} \]

    if 2.1000000000000001e-70 < beta < 9.9999999999999999e45

    1. Initial program 99.6%

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

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

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

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \left(\left(\beta + \alpha \cdot \beta\right) + 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      8. distribute-rgt1-inN/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + \color{blue}{2} \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      11. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      12. associate-+l+N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      15. *-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) \cdot \color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right)}\right)\right) \]
    4. Applied egg-rr95.7%

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \left(\beta + 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\alpha, \color{blue}{\mathsf{+.f64}\left(\beta, 2\right)}\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right)\right) \]
      4. +-lowering-+.f6474.3%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\alpha, \color{blue}{\mathsf{+.f64}\left(\beta, 2\right)}\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right)\right) \]
    7. Simplified74.3%

      \[\leadsto \frac{\color{blue}{\frac{1 + \beta}{\beta + 2}}}{\left(\alpha + \left(\beta + 2\right)\right) \cdot \left(\alpha + \left(\beta + 3\right)\right)} \]

    if 9.9999999999999999e45 < beta

    1. Initial program 87.1%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6486.8%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified86.8%

      \[\leadsto \frac{\color{blue}{\frac{1 + \alpha}{\beta}}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification89.5%

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

Alternative 6: 99.4% accurate, 1.4× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := 2 + \left(\beta + \alpha\right)\\ t_1 := \alpha + \left(\beta + 2\right)\\ \mathbf{if}\;\beta \leq 1.15 \cdot 10^{+18}:\\ \;\;\;\;\frac{\alpha + \mathsf{fma}\left(\alpha + 1, \beta, 1\right)}{t\_1 \cdot \left(t\_1 \cdot \left(\alpha + \left(\beta + 3\right)\right)\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{t\_0}}{1 + t\_0}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (let* ((t_0 (+ 2.0 (+ beta alpha))) (t_1 (+ alpha (+ beta 2.0))))
   (if (<= beta 1.15e+18)
     (/
      (+ alpha (fma (+ alpha 1.0) beta 1.0))
      (* t_1 (* t_1 (+ alpha (+ beta 3.0)))))
     (/ (/ (+ alpha 1.0) t_0) (+ 1.0 t_0)))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double t_0 = 2.0 + (beta + alpha);
	double t_1 = alpha + (beta + 2.0);
	double tmp;
	if (beta <= 1.15e+18) {
		tmp = (alpha + fma((alpha + 1.0), beta, 1.0)) / (t_1 * (t_1 * (alpha + (beta + 3.0))));
	} else {
		tmp = ((alpha + 1.0) / t_0) / (1.0 + t_0);
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	t_0 = Float64(2.0 + Float64(beta + alpha))
	t_1 = Float64(alpha + Float64(beta + 2.0))
	tmp = 0.0
	if (beta <= 1.15e+18)
		tmp = Float64(Float64(alpha + fma(Float64(alpha + 1.0), beta, 1.0)) / Float64(t_1 * Float64(t_1 * Float64(alpha + Float64(beta + 3.0)))));
	else
		tmp = Float64(Float64(Float64(alpha + 1.0) / t_0) / Float64(1.0 + t_0));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := Block[{t$95$0 = N[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(alpha + N[(beta + 2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[beta, 1.15e+18], N[(N[(alpha + N[(N[(alpha + 1.0), $MachinePrecision] * beta + 1.0), $MachinePrecision]), $MachinePrecision] / N[(t$95$1 * N[(t$95$1 * N[(alpha + N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(alpha + 1.0), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(1.0 + t$95$0), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
t_0 := 2 + \left(\beta + \alpha\right)\\
t_1 := \alpha + \left(\beta + 2\right)\\
\mathbf{if}\;\beta \leq 1.15 \cdot 10^{+18}:\\
\;\;\;\;\frac{\alpha + \mathsf{fma}\left(\alpha + 1, \beta, 1\right)}{t\_1 \cdot \left(t\_1 \cdot \left(\alpha + \left(\beta + 3\right)\right)\right)}\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{t\_0}}{1 + t\_0}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 1.15e18

    1. Initial program 99.8%

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

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

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

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \left(\left(\beta + \alpha \cdot \beta\right) + 1\right)\right), \left(\left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \color{blue}{\beta}\right) + 2 \cdot 1\right)\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      8. distribute-rgt1-inN/A

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{*.f64}\left(\left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)}\right)\right) \]
    4. Applied egg-rr93.4%

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

    if 1.15e18 < beta

    1. Initial program 87.6%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\color{blue}{\left(1 + \alpha\right)}, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    4. Step-by-step derivation
      1. +-lowering-+.f6487.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified87.6%

      \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification91.6%

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

Alternative 7: 99.1% accurate, 1.6× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := 2 + \left(\beta + \alpha\right)\\ t_1 := 1 + t\_0\\ \mathbf{if}\;\beta \leq 1.68 \cdot 10^{-7}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{\left(\alpha + 2\right) \cdot \left(\alpha + 2\right)}}{t\_1}\\ \mathbf{elif}\;\beta \leq 10^{+46}:\\ \;\;\;\;\frac{\frac{\beta + 1}{\beta + 2}}{\left(\beta + 2\right) \cdot \left(\beta + 3\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{t\_0}}{t\_1}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (let* ((t_0 (+ 2.0 (+ beta alpha))) (t_1 (+ 1.0 t_0)))
   (if (<= beta 1.68e-7)
     (/ (/ (+ alpha 1.0) (* (+ alpha 2.0) (+ alpha 2.0))) t_1)
     (if (<= beta 1e+46)
       (/ (/ (+ beta 1.0) (+ beta 2.0)) (* (+ beta 2.0) (+ beta 3.0)))
       (/ (/ (+ alpha 1.0) t_0) t_1)))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double t_0 = 2.0 + (beta + alpha);
	double t_1 = 1.0 + t_0;
	double tmp;
	if (beta <= 1.68e-7) {
		tmp = ((alpha + 1.0) / ((alpha + 2.0) * (alpha + 2.0))) / t_1;
	} else if (beta <= 1e+46) {
		tmp = ((beta + 1.0) / (beta + 2.0)) / ((beta + 2.0) * (beta + 3.0));
	} else {
		tmp = ((alpha + 1.0) / t_0) / t_1;
	}
	return tmp;
}
NOTE: alpha and beta should be sorted in increasing order before calling this function.
real(8) function code(alpha, beta)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    real(8) :: t_0
    real(8) :: t_1
    real(8) :: tmp
    t_0 = 2.0d0 + (beta + alpha)
    t_1 = 1.0d0 + t_0
    if (beta <= 1.68d-7) then
        tmp = ((alpha + 1.0d0) / ((alpha + 2.0d0) * (alpha + 2.0d0))) / t_1
    else if (beta <= 1d+46) then
        tmp = ((beta + 1.0d0) / (beta + 2.0d0)) / ((beta + 2.0d0) * (beta + 3.0d0))
    else
        tmp = ((alpha + 1.0d0) / t_0) / t_1
    end if
    code = tmp
end function
assert alpha < beta;
public static double code(double alpha, double beta) {
	double t_0 = 2.0 + (beta + alpha);
	double t_1 = 1.0 + t_0;
	double tmp;
	if (beta <= 1.68e-7) {
		tmp = ((alpha + 1.0) / ((alpha + 2.0) * (alpha + 2.0))) / t_1;
	} else if (beta <= 1e+46) {
		tmp = ((beta + 1.0) / (beta + 2.0)) / ((beta + 2.0) * (beta + 3.0));
	} else {
		tmp = ((alpha + 1.0) / t_0) / t_1;
	}
	return tmp;
}
[alpha, beta] = sort([alpha, beta])
def code(alpha, beta):
	t_0 = 2.0 + (beta + alpha)
	t_1 = 1.0 + t_0
	tmp = 0
	if beta <= 1.68e-7:
		tmp = ((alpha + 1.0) / ((alpha + 2.0) * (alpha + 2.0))) / t_1
	elif beta <= 1e+46:
		tmp = ((beta + 1.0) / (beta + 2.0)) / ((beta + 2.0) * (beta + 3.0))
	else:
		tmp = ((alpha + 1.0) / t_0) / t_1
	return tmp
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	t_0 = Float64(2.0 + Float64(beta + alpha))
	t_1 = Float64(1.0 + t_0)
	tmp = 0.0
	if (beta <= 1.68e-7)
		tmp = Float64(Float64(Float64(alpha + 1.0) / Float64(Float64(alpha + 2.0) * Float64(alpha + 2.0))) / t_1);
	elseif (beta <= 1e+46)
		tmp = Float64(Float64(Float64(beta + 1.0) / Float64(beta + 2.0)) / Float64(Float64(beta + 2.0) * Float64(beta + 3.0)));
	else
		tmp = Float64(Float64(Float64(alpha + 1.0) / t_0) / t_1);
	end
	return tmp
end
alpha, beta = num2cell(sort([alpha, beta])){:}
function tmp_2 = code(alpha, beta)
	t_0 = 2.0 + (beta + alpha);
	t_1 = 1.0 + t_0;
	tmp = 0.0;
	if (beta <= 1.68e-7)
		tmp = ((alpha + 1.0) / ((alpha + 2.0) * (alpha + 2.0))) / t_1;
	elseif (beta <= 1e+46)
		tmp = ((beta + 1.0) / (beta + 2.0)) / ((beta + 2.0) * (beta + 3.0));
	else
		tmp = ((alpha + 1.0) / t_0) / t_1;
	end
	tmp_2 = tmp;
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := Block[{t$95$0 = N[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(1.0 + t$95$0), $MachinePrecision]}, If[LessEqual[beta, 1.68e-7], N[(N[(N[(alpha + 1.0), $MachinePrecision] / N[(N[(alpha + 2.0), $MachinePrecision] * N[(alpha + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / t$95$1), $MachinePrecision], If[LessEqual[beta, 1e+46], N[(N[(N[(beta + 1.0), $MachinePrecision] / N[(beta + 2.0), $MachinePrecision]), $MachinePrecision] / N[(N[(beta + 2.0), $MachinePrecision] * N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(alpha + 1.0), $MachinePrecision] / t$95$0), $MachinePrecision] / t$95$1), $MachinePrecision]]]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
t_0 := 2 + \left(\beta + \alpha\right)\\
t_1 := 1 + t\_0\\
\mathbf{if}\;\beta \leq 1.68 \cdot 10^{-7}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{\left(\alpha + 2\right) \cdot \left(\alpha + 2\right)}}{t\_1}\\

\mathbf{elif}\;\beta \leq 10^{+46}:\\
\;\;\;\;\frac{\frac{\beta + 1}{\beta + 2}}{\left(\beta + 2\right) \cdot \left(\beta + 3\right)}\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{t\_0}}{t\_1}\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if beta < 1.67999999999999996e-7

    1. Initial program 99.9%

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

      \[\leadsto \mathsf{/.f64}\left(\color{blue}{\left(\frac{1 + \alpha}{{\left(2 + \alpha\right)}^{2}}\right)}, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    4. Step-by-step derivation
      1. /-lowering-/.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left({\left(2 + \alpha\right)}^{2}\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      3. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(\color{blue}{2}, 1\right)\right), 1\right)\right) \]
      6. +-lowering-+.f6498.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, \color{blue}{1}\right)\right), 1\right)\right) \]
    5. Simplified98.6%

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

    if 1.67999999999999996e-7 < beta < 9.9999999999999999e45

    1. Initial program 99.1%

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

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

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

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \left(\left(\beta + \alpha \cdot \beta\right) + 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      8. distribute-rgt1-inN/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + \color{blue}{2} \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      11. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      12. associate-+l+N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      15. *-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) \cdot \color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right)}\right)\right) \]
    4. Applied egg-rr99.5%

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \left(\beta + 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\alpha, \color{blue}{\mathsf{+.f64}\left(\beta, 2\right)}\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right)\right) \]
      4. +-lowering-+.f6470.8%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\alpha, \color{blue}{\mathsf{+.f64}\left(\beta, 2\right)}\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right)\right) \]
    7. Simplified70.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\left(2 + \beta\right), \color{blue}{\left(3 + \beta\right)}\right)\right) \]
      2. +-commutativeN/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \left(\color{blue}{3} + \beta\right)\right)\right) \]
      4. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \left(\beta + \color{blue}{3}\right)\right)\right) \]
      5. +-lowering-+.f6467.9%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \mathsf{+.f64}\left(\beta, \color{blue}{3}\right)\right)\right) \]
    10. Simplified67.9%

      \[\leadsto \frac{\frac{1 + \beta}{\beta + 2}}{\color{blue}{\left(\beta + 2\right) \cdot \left(\beta + 3\right)}} \]

    if 9.9999999999999999e45 < beta

    1. Initial program 87.1%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\color{blue}{\left(1 + \alpha\right)}, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    4. Step-by-step derivation
      1. +-lowering-+.f6487.1%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified87.1%

      \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification93.7%

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

Alternative 8: 99.0% accurate, 1.6× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := 2 + \left(\beta + \alpha\right)\\ \mathbf{if}\;\beta \leq 1.8 \cdot 10^{-7}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{\left(\alpha + 2\right) \cdot \left(\alpha + 2\right)}}{1 + t\_0}\\ \mathbf{elif}\;\beta \leq 3 \cdot 10^{+46}:\\ \;\;\;\;\frac{\frac{\beta + 1}{\beta + 2}}{\left(\beta + 2\right) \cdot \left(\beta + 3\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{-1 - \alpha}{\beta}}{-1 - t\_0}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (let* ((t_0 (+ 2.0 (+ beta alpha))))
   (if (<= beta 1.8e-7)
     (/ (/ (+ alpha 1.0) (* (+ alpha 2.0) (+ alpha 2.0))) (+ 1.0 t_0))
     (if (<= beta 3e+46)
       (/ (/ (+ beta 1.0) (+ beta 2.0)) (* (+ beta 2.0) (+ beta 3.0)))
       (/ (/ (- -1.0 alpha) beta) (- -1.0 t_0))))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double t_0 = 2.0 + (beta + alpha);
	double tmp;
	if (beta <= 1.8e-7) {
		tmp = ((alpha + 1.0) / ((alpha + 2.0) * (alpha + 2.0))) / (1.0 + t_0);
	} else if (beta <= 3e+46) {
		tmp = ((beta + 1.0) / (beta + 2.0)) / ((beta + 2.0) * (beta + 3.0));
	} else {
		tmp = ((-1.0 - alpha) / beta) / (-1.0 - t_0);
	}
	return tmp;
}
NOTE: alpha and beta should be sorted in increasing order before calling this function.
real(8) function code(alpha, beta)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    real(8) :: t_0
    real(8) :: tmp
    t_0 = 2.0d0 + (beta + alpha)
    if (beta <= 1.8d-7) then
        tmp = ((alpha + 1.0d0) / ((alpha + 2.0d0) * (alpha + 2.0d0))) / (1.0d0 + t_0)
    else if (beta <= 3d+46) then
        tmp = ((beta + 1.0d0) / (beta + 2.0d0)) / ((beta + 2.0d0) * (beta + 3.0d0))
    else
        tmp = (((-1.0d0) - alpha) / beta) / ((-1.0d0) - t_0)
    end if
    code = tmp
end function
assert alpha < beta;
public static double code(double alpha, double beta) {
	double t_0 = 2.0 + (beta + alpha);
	double tmp;
	if (beta <= 1.8e-7) {
		tmp = ((alpha + 1.0) / ((alpha + 2.0) * (alpha + 2.0))) / (1.0 + t_0);
	} else if (beta <= 3e+46) {
		tmp = ((beta + 1.0) / (beta + 2.0)) / ((beta + 2.0) * (beta + 3.0));
	} else {
		tmp = ((-1.0 - alpha) / beta) / (-1.0 - t_0);
	}
	return tmp;
}
[alpha, beta] = sort([alpha, beta])
def code(alpha, beta):
	t_0 = 2.0 + (beta + alpha)
	tmp = 0
	if beta <= 1.8e-7:
		tmp = ((alpha + 1.0) / ((alpha + 2.0) * (alpha + 2.0))) / (1.0 + t_0)
	elif beta <= 3e+46:
		tmp = ((beta + 1.0) / (beta + 2.0)) / ((beta + 2.0) * (beta + 3.0))
	else:
		tmp = ((-1.0 - alpha) / beta) / (-1.0 - t_0)
	return tmp
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	t_0 = Float64(2.0 + Float64(beta + alpha))
	tmp = 0.0
	if (beta <= 1.8e-7)
		tmp = Float64(Float64(Float64(alpha + 1.0) / Float64(Float64(alpha + 2.0) * Float64(alpha + 2.0))) / Float64(1.0 + t_0));
	elseif (beta <= 3e+46)
		tmp = Float64(Float64(Float64(beta + 1.0) / Float64(beta + 2.0)) / Float64(Float64(beta + 2.0) * Float64(beta + 3.0)));
	else
		tmp = Float64(Float64(Float64(-1.0 - alpha) / beta) / Float64(-1.0 - t_0));
	end
	return tmp
end
alpha, beta = num2cell(sort([alpha, beta])){:}
function tmp_2 = code(alpha, beta)
	t_0 = 2.0 + (beta + alpha);
	tmp = 0.0;
	if (beta <= 1.8e-7)
		tmp = ((alpha + 1.0) / ((alpha + 2.0) * (alpha + 2.0))) / (1.0 + t_0);
	elseif (beta <= 3e+46)
		tmp = ((beta + 1.0) / (beta + 2.0)) / ((beta + 2.0) * (beta + 3.0));
	else
		tmp = ((-1.0 - alpha) / beta) / (-1.0 - t_0);
	end
	tmp_2 = tmp;
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := Block[{t$95$0 = N[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[beta, 1.8e-7], N[(N[(N[(alpha + 1.0), $MachinePrecision] / N[(N[(alpha + 2.0), $MachinePrecision] * N[(alpha + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(1.0 + t$95$0), $MachinePrecision]), $MachinePrecision], If[LessEqual[beta, 3e+46], N[(N[(N[(beta + 1.0), $MachinePrecision] / N[(beta + 2.0), $MachinePrecision]), $MachinePrecision] / N[(N[(beta + 2.0), $MachinePrecision] * N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(-1.0 - alpha), $MachinePrecision] / beta), $MachinePrecision] / N[(-1.0 - t$95$0), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
t_0 := 2 + \left(\beta + \alpha\right)\\
\mathbf{if}\;\beta \leq 1.8 \cdot 10^{-7}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{\left(\alpha + 2\right) \cdot \left(\alpha + 2\right)}}{1 + t\_0}\\

\mathbf{elif}\;\beta \leq 3 \cdot 10^{+46}:\\
\;\;\;\;\frac{\frac{\beta + 1}{\beta + 2}}{\left(\beta + 2\right) \cdot \left(\beta + 3\right)}\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{-1 - \alpha}{\beta}}{-1 - t\_0}\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if beta < 1.79999999999999997e-7

    1. Initial program 99.9%

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

      \[\leadsto \mathsf{/.f64}\left(\color{blue}{\left(\frac{1 + \alpha}{{\left(2 + \alpha\right)}^{2}}\right)}, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    4. Step-by-step derivation
      1. /-lowering-/.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left({\left(2 + \alpha\right)}^{2}\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      3. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(\color{blue}{2}, 1\right)\right), 1\right)\right) \]
      6. +-lowering-+.f6498.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, \color{blue}{1}\right)\right), 1\right)\right) \]
    5. Simplified98.6%

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

    if 1.79999999999999997e-7 < beta < 3.00000000000000023e46

    1. Initial program 99.1%

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

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

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

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \left(\left(\beta + \alpha \cdot \beta\right) + 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      8. distribute-rgt1-inN/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + \color{blue}{2} \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      11. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      12. associate-+l+N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      15. *-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) \cdot \color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right)}\right)\right) \]
    4. Applied egg-rr99.5%

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \left(\beta + 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\alpha, \color{blue}{\mathsf{+.f64}\left(\beta, 2\right)}\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right)\right) \]
      4. +-lowering-+.f6470.8%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\alpha, \color{blue}{\mathsf{+.f64}\left(\beta, 2\right)}\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right)\right) \]
    7. Simplified70.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\left(2 + \beta\right), \color{blue}{\left(3 + \beta\right)}\right)\right) \]
      2. +-commutativeN/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \left(\color{blue}{3} + \beta\right)\right)\right) \]
      4. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \left(\beta + \color{blue}{3}\right)\right)\right) \]
      5. +-lowering-+.f6467.9%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \mathsf{+.f64}\left(\beta, \color{blue}{3}\right)\right)\right) \]
    10. Simplified67.9%

      \[\leadsto \frac{\frac{1 + \beta}{\beta + 2}}{\color{blue}{\left(\beta + 2\right) \cdot \left(\beta + 3\right)}} \]

    if 3.00000000000000023e46 < beta

    1. Initial program 87.1%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6486.8%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified86.8%

      \[\leadsto \frac{\color{blue}{\frac{1 + \alpha}{\beta}}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification93.6%

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

Alternative 9: 99.0% accurate, 1.6× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 2.65 \cdot 10^{-70}:\\ \;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\ \mathbf{elif}\;\beta \leq 4 \cdot 10^{+46}:\\ \;\;\;\;\frac{\frac{\beta + 1}{\beta + 2}}{\left(\beta + 2\right) \cdot \left(\beta + 3\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{-1 - \alpha}{\beta}}{-1 - \left(2 + \left(\beta + \alpha\right)\right)}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 2.65e-70)
   (/ (+ alpha 1.0) (* (fma alpha (+ alpha 4.0) 4.0) (+ alpha 3.0)))
   (if (<= beta 4e+46)
     (/ (/ (+ beta 1.0) (+ beta 2.0)) (* (+ beta 2.0) (+ beta 3.0)))
     (/ (/ (- -1.0 alpha) beta) (- -1.0 (+ 2.0 (+ beta alpha)))))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 2.65e-70) {
		tmp = (alpha + 1.0) / (fma(alpha, (alpha + 4.0), 4.0) * (alpha + 3.0));
	} else if (beta <= 4e+46) {
		tmp = ((beta + 1.0) / (beta + 2.0)) / ((beta + 2.0) * (beta + 3.0));
	} else {
		tmp = ((-1.0 - alpha) / beta) / (-1.0 - (2.0 + (beta + alpha)));
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 2.65e-70)
		tmp = Float64(Float64(alpha + 1.0) / Float64(fma(alpha, Float64(alpha + 4.0), 4.0) * Float64(alpha + 3.0)));
	elseif (beta <= 4e+46)
		tmp = Float64(Float64(Float64(beta + 1.0) / Float64(beta + 2.0)) / Float64(Float64(beta + 2.0) * Float64(beta + 3.0)));
	else
		tmp = Float64(Float64(Float64(-1.0 - alpha) / beta) / Float64(-1.0 - Float64(2.0 + Float64(beta + alpha))));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 2.65e-70], N[(N[(alpha + 1.0), $MachinePrecision] / N[(N[(alpha * N[(alpha + 4.0), $MachinePrecision] + 4.0), $MachinePrecision] * N[(alpha + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[beta, 4e+46], N[(N[(N[(beta + 1.0), $MachinePrecision] / N[(beta + 2.0), $MachinePrecision]), $MachinePrecision] / N[(N[(beta + 2.0), $MachinePrecision] * N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(-1.0 - alpha), $MachinePrecision] / beta), $MachinePrecision] / N[(-1.0 - N[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 2.65 \cdot 10^{-70}:\\
\;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\

\mathbf{elif}\;\beta \leq 4 \cdot 10^{+46}:\\
\;\;\;\;\frac{\frac{\beta + 1}{\beta + 2}}{\left(\beta + 2\right) \cdot \left(\beta + 3\right)}\\

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


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if beta < 2.64999999999999992e-70

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6494.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified94.6%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\color{blue}{\left(4 + \alpha \cdot \left(4 + \alpha\right)\right)}, \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    7. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left(\alpha \cdot \left(4 + \alpha\right) + 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      2. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(4 + \alpha\right), 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      3. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(\alpha + 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
      4. +-lowering-+.f6494.7%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \mathsf{+.f64}\left(\alpha, 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    8. Simplified94.7%

      \[\leadsto \frac{1 + \alpha}{\color{blue}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right)} \cdot \left(3 + \alpha\right)} \]

    if 2.64999999999999992e-70 < beta < 4e46

    1. Initial program 99.6%

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

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

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

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \left(\left(\beta + \alpha \cdot \beta\right) + 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      8. distribute-rgt1-inN/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + \color{blue}{2} \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      11. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \left(\left(\alpha + \beta\right) + 2\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      12. associate-+l+N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \left(\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right) \cdot \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)\right)\right) \]
      15. *-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, \mathsf{fma.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta, 1\right)\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) \cdot \color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right)}\right)\right) \]
    4. Applied egg-rr95.7%

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \left(\beta + 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\alpha, \color{blue}{\mathsf{+.f64}\left(\beta, 2\right)}\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right)\right) \]
      4. +-lowering-+.f6474.3%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\alpha, \color{blue}{\mathsf{+.f64}\left(\beta, 2\right)}\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right)\right) \]
    7. Simplified74.3%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\left(2 + \beta\right), \color{blue}{\left(3 + \beta\right)}\right)\right) \]
      2. +-commutativeN/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \left(\color{blue}{3} + \beta\right)\right)\right) \]
      4. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \left(\beta + \color{blue}{3}\right)\right)\right) \]
      5. +-lowering-+.f6464.3%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \mathsf{+.f64}\left(\beta, \color{blue}{3}\right)\right)\right) \]
    10. Simplified64.3%

      \[\leadsto \frac{\frac{1 + \beta}{\beta + 2}}{\color{blue}{\left(\beta + 2\right) \cdot \left(\beta + 3\right)}} \]

    if 4e46 < beta

    1. Initial program 87.1%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6486.8%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified86.8%

      \[\leadsto \frac{\color{blue}{\frac{1 + \alpha}{\beta}}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification88.1%

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

Alternative 10: 98.9% accurate, 1.6× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := 2 + \left(\beta + \alpha\right)\\ t_1 := 1 + t\_0\\ \mathbf{if}\;\beta \leq 2 \cdot 10^{+16}:\\ \;\;\;\;\frac{\frac{\beta + 1}{\left(\beta + 2\right) \cdot \left(\beta + 2\right)}}{t\_1}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{t\_0}}{t\_1}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (let* ((t_0 (+ 2.0 (+ beta alpha))) (t_1 (+ 1.0 t_0)))
   (if (<= beta 2e+16)
     (/ (/ (+ beta 1.0) (* (+ beta 2.0) (+ beta 2.0))) t_1)
     (/ (/ (+ alpha 1.0) t_0) t_1))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double t_0 = 2.0 + (beta + alpha);
	double t_1 = 1.0 + t_0;
	double tmp;
	if (beta <= 2e+16) {
		tmp = ((beta + 1.0) / ((beta + 2.0) * (beta + 2.0))) / t_1;
	} else {
		tmp = ((alpha + 1.0) / t_0) / t_1;
	}
	return tmp;
}
NOTE: alpha and beta should be sorted in increasing order before calling this function.
real(8) function code(alpha, beta)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    real(8) :: t_0
    real(8) :: t_1
    real(8) :: tmp
    t_0 = 2.0d0 + (beta + alpha)
    t_1 = 1.0d0 + t_0
    if (beta <= 2d+16) then
        tmp = ((beta + 1.0d0) / ((beta + 2.0d0) * (beta + 2.0d0))) / t_1
    else
        tmp = ((alpha + 1.0d0) / t_0) / t_1
    end if
    code = tmp
end function
assert alpha < beta;
public static double code(double alpha, double beta) {
	double t_0 = 2.0 + (beta + alpha);
	double t_1 = 1.0 + t_0;
	double tmp;
	if (beta <= 2e+16) {
		tmp = ((beta + 1.0) / ((beta + 2.0) * (beta + 2.0))) / t_1;
	} else {
		tmp = ((alpha + 1.0) / t_0) / t_1;
	}
	return tmp;
}
[alpha, beta] = sort([alpha, beta])
def code(alpha, beta):
	t_0 = 2.0 + (beta + alpha)
	t_1 = 1.0 + t_0
	tmp = 0
	if beta <= 2e+16:
		tmp = ((beta + 1.0) / ((beta + 2.0) * (beta + 2.0))) / t_1
	else:
		tmp = ((alpha + 1.0) / t_0) / t_1
	return tmp
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	t_0 = Float64(2.0 + Float64(beta + alpha))
	t_1 = Float64(1.0 + t_0)
	tmp = 0.0
	if (beta <= 2e+16)
		tmp = Float64(Float64(Float64(beta + 1.0) / Float64(Float64(beta + 2.0) * Float64(beta + 2.0))) / t_1);
	else
		tmp = Float64(Float64(Float64(alpha + 1.0) / t_0) / t_1);
	end
	return tmp
end
alpha, beta = num2cell(sort([alpha, beta])){:}
function tmp_2 = code(alpha, beta)
	t_0 = 2.0 + (beta + alpha);
	t_1 = 1.0 + t_0;
	tmp = 0.0;
	if (beta <= 2e+16)
		tmp = ((beta + 1.0) / ((beta + 2.0) * (beta + 2.0))) / t_1;
	else
		tmp = ((alpha + 1.0) / t_0) / t_1;
	end
	tmp_2 = tmp;
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := Block[{t$95$0 = N[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(1.0 + t$95$0), $MachinePrecision]}, If[LessEqual[beta, 2e+16], N[(N[(N[(beta + 1.0), $MachinePrecision] / N[(N[(beta + 2.0), $MachinePrecision] * N[(beta + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / t$95$1), $MachinePrecision], N[(N[(N[(alpha + 1.0), $MachinePrecision] / t$95$0), $MachinePrecision] / t$95$1), $MachinePrecision]]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
t_0 := 2 + \left(\beta + \alpha\right)\\
t_1 := 1 + t\_0\\
\mathbf{if}\;\beta \leq 2 \cdot 10^{+16}:\\
\;\;\;\;\frac{\frac{\beta + 1}{\left(\beta + 2\right) \cdot \left(\beta + 2\right)}}{t\_1}\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{t\_0}}{t\_1}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 2e16

    1. Initial program 99.8%

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

      \[\leadsto \mathsf{/.f64}\left(\color{blue}{\left(\frac{1 + \beta}{{\left(2 + \beta\right)}^{2}}\right)}, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    4. Step-by-step derivation
      1. /-lowering-/.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \left({\left(2 + \beta\right)}^{2}\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
      3. unpow2N/A

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \left(\beta + 2\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, \color{blue}{1}\right)\right), 1\right)\right) \]
      8. +-lowering-+.f6465.5%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \mathsf{+.f64}\left(\beta, 2\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, \color{blue}{1}\right)\right), 1\right)\right) \]
    5. Simplified65.5%

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

    if 2e16 < beta

    1. Initial program 87.6%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\color{blue}{\left(1 + \alpha\right)}, \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    4. Step-by-step derivation
      1. +-lowering-+.f6487.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified87.6%

      \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification72.4%

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

Alternative 11: 99.3% accurate, 1.8× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 2.65 \cdot 10^{-70}:\\ \;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\ \mathbf{elif}\;\beta \leq 1.2 \cdot 10^{+16}:\\ \;\;\;\;\frac{\beta + 1}{\left(\beta + 3\right) \cdot \left(\left(\beta + 2\right) \cdot \left(\beta + 2\right)\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{-1 - \alpha}{\beta}}{-1 - \left(2 + \left(\beta + \alpha\right)\right)}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 2.65e-70)
   (/ (+ alpha 1.0) (* (fma alpha (+ alpha 4.0) 4.0) (+ alpha 3.0)))
   (if (<= beta 1.2e+16)
     (/ (+ beta 1.0) (* (+ beta 3.0) (* (+ beta 2.0) (+ beta 2.0))))
     (/ (/ (- -1.0 alpha) beta) (- -1.0 (+ 2.0 (+ beta alpha)))))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 2.65e-70) {
		tmp = (alpha + 1.0) / (fma(alpha, (alpha + 4.0), 4.0) * (alpha + 3.0));
	} else if (beta <= 1.2e+16) {
		tmp = (beta + 1.0) / ((beta + 3.0) * ((beta + 2.0) * (beta + 2.0)));
	} else {
		tmp = ((-1.0 - alpha) / beta) / (-1.0 - (2.0 + (beta + alpha)));
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 2.65e-70)
		tmp = Float64(Float64(alpha + 1.0) / Float64(fma(alpha, Float64(alpha + 4.0), 4.0) * Float64(alpha + 3.0)));
	elseif (beta <= 1.2e+16)
		tmp = Float64(Float64(beta + 1.0) / Float64(Float64(beta + 3.0) * Float64(Float64(beta + 2.0) * Float64(beta + 2.0))));
	else
		tmp = Float64(Float64(Float64(-1.0 - alpha) / beta) / Float64(-1.0 - Float64(2.0 + Float64(beta + alpha))));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 2.65e-70], N[(N[(alpha + 1.0), $MachinePrecision] / N[(N[(alpha * N[(alpha + 4.0), $MachinePrecision] + 4.0), $MachinePrecision] * N[(alpha + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[beta, 1.2e+16], N[(N[(beta + 1.0), $MachinePrecision] / N[(N[(beta + 3.0), $MachinePrecision] * N[(N[(beta + 2.0), $MachinePrecision] * N[(beta + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(-1.0 - alpha), $MachinePrecision] / beta), $MachinePrecision] / N[(-1.0 - N[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 2.65 \cdot 10^{-70}:\\
\;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\

\mathbf{elif}\;\beta \leq 1.2 \cdot 10^{+16}:\\
\;\;\;\;\frac{\beta + 1}{\left(\beta + 3\right) \cdot \left(\left(\beta + 2\right) \cdot \left(\beta + 2\right)\right)}\\

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


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if beta < 2.64999999999999992e-70

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6494.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified94.6%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\color{blue}{\left(4 + \alpha \cdot \left(4 + \alpha\right)\right)}, \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    7. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left(\alpha \cdot \left(4 + \alpha\right) + 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      2. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(4 + \alpha\right), 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      3. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(\alpha + 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
      4. +-lowering-+.f6494.7%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \mathsf{+.f64}\left(\alpha, 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    8. Simplified94.7%

      \[\leadsto \frac{1 + \alpha}{\color{blue}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right)} \cdot \left(3 + \alpha\right)} \]

    if 2.64999999999999992e-70 < beta < 1.2e16

    1. Initial program 99.7%

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

      \[\leadsto \color{blue}{\frac{1 + \beta}{{\left(2 + \beta\right)}^{2} \cdot \left(3 + \beta\right)}} \]
    4. Step-by-step derivation
      1. /-lowering-/.f64N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\left({\left(2 + \beta\right)}^{2}\right), \color{blue}{\left(3 + \beta\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\left(\beta + 2\right), \left(2 + \beta\right)\right), \left(3 + \beta\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \left(2 + \beta\right)\right), \left(3 + \beta\right)\right)\right) \]
      8. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \left(\beta + 2\right)\right), \left(3 + \beta\right)\right)\right) \]
      9. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \left(3 + \beta\right)\right)\right) \]
      10. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \left(\beta + \color{blue}{3}\right)\right)\right) \]
      11. +-lowering-+.f6461.0%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{+.f64}\left(\beta, \color{blue}{3}\right)\right)\right) \]
    5. Simplified61.0%

      \[\leadsto \color{blue}{\frac{1 + \beta}{\left(\left(\beta + 2\right) \cdot \left(\beta + 2\right)\right) \cdot \left(\beta + 3\right)}} \]

    if 1.2e16 < beta

    1. Initial program 87.6%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6487.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified87.2%

      \[\leadsto \frac{\color{blue}{\frac{1 + \alpha}{\beta}}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification88.1%

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

Alternative 12: 99.3% accurate, 1.8× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 2.65 \cdot 10^{-70}:\\ \;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\ \mathbf{elif}\;\beta \leq 2 \cdot 10^{+17}:\\ \;\;\;\;\frac{\beta + 1}{\left(\beta + 3\right) \cdot \left(\left(\beta + 2\right) \cdot \left(\beta + 2\right)\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{\alpha + \left(\beta + 3\right)}}{\beta}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 2.65e-70)
   (/ (+ alpha 1.0) (* (fma alpha (+ alpha 4.0) 4.0) (+ alpha 3.0)))
   (if (<= beta 2e+17)
     (/ (+ beta 1.0) (* (+ beta 3.0) (* (+ beta 2.0) (+ beta 2.0))))
     (/ (/ (+ alpha 1.0) (+ alpha (+ beta 3.0))) beta))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 2.65e-70) {
		tmp = (alpha + 1.0) / (fma(alpha, (alpha + 4.0), 4.0) * (alpha + 3.0));
	} else if (beta <= 2e+17) {
		tmp = (beta + 1.0) / ((beta + 3.0) * ((beta + 2.0) * (beta + 2.0)));
	} else {
		tmp = ((alpha + 1.0) / (alpha + (beta + 3.0))) / beta;
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 2.65e-70)
		tmp = Float64(Float64(alpha + 1.0) / Float64(fma(alpha, Float64(alpha + 4.0), 4.0) * Float64(alpha + 3.0)));
	elseif (beta <= 2e+17)
		tmp = Float64(Float64(beta + 1.0) / Float64(Float64(beta + 3.0) * Float64(Float64(beta + 2.0) * Float64(beta + 2.0))));
	else
		tmp = Float64(Float64(Float64(alpha + 1.0) / Float64(alpha + Float64(beta + 3.0))) / beta);
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 2.65e-70], N[(N[(alpha + 1.0), $MachinePrecision] / N[(N[(alpha * N[(alpha + 4.0), $MachinePrecision] + 4.0), $MachinePrecision] * N[(alpha + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[beta, 2e+17], N[(N[(beta + 1.0), $MachinePrecision] / N[(N[(beta + 3.0), $MachinePrecision] * N[(N[(beta + 2.0), $MachinePrecision] * N[(beta + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(alpha + 1.0), $MachinePrecision] / N[(alpha + N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / beta), $MachinePrecision]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 2.65 \cdot 10^{-70}:\\
\;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\

\mathbf{elif}\;\beta \leq 2 \cdot 10^{+17}:\\
\;\;\;\;\frac{\beta + 1}{\left(\beta + 3\right) \cdot \left(\left(\beta + 2\right) \cdot \left(\beta + 2\right)\right)}\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{\alpha + \left(\beta + 3\right)}}{\beta}\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if beta < 2.64999999999999992e-70

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6494.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified94.6%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\color{blue}{\left(4 + \alpha \cdot \left(4 + \alpha\right)\right)}, \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    7. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left(\alpha \cdot \left(4 + \alpha\right) + 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      2. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(4 + \alpha\right), 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      3. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(\alpha + 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
      4. +-lowering-+.f6494.7%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \mathsf{+.f64}\left(\alpha, 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    8. Simplified94.7%

      \[\leadsto \frac{1 + \alpha}{\color{blue}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right)} \cdot \left(3 + \alpha\right)} \]

    if 2.64999999999999992e-70 < beta < 2e17

    1. Initial program 99.7%

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

      \[\leadsto \color{blue}{\frac{1 + \beta}{{\left(2 + \beta\right)}^{2} \cdot \left(3 + \beta\right)}} \]
    4. Step-by-step derivation
      1. /-lowering-/.f64N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\left({\left(2 + \beta\right)}^{2}\right), \color{blue}{\left(3 + \beta\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\left(\beta + 2\right), \left(2 + \beta\right)\right), \left(3 + \beta\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \left(2 + \beta\right)\right), \left(3 + \beta\right)\right)\right) \]
      8. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \left(\beta + 2\right)\right), \left(3 + \beta\right)\right)\right) \]
      9. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \left(3 + \beta\right)\right)\right) \]
      10. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \left(\beta + \color{blue}{3}\right)\right)\right) \]
      11. +-lowering-+.f6461.0%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \beta\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(\beta, 2\right), \mathsf{+.f64}\left(\beta, 2\right)\right), \mathsf{+.f64}\left(\beta, \color{blue}{3}\right)\right)\right) \]
    5. Simplified61.0%

      \[\leadsto \color{blue}{\frac{1 + \beta}{\left(\left(\beta + 2\right) \cdot \left(\beta + 2\right)\right) \cdot \left(\beta + 3\right)}} \]

    if 2e17 < beta

    1. Initial program 87.6%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6487.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified87.2%

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right)\right), \beta\right) \]
      5. +-commutativeN/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right)\right), \beta\right) \]
      7. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \left(\left(\left(\alpha + \beta\right) + 2\right) + 1\right)\right), \beta\right) \]
      8. associate-+l+N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \left(\left(\alpha + \beta\right) + \left(2 + 1\right)\right)\right), \beta\right) \]
      9. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \left(\left(\alpha + \beta\right) + 3\right)\right), \beta\right) \]
      10. associate-+r+N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \left(\alpha + \left(\beta + 3\right)\right)\right), \beta\right) \]
      11. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \mathsf{+.f64}\left(\alpha, \left(\beta + 3\right)\right)\right), \beta\right) \]
      12. +-lowering-+.f6487.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \beta\right) \]
    7. Applied egg-rr87.2%

      \[\leadsto \color{blue}{\frac{\frac{\alpha + 1}{\alpha + \left(\beta + 3\right)}}{\beta}} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification88.1%

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

Alternative 13: 96.8% accurate, 2.2× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 3.3:\\ \;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\ \mathbf{elif}\;\beta \leq 2.15 \cdot 10^{+153}:\\ \;\;\;\;\frac{\alpha + 1}{\beta \cdot \beta}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha}{\beta}}{\beta + 3}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 3.3)
   (fma
    alpha
    (fma
     alpha
     (fma alpha 0.024691358024691357 -0.011574074074074073)
     -0.027777777777777776)
    0.08333333333333333)
   (if (<= beta 2.15e+153)
     (/ (+ alpha 1.0) (* beta beta))
     (/ (/ alpha beta) (+ beta 3.0)))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 3.3) {
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	} else if (beta <= 2.15e+153) {
		tmp = (alpha + 1.0) / (beta * beta);
	} else {
		tmp = (alpha / beta) / (beta + 3.0);
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 3.3)
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	elseif (beta <= 2.15e+153)
		tmp = Float64(Float64(alpha + 1.0) / Float64(beta * beta));
	else
		tmp = Float64(Float64(alpha / beta) / Float64(beta + 3.0));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 3.3], N[(alpha * N[(alpha * N[(alpha * 0.024691358024691357 + -0.011574074074074073), $MachinePrecision] + -0.027777777777777776), $MachinePrecision] + 0.08333333333333333), $MachinePrecision], If[LessEqual[beta, 2.15e+153], N[(N[(alpha + 1.0), $MachinePrecision] / N[(beta * beta), $MachinePrecision]), $MachinePrecision], N[(N[(alpha / beta), $MachinePrecision] / N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 3.3:\\
\;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\

\mathbf{elif}\;\beta \leq 2.15 \cdot 10^{+153}:\\
\;\;\;\;\frac{\alpha + 1}{\beta \cdot \beta}\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\alpha}{\beta}}{\beta + 3}\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if beta < 3.2999999999999998

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified92.2%

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

      \[\leadsto \color{blue}{\frac{1}{12} + \alpha \cdot \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)} \]
    7. Step-by-step derivation
      1. +-commutativeN/A

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

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)}, \frac{1}{12}\right) \]
      3. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{1}{36}\right)\right)}\right), \frac{1}{12}\right) \]
      4. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \frac{-1}{36}\right), \frac{1}{12}\right) \]
      5. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right)}, \frac{-1}{36}\right), \frac{1}{12}\right) \]
      6. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\frac{2}{81} \cdot \alpha + \color{blue}{\left(\mathsf{neg}\left(\frac{5}{432}\right)\right)}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      7. *-commutativeN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \left(\mathsf{neg}\left(\color{blue}{\frac{5}{432}}\right)\right)\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      8. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      9. accelerator-lowering-fma.f6463.7%

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\frac{2}{81}}, \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
    8. Simplified63.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)} \]

    if 3.2999999999999998 < beta < 2.1499999999999999e153

    1. Initial program 90.5%

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

      \[\leadsto \color{blue}{\frac{1 + \alpha}{{\beta}^{2}}} \]
    4. Step-by-step derivation
      1. /-lowering-/.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left({\color{blue}{\beta}}^{2}\right)\right) \]
      3. unpow2N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left(\beta \cdot \color{blue}{\beta}\right)\right) \]
      4. *-lowering-*.f6471.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\beta, \color{blue}{\beta}\right)\right) \]
    5. Simplified71.2%

      \[\leadsto \color{blue}{\frac{1 + \alpha}{\beta \cdot \beta}} \]

    if 2.1499999999999999e153 < beta

    1. Initial program 86.3%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6494.1%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified94.1%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \color{blue}{\left(3 + \beta\right)}\right) \]
    7. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \left(\beta + \color{blue}{3}\right)\right) \]
      2. +-lowering-+.f6494.1%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\beta, \color{blue}{3}\right)\right) \]
    8. Simplified94.1%

      \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{\color{blue}{\beta + 3}} \]
    9. Taylor expanded in alpha around inf

      \[\leadsto \mathsf{/.f64}\left(\color{blue}{\left(\frac{\alpha}{\beta}\right)}, \mathsf{+.f64}\left(\beta, 3\right)\right) \]
    10. Step-by-step derivation
      1. /-lowering-/.f6491.4%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\alpha, \beta\right), \mathsf{+.f64}\left(\color{blue}{\beta}, 3\right)\right) \]
    11. Simplified91.4%

      \[\leadsto \frac{\color{blue}{\frac{\alpha}{\beta}}}{\beta + 3} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification69.6%

    \[\leadsto \begin{array}{l} \mathbf{if}\;\beta \leq 3.3:\\ \;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\ \mathbf{elif}\;\beta \leq 2.15 \cdot 10^{+153}:\\ \;\;\;\;\frac{\alpha + 1}{\beta \cdot \beta}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha}{\beta}}{\beta + 3}\\ \end{array} \]
  5. Add Preprocessing

Alternative 14: 97.6% accurate, 2.2× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 3.5:\\ \;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{\alpha + \left(\beta + 3\right)}}{\beta}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 3.5)
   (/ (+ alpha 1.0) (* (fma alpha (+ alpha 4.0) 4.0) (+ alpha 3.0)))
   (/ (/ (+ alpha 1.0) (+ alpha (+ beta 3.0))) beta)))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 3.5) {
		tmp = (alpha + 1.0) / (fma(alpha, (alpha + 4.0), 4.0) * (alpha + 3.0));
	} else {
		tmp = ((alpha + 1.0) / (alpha + (beta + 3.0))) / beta;
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 3.5)
		tmp = Float64(Float64(alpha + 1.0) / Float64(fma(alpha, Float64(alpha + 4.0), 4.0) * Float64(alpha + 3.0)));
	else
		tmp = Float64(Float64(Float64(alpha + 1.0) / Float64(alpha + Float64(beta + 3.0))) / beta);
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 3.5], N[(N[(alpha + 1.0), $MachinePrecision] / N[(N[(alpha * N[(alpha + 4.0), $MachinePrecision] + 4.0), $MachinePrecision] * N[(alpha + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(alpha + 1.0), $MachinePrecision] / N[(alpha + N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / beta), $MachinePrecision]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 3.5:\\
\;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{\alpha + \left(\beta + 3\right)}}{\beta}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 3.5

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified92.2%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\color{blue}{\left(4 + \alpha \cdot \left(4 + \alpha\right)\right)}, \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    7. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left(\alpha \cdot \left(4 + \alpha\right) + 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      2. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(4 + \alpha\right), 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      3. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(\alpha + 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
      4. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \mathsf{+.f64}\left(\alpha, 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    8. Simplified92.2%

      \[\leadsto \frac{1 + \alpha}{\color{blue}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right)} \cdot \left(3 + \alpha\right)} \]

    if 3.5 < beta

    1. Initial program 88.4%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6482.9%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified82.9%

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

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

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right)\right), \beta\right) \]
      5. +-commutativeN/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1\right)\right), \beta\right) \]
      7. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \left(\left(\left(\alpha + \beta\right) + 2\right) + 1\right)\right), \beta\right) \]
      8. associate-+l+N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \left(\left(\alpha + \beta\right) + \left(2 + 1\right)\right)\right), \beta\right) \]
      9. metadata-evalN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \left(\left(\alpha + \beta\right) + 3\right)\right), \beta\right) \]
      10. associate-+r+N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \left(\alpha + \left(\beta + 3\right)\right)\right), \beta\right) \]
      11. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \mathsf{+.f64}\left(\alpha, \left(\beta + 3\right)\right)\right), \beta\right) \]
      12. +-lowering-+.f6482.9%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \mathsf{+.f64}\left(\alpha, \mathsf{+.f64}\left(\beta, 3\right)\right)\right), \beta\right) \]
    7. Applied egg-rr82.9%

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

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

Alternative 15: 97.6% accurate, 2.2× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 3.5:\\ \;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{\beta}}{\beta + 3}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 3.5)
   (/ (+ alpha 1.0) (* (fma alpha (+ alpha 4.0) 4.0) (+ alpha 3.0)))
   (/ (/ (+ alpha 1.0) beta) (+ beta 3.0))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 3.5) {
		tmp = (alpha + 1.0) / (fma(alpha, (alpha + 4.0), 4.0) * (alpha + 3.0));
	} else {
		tmp = ((alpha + 1.0) / beta) / (beta + 3.0);
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 3.5)
		tmp = Float64(Float64(alpha + 1.0) / Float64(fma(alpha, Float64(alpha + 4.0), 4.0) * Float64(alpha + 3.0)));
	else
		tmp = Float64(Float64(Float64(alpha + 1.0) / beta) / Float64(beta + 3.0));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 3.5], N[(N[(alpha + 1.0), $MachinePrecision] / N[(N[(alpha * N[(alpha + 4.0), $MachinePrecision] + 4.0), $MachinePrecision] * N[(alpha + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(alpha + 1.0), $MachinePrecision] / beta), $MachinePrecision] / N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 3.5:\\
\;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right) \cdot \left(\alpha + 3\right)}\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{\beta}}{\beta + 3}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 3.5

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified92.2%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\color{blue}{\left(4 + \alpha \cdot \left(4 + \alpha\right)\right)}, \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    7. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left(\alpha \cdot \left(4 + \alpha\right) + 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      2. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(4 + \alpha\right), 4\right), \mathsf{+.f64}\left(\color{blue}{3}, \alpha\right)\right)\right) \]
      3. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \left(\alpha + 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
      4. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{fma.f64}\left(\alpha, \mathsf{+.f64}\left(\alpha, 4\right), 4\right), \mathsf{+.f64}\left(3, \alpha\right)\right)\right) \]
    8. Simplified92.2%

      \[\leadsto \frac{1 + \alpha}{\color{blue}{\mathsf{fma}\left(\alpha, \alpha + 4, 4\right)} \cdot \left(3 + \alpha\right)} \]

    if 3.5 < beta

    1. Initial program 88.4%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6482.9%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified82.9%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \color{blue}{\left(3 + \beta\right)}\right) \]
    7. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \left(\beta + \color{blue}{3}\right)\right) \]
      2. +-lowering-+.f6482.7%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\beta, \color{blue}{3}\right)\right) \]
    8. Simplified82.7%

      \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{\color{blue}{\beta + 3}} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification89.0%

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

Alternative 16: 97.6% accurate, 2.3× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 3.6:\\ \;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \alpha + 7, 16\right), 12\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{\beta}}{\beta + 3}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 3.6)
   (/ (+ alpha 1.0) (fma alpha (fma alpha (+ alpha 7.0) 16.0) 12.0))
   (/ (/ (+ alpha 1.0) beta) (+ beta 3.0))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 3.6) {
		tmp = (alpha + 1.0) / fma(alpha, fma(alpha, (alpha + 7.0), 16.0), 12.0);
	} else {
		tmp = ((alpha + 1.0) / beta) / (beta + 3.0);
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 3.6)
		tmp = Float64(Float64(alpha + 1.0) / fma(alpha, fma(alpha, Float64(alpha + 7.0), 16.0), 12.0));
	else
		tmp = Float64(Float64(Float64(alpha + 1.0) / beta) / Float64(beta + 3.0));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 3.6], N[(N[(alpha + 1.0), $MachinePrecision] / N[(alpha * N[(alpha * N[(alpha + 7.0), $MachinePrecision] + 16.0), $MachinePrecision] + 12.0), $MachinePrecision]), $MachinePrecision], N[(N[(N[(alpha + 1.0), $MachinePrecision] / beta), $MachinePrecision] / N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 3.6:\\
\;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \alpha + 7, 16\right), 12\right)}\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{\beta}}{\beta + 3}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 3.60000000000000009

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified92.2%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \color{blue}{\left(12 + \alpha \cdot \left(16 + \alpha \cdot \left(7 + \alpha\right)\right)\right)}\right) \]
    7. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left(\alpha \cdot \left(16 + \alpha \cdot \left(7 + \alpha\right)\right) + \color{blue}{12}\right)\right) \]
      2. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(16 + \alpha \cdot \left(7 + \alpha\right)\right)}, 12\right)\right) \]
      3. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(7 + \alpha\right) + \color{blue}{16}\right), 12\right)\right) \]
      4. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(7 + \alpha\right)}, 16\right), 12\right)\right) \]
      5. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha + \color{blue}{7}\right), 16\right), 12\right)\right) \]
      6. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \mathsf{+.f64}\left(\alpha, \color{blue}{7}\right), 16\right), 12\right)\right) \]
    8. Simplified92.2%

      \[\leadsto \frac{1 + \alpha}{\color{blue}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \alpha + 7, 16\right), 12\right)}} \]

    if 3.60000000000000009 < beta

    1. Initial program 88.4%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6482.9%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified82.9%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \color{blue}{\left(3 + \beta\right)}\right) \]
    7. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \left(\beta + \color{blue}{3}\right)\right) \]
      2. +-lowering-+.f6482.7%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\beta, \color{blue}{3}\right)\right) \]
    8. Simplified82.7%

      \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{\color{blue}{\beta + 3}} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification89.0%

    \[\leadsto \begin{array}{l} \mathbf{if}\;\beta \leq 3.6:\\ \;\;\;\;\frac{\alpha + 1}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \alpha + 7, 16\right), 12\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{\beta}}{\beta + 3}\\ \end{array} \]
  5. Add Preprocessing

Alternative 17: 97.4% accurate, 2.4× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 2.2:\\ \;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{\beta}}{\beta + 3}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 2.2)
   (fma
    alpha
    (fma
     alpha
     (fma alpha 0.024691358024691357 -0.011574074074074073)
     -0.027777777777777776)
    0.08333333333333333)
   (/ (/ (+ alpha 1.0) beta) (+ beta 3.0))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 2.2) {
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	} else {
		tmp = ((alpha + 1.0) / beta) / (beta + 3.0);
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 2.2)
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	else
		tmp = Float64(Float64(Float64(alpha + 1.0) / beta) / Float64(beta + 3.0));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 2.2], N[(alpha * N[(alpha * N[(alpha * 0.024691358024691357 + -0.011574074074074073), $MachinePrecision] + -0.027777777777777776), $MachinePrecision] + 0.08333333333333333), $MachinePrecision], N[(N[(N[(alpha + 1.0), $MachinePrecision] / beta), $MachinePrecision] / N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 2.2:\\
\;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{\beta}}{\beta + 3}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 2.2000000000000002

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified92.2%

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

      \[\leadsto \color{blue}{\frac{1}{12} + \alpha \cdot \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)} \]
    7. Step-by-step derivation
      1. +-commutativeN/A

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

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)}, \frac{1}{12}\right) \]
      3. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{1}{36}\right)\right)}\right), \frac{1}{12}\right) \]
      4. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \frac{-1}{36}\right), \frac{1}{12}\right) \]
      5. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right)}, \frac{-1}{36}\right), \frac{1}{12}\right) \]
      6. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\frac{2}{81} \cdot \alpha + \color{blue}{\left(\mathsf{neg}\left(\frac{5}{432}\right)\right)}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      7. *-commutativeN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \left(\mathsf{neg}\left(\color{blue}{\frac{5}{432}}\right)\right)\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      8. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      9. accelerator-lowering-fma.f6463.7%

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\frac{2}{81}}, \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
    8. Simplified63.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)} \]

    if 2.2000000000000002 < beta

    1. Initial program 88.4%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6482.9%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified82.9%

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \color{blue}{\left(3 + \beta\right)}\right) \]
    7. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \left(\beta + \color{blue}{3}\right)\right) \]
      2. +-lowering-+.f6482.7%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\beta, \color{blue}{3}\right)\right) \]
    8. Simplified82.7%

      \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{\color{blue}{\beta + 3}} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification70.1%

    \[\leadsto \begin{array}{l} \mathbf{if}\;\beta \leq 2.2:\\ \;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{\beta}}{\beta + 3}\\ \end{array} \]
  5. Add Preprocessing

Alternative 18: 97.3% accurate, 2.6× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 3.3:\\ \;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\alpha + 1}{\beta}}{\beta}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 3.3)
   (fma
    alpha
    (fma
     alpha
     (fma alpha 0.024691358024691357 -0.011574074074074073)
     -0.027777777777777776)
    0.08333333333333333)
   (/ (/ (+ alpha 1.0) beta) beta)))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 3.3) {
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	} else {
		tmp = ((alpha + 1.0) / beta) / beta;
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 3.3)
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	else
		tmp = Float64(Float64(Float64(alpha + 1.0) / beta) / beta);
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 3.3], N[(alpha * N[(alpha * N[(alpha * 0.024691358024691357 + -0.011574074074074073), $MachinePrecision] + -0.027777777777777776), $MachinePrecision] + 0.08333333333333333), $MachinePrecision], N[(N[(N[(alpha + 1.0), $MachinePrecision] / beta), $MachinePrecision] / beta), $MachinePrecision]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 3.3:\\
\;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\alpha + 1}{\beta}}{\beta}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 3.2999999999999998

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified92.2%

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

      \[\leadsto \color{blue}{\frac{1}{12} + \alpha \cdot \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)} \]
    7. Step-by-step derivation
      1. +-commutativeN/A

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

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)}, \frac{1}{12}\right) \]
      3. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{1}{36}\right)\right)}\right), \frac{1}{12}\right) \]
      4. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \frac{-1}{36}\right), \frac{1}{12}\right) \]
      5. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right)}, \frac{-1}{36}\right), \frac{1}{12}\right) \]
      6. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\frac{2}{81} \cdot \alpha + \color{blue}{\left(\mathsf{neg}\left(\frac{5}{432}\right)\right)}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      7. *-commutativeN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \left(\mathsf{neg}\left(\color{blue}{\frac{5}{432}}\right)\right)\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      8. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      9. accelerator-lowering-fma.f6463.7%

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\frac{2}{81}}, \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
    8. Simplified63.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)} \]

    if 3.2999999999999998 < beta

    1. Initial program 88.4%

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

      \[\leadsto \color{blue}{\frac{1 + \alpha}{{\beta}^{2}}} \]
    4. Step-by-step derivation
      1. /-lowering-/.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left({\color{blue}{\beta}}^{2}\right)\right) \]
      3. unpow2N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left(\beta \cdot \color{blue}{\beta}\right)\right) \]
      4. *-lowering-*.f6477.8%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\beta, \color{blue}{\beta}\right)\right) \]
    5. Simplified77.8%

      \[\leadsto \color{blue}{\frac{1 + \alpha}{\beta \cdot \beta}} \]
    6. Step-by-step derivation
      1. associate-/r*N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \beta\right) \]
      4. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(\alpha + 1\right), \beta\right), \beta\right) \]
      5. +-lowering-+.f6482.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(\alpha, 1\right), \beta\right), \beta\right) \]
    7. Applied egg-rr82.6%

      \[\leadsto \color{blue}{\frac{\frac{\alpha + 1}{\beta}}{\beta}} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 19: 94.6% accurate, 3.2× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 3.3:\\ \;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{\alpha + 1}{\beta \cdot \beta}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 3.3)
   (fma
    alpha
    (fma
     alpha
     (fma alpha 0.024691358024691357 -0.011574074074074073)
     -0.027777777777777776)
    0.08333333333333333)
   (/ (+ alpha 1.0) (* beta beta))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 3.3) {
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	} else {
		tmp = (alpha + 1.0) / (beta * beta);
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 3.3)
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	else
		tmp = Float64(Float64(alpha + 1.0) / Float64(beta * beta));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 3.3], N[(alpha * N[(alpha * N[(alpha * 0.024691358024691357 + -0.011574074074074073), $MachinePrecision] + -0.027777777777777776), $MachinePrecision] + 0.08333333333333333), $MachinePrecision], N[(N[(alpha + 1.0), $MachinePrecision] / N[(beta * beta), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 3.3:\\
\;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\

\mathbf{else}:\\
\;\;\;\;\frac{\alpha + 1}{\beta \cdot \beta}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 3.2999999999999998

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified92.2%

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

      \[\leadsto \color{blue}{\frac{1}{12} + \alpha \cdot \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)} \]
    7. Step-by-step derivation
      1. +-commutativeN/A

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

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)}, \frac{1}{12}\right) \]
      3. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{1}{36}\right)\right)}\right), \frac{1}{12}\right) \]
      4. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \frac{-1}{36}\right), \frac{1}{12}\right) \]
      5. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right)}, \frac{-1}{36}\right), \frac{1}{12}\right) \]
      6. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\frac{2}{81} \cdot \alpha + \color{blue}{\left(\mathsf{neg}\left(\frac{5}{432}\right)\right)}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      7. *-commutativeN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \left(\mathsf{neg}\left(\color{blue}{\frac{5}{432}}\right)\right)\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      8. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      9. accelerator-lowering-fma.f6463.7%

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\frac{2}{81}}, \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
    8. Simplified63.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)} \]

    if 3.2999999999999998 < beta

    1. Initial program 88.4%

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

      \[\leadsto \color{blue}{\frac{1 + \alpha}{{\beta}^{2}}} \]
    4. Step-by-step derivation
      1. /-lowering-/.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left({\color{blue}{\beta}}^{2}\right)\right) \]
      3. unpow2N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left(\beta \cdot \color{blue}{\beta}\right)\right) \]
      4. *-lowering-*.f6477.8%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\beta, \color{blue}{\beta}\right)\right) \]
    5. Simplified77.8%

      \[\leadsto \color{blue}{\frac{1 + \alpha}{\beta \cdot \beta}} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification68.4%

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

Alternative 20: 91.9% accurate, 3.2× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 2.2:\\ \;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{\beta \cdot \left(\beta + 3\right)}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 2.2)
   (fma
    alpha
    (fma
     alpha
     (fma alpha 0.024691358024691357 -0.011574074074074073)
     -0.027777777777777776)
    0.08333333333333333)
   (/ 1.0 (* beta (+ beta 3.0)))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 2.2) {
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	} else {
		tmp = 1.0 / (beta * (beta + 3.0));
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 2.2)
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	else
		tmp = Float64(1.0 / Float64(beta * Float64(beta + 3.0)));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 2.2], N[(alpha * N[(alpha * N[(alpha * 0.024691358024691357 + -0.011574074074074073), $MachinePrecision] + -0.027777777777777776), $MachinePrecision] + 0.08333333333333333), $MachinePrecision], N[(1.0 / N[(beta * N[(beta + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 2.2:\\
\;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\

\mathbf{else}:\\
\;\;\;\;\frac{1}{\beta \cdot \left(\beta + 3\right)}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 2.2000000000000002

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified92.2%

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

      \[\leadsto \color{blue}{\frac{1}{12} + \alpha \cdot \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)} \]
    7. Step-by-step derivation
      1. +-commutativeN/A

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

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)}, \frac{1}{12}\right) \]
      3. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{1}{36}\right)\right)}\right), \frac{1}{12}\right) \]
      4. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \frac{-1}{36}\right), \frac{1}{12}\right) \]
      5. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right)}, \frac{-1}{36}\right), \frac{1}{12}\right) \]
      6. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\frac{2}{81} \cdot \alpha + \color{blue}{\left(\mathsf{neg}\left(\frac{5}{432}\right)\right)}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      7. *-commutativeN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \left(\mathsf{neg}\left(\color{blue}{\frac{5}{432}}\right)\right)\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      8. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      9. accelerator-lowering-fma.f6463.7%

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\frac{2}{81}}, \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
    8. Simplified63.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)} \]

    if 2.2000000000000002 < beta

    1. Initial program 88.4%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6482.9%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified82.9%

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

      \[\leadsto \color{blue}{\frac{1}{\beta \cdot \left(3 + \beta\right)}} \]
    7. Step-by-step derivation
      1. /-lowering-/.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(1, \mathsf{*.f64}\left(\beta, \color{blue}{\left(3 + \beta\right)}\right)\right) \]
      3. +-commutativeN/A

        \[\leadsto \mathsf{/.f64}\left(1, \mathsf{*.f64}\left(\beta, \left(\beta + \color{blue}{3}\right)\right)\right) \]
      4. +-lowering-+.f6477.1%

        \[\leadsto \mathsf{/.f64}\left(1, \mathsf{*.f64}\left(\beta, \mathsf{+.f64}\left(\beta, \color{blue}{3}\right)\right)\right) \]
    8. Simplified77.1%

      \[\leadsto \color{blue}{\frac{1}{\beta \cdot \left(\beta + 3\right)}} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 21: 91.8% accurate, 3.4× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 3.4:\\ \;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{\beta \cdot \beta}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 3.4)
   (fma
    alpha
    (fma
     alpha
     (fma alpha 0.024691358024691357 -0.011574074074074073)
     -0.027777777777777776)
    0.08333333333333333)
   (/ 1.0 (* beta beta))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 3.4) {
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	} else {
		tmp = 1.0 / (beta * beta);
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 3.4)
		tmp = fma(alpha, fma(alpha, fma(alpha, 0.024691358024691357, -0.011574074074074073), -0.027777777777777776), 0.08333333333333333);
	else
		tmp = Float64(1.0 / Float64(beta * beta));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 3.4], N[(alpha * N[(alpha * N[(alpha * 0.024691358024691357 + -0.011574074074074073), $MachinePrecision] + -0.027777777777777776), $MachinePrecision] + 0.08333333333333333), $MachinePrecision], N[(1.0 / N[(beta * beta), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 3.4:\\
\;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)\\

\mathbf{else}:\\
\;\;\;\;\frac{1}{\beta \cdot \beta}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 3.39999999999999991

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified92.2%

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

      \[\leadsto \color{blue}{\frac{1}{12} + \alpha \cdot \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)} \]
    7. Step-by-step derivation
      1. +-commutativeN/A

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

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) - \frac{1}{36}\right)}, \frac{1}{12}\right) \]
      3. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{1}{36}\right)\right)}\right), \frac{1}{12}\right) \]
      4. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right) + \frac{-1}{36}\right), \frac{1}{12}\right) \]
      5. accelerator-lowering-fma.f64N/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\frac{2}{81} \cdot \alpha - \frac{5}{432}\right)}, \frac{-1}{36}\right), \frac{1}{12}\right) \]
      6. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\frac{2}{81} \cdot \alpha + \color{blue}{\left(\mathsf{neg}\left(\frac{5}{432}\right)\right)}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      7. *-commutativeN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \left(\mathsf{neg}\left(\color{blue}{\frac{5}{432}}\right)\right)\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      8. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{2}{81} + \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
      9. accelerator-lowering-fma.f6463.7%

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\frac{2}{81}}, \frac{-5}{432}\right), \frac{-1}{36}\right), \frac{1}{12}\right) \]
    8. Simplified63.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, 0.024691358024691357, -0.011574074074074073\right), -0.027777777777777776\right), 0.08333333333333333\right)} \]

    if 3.39999999999999991 < beta

    1. Initial program 88.4%

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

      \[\leadsto \color{blue}{\frac{1 + \alpha}{{\beta}^{2}}} \]
    4. Step-by-step derivation
      1. /-lowering-/.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left({\color{blue}{\beta}}^{2}\right)\right) \]
      3. unpow2N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left(\beta \cdot \color{blue}{\beta}\right)\right) \]
      4. *-lowering-*.f6477.8%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\beta, \color{blue}{\beta}\right)\right) \]
    5. Simplified77.8%

      \[\leadsto \color{blue}{\frac{1 + \alpha}{\beta \cdot \beta}} \]
    6. Taylor expanded in alpha around 0

      \[\leadsto \color{blue}{\frac{1}{{\beta}^{2}}} \]
    7. Step-by-step derivation
      1. /-lowering-/.f64N/A

        \[\leadsto \mathsf{/.f64}\left(1, \color{blue}{\left({\beta}^{2}\right)}\right) \]
      2. unpow2N/A

        \[\leadsto \mathsf{/.f64}\left(1, \left(\beta \cdot \color{blue}{\beta}\right)\right) \]
      3. *-lowering-*.f6477.0%

        \[\leadsto \mathsf{/.f64}\left(1, \mathsf{*.f64}\left(\beta, \color{blue}{\beta}\right)\right) \]
    8. Simplified77.0%

      \[\leadsto \color{blue}{\frac{1}{\beta \cdot \beta}} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 22: 91.8% accurate, 3.6× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 3.1:\\ \;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, -0.011574074074074073, -0.027777777777777776\right), 0.08333333333333333\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{\beta \cdot \beta}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 3.1)
   (fma
    alpha
    (fma alpha -0.011574074074074073 -0.027777777777777776)
    0.08333333333333333)
   (/ 1.0 (* beta beta))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 3.1) {
		tmp = fma(alpha, fma(alpha, -0.011574074074074073, -0.027777777777777776), 0.08333333333333333);
	} else {
		tmp = 1.0 / (beta * beta);
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 3.1)
		tmp = fma(alpha, fma(alpha, -0.011574074074074073, -0.027777777777777776), 0.08333333333333333);
	else
		tmp = Float64(1.0 / Float64(beta * beta));
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 3.1], N[(alpha * N[(alpha * -0.011574074074074073 + -0.027777777777777776), $MachinePrecision] + 0.08333333333333333), $MachinePrecision], N[(1.0 / N[(beta * beta), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 3.1:\\
\;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, -0.011574074074074073, -0.027777777777777776\right), 0.08333333333333333\right)\\

\mathbf{else}:\\
\;\;\;\;\frac{1}{\beta \cdot \beta}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 3.10000000000000009

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6492.2%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified92.2%

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

      \[\leadsto \color{blue}{\frac{1}{12} + \alpha \cdot \left(\frac{-5}{432} \cdot \alpha - \frac{1}{36}\right)} \]
    7. Step-by-step derivation
      1. +-commutativeN/A

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

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\frac{-5}{432} \cdot \alpha - \frac{1}{36}\right)}, \frac{1}{12}\right) \]
      3. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\frac{-5}{432} \cdot \alpha + \color{blue}{\left(\mathsf{neg}\left(\frac{1}{36}\right)\right)}\right), \frac{1}{12}\right) \]
      4. *-commutativeN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{-5}{432} + \left(\mathsf{neg}\left(\color{blue}{\frac{1}{36}}\right)\right)\right), \frac{1}{12}\right) \]
      5. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{-5}{432} + \frac{-1}{36}\right), \frac{1}{12}\right) \]
      6. accelerator-lowering-fma.f6463.3%

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\frac{-5}{432}}, \frac{-1}{36}\right), \frac{1}{12}\right) \]
    8. Simplified63.3%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, -0.011574074074074073, -0.027777777777777776\right), 0.08333333333333333\right)} \]

    if 3.10000000000000009 < beta

    1. Initial program 88.4%

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

      \[\leadsto \color{blue}{\frac{1 + \alpha}{{\beta}^{2}}} \]
    4. Step-by-step derivation
      1. /-lowering-/.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left({\color{blue}{\beta}}^{2}\right)\right) \]
      3. unpow2N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \left(\beta \cdot \color{blue}{\beta}\right)\right) \]
      4. *-lowering-*.f6477.8%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\beta, \color{blue}{\beta}\right)\right) \]
    5. Simplified77.8%

      \[\leadsto \color{blue}{\frac{1 + \alpha}{\beta \cdot \beta}} \]
    6. Taylor expanded in alpha around 0

      \[\leadsto \color{blue}{\frac{1}{{\beta}^{2}}} \]
    7. Step-by-step derivation
      1. /-lowering-/.f64N/A

        \[\leadsto \mathsf{/.f64}\left(1, \color{blue}{\left({\beta}^{2}\right)}\right) \]
      2. unpow2N/A

        \[\leadsto \mathsf{/.f64}\left(1, \left(\beta \cdot \color{blue}{\beta}\right)\right) \]
      3. *-lowering-*.f6477.0%

        \[\leadsto \mathsf{/.f64}\left(1, \mathsf{*.f64}\left(\beta, \color{blue}{\beta}\right)\right) \]
    8. Simplified77.0%

      \[\leadsto \color{blue}{\frac{1}{\beta \cdot \beta}} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 23: 47.7% accurate, 4.4× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 8.2:\\ \;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, -0.011574074074074073, -0.027777777777777776\right), 0.08333333333333333\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{\beta}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 8.2)
   (fma
    alpha
    (fma alpha -0.011574074074074073 -0.027777777777777776)
    0.08333333333333333)
   (/ 1.0 beta)))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 8.2) {
		tmp = fma(alpha, fma(alpha, -0.011574074074074073, -0.027777777777777776), 0.08333333333333333);
	} else {
		tmp = 1.0 / beta;
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 8.2)
		tmp = fma(alpha, fma(alpha, -0.011574074074074073, -0.027777777777777776), 0.08333333333333333);
	else
		tmp = Float64(1.0 / beta);
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 8.2], N[(alpha * N[(alpha * -0.011574074074074073 + -0.027777777777777776), $MachinePrecision] + 0.08333333333333333), $MachinePrecision], N[(1.0 / beta), $MachinePrecision]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 8.2:\\
\;\;\;\;\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, -0.011574074074074073, -0.027777777777777776\right), 0.08333333333333333\right)\\

\mathbf{else}:\\
\;\;\;\;\frac{1}{\beta}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 8.1999999999999993

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6491.7%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified91.7%

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

      \[\leadsto \color{blue}{\frac{1}{12} + \alpha \cdot \left(\frac{-5}{432} \cdot \alpha - \frac{1}{36}\right)} \]
    7. Step-by-step derivation
      1. +-commutativeN/A

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

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \color{blue}{\left(\frac{-5}{432} \cdot \alpha - \frac{1}{36}\right)}, \frac{1}{12}\right) \]
      3. sub-negN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\frac{-5}{432} \cdot \alpha + \color{blue}{\left(\mathsf{neg}\left(\frac{1}{36}\right)\right)}\right), \frac{1}{12}\right) \]
      4. *-commutativeN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{-5}{432} + \left(\mathsf{neg}\left(\color{blue}{\frac{1}{36}}\right)\right)\right), \frac{1}{12}\right) \]
      5. metadata-evalN/A

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \left(\alpha \cdot \frac{-5}{432} + \frac{-1}{36}\right), \frac{1}{12}\right) \]
      6. accelerator-lowering-fma.f6463.0%

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \mathsf{fma.f64}\left(\alpha, \color{blue}{\frac{-5}{432}}, \frac{-1}{36}\right), \frac{1}{12}\right) \]
    8. Simplified63.0%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\alpha, \mathsf{fma}\left(\alpha, -0.011574074074074073, -0.027777777777777776\right), 0.08333333333333333\right)} \]

    if 8.1999999999999993 < beta

    1. Initial program 88.3%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6483.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified83.6%

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

      \[\leadsto \color{blue}{\frac{1}{\beta}} \]
    7. Step-by-step derivation
      1. /-lowering-/.f646.7%

        \[\leadsto \mathsf{/.f64}\left(1, \color{blue}{\beta}\right) \]
    8. Simplified6.7%

      \[\leadsto \color{blue}{\frac{1}{\beta}} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 24: 47.6% accurate, 4.7× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 8.2:\\ \;\;\;\;\mathsf{fma}\left(\alpha, -0.027777777777777776, 0.08333333333333333\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{\beta}\\ \end{array} \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (if (<= beta 8.2)
   (fma alpha -0.027777777777777776 0.08333333333333333)
   (/ 1.0 beta)))
assert(alpha < beta);
double code(double alpha, double beta) {
	double tmp;
	if (beta <= 8.2) {
		tmp = fma(alpha, -0.027777777777777776, 0.08333333333333333);
	} else {
		tmp = 1.0 / beta;
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	tmp = 0.0
	if (beta <= 8.2)
		tmp = fma(alpha, -0.027777777777777776, 0.08333333333333333);
	else
		tmp = Float64(1.0 / beta);
	end
	return tmp
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := If[LessEqual[beta, 8.2], N[(alpha * -0.027777777777777776 + 0.08333333333333333), $MachinePrecision], N[(1.0 / beta), $MachinePrecision]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
\mathbf{if}\;\beta \leq 8.2:\\
\;\;\;\;\mathsf{fma}\left(\alpha, -0.027777777777777776, 0.08333333333333333\right)\\

\mathbf{else}:\\
\;\;\;\;\frac{1}{\beta}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if beta < 8.1999999999999993

    1. Initial program 99.8%

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

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

        \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
      2. +-lowering-+.f64N/A

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
      4. unpow2N/A

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      7. +-lowering-+.f64N/A

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
      8. +-lowering-+.f6491.7%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
    5. Simplified91.7%

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

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

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

        \[\leadsto \alpha \cdot \frac{-1}{36} + \frac{1}{12} \]
      3. accelerator-lowering-fma.f6462.8%

        \[\leadsto \mathsf{fma.f64}\left(\alpha, \color{blue}{\frac{-1}{36}}, \frac{1}{12}\right) \]
    8. Simplified62.8%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\alpha, -0.027777777777777776, 0.08333333333333333\right)} \]

    if 8.1999999999999993 < beta

    1. Initial program 88.3%

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

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

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\left(1 + \alpha\right), \beta\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\mathsf{+.f64}\left(\alpha, \beta\right), \mathsf{*.f64}\left(2, 1\right)\right)}, 1\right)\right) \]
      2. +-lowering-+.f6483.6%

        \[\leadsto \mathsf{/.f64}\left(\mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \beta\right), \mathsf{+.f64}\left(\mathsf{+.f64}\left(\color{blue}{\mathsf{+.f64}\left(\alpha, \beta\right)}, \mathsf{*.f64}\left(2, 1\right)\right), 1\right)\right) \]
    5. Simplified83.6%

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

      \[\leadsto \color{blue}{\frac{1}{\beta}} \]
    7. Step-by-step derivation
      1. /-lowering-/.f646.7%

        \[\leadsto \mathsf{/.f64}\left(1, \color{blue}{\beta}\right) \]
    8. Simplified6.7%

      \[\leadsto \color{blue}{\frac{1}{\beta}} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 25: 45.8% accurate, 12.0× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \mathsf{fma}\left(\alpha, -0.027777777777777776, 0.08333333333333333\right) \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta)
 :precision binary64
 (fma alpha -0.027777777777777776 0.08333333333333333))
assert(alpha < beta);
double code(double alpha, double beta) {
	return fma(alpha, -0.027777777777777776, 0.08333333333333333);
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	return fma(alpha, -0.027777777777777776, 0.08333333333333333)
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := N[(alpha * -0.027777777777777776 + 0.08333333333333333), $MachinePrecision]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\mathsf{fma}\left(\alpha, -0.027777777777777776, 0.08333333333333333\right)
\end{array}
Derivation
  1. Initial program 96.0%

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

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

      \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
    2. +-lowering-+.f64N/A

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
    4. unpow2N/A

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

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
    7. +-lowering-+.f64N/A

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
    8. +-lowering-+.f6465.0%

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
  5. Simplified65.0%

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

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

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

      \[\leadsto \alpha \cdot \frac{-1}{36} + \frac{1}{12} \]
    3. accelerator-lowering-fma.f6443.1%

      \[\leadsto \mathsf{fma.f64}\left(\alpha, \color{blue}{\frac{-1}{36}}, \frac{1}{12}\right) \]
  8. Simplified43.1%

    \[\leadsto \color{blue}{\mathsf{fma}\left(\alpha, -0.027777777777777776, 0.08333333333333333\right)} \]
  9. Add Preprocessing

Alternative 26: 45.4% accurate, 84.0× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ 0.08333333333333333 \end{array} \]
NOTE: alpha and beta should be sorted in increasing order before calling this function.
(FPCore (alpha beta) :precision binary64 0.08333333333333333)
assert(alpha < beta);
double code(double alpha, double beta) {
	return 0.08333333333333333;
}
NOTE: alpha and beta should be sorted in increasing order before calling this function.
real(8) function code(alpha, beta)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    code = 0.08333333333333333d0
end function
assert alpha < beta;
public static double code(double alpha, double beta) {
	return 0.08333333333333333;
}
[alpha, beta] = sort([alpha, beta])
def code(alpha, beta):
	return 0.08333333333333333
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	return 0.08333333333333333
end
alpha, beta = num2cell(sort([alpha, beta])){:}
function tmp = code(alpha, beta)
	tmp = 0.08333333333333333;
end
NOTE: alpha and beta should be sorted in increasing order before calling this function.
code[alpha_, beta_] := 0.08333333333333333
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
0.08333333333333333
\end{array}
Derivation
  1. Initial program 96.0%

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

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

      \[\leadsto \mathsf{/.f64}\left(\left(1 + \alpha\right), \color{blue}{\left({\left(2 + \alpha\right)}^{2} \cdot \left(3 + \alpha\right)\right)}\right) \]
    2. +-lowering-+.f64N/A

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\left({\left(2 + \alpha\right)}^{2}\right), \color{blue}{\left(3 + \alpha\right)}\right)\right) \]
    4. unpow2N/A

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

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

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \left(2 + \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
    7. +-lowering-+.f64N/A

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \left(3 + \alpha\right)\right)\right) \]
    8. +-lowering-+.f6465.0%

      \[\leadsto \mathsf{/.f64}\left(\mathsf{+.f64}\left(1, \alpha\right), \mathsf{*.f64}\left(\mathsf{*.f64}\left(\mathsf{+.f64}\left(2, \alpha\right), \mathsf{+.f64}\left(2, \alpha\right)\right), \mathsf{+.f64}\left(3, \color{blue}{\alpha}\right)\right)\right) \]
  5. Simplified65.0%

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

    \[\leadsto \color{blue}{\frac{1}{12}} \]
  7. Step-by-step derivation
    1. Simplified43.0%

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

    Reproduce

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