Octave 3.8, jcobi/3

Percentage Accurate: 94.0% → 99.7%
Time: 2.7s
Alternatives: 14
Speedup: 2.4×

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);
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(alpha, beta)
use fmin_fmax_functions
    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 14 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.0% 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);
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(alpha, beta)
use fmin_fmax_functions
    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, 1.0× speedup?

\[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := \left(\beta + \alpha\right) + 2\\ \mathbf{if}\;\beta \leq 4 \cdot 10^{+101}:\\ \;\;\;\;\frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{t\_0}}{t\_0}}{3 + \beta \cdot \left(\frac{\alpha}{\beta} + 1\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\left(\alpha + 1\right) - \left(1 + \alpha\right) \cdot \frac{2 + \alpha}{\beta}}{t\_0}}{3 + \left(\beta + \alpha\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 (+ (+ beta alpha) 2.0)))
   (if (<= beta 4e+101)
     (/
      (/ (/ (+ (fma beta alpha (+ beta alpha)) 1.0) t_0) t_0)
      (+ 3.0 (* beta (+ (/ alpha beta) 1.0))))
     (/
      (/ (- (+ alpha 1.0) (* (+ 1.0 alpha) (/ (+ 2.0 alpha) beta))) t_0)
      (+ 3.0 (+ beta alpha))))))
assert(alpha < beta);
double code(double alpha, double beta) {
	double t_0 = (beta + alpha) + 2.0;
	double tmp;
	if (beta <= 4e+101) {
		tmp = (((fma(beta, alpha, (beta + alpha)) + 1.0) / t_0) / t_0) / (3.0 + (beta * ((alpha / beta) + 1.0)));
	} else {
		tmp = (((alpha + 1.0) - ((1.0 + alpha) * ((2.0 + alpha) / beta))) / t_0) / (3.0 + (beta + alpha));
	}
	return tmp;
}
alpha, beta = sort([alpha, beta])
function code(alpha, beta)
	t_0 = Float64(Float64(beta + alpha) + 2.0)
	tmp = 0.0
	if (beta <= 4e+101)
		tmp = Float64(Float64(Float64(Float64(fma(beta, alpha, Float64(beta + alpha)) + 1.0) / t_0) / t_0) / Float64(3.0 + Float64(beta * Float64(Float64(alpha / beta) + 1.0))));
	else
		tmp = Float64(Float64(Float64(Float64(alpha + 1.0) - Float64(Float64(1.0 + alpha) * Float64(Float64(2.0 + alpha) / beta))) / t_0) / Float64(3.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[(beta + alpha), $MachinePrecision] + 2.0), $MachinePrecision]}, If[LessEqual[beta, 4e+101], N[(N[(N[(N[(N[(beta * alpha + N[(beta + alpha), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision] / t$95$0), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(3.0 + N[(beta * N[(N[(alpha / beta), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(alpha + 1.0), $MachinePrecision] - N[(N[(1.0 + alpha), $MachinePrecision] * N[(N[(2.0 + alpha), $MachinePrecision] / beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(3.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
[alpha, beta] = \mathsf{sort}([alpha, beta])\\
\\
\begin{array}{l}
t_0 := \left(\beta + \alpha\right) + 2\\
\mathbf{if}\;\beta \leq 4 \cdot 10^{+101}:\\
\;\;\;\;\frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{t\_0}}{t\_0}}{3 + \beta \cdot \left(\frac{\alpha}{\beta} + 1\right)}\\

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


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

    1. Initial program 99.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. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

        \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
      3. +-commutativeN/A

        \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
      4. lift-*.f64N/A

        \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
      5. lower-fma.f64N/A

        \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
      6. +-commutativeN/A

        \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
      7. lower-+.f6499.3

        \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
      8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{3 + \beta \cdot \left(\frac{\alpha}{\beta} + 1\right)} \]
    7. Applied rewrites97.4%

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

    if 3.9999999999999999e101 < beta

    1. Initial program 78.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. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

        \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
      3. +-commutativeN/A

        \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
      4. lift-*.f64N/A

        \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
      5. lower-fma.f64N/A

        \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
      6. +-commutativeN/A

        \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
      7. lower-+.f6478.9

        \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
      8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
    4. Applied rewrites78.9%

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

      \[\leadsto \frac{\frac{\color{blue}{\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}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
    6. Step-by-step derivation
      1. +-commutativeN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{\frac{\left(\left(\frac{1 + \alpha}{\beta} + \alpha\right) + 1\right) - \left(1 + \alpha\right) \cdot \left(\color{blue}{2 \cdot \frac{1}{\beta}} + \frac{\alpha}{\beta}\right)}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
    7. Applied rewrites88.5%

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

      \[\leadsto \frac{\frac{\left(\alpha + 1\right) - \left(\color{blue}{1} + \alpha\right) \cdot \frac{2 + \alpha}{\beta}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
    9. Step-by-step derivation
      1. Applied rewrites88.5%

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

    Alternative 2: 99.7% accurate, 1.2× speedup?

    \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := 3 + \left(\beta + \alpha\right)\\ t_1 := \left(\beta + \alpha\right) + 2\\ \mathbf{if}\;\beta \leq 4 \cdot 10^{+101}:\\ \;\;\;\;\frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{t\_1}}{t\_1}}{t\_0}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\left(\alpha + 1\right) - \left(1 + \alpha\right) \cdot \frac{2 + \alpha}{\beta}}{t\_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 (+ 3.0 (+ beta alpha))) (t_1 (+ (+ beta alpha) 2.0)))
       (if (<= beta 4e+101)
         (/ (/ (/ (+ (fma beta alpha (+ beta alpha)) 1.0) t_1) t_1) t_0)
         (/
          (/ (- (+ alpha 1.0) (* (+ 1.0 alpha) (/ (+ 2.0 alpha) beta))) t_1)
          t_0))))
    assert(alpha < beta);
    double code(double alpha, double beta) {
    	double t_0 = 3.0 + (beta + alpha);
    	double t_1 = (beta + alpha) + 2.0;
    	double tmp;
    	if (beta <= 4e+101) {
    		tmp = (((fma(beta, alpha, (beta + alpha)) + 1.0) / t_1) / t_1) / t_0;
    	} else {
    		tmp = (((alpha + 1.0) - ((1.0 + alpha) * ((2.0 + alpha) / beta))) / t_1) / t_0;
    	}
    	return tmp;
    }
    
    alpha, beta = sort([alpha, beta])
    function code(alpha, beta)
    	t_0 = Float64(3.0 + Float64(beta + alpha))
    	t_1 = Float64(Float64(beta + alpha) + 2.0)
    	tmp = 0.0
    	if (beta <= 4e+101)
    		tmp = Float64(Float64(Float64(Float64(fma(beta, alpha, Float64(beta + alpha)) + 1.0) / t_1) / t_1) / t_0);
    	else
    		tmp = Float64(Float64(Float64(Float64(alpha + 1.0) - Float64(Float64(1.0 + alpha) * Float64(Float64(2.0 + alpha) / beta))) / t_1) / 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[(3.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(beta + alpha), $MachinePrecision] + 2.0), $MachinePrecision]}, If[LessEqual[beta, 4e+101], N[(N[(N[(N[(N[(beta * alpha + N[(beta + alpha), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision] / t$95$1), $MachinePrecision] / t$95$1), $MachinePrecision] / t$95$0), $MachinePrecision], N[(N[(N[(N[(alpha + 1.0), $MachinePrecision] - N[(N[(1.0 + alpha), $MachinePrecision] * N[(N[(2.0 + alpha), $MachinePrecision] / beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / t$95$1), $MachinePrecision] / t$95$0), $MachinePrecision]]]]
    
    \begin{array}{l}
    [alpha, beta] = \mathsf{sort}([alpha, beta])\\
    \\
    \begin{array}{l}
    t_0 := 3 + \left(\beta + \alpha\right)\\
    t_1 := \left(\beta + \alpha\right) + 2\\
    \mathbf{if}\;\beta \leq 4 \cdot 10^{+101}:\\
    \;\;\;\;\frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{t\_1}}{t\_1}}{t\_0}\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{\frac{\left(\alpha + 1\right) - \left(1 + \alpha\right) \cdot \frac{2 + \alpha}{\beta}}{t\_1}}{t\_0}\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if beta < 3.9999999999999999e101

      1. Initial program 99.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. Step-by-step derivation
        1. lift-+.f64N/A

          \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

          \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
        3. +-commutativeN/A

          \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
        4. lift-*.f64N/A

          \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
        5. lower-fma.f64N/A

          \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
        6. +-commutativeN/A

          \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
        7. lower-+.f6499.3

          \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
        8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

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

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

      if 3.9999999999999999e101 < beta

      1. Initial program 78.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. Step-by-step derivation
        1. lift-+.f64N/A

          \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

          \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
        3. +-commutativeN/A

          \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
        4. lift-*.f64N/A

          \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
        5. lower-fma.f64N/A

          \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
        6. +-commutativeN/A

          \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
        7. lower-+.f6478.9

          \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
        8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

          \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
      4. Applied rewrites78.9%

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

        \[\leadsto \frac{\frac{\color{blue}{\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}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
      6. Step-by-step derivation
        1. +-commutativeN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

          \[\leadsto \frac{\frac{\left(\left(\frac{1 + \alpha}{\beta} + \alpha\right) + 1\right) - \left(1 + \alpha\right) \cdot \left(\color{blue}{2 \cdot \frac{1}{\beta}} + \frac{\alpha}{\beta}\right)}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
      7. Applied rewrites88.5%

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

        \[\leadsto \frac{\frac{\left(\alpha + 1\right) - \left(\color{blue}{1} + \alpha\right) \cdot \frac{2 + \alpha}{\beta}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
      9. Step-by-step derivation
        1. Applied rewrites88.5%

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

      Alternative 3: 99.7% accurate, 1.2× speedup?

      \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := 3 + \left(\beta + \alpha\right)\\ t_1 := \left(\alpha + \beta\right) + 2\\ \mathbf{if}\;\beta \leq 1.7 \cdot 10^{+129}:\\ \;\;\;\;\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\right) + 1}{t\_1 \cdot t\_1}}{t\_0}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\left(\alpha + 1\right) - \left(1 + \alpha\right) \cdot \frac{2 + \alpha}{\beta}}{\left(\beta + \alpha\right) + 2}}{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 (+ 3.0 (+ beta alpha))) (t_1 (+ (+ alpha beta) 2.0)))
         (if (<= beta 1.7e+129)
           (/ (/ (+ (fma beta alpha (+ alpha beta)) 1.0) (* t_1 t_1)) t_0)
           (/
            (/
             (- (+ alpha 1.0) (* (+ 1.0 alpha) (/ (+ 2.0 alpha) beta)))
             (+ (+ beta alpha) 2.0))
            t_0))))
      assert(alpha < beta);
      double code(double alpha, double beta) {
      	double t_0 = 3.0 + (beta + alpha);
      	double t_1 = (alpha + beta) + 2.0;
      	double tmp;
      	if (beta <= 1.7e+129) {
      		tmp = ((fma(beta, alpha, (alpha + beta)) + 1.0) / (t_1 * t_1)) / t_0;
      	} else {
      		tmp = (((alpha + 1.0) - ((1.0 + alpha) * ((2.0 + alpha) / beta))) / ((beta + alpha) + 2.0)) / t_0;
      	}
      	return tmp;
      }
      
      alpha, beta = sort([alpha, beta])
      function code(alpha, beta)
      	t_0 = Float64(3.0 + Float64(beta + alpha))
      	t_1 = Float64(Float64(alpha + beta) + 2.0)
      	tmp = 0.0
      	if (beta <= 1.7e+129)
      		tmp = Float64(Float64(Float64(fma(beta, alpha, Float64(alpha + beta)) + 1.0) / Float64(t_1 * t_1)) / t_0);
      	else
      		tmp = Float64(Float64(Float64(Float64(alpha + 1.0) - Float64(Float64(1.0 + alpha) * Float64(Float64(2.0 + alpha) / beta))) / Float64(Float64(beta + alpha) + 2.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[(3.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(alpha + beta), $MachinePrecision] + 2.0), $MachinePrecision]}, If[LessEqual[beta, 1.7e+129], N[(N[(N[(N[(beta * alpha + N[(alpha + beta), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision] / N[(t$95$1 * t$95$1), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision], N[(N[(N[(N[(alpha + 1.0), $MachinePrecision] - N[(N[(1.0 + alpha), $MachinePrecision] * N[(N[(2.0 + alpha), $MachinePrecision] / beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(N[(beta + alpha), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision]]]]
      
      \begin{array}{l}
      [alpha, beta] = \mathsf{sort}([alpha, beta])\\
      \\
      \begin{array}{l}
      t_0 := 3 + \left(\beta + \alpha\right)\\
      t_1 := \left(\alpha + \beta\right) + 2\\
      \mathbf{if}\;\beta \leq 1.7 \cdot 10^{+129}:\\
      \;\;\;\;\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\right) + 1}{t\_1 \cdot t\_1}}{t\_0}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{\frac{\left(\alpha + 1\right) - \left(1 + \alpha\right) \cdot \frac{2 + \alpha}{\beta}}{\left(\beta + \alpha\right) + 2}}{t\_0}\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 2 regimes
      2. if beta < 1.70000000000000009e129

        1. Initial program 99.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. Step-by-step derivation
          1. lift-+.f64N/A

            \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

            \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
          3. +-commutativeN/A

            \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
          4. lift-*.f64N/A

            \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
          5. lower-fma.f64N/A

            \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
          6. +-commutativeN/A

            \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
          7. lower-+.f6499.3

            \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
          8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

            \[\leadsto \frac{\color{blue}{\frac{\left(\beta \cdot \alpha + \left(\beta + \alpha\right)\right) + 1}{\left(\left(\alpha + \beta\right) + 2\right) \cdot \left(\left(\alpha + \beta\right) + 2\right)}}}{3 + \left(\beta + \alpha\right)} \]
        6. Applied rewrites98.7%

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

        if 1.70000000000000009e129 < beta

        1. Initial program 76.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. lift-+.f64N/A

            \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

            \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
          3. +-commutativeN/A

            \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
          4. lift-*.f64N/A

            \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
          5. lower-fma.f64N/A

            \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
          6. +-commutativeN/A

            \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
          7. lower-+.f6476.7

            \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
          8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

            \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
        4. Applied rewrites76.7%

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

          \[\leadsto \frac{\frac{\color{blue}{\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}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
        6. Step-by-step derivation
          1. +-commutativeN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

            \[\leadsto \frac{\frac{\left(\left(\frac{1 + \alpha}{\beta} + \alpha\right) + 1\right) - \left(1 + \alpha\right) \cdot \left(\color{blue}{2 \cdot \frac{1}{\beta}} + \frac{\alpha}{\beta}\right)}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
        7. Applied rewrites87.3%

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

          \[\leadsto \frac{\frac{\left(\alpha + 1\right) - \left(\color{blue}{1} + \alpha\right) \cdot \frac{2 + \alpha}{\beta}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
        9. Step-by-step derivation
          1. Applied rewrites87.3%

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

        Alternative 4: 99.5% accurate, 1.3× speedup?

        \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2\\ \mathbf{if}\;\beta \leq 1.7 \cdot 10^{+129}:\\ \;\;\;\;\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\right) + 1}{t\_0 \cdot t\_0}}{3 + \left(\beta + \alpha\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{t\_0}}{\left(\alpha + \beta\right) + 3}\\ \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) 2.0)))
           (if (<= beta 1.7e+129)
             (/
              (/ (+ (fma beta alpha (+ alpha beta)) 1.0) (* t_0 t_0))
              (+ 3.0 (+ beta alpha)))
             (/ (/ (+ 1.0 alpha) t_0) (+ (+ alpha beta) 3.0)))))
        assert(alpha < beta);
        double code(double alpha, double beta) {
        	double t_0 = (alpha + beta) + 2.0;
        	double tmp;
        	if (beta <= 1.7e+129) {
        		tmp = ((fma(beta, alpha, (alpha + beta)) + 1.0) / (t_0 * t_0)) / (3.0 + (beta + alpha));
        	} else {
        		tmp = ((1.0 + alpha) / t_0) / ((alpha + beta) + 3.0);
        	}
        	return tmp;
        }
        
        alpha, beta = sort([alpha, beta])
        function code(alpha, beta)
        	t_0 = Float64(Float64(alpha + beta) + 2.0)
        	tmp = 0.0
        	if (beta <= 1.7e+129)
        		tmp = Float64(Float64(Float64(fma(beta, alpha, Float64(alpha + beta)) + 1.0) / Float64(t_0 * t_0)) / Float64(3.0 + Float64(beta + alpha)));
        	else
        		tmp = Float64(Float64(Float64(1.0 + alpha) / t_0) / Float64(Float64(alpha + beta) + 3.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[(N[(alpha + beta), $MachinePrecision] + 2.0), $MachinePrecision]}, If[LessEqual[beta, 1.7e+129], N[(N[(N[(N[(beta * alpha + N[(alpha + beta), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision] / N[(t$95$0 * t$95$0), $MachinePrecision]), $MachinePrecision] / N[(3.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(N[(alpha + beta), $MachinePrecision] + 3.0), $MachinePrecision]), $MachinePrecision]]]
        
        \begin{array}{l}
        [alpha, beta] = \mathsf{sort}([alpha, beta])\\
        \\
        \begin{array}{l}
        t_0 := \left(\alpha + \beta\right) + 2\\
        \mathbf{if}\;\beta \leq 1.7 \cdot 10^{+129}:\\
        \;\;\;\;\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\right) + 1}{t\_0 \cdot t\_0}}{3 + \left(\beta + \alpha\right)}\\
        
        \mathbf{else}:\\
        \;\;\;\;\frac{\frac{1 + \alpha}{t\_0}}{\left(\alpha + \beta\right) + 3}\\
        
        
        \end{array}
        \end{array}
        
        Derivation
        1. Split input into 2 regimes
        2. if beta < 1.70000000000000009e129

          1. Initial program 99.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. Step-by-step derivation
            1. lift-+.f64N/A

              \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

              \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
            3. +-commutativeN/A

              \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
            4. lift-*.f64N/A

              \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
            5. lower-fma.f64N/A

              \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
            6. +-commutativeN/A

              \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
            7. lower-+.f6499.3

              \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
            8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

              \[\leadsto \frac{\color{blue}{\frac{\left(\beta \cdot \alpha + \left(\beta + \alpha\right)\right) + 1}{\left(\left(\alpha + \beta\right) + 2\right) \cdot \left(\left(\alpha + \beta\right) + 2\right)}}}{3 + \left(\beta + \alpha\right)} \]
          6. Applied rewrites98.7%

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

          if 1.70000000000000009e129 < beta

          1. Initial program 76.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 \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
          4. Step-by-step derivation
            1. lower-+.f6487.5

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

            \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
          6. Step-by-step derivation
            1. metadata-eval87.5

              \[\leadsto \frac{\frac{1 + \alpha}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
          7. Applied rewrites87.5%

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

        Alternative 5: 97.6% accurate, 1.5× speedup?

        \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 4.6:\\ \;\;\;\;\frac{\frac{\frac{1 + \alpha}{2 + \alpha}}{\left(\beta + \alpha\right) + 2}}{3 + \alpha}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{\left(\alpha + \beta\right) + 2}}{\left(\alpha + \beta\right) + 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 4.6)
           (/ (/ (/ (+ 1.0 alpha) (+ 2.0 alpha)) (+ (+ beta alpha) 2.0)) (+ 3.0 alpha))
           (/ (/ (+ 1.0 alpha) (+ (+ alpha beta) 2.0)) (+ (+ alpha beta) 3.0))))
        assert(alpha < beta);
        double code(double alpha, double beta) {
        	double tmp;
        	if (beta <= 4.6) {
        		tmp = (((1.0 + alpha) / (2.0 + alpha)) / ((beta + alpha) + 2.0)) / (3.0 + alpha);
        	} else {
        		tmp = ((1.0 + alpha) / ((alpha + beta) + 2.0)) / ((alpha + beta) + 3.0);
        	}
        	return tmp;
        }
        
        NOTE: alpha and beta should be sorted in increasing order before calling this function.
        module fmin_fmax_functions
            implicit none
            private
            public fmax
            public fmin
        
            interface fmax
                module procedure fmax88
                module procedure fmax44
                module procedure fmax84
                module procedure fmax48
            end interface
            interface fmin
                module procedure fmin88
                module procedure fmin44
                module procedure fmin84
                module procedure fmin48
            end interface
        contains
            real(8) function fmax88(x, y) result (res)
                real(8), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(x, max(x, y), y /= y), x /= x)
            end function
            real(4) function fmax44(x, y) result (res)
                real(4), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(y, merge(x, max(x, y), y /= y), x /= x)
            end function
            real(8) function fmax84(x, y) result(res)
                real(8), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
            end function
            real(8) function fmax48(x, y) result(res)
                real(4), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
            end function
            real(8) function fmin88(x, y) result (res)
                real(8), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(x, min(x, y), y /= y), x /= x)
            end function
            real(4) function fmin44(x, y) result (res)
                real(4), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(y, merge(x, min(x, y), y /= y), x /= x)
            end function
            real(8) function fmin84(x, y) result(res)
                real(8), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
            end function
            real(8) function fmin48(x, y) result(res)
                real(4), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
            end function
        end module
        
        real(8) function code(alpha, beta)
        use fmin_fmax_functions
            real(8), intent (in) :: alpha
            real(8), intent (in) :: beta
            real(8) :: tmp
            if (beta <= 4.6d0) then
                tmp = (((1.0d0 + alpha) / (2.0d0 + alpha)) / ((beta + alpha) + 2.0d0)) / (3.0d0 + alpha)
            else
                tmp = ((1.0d0 + alpha) / ((alpha + beta) + 2.0d0)) / ((alpha + beta) + 3.0d0)
            end if
            code = tmp
        end function
        
        assert alpha < beta;
        public static double code(double alpha, double beta) {
        	double tmp;
        	if (beta <= 4.6) {
        		tmp = (((1.0 + alpha) / (2.0 + alpha)) / ((beta + alpha) + 2.0)) / (3.0 + alpha);
        	} else {
        		tmp = ((1.0 + alpha) / ((alpha + beta) + 2.0)) / ((alpha + beta) + 3.0);
        	}
        	return tmp;
        }
        
        [alpha, beta] = sort([alpha, beta])
        def code(alpha, beta):
        	tmp = 0
        	if beta <= 4.6:
        		tmp = (((1.0 + alpha) / (2.0 + alpha)) / ((beta + alpha) + 2.0)) / (3.0 + alpha)
        	else:
        		tmp = ((1.0 + alpha) / ((alpha + beta) + 2.0)) / ((alpha + beta) + 3.0)
        	return tmp
        
        alpha, beta = sort([alpha, beta])
        function code(alpha, beta)
        	tmp = 0.0
        	if (beta <= 4.6)
        		tmp = Float64(Float64(Float64(Float64(1.0 + alpha) / Float64(2.0 + alpha)) / Float64(Float64(beta + alpha) + 2.0)) / Float64(3.0 + alpha));
        	else
        		tmp = Float64(Float64(Float64(1.0 + alpha) / Float64(Float64(alpha + beta) + 2.0)) / Float64(Float64(alpha + beta) + 3.0));
        	end
        	return tmp
        end
        
        alpha, beta = num2cell(sort([alpha, beta])){:}
        function tmp_2 = code(alpha, beta)
        	tmp = 0.0;
        	if (beta <= 4.6)
        		tmp = (((1.0 + alpha) / (2.0 + alpha)) / ((beta + alpha) + 2.0)) / (3.0 + alpha);
        	else
        		tmp = ((1.0 + alpha) / ((alpha + beta) + 2.0)) / ((alpha + beta) + 3.0);
        	end
        	tmp_2 = tmp;
        end
        
        NOTE: alpha and beta should be sorted in increasing order before calling this function.
        code[alpha_, beta_] := If[LessEqual[beta, 4.6], N[(N[(N[(N[(1.0 + alpha), $MachinePrecision] / N[(2.0 + alpha), $MachinePrecision]), $MachinePrecision] / N[(N[(beta + alpha), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision] / N[(3.0 + alpha), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / N[(N[(alpha + beta), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision] / N[(N[(alpha + beta), $MachinePrecision] + 3.0), $MachinePrecision]), $MachinePrecision]]
        
        \begin{array}{l}
        [alpha, beta] = \mathsf{sort}([alpha, beta])\\
        \\
        \begin{array}{l}
        \mathbf{if}\;\beta \leq 4.6:\\
        \;\;\;\;\frac{\frac{\frac{1 + \alpha}{2 + \alpha}}{\left(\beta + \alpha\right) + 2}}{3 + \alpha}\\
        
        \mathbf{else}:\\
        \;\;\;\;\frac{\frac{1 + \alpha}{\left(\alpha + \beta\right) + 2}}{\left(\alpha + \beta\right) + 3}\\
        
        
        \end{array}
        \end{array}
        
        Derivation
        1. Split input into 2 regimes
        2. if beta < 4.5999999999999996

          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. Step-by-step derivation
            1. lift-+.f64N/A

              \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

              \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
            3. +-commutativeN/A

              \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
            4. lift-*.f64N/A

              \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
            5. lower-fma.f64N/A

              \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
            6. +-commutativeN/A

              \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
            7. lower-+.f6499.9

              \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
            8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

              \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
          4. Applied rewrites99.9%

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

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

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

              \[\leadsto \frac{\frac{\frac{1 + \alpha}{\color{blue}{2} + \alpha}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
            3. lower-+.f6497.3

              \[\leadsto \frac{\frac{\frac{1 + \alpha}{2 + \color{blue}{\alpha}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
          7. Applied rewrites97.3%

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

            \[\leadsto \frac{\frac{\frac{1 + \alpha}{2 + \alpha}}{\left(\beta + \alpha\right) + 2}}{3 + \color{blue}{\alpha}} \]
          9. Step-by-step derivation
            1. Applied rewrites97.4%

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

            if 4.5999999999999996 < beta

            1. Initial program 83.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 inf

              \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            4. Step-by-step derivation
              1. lower-+.f6480.4

                \[\leadsto \frac{\frac{1 + \color{blue}{\alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            5. Applied rewrites80.4%

              \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            6. Step-by-step derivation
              1. metadata-eval80.4

                \[\leadsto \frac{\frac{1 + \alpha}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            7. Applied rewrites80.4%

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

          Alternative 6: 98.4% accurate, 1.8× speedup?

          \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 2.5 \cdot 10^{+24}:\\ \;\;\;\;\frac{\frac{1 + \beta}{2 + \beta}}{\left(3 + \beta\right) \cdot \left(2 + \beta\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{\left(\alpha + \beta\right) + 2}}{\left(\alpha + \beta\right) + 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.5e+24)
             (/ (/ (+ 1.0 beta) (+ 2.0 beta)) (* (+ 3.0 beta) (+ 2.0 beta)))
             (/ (/ (+ 1.0 alpha) (+ (+ alpha beta) 2.0)) (+ (+ alpha beta) 3.0))))
          assert(alpha < beta);
          double code(double alpha, double beta) {
          	double tmp;
          	if (beta <= 2.5e+24) {
          		tmp = ((1.0 + beta) / (2.0 + beta)) / ((3.0 + beta) * (2.0 + beta));
          	} else {
          		tmp = ((1.0 + alpha) / ((alpha + beta) + 2.0)) / ((alpha + beta) + 3.0);
          	}
          	return tmp;
          }
          
          NOTE: alpha and beta should be sorted in increasing order before calling this function.
          module fmin_fmax_functions
              implicit none
              private
              public fmax
              public fmin
          
              interface fmax
                  module procedure fmax88
                  module procedure fmax44
                  module procedure fmax84
                  module procedure fmax48
              end interface
              interface fmin
                  module procedure fmin88
                  module procedure fmin44
                  module procedure fmin84
                  module procedure fmin48
              end interface
          contains
              real(8) function fmax88(x, y) result (res)
                  real(8), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(x, max(x, y), y /= y), x /= x)
              end function
              real(4) function fmax44(x, y) result (res)
                  real(4), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(y, merge(x, max(x, y), y /= y), x /= x)
              end function
              real(8) function fmax84(x, y) result(res)
                  real(8), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
              end function
              real(8) function fmax48(x, y) result(res)
                  real(4), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
              end function
              real(8) function fmin88(x, y) result (res)
                  real(8), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(x, min(x, y), y /= y), x /= x)
              end function
              real(4) function fmin44(x, y) result (res)
                  real(4), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(y, merge(x, min(x, y), y /= y), x /= x)
              end function
              real(8) function fmin84(x, y) result(res)
                  real(8), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
              end function
              real(8) function fmin48(x, y) result(res)
                  real(4), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
              end function
          end module
          
          real(8) function code(alpha, beta)
          use fmin_fmax_functions
              real(8), intent (in) :: alpha
              real(8), intent (in) :: beta
              real(8) :: tmp
              if (beta <= 2.5d+24) then
                  tmp = ((1.0d0 + beta) / (2.0d0 + beta)) / ((3.0d0 + beta) * (2.0d0 + beta))
              else
                  tmp = ((1.0d0 + alpha) / ((alpha + beta) + 2.0d0)) / ((alpha + beta) + 3.0d0)
              end if
              code = tmp
          end function
          
          assert alpha < beta;
          public static double code(double alpha, double beta) {
          	double tmp;
          	if (beta <= 2.5e+24) {
          		tmp = ((1.0 + beta) / (2.0 + beta)) / ((3.0 + beta) * (2.0 + beta));
          	} else {
          		tmp = ((1.0 + alpha) / ((alpha + beta) + 2.0)) / ((alpha + beta) + 3.0);
          	}
          	return tmp;
          }
          
          [alpha, beta] = sort([alpha, beta])
          def code(alpha, beta):
          	tmp = 0
          	if beta <= 2.5e+24:
          		tmp = ((1.0 + beta) / (2.0 + beta)) / ((3.0 + beta) * (2.0 + beta))
          	else:
          		tmp = ((1.0 + alpha) / ((alpha + beta) + 2.0)) / ((alpha + beta) + 3.0)
          	return tmp
          
          alpha, beta = sort([alpha, beta])
          function code(alpha, beta)
          	tmp = 0.0
          	if (beta <= 2.5e+24)
          		tmp = Float64(Float64(Float64(1.0 + beta) / Float64(2.0 + beta)) / Float64(Float64(3.0 + beta) * Float64(2.0 + beta)));
          	else
          		tmp = Float64(Float64(Float64(1.0 + alpha) / Float64(Float64(alpha + beta) + 2.0)) / Float64(Float64(alpha + beta) + 3.0));
          	end
          	return tmp
          end
          
          alpha, beta = num2cell(sort([alpha, beta])){:}
          function tmp_2 = code(alpha, beta)
          	tmp = 0.0;
          	if (beta <= 2.5e+24)
          		tmp = ((1.0 + beta) / (2.0 + beta)) / ((3.0 + beta) * (2.0 + beta));
          	else
          		tmp = ((1.0 + alpha) / ((alpha + beta) + 2.0)) / ((alpha + beta) + 3.0);
          	end
          	tmp_2 = tmp;
          end
          
          NOTE: alpha and beta should be sorted in increasing order before calling this function.
          code[alpha_, beta_] := If[LessEqual[beta, 2.5e+24], N[(N[(N[(1.0 + beta), $MachinePrecision] / N[(2.0 + beta), $MachinePrecision]), $MachinePrecision] / N[(N[(3.0 + beta), $MachinePrecision] * N[(2.0 + beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / N[(N[(alpha + beta), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision] / N[(N[(alpha + beta), $MachinePrecision] + 3.0), $MachinePrecision]), $MachinePrecision]]
          
          \begin{array}{l}
          [alpha, beta] = \mathsf{sort}([alpha, beta])\\
          \\
          \begin{array}{l}
          \mathbf{if}\;\beta \leq 2.5 \cdot 10^{+24}:\\
          \;\;\;\;\frac{\frac{1 + \beta}{2 + \beta}}{\left(3 + \beta\right) \cdot \left(2 + \beta\right)}\\
          
          \mathbf{else}:\\
          \;\;\;\;\frac{\frac{1 + \alpha}{\left(\alpha + \beta\right) + 2}}{\left(\alpha + \beta\right) + 3}\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 2 regimes
          2. if beta < 2.50000000000000023e24

            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. Step-by-step derivation
              1. lift-+.f64N/A

                \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
              3. +-commutativeN/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
              4. lift-*.f64N/A

                \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
              5. lower-fma.f64N/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
              6. +-commutativeN/A

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
              7. lower-+.f6499.9

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
              8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
            4. Applied rewrites99.9%

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

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

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

                \[\leadsto \frac{\frac{\frac{1 + \beta}{\color{blue}{2} + \beta}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
              3. lower-+.f6486.5

                \[\leadsto \frac{\frac{\frac{1 + \beta}{2 + \color{blue}{\beta}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
            7. Applied rewrites86.5%

              \[\leadsto \frac{\frac{\color{blue}{\frac{1 + \beta}{2 + \beta}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
            8. Step-by-step derivation
              1. lift-/.f64N/A

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

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

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{1 + \beta}{2 + \beta}}{\left(2 + \color{blue}{\left(\alpha + \beta\right)}\right) \cdot \left(3 + \left(\beta + \alpha\right)\right)} \]
            9. Applied rewrites86.5%

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

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

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

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

                \[\leadsto \frac{\frac{1 + \beta}{2 + \beta}}{\left(3 + \beta\right) \cdot \left(\color{blue}{2} + \beta\right)} \]
              4. lift-+.f6466.1

                \[\leadsto \frac{\frac{1 + \beta}{2 + \beta}}{\left(3 + \beta\right) \cdot \left(2 + \color{blue}{\beta}\right)} \]
            12. Applied rewrites66.1%

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

            if 2.50000000000000023e24 < beta

            1. Initial program 82.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 inf

              \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            4. Step-by-step derivation
              1. lower-+.f6482.5

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

              \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            6. Step-by-step derivation
              1. metadata-eval82.5

                \[\leadsto \frac{\frac{1 + \alpha}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            7. Applied rewrites82.5%

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

          Alternative 7: 97.2% accurate, 1.9× speedup?

          \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 3\\ t_1 := \left(\alpha + \beta\right) + 2\\ \mathbf{if}\;\beta \leq 2.9:\\ \;\;\;\;\frac{\mathsf{fma}\left(0.25, \beta, 0.5\right)}{t\_0 \cdot t\_1}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{t\_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 2.9)
               (/ (fma 0.25 beta 0.5) (* t_0 t_1))
               (/ (/ (+ 1.0 alpha) t_1) 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 <= 2.9) {
          		tmp = fma(0.25, beta, 0.5) / (t_0 * t_1);
          	} else {
          		tmp = ((1.0 + alpha) / t_1) / t_0;
          	}
          	return tmp;
          }
          
          alpha, beta = sort([alpha, beta])
          function code(alpha, beta)
          	t_0 = Float64(Float64(alpha + beta) + 3.0)
          	t_1 = Float64(Float64(alpha + beta) + 2.0)
          	tmp = 0.0
          	if (beta <= 2.9)
          		tmp = Float64(fma(0.25, beta, 0.5) / Float64(t_0 * t_1));
          	else
          		tmp = Float64(Float64(Float64(1.0 + alpha) / t_1) / 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[(N[(alpha + beta), $MachinePrecision] + 3.0), $MachinePrecision]}, Block[{t$95$1 = N[(N[(alpha + beta), $MachinePrecision] + 2.0), $MachinePrecision]}, If[LessEqual[beta, 2.9], N[(N[(0.25 * beta + 0.5), $MachinePrecision] / N[(t$95$0 * t$95$1), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / t$95$1), $MachinePrecision] / t$95$0), $MachinePrecision]]]]
          
          \begin{array}{l}
          [alpha, beta] = \mathsf{sort}([alpha, beta])\\
          \\
          \begin{array}{l}
          t_0 := \left(\alpha + \beta\right) + 3\\
          t_1 := \left(\alpha + \beta\right) + 2\\
          \mathbf{if}\;\beta \leq 2.9:\\
          \;\;\;\;\frac{\mathsf{fma}\left(0.25, \beta, 0.5\right)}{t\_0 \cdot t\_1}\\
          
          \mathbf{else}:\\
          \;\;\;\;\frac{\frac{1 + \alpha}{t\_1}}{t\_0}\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 2 regimes
          2. if beta < 2.89999999999999991

            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. Step-by-step derivation
              1. lift-+.f64N/A

                \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
              3. +-commutativeN/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
              4. lift-*.f64N/A

                \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
              5. lower-fma.f64N/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
              6. +-commutativeN/A

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
              7. lower-+.f6499.9

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
              8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
            4. Applied rewrites99.9%

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

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

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

                \[\leadsto \frac{\frac{\frac{1 + \beta}{\color{blue}{2} + \beta}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
              3. lower-+.f6486.7

                \[\leadsto \frac{\frac{\frac{1 + \beta}{2 + \color{blue}{\beta}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
            7. Applied rewrites86.7%

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

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

                \[\leadsto \frac{\frac{\frac{1}{4} \cdot \beta + \frac{1}{2}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
              2. lower-fma.f6485.8

                \[\leadsto \frac{\frac{\mathsf{fma}\left(0.25, \beta, 0.5\right)}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
            10. Applied rewrites85.8%

              \[\leadsto \frac{\frac{\mathsf{fma}\left(0.25, \color{blue}{\beta}, 0.5\right)}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
            11. Step-by-step derivation
              1. lift-/.f64N/A

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\mathsf{fma}\left(\frac{1}{4}, \beta, \frac{1}{2}\right)}{\left(2 + \left(\alpha + \beta\right)\right) \cdot \left(3 + \color{blue}{\left(\alpha + \beta\right)}\right)} \]
            12. Applied rewrites85.8%

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

            if 2.89999999999999991 < beta

            1. Initial program 83.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 inf

              \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            4. Step-by-step derivation
              1. lower-+.f6480.4

                \[\leadsto \frac{\frac{1 + \color{blue}{\alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            5. Applied rewrites80.4%

              \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            6. Step-by-step derivation
              1. metadata-eval80.4

                \[\leadsto \frac{\frac{1 + \alpha}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            7. Applied rewrites80.4%

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

          Alternative 8: 97.1% accurate, 2.0× speedup?

          \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 4.8:\\ \;\;\;\;\frac{\mathsf{fma}\left(0.25, \beta, 0.5\right)}{\left(\left(\alpha + \beta\right) + 3\right) \cdot \left(\left(\alpha + \beta\right) + 2\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{\beta}}{3 + \left(\beta + \alpha\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 4.8)
             (/ (fma 0.25 beta 0.5) (* (+ (+ alpha beta) 3.0) (+ (+ alpha beta) 2.0)))
             (/ (/ (+ 1.0 alpha) beta) (+ 3.0 (+ beta alpha)))))
          assert(alpha < beta);
          double code(double alpha, double beta) {
          	double tmp;
          	if (beta <= 4.8) {
          		tmp = fma(0.25, beta, 0.5) / (((alpha + beta) + 3.0) * ((alpha + beta) + 2.0));
          	} else {
          		tmp = ((1.0 + alpha) / beta) / (3.0 + (beta + alpha));
          	}
          	return tmp;
          }
          
          alpha, beta = sort([alpha, beta])
          function code(alpha, beta)
          	tmp = 0.0
          	if (beta <= 4.8)
          		tmp = Float64(fma(0.25, beta, 0.5) / Float64(Float64(Float64(alpha + beta) + 3.0) * Float64(Float64(alpha + beta) + 2.0)));
          	else
          		tmp = Float64(Float64(Float64(1.0 + alpha) / beta) / Float64(3.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, 4.8], N[(N[(0.25 * beta + 0.5), $MachinePrecision] / N[(N[(N[(alpha + beta), $MachinePrecision] + 3.0), $MachinePrecision] * N[(N[(alpha + beta), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / beta), $MachinePrecision] / N[(3.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
          
          \begin{array}{l}
          [alpha, beta] = \mathsf{sort}([alpha, beta])\\
          \\
          \begin{array}{l}
          \mathbf{if}\;\beta \leq 4.8:\\
          \;\;\;\;\frac{\mathsf{fma}\left(0.25, \beta, 0.5\right)}{\left(\left(\alpha + \beta\right) + 3\right) \cdot \left(\left(\alpha + \beta\right) + 2\right)}\\
          
          \mathbf{else}:\\
          \;\;\;\;\frac{\frac{1 + \alpha}{\beta}}{3 + \left(\beta + \alpha\right)}\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 2 regimes
          2. if beta < 4.79999999999999982

            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. Step-by-step derivation
              1. lift-+.f64N/A

                \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
              3. +-commutativeN/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
              4. lift-*.f64N/A

                \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
              5. lower-fma.f64N/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
              6. +-commutativeN/A

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
              7. lower-+.f6499.9

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
              8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
            4. Applied rewrites99.9%

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

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

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

                \[\leadsto \frac{\frac{\frac{1 + \beta}{\color{blue}{2} + \beta}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
              3. lower-+.f6486.7

                \[\leadsto \frac{\frac{\frac{1 + \beta}{2 + \color{blue}{\beta}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
            7. Applied rewrites86.7%

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

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

                \[\leadsto \frac{\frac{\frac{1}{4} \cdot \beta + \frac{1}{2}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
              2. lower-fma.f6485.8

                \[\leadsto \frac{\frac{\mathsf{fma}\left(0.25, \beta, 0.5\right)}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
            10. Applied rewrites85.8%

              \[\leadsto \frac{\frac{\mathsf{fma}\left(0.25, \color{blue}{\beta}, 0.5\right)}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
            11. Step-by-step derivation
              1. lift-/.f64N/A

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\mathsf{fma}\left(\frac{1}{4}, \beta, \frac{1}{2}\right)}{\left(2 + \left(\alpha + \beta\right)\right) \cdot \left(3 + \color{blue}{\left(\alpha + \beta\right)}\right)} \]
            12. Applied rewrites85.8%

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

            if 4.79999999999999982 < beta

            1. Initial program 83.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. Step-by-step derivation
              1. lift-+.f64N/A

                \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
              3. +-commutativeN/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
              4. lift-*.f64N/A

                \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
              5. lower-fma.f64N/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
              6. +-commutativeN/A

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
              7. lower-+.f6483.9

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
              8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
            4. Applied rewrites83.9%

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

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

                \[\leadsto \frac{\frac{1 + \alpha}{\color{blue}{\beta}}}{3 + \left(\beta + \alpha\right)} \]
              2. lift-+.f6479.9

                \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{3 + \left(\beta + \alpha\right)} \]
            7. Applied rewrites79.9%

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

          Alternative 9: 96.7% accurate, 2.2× speedup?

          \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 12:\\ \;\;\;\;\frac{0.5}{\left(2 + \left(\alpha + \beta\right)\right) \cdot \left(3 + \left(\alpha + \beta\right)\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{\beta}}{3 + \left(\beta + \alpha\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 12.0)
             (/ 0.5 (* (+ 2.0 (+ alpha beta)) (+ 3.0 (+ alpha beta))))
             (/ (/ (+ 1.0 alpha) beta) (+ 3.0 (+ beta alpha)))))
          assert(alpha < beta);
          double code(double alpha, double beta) {
          	double tmp;
          	if (beta <= 12.0) {
          		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)));
          	} else {
          		tmp = ((1.0 + alpha) / beta) / (3.0 + (beta + alpha));
          	}
          	return tmp;
          }
          
          NOTE: alpha and beta should be sorted in increasing order before calling this function.
          module fmin_fmax_functions
              implicit none
              private
              public fmax
              public fmin
          
              interface fmax
                  module procedure fmax88
                  module procedure fmax44
                  module procedure fmax84
                  module procedure fmax48
              end interface
              interface fmin
                  module procedure fmin88
                  module procedure fmin44
                  module procedure fmin84
                  module procedure fmin48
              end interface
          contains
              real(8) function fmax88(x, y) result (res)
                  real(8), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(x, max(x, y), y /= y), x /= x)
              end function
              real(4) function fmax44(x, y) result (res)
                  real(4), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(y, merge(x, max(x, y), y /= y), x /= x)
              end function
              real(8) function fmax84(x, y) result(res)
                  real(8), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
              end function
              real(8) function fmax48(x, y) result(res)
                  real(4), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
              end function
              real(8) function fmin88(x, y) result (res)
                  real(8), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(x, min(x, y), y /= y), x /= x)
              end function
              real(4) function fmin44(x, y) result (res)
                  real(4), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(y, merge(x, min(x, y), y /= y), x /= x)
              end function
              real(8) function fmin84(x, y) result(res)
                  real(8), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
              end function
              real(8) function fmin48(x, y) result(res)
                  real(4), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
              end function
          end module
          
          real(8) function code(alpha, beta)
          use fmin_fmax_functions
              real(8), intent (in) :: alpha
              real(8), intent (in) :: beta
              real(8) :: tmp
              if (beta <= 12.0d0) then
                  tmp = 0.5d0 / ((2.0d0 + (alpha + beta)) * (3.0d0 + (alpha + beta)))
              else
                  tmp = ((1.0d0 + alpha) / beta) / (3.0d0 + (beta + alpha))
              end if
              code = tmp
          end function
          
          assert alpha < beta;
          public static double code(double alpha, double beta) {
          	double tmp;
          	if (beta <= 12.0) {
          		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)));
          	} else {
          		tmp = ((1.0 + alpha) / beta) / (3.0 + (beta + alpha));
          	}
          	return tmp;
          }
          
          [alpha, beta] = sort([alpha, beta])
          def code(alpha, beta):
          	tmp = 0
          	if beta <= 12.0:
          		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)))
          	else:
          		tmp = ((1.0 + alpha) / beta) / (3.0 + (beta + alpha))
          	return tmp
          
          alpha, beta = sort([alpha, beta])
          function code(alpha, beta)
          	tmp = 0.0
          	if (beta <= 12.0)
          		tmp = Float64(0.5 / Float64(Float64(2.0 + Float64(alpha + beta)) * Float64(3.0 + Float64(alpha + beta))));
          	else
          		tmp = Float64(Float64(Float64(1.0 + alpha) / beta) / Float64(3.0 + Float64(beta + alpha)));
          	end
          	return tmp
          end
          
          alpha, beta = num2cell(sort([alpha, beta])){:}
          function tmp_2 = code(alpha, beta)
          	tmp = 0.0;
          	if (beta <= 12.0)
          		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)));
          	else
          		tmp = ((1.0 + alpha) / beta) / (3.0 + (beta + alpha));
          	end
          	tmp_2 = tmp;
          end
          
          NOTE: alpha and beta should be sorted in increasing order before calling this function.
          code[alpha_, beta_] := If[LessEqual[beta, 12.0], N[(0.5 / N[(N[(2.0 + N[(alpha + beta), $MachinePrecision]), $MachinePrecision] * N[(3.0 + N[(alpha + beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / beta), $MachinePrecision] / N[(3.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
          
          \begin{array}{l}
          [alpha, beta] = \mathsf{sort}([alpha, beta])\\
          \\
          \begin{array}{l}
          \mathbf{if}\;\beta \leq 12:\\
          \;\;\;\;\frac{0.5}{\left(2 + \left(\alpha + \beta\right)\right) \cdot \left(3 + \left(\alpha + \beta\right)\right)}\\
          
          \mathbf{else}:\\
          \;\;\;\;\frac{\frac{1 + \alpha}{\beta}}{3 + \left(\beta + \alpha\right)}\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 2 regimes
          2. if beta < 12

            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. Step-by-step derivation
              1. lift-+.f64N/A

                \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
              3. +-commutativeN/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
              4. lift-*.f64N/A

                \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
              5. lower-fma.f64N/A

                \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
              6. +-commutativeN/A

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
              7. lower-+.f6499.9

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
              8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
            4. Applied rewrites99.9%

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

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

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

                \[\leadsto \frac{\frac{\frac{1 + \beta}{\color{blue}{2} + \beta}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
              3. lower-+.f6486.7

                \[\leadsto \frac{\frac{\frac{1 + \beta}{2 + \color{blue}{\beta}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
            7. Applied rewrites86.7%

              \[\leadsto \frac{\frac{\color{blue}{\frac{1 + \beta}{2 + \beta}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
            8. Step-by-step derivation
              1. lift-/.f64N/A

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

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

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{1 + \beta}{2 + \beta}}{\left(2 + \color{blue}{\left(\alpha + \beta\right)}\right) \cdot \left(3 + \left(\beta + \alpha\right)\right)} \]
            9. Applied rewrites86.7%

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

              \[\leadsto \frac{\frac{1}{2}}{\left(2 + \left(\alpha + \beta\right)\right) \cdot \left(3 + \left(\alpha + \beta\right)\right)} \]
            11. Step-by-step derivation
              1. Applied rewrites84.9%

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

              if 12 < beta

              1. Initial program 83.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. Step-by-step derivation
                1. lift-+.f64N/A

                  \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

                  \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
                3. +-commutativeN/A

                  \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
                4. lift-*.f64N/A

                  \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
                5. lower-fma.f64N/A

                  \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
                6. +-commutativeN/A

                  \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
                7. lower-+.f6483.9

                  \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
                8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

                  \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
              4. Applied rewrites83.9%

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

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

                  \[\leadsto \frac{\frac{1 + \alpha}{\color{blue}{\beta}}}{3 + \left(\beta + \alpha\right)} \]
                2. lift-+.f6479.9

                  \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{3 + \left(\beta + \alpha\right)} \]
              7. Applied rewrites79.9%

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

            Alternative 10: 96.7% accurate, 2.4× speedup?

            \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 12:\\ \;\;\;\;\frac{0.5}{\left(2 + \left(\alpha + \beta\right)\right) \cdot \left(3 + \left(\alpha + \beta\right)\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{\beta}}{3 + \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 12.0)
               (/ 0.5 (* (+ 2.0 (+ alpha beta)) (+ 3.0 (+ alpha beta))))
               (/ (/ (+ 1.0 alpha) beta) (+ 3.0 beta))))
            assert(alpha < beta);
            double code(double alpha, double beta) {
            	double tmp;
            	if (beta <= 12.0) {
            		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)));
            	} else {
            		tmp = ((1.0 + alpha) / beta) / (3.0 + beta);
            	}
            	return tmp;
            }
            
            NOTE: alpha and beta should be sorted in increasing order before calling this function.
            module fmin_fmax_functions
                implicit none
                private
                public fmax
                public fmin
            
                interface fmax
                    module procedure fmax88
                    module procedure fmax44
                    module procedure fmax84
                    module procedure fmax48
                end interface
                interface fmin
                    module procedure fmin88
                    module procedure fmin44
                    module procedure fmin84
                    module procedure fmin48
                end interface
            contains
                real(8) function fmax88(x, y) result (res)
                    real(8), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                end function
                real(4) function fmax44(x, y) result (res)
                    real(4), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                end function
                real(8) function fmax84(x, y) result(res)
                    real(8), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                end function
                real(8) function fmax48(x, y) result(res)
                    real(4), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                end function
                real(8) function fmin88(x, y) result (res)
                    real(8), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                end function
                real(4) function fmin44(x, y) result (res)
                    real(4), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                end function
                real(8) function fmin84(x, y) result(res)
                    real(8), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                end function
                real(8) function fmin48(x, y) result(res)
                    real(4), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                end function
            end module
            
            real(8) function code(alpha, beta)
            use fmin_fmax_functions
                real(8), intent (in) :: alpha
                real(8), intent (in) :: beta
                real(8) :: tmp
                if (beta <= 12.0d0) then
                    tmp = 0.5d0 / ((2.0d0 + (alpha + beta)) * (3.0d0 + (alpha + beta)))
                else
                    tmp = ((1.0d0 + alpha) / beta) / (3.0d0 + beta)
                end if
                code = tmp
            end function
            
            assert alpha < beta;
            public static double code(double alpha, double beta) {
            	double tmp;
            	if (beta <= 12.0) {
            		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)));
            	} else {
            		tmp = ((1.0 + alpha) / beta) / (3.0 + beta);
            	}
            	return tmp;
            }
            
            [alpha, beta] = sort([alpha, beta])
            def code(alpha, beta):
            	tmp = 0
            	if beta <= 12.0:
            		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)))
            	else:
            		tmp = ((1.0 + alpha) / beta) / (3.0 + beta)
            	return tmp
            
            alpha, beta = sort([alpha, beta])
            function code(alpha, beta)
            	tmp = 0.0
            	if (beta <= 12.0)
            		tmp = Float64(0.5 / Float64(Float64(2.0 + Float64(alpha + beta)) * Float64(3.0 + Float64(alpha + beta))));
            	else
            		tmp = Float64(Float64(Float64(1.0 + alpha) / beta) / Float64(3.0 + beta));
            	end
            	return tmp
            end
            
            alpha, beta = num2cell(sort([alpha, beta])){:}
            function tmp_2 = code(alpha, beta)
            	tmp = 0.0;
            	if (beta <= 12.0)
            		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)));
            	else
            		tmp = ((1.0 + alpha) / beta) / (3.0 + beta);
            	end
            	tmp_2 = tmp;
            end
            
            NOTE: alpha and beta should be sorted in increasing order before calling this function.
            code[alpha_, beta_] := If[LessEqual[beta, 12.0], N[(0.5 / N[(N[(2.0 + N[(alpha + beta), $MachinePrecision]), $MachinePrecision] * N[(3.0 + N[(alpha + beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / beta), $MachinePrecision] / N[(3.0 + beta), $MachinePrecision]), $MachinePrecision]]
            
            \begin{array}{l}
            [alpha, beta] = \mathsf{sort}([alpha, beta])\\
            \\
            \begin{array}{l}
            \mathbf{if}\;\beta \leq 12:\\
            \;\;\;\;\frac{0.5}{\left(2 + \left(\alpha + \beta\right)\right) \cdot \left(3 + \left(\alpha + \beta\right)\right)}\\
            
            \mathbf{else}:\\
            \;\;\;\;\frac{\frac{1 + \alpha}{\beta}}{3 + \beta}\\
            
            
            \end{array}
            \end{array}
            
            Derivation
            1. Split input into 2 regimes
            2. if beta < 12

              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. Step-by-step derivation
                1. lift-+.f64N/A

                  \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

                  \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
                3. +-commutativeN/A

                  \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
                4. lift-*.f64N/A

                  \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
                5. lower-fma.f64N/A

                  \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
                6. +-commutativeN/A

                  \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
                7. lower-+.f6499.9

                  \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
                8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

                  \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
              4. Applied rewrites99.9%

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

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

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

                  \[\leadsto \frac{\frac{\frac{1 + \beta}{\color{blue}{2} + \beta}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
                3. lower-+.f6486.7

                  \[\leadsto \frac{\frac{\frac{1 + \beta}{2 + \color{blue}{\beta}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
              7. Applied rewrites86.7%

                \[\leadsto \frac{\frac{\color{blue}{\frac{1 + \beta}{2 + \beta}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
              8. Step-by-step derivation
                1. lift-/.f64N/A

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

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

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

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

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

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

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

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

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

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

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

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

                  \[\leadsto \frac{\frac{1 + \beta}{2 + \beta}}{\left(2 + \color{blue}{\left(\alpha + \beta\right)}\right) \cdot \left(3 + \left(\beta + \alpha\right)\right)} \]
              9. Applied rewrites86.7%

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

                \[\leadsto \frac{\frac{1}{2}}{\left(2 + \left(\alpha + \beta\right)\right) \cdot \left(3 + \left(\alpha + \beta\right)\right)} \]
              11. Step-by-step derivation
                1. Applied rewrites84.9%

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

                if 12 < beta

                1. Initial program 83.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. Step-by-step derivation
                  1. lift-+.f64N/A

                    \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

                    \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
                  3. +-commutativeN/A

                    \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
                  4. lift-*.f64N/A

                    \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
                  5. lower-fma.f64N/A

                    \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
                  6. +-commutativeN/A

                    \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
                  7. lower-+.f6483.9

                    \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
                  8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

                    \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
                4. Applied rewrites83.9%

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

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

                    \[\leadsto \frac{\frac{1 + \alpha}{\color{blue}{\beta}}}{3 + \left(\beta + \alpha\right)} \]
                  2. lift-+.f6479.9

                    \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{3 + \left(\beta + \alpha\right)} \]
                7. Applied rewrites79.9%

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

                  \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{3 + \color{blue}{\beta}} \]
                9. Step-by-step derivation
                  1. Applied rewrites79.7%

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

                Alternative 11: 96.7% accurate, 2.4× speedup?

                \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 13.5:\\ \;\;\;\;\frac{0.5}{\left(2 + \left(\alpha + \beta\right)\right) \cdot \left(3 + \left(\alpha + \beta\right)\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{\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 13.5)
                   (/ 0.5 (* (+ 2.0 (+ alpha beta)) (+ 3.0 (+ alpha beta))))
                   (/ (/ (+ 1.0 alpha) beta) beta)))
                assert(alpha < beta);
                double code(double alpha, double beta) {
                	double tmp;
                	if (beta <= 13.5) {
                		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)));
                	} else {
                		tmp = ((1.0 + alpha) / beta) / beta;
                	}
                	return tmp;
                }
                
                NOTE: alpha and beta should be sorted in increasing order before calling this function.
                module fmin_fmax_functions
                    implicit none
                    private
                    public fmax
                    public fmin
                
                    interface fmax
                        module procedure fmax88
                        module procedure fmax44
                        module procedure fmax84
                        module procedure fmax48
                    end interface
                    interface fmin
                        module procedure fmin88
                        module procedure fmin44
                        module procedure fmin84
                        module procedure fmin48
                    end interface
                contains
                    real(8) function fmax88(x, y) result (res)
                        real(8), intent (in) :: x
                        real(8), intent (in) :: y
                        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                    end function
                    real(4) function fmax44(x, y) result (res)
                        real(4), intent (in) :: x
                        real(4), intent (in) :: y
                        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                    end function
                    real(8) function fmax84(x, y) result(res)
                        real(8), intent (in) :: x
                        real(4), intent (in) :: y
                        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                    end function
                    real(8) function fmax48(x, y) result(res)
                        real(4), intent (in) :: x
                        real(8), intent (in) :: y
                        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                    end function
                    real(8) function fmin88(x, y) result (res)
                        real(8), intent (in) :: x
                        real(8), intent (in) :: y
                        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                    end function
                    real(4) function fmin44(x, y) result (res)
                        real(4), intent (in) :: x
                        real(4), intent (in) :: y
                        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                    end function
                    real(8) function fmin84(x, y) result(res)
                        real(8), intent (in) :: x
                        real(4), intent (in) :: y
                        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                    end function
                    real(8) function fmin48(x, y) result(res)
                        real(4), intent (in) :: x
                        real(8), intent (in) :: y
                        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                    end function
                end module
                
                real(8) function code(alpha, beta)
                use fmin_fmax_functions
                    real(8), intent (in) :: alpha
                    real(8), intent (in) :: beta
                    real(8) :: tmp
                    if (beta <= 13.5d0) then
                        tmp = 0.5d0 / ((2.0d0 + (alpha + beta)) * (3.0d0 + (alpha + beta)))
                    else
                        tmp = ((1.0d0 + alpha) / beta) / beta
                    end if
                    code = tmp
                end function
                
                assert alpha < beta;
                public static double code(double alpha, double beta) {
                	double tmp;
                	if (beta <= 13.5) {
                		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)));
                	} else {
                		tmp = ((1.0 + alpha) / beta) / beta;
                	}
                	return tmp;
                }
                
                [alpha, beta] = sort([alpha, beta])
                def code(alpha, beta):
                	tmp = 0
                	if beta <= 13.5:
                		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)))
                	else:
                		tmp = ((1.0 + alpha) / beta) / beta
                	return tmp
                
                alpha, beta = sort([alpha, beta])
                function code(alpha, beta)
                	tmp = 0.0
                	if (beta <= 13.5)
                		tmp = Float64(0.5 / Float64(Float64(2.0 + Float64(alpha + beta)) * Float64(3.0 + Float64(alpha + beta))));
                	else
                		tmp = Float64(Float64(Float64(1.0 + alpha) / beta) / beta);
                	end
                	return tmp
                end
                
                alpha, beta = num2cell(sort([alpha, beta])){:}
                function tmp_2 = code(alpha, beta)
                	tmp = 0.0;
                	if (beta <= 13.5)
                		tmp = 0.5 / ((2.0 + (alpha + beta)) * (3.0 + (alpha + beta)));
                	else
                		tmp = ((1.0 + alpha) / beta) / beta;
                	end
                	tmp_2 = tmp;
                end
                
                NOTE: alpha and beta should be sorted in increasing order before calling this function.
                code[alpha_, beta_] := If[LessEqual[beta, 13.5], N[(0.5 / N[(N[(2.0 + N[(alpha + beta), $MachinePrecision]), $MachinePrecision] * N[(3.0 + N[(alpha + beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / beta), $MachinePrecision] / beta), $MachinePrecision]]
                
                \begin{array}{l}
                [alpha, beta] = \mathsf{sort}([alpha, beta])\\
                \\
                \begin{array}{l}
                \mathbf{if}\;\beta \leq 13.5:\\
                \;\;\;\;\frac{0.5}{\left(2 + \left(\alpha + \beta\right)\right) \cdot \left(3 + \left(\alpha + \beta\right)\right)}\\
                
                \mathbf{else}:\\
                \;\;\;\;\frac{\frac{1 + \alpha}{\beta}}{\beta}\\
                
                
                \end{array}
                \end{array}
                
                Derivation
                1. Split input into 2 regimes
                2. if beta < 13.5

                  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. Step-by-step derivation
                    1. lift-+.f64N/A

                      \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\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. lift-+.f64N/A

                      \[\leadsto \frac{\frac{\frac{\color{blue}{\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} \]
                    3. +-commutativeN/A

                      \[\leadsto \frac{\frac{\frac{\color{blue}{\left(\beta \cdot \alpha + \left(\alpha + \beta\right)\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} \]
                    4. lift-*.f64N/A

                      \[\leadsto \frac{\frac{\frac{\left(\color{blue}{\beta \cdot \alpha} + \left(\alpha + \beta\right)\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} \]
                    5. lower-fma.f64N/A

                      \[\leadsto \frac{\frac{\frac{\color{blue}{\mathsf{fma}\left(\beta, \alpha, \alpha + \beta\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} \]
                    6. +-commutativeN/A

                      \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
                    7. lower-+.f6499.9

                      \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \color{blue}{\beta + \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} \]
                    8. lift-+.f64N/A

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

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

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

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

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

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

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

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

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

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

                      \[\leadsto \frac{\frac{\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) + 1}{\left(\beta + \alpha\right) + 2}}{\left(\beta + \alpha\right) + 2}}{\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}} \]
                  4. Applied rewrites99.9%

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

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

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

                      \[\leadsto \frac{\frac{\frac{1 + \beta}{\color{blue}{2} + \beta}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
                    3. lower-+.f6486.7

                      \[\leadsto \frac{\frac{\frac{1 + \beta}{2 + \color{blue}{\beta}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
                  7. Applied rewrites86.7%

                    \[\leadsto \frac{\frac{\color{blue}{\frac{1 + \beta}{2 + \beta}}}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)} \]
                  8. Step-by-step derivation
                    1. lift-/.f64N/A

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

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

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

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

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

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

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

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

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

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

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

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

                      \[\leadsto \frac{\frac{1 + \beta}{2 + \beta}}{\left(2 + \color{blue}{\left(\alpha + \beta\right)}\right) \cdot \left(3 + \left(\beta + \alpha\right)\right)} \]
                  9. Applied rewrites86.7%

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

                    \[\leadsto \frac{\frac{1}{2}}{\left(2 + \left(\alpha + \beta\right)\right) \cdot \left(3 + \left(\alpha + \beta\right)\right)} \]
                  11. Step-by-step derivation
                    1. Applied rewrites84.9%

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

                    if 13.5 < beta

                    1. Initial program 83.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 inf

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

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

                        \[\leadsto \frac{1 + \alpha}{{\color{blue}{\beta}}^{2}} \]
                      3. unpow2N/A

                        \[\leadsto \frac{1 + \alpha}{\beta \cdot \color{blue}{\beta}} \]
                      4. lower-*.f6482.4

                        \[\leadsto \frac{1 + \alpha}{\beta \cdot \color{blue}{\beta}} \]
                    5. Applied rewrites82.4%

                      \[\leadsto \color{blue}{\frac{1 + \alpha}{\beta \cdot \beta}} \]
                    6. Step-by-step derivation
                      1. lift-+.f64N/A

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

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

                        \[\leadsto \frac{1 + \alpha}{\color{blue}{\beta \cdot \beta}} \]
                      4. associate-/r*N/A

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

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

                        \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{\beta} \]
                      7. lift-+.f6479.7

                        \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{\beta} \]
                    7. Applied rewrites79.7%

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

                  Alternative 12: 55.9% accurate, 3.2× speedup?

                  \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \frac{\frac{1 + \alpha}{\beta}}{\beta} \end{array} \]
                  NOTE: alpha and beta should be sorted in increasing order before calling this function.
                  (FPCore (alpha beta) :precision binary64 (/ (/ (+ 1.0 alpha) beta) beta))
                  assert(alpha < beta);
                  double code(double alpha, double beta) {
                  	return ((1.0 + alpha) / beta) / beta;
                  }
                  
                  NOTE: alpha and beta should be sorted in increasing order before calling this function.
                  module fmin_fmax_functions
                      implicit none
                      private
                      public fmax
                      public fmin
                  
                      interface fmax
                          module procedure fmax88
                          module procedure fmax44
                          module procedure fmax84
                          module procedure fmax48
                      end interface
                      interface fmin
                          module procedure fmin88
                          module procedure fmin44
                          module procedure fmin84
                          module procedure fmin48
                      end interface
                  contains
                      real(8) function fmax88(x, y) result (res)
                          real(8), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                      end function
                      real(4) function fmax44(x, y) result (res)
                          real(4), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                      end function
                      real(8) function fmax84(x, y) result(res)
                          real(8), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                      end function
                      real(8) function fmax48(x, y) result(res)
                          real(4), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                      end function
                      real(8) function fmin88(x, y) result (res)
                          real(8), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                      end function
                      real(4) function fmin44(x, y) result (res)
                          real(4), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                      end function
                      real(8) function fmin84(x, y) result(res)
                          real(8), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                      end function
                      real(8) function fmin48(x, y) result(res)
                          real(4), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                      end function
                  end module
                  
                  real(8) function code(alpha, beta)
                  use fmin_fmax_functions
                      real(8), intent (in) :: alpha
                      real(8), intent (in) :: beta
                      code = ((1.0d0 + alpha) / beta) / beta
                  end function
                  
                  assert alpha < beta;
                  public static double code(double alpha, double beta) {
                  	return ((1.0 + alpha) / beta) / beta;
                  }
                  
                  [alpha, beta] = sort([alpha, beta])
                  def code(alpha, beta):
                  	return ((1.0 + alpha) / beta) / beta
                  
                  alpha, beta = sort([alpha, beta])
                  function code(alpha, beta)
                  	return Float64(Float64(Float64(1.0 + alpha) / beta) / beta)
                  end
                  
                  alpha, beta = num2cell(sort([alpha, beta])){:}
                  function tmp = code(alpha, beta)
                  	tmp = ((1.0 + alpha) / beta) / beta;
                  end
                  
                  NOTE: alpha and beta should be sorted in increasing order before calling this function.
                  code[alpha_, beta_] := N[(N[(N[(1.0 + alpha), $MachinePrecision] / beta), $MachinePrecision] / beta), $MachinePrecision]
                  
                  \begin{array}{l}
                  [alpha, beta] = \mathsf{sort}([alpha, beta])\\
                  \\
                  \frac{\frac{1 + \alpha}{\beta}}{\beta}
                  \end{array}
                  
                  Derivation
                  1. Initial program 94.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. lower-/.f64N/A

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

                      \[\leadsto \frac{1 + \alpha}{{\color{blue}{\beta}}^{2}} \]
                    3. unpow2N/A

                      \[\leadsto \frac{1 + \alpha}{\beta \cdot \color{blue}{\beta}} \]
                    4. lower-*.f6430.4

                      \[\leadsto \frac{1 + \alpha}{\beta \cdot \color{blue}{\beta}} \]
                  5. Applied rewrites30.4%

                    \[\leadsto \color{blue}{\frac{1 + \alpha}{\beta \cdot \beta}} \]
                  6. Step-by-step derivation
                    1. lift-+.f64N/A

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

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

                      \[\leadsto \frac{1 + \alpha}{\color{blue}{\beta \cdot \beta}} \]
                    4. associate-/r*N/A

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

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

                      \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{\beta} \]
                    7. lift-+.f6429.4

                      \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{\beta} \]
                  7. Applied rewrites29.4%

                    \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{\color{blue}{\beta}} \]
                  8. Add Preprocessing

                  Alternative 13: 53.1% accurate, 4.2× speedup?

                  \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \frac{1 + \alpha}{\beta \cdot \beta} \end{array} \]
                  NOTE: alpha and beta should be sorted in increasing order before calling this function.
                  (FPCore (alpha beta) :precision binary64 (/ (+ 1.0 alpha) (* beta beta)))
                  assert(alpha < beta);
                  double code(double alpha, double beta) {
                  	return (1.0 + alpha) / (beta * beta);
                  }
                  
                  NOTE: alpha and beta should be sorted in increasing order before calling this function.
                  module fmin_fmax_functions
                      implicit none
                      private
                      public fmax
                      public fmin
                  
                      interface fmax
                          module procedure fmax88
                          module procedure fmax44
                          module procedure fmax84
                          module procedure fmax48
                      end interface
                      interface fmin
                          module procedure fmin88
                          module procedure fmin44
                          module procedure fmin84
                          module procedure fmin48
                      end interface
                  contains
                      real(8) function fmax88(x, y) result (res)
                          real(8), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                      end function
                      real(4) function fmax44(x, y) result (res)
                          real(4), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                      end function
                      real(8) function fmax84(x, y) result(res)
                          real(8), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                      end function
                      real(8) function fmax48(x, y) result(res)
                          real(4), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                      end function
                      real(8) function fmin88(x, y) result (res)
                          real(8), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                      end function
                      real(4) function fmin44(x, y) result (res)
                          real(4), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                      end function
                      real(8) function fmin84(x, y) result(res)
                          real(8), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                      end function
                      real(8) function fmin48(x, y) result(res)
                          real(4), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                      end function
                  end module
                  
                  real(8) function code(alpha, beta)
                  use fmin_fmax_functions
                      real(8), intent (in) :: alpha
                      real(8), intent (in) :: beta
                      code = (1.0d0 + alpha) / (beta * beta)
                  end function
                  
                  assert alpha < beta;
                  public static double code(double alpha, double beta) {
                  	return (1.0 + alpha) / (beta * beta);
                  }
                  
                  [alpha, beta] = sort([alpha, beta])
                  def code(alpha, beta):
                  	return (1.0 + alpha) / (beta * beta)
                  
                  alpha, beta = sort([alpha, beta])
                  function code(alpha, beta)
                  	return Float64(Float64(1.0 + alpha) / Float64(beta * beta))
                  end
                  
                  alpha, beta = num2cell(sort([alpha, beta])){:}
                  function tmp = code(alpha, beta)
                  	tmp = (1.0 + alpha) / (beta * beta);
                  end
                  
                  NOTE: alpha and beta should be sorted in increasing order before calling this function.
                  code[alpha_, beta_] := N[(N[(1.0 + alpha), $MachinePrecision] / N[(beta * beta), $MachinePrecision]), $MachinePrecision]
                  
                  \begin{array}{l}
                  [alpha, beta] = \mathsf{sort}([alpha, beta])\\
                  \\
                  \frac{1 + \alpha}{\beta \cdot \beta}
                  \end{array}
                  
                  Derivation
                  1. Initial program 94.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. lower-/.f64N/A

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

                      \[\leadsto \frac{1 + \alpha}{{\color{blue}{\beta}}^{2}} \]
                    3. unpow2N/A

                      \[\leadsto \frac{1 + \alpha}{\beta \cdot \color{blue}{\beta}} \]
                    4. lower-*.f6430.4

                      \[\leadsto \frac{1 + \alpha}{\beta \cdot \color{blue}{\beta}} \]
                  5. Applied rewrites30.4%

                    \[\leadsto \color{blue}{\frac{1 + \alpha}{\beta \cdot \beta}} \]
                  6. Add Preprocessing

                  Alternative 14: 50.4% accurate, 4.9× speedup?

                  \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \frac{1}{\beta \cdot \beta} \end{array} \]
                  NOTE: alpha and beta should be sorted in increasing order before calling this function.
                  (FPCore (alpha beta) :precision binary64 (/ 1.0 (* beta beta)))
                  assert(alpha < beta);
                  double code(double alpha, double beta) {
                  	return 1.0 / (beta * beta);
                  }
                  
                  NOTE: alpha and beta should be sorted in increasing order before calling this function.
                  module fmin_fmax_functions
                      implicit none
                      private
                      public fmax
                      public fmin
                  
                      interface fmax
                          module procedure fmax88
                          module procedure fmax44
                          module procedure fmax84
                          module procedure fmax48
                      end interface
                      interface fmin
                          module procedure fmin88
                          module procedure fmin44
                          module procedure fmin84
                          module procedure fmin48
                      end interface
                  contains
                      real(8) function fmax88(x, y) result (res)
                          real(8), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                      end function
                      real(4) function fmax44(x, y) result (res)
                          real(4), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                      end function
                      real(8) function fmax84(x, y) result(res)
                          real(8), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                      end function
                      real(8) function fmax48(x, y) result(res)
                          real(4), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                      end function
                      real(8) function fmin88(x, y) result (res)
                          real(8), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                      end function
                      real(4) function fmin44(x, y) result (res)
                          real(4), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                      end function
                      real(8) function fmin84(x, y) result(res)
                          real(8), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                      end function
                      real(8) function fmin48(x, y) result(res)
                          real(4), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                      end function
                  end module
                  
                  real(8) function code(alpha, beta)
                  use fmin_fmax_functions
                      real(8), intent (in) :: alpha
                      real(8), intent (in) :: beta
                      code = 1.0d0 / (beta * beta)
                  end function
                  
                  assert alpha < beta;
                  public static double code(double alpha, double beta) {
                  	return 1.0 / (beta * beta);
                  }
                  
                  [alpha, beta] = sort([alpha, beta])
                  def code(alpha, beta):
                  	return 1.0 / (beta * beta)
                  
                  alpha, beta = sort([alpha, beta])
                  function code(alpha, beta)
                  	return Float64(1.0 / Float64(beta * beta))
                  end
                  
                  alpha, beta = num2cell(sort([alpha, beta])){:}
                  function tmp = code(alpha, beta)
                  	tmp = 1.0 / (beta * beta);
                  end
                  
                  NOTE: alpha and beta should be sorted in increasing order before calling this function.
                  code[alpha_, beta_] := N[(1.0 / N[(beta * beta), $MachinePrecision]), $MachinePrecision]
                  
                  \begin{array}{l}
                  [alpha, beta] = \mathsf{sort}([alpha, beta])\\
                  \\
                  \frac{1}{\beta \cdot \beta}
                  \end{array}
                  
                  Derivation
                  1. Initial program 94.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. lower-/.f64N/A

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

                      \[\leadsto \frac{1 + \alpha}{{\color{blue}{\beta}}^{2}} \]
                    3. unpow2N/A

                      \[\leadsto \frac{1 + \alpha}{\beta \cdot \color{blue}{\beta}} \]
                    4. lower-*.f6430.4

                      \[\leadsto \frac{1 + \alpha}{\beta \cdot \color{blue}{\beta}} \]
                  5. Applied rewrites30.4%

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

                    \[\leadsto \frac{1}{\color{blue}{\beta} \cdot \beta} \]
                  7. Step-by-step derivation
                    1. Applied rewrites30.0%

                      \[\leadsto \frac{1}{\color{blue}{\beta} \cdot \beta} \]
                    2. Add Preprocessing

                    Reproduce

                    ?
                    herbie shell --seed 2025080 
                    (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)))