Octave 3.8, jcobi/3

Percentage Accurate: 94.3% → 99.7%
Time: 6.3s
Alternatives: 15
Speedup: 1.8×

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 15 alternatives:

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

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

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


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

    1. Initial program 97.0%

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

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

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

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

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

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

    if 1.5e151 < beta

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

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

        \[\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(4 + 2 \cdot \alpha\right)}{\beta}}}{\beta}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
      3. +-commutativeN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Alternative 2: 99.6% accurate, 1.0× speedup?

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

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


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

    1. Initial program 97.0%

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

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

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

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

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

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

    if 1.5e151 < beta

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

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

        \[\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(4 + 2 \cdot \alpha\right)}{\beta}}}{\beta}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
      3. +-commutativeN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Alternative 3: 99.6% accurate, 1.3× speedup?

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

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


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

    1. Initial program 97.0%

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

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

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

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

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

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

    if 1.5e151 < beta

    1. Initial program 74.8%

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

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) - 1\right) + 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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)} - 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
      12. associate--l+N/A

        \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\alpha + \beta\right) + \left(2 \cdot 1 - 1\right)\right)} + 1}}{\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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \left(\color{blue}{2 \cdot 1} - 1\right)\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
      14. metadata-evalN/A

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

        \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \color{blue}{1}\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
      16. lower-+.f6474.8

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

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

        \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\beta + \alpha\right)} + 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
      19. lower-+.f6474.8

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

    Alternative 4: 99.5% accurate, 1.4× speedup?

    \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := 2 + \left(\beta + \alpha\right)\\ \mathbf{if}\;\beta \leq 4 \cdot 10^{+77}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) - -1}{t\_0 \cdot \left(\left(3 + \left(\beta + \alpha\right)\right) \cdot t\_0\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{t\_0}}{\left(3 + \beta\right) + \alpha}\\ \end{array} \end{array} \]
    NOTE: alpha and beta should be sorted in increasing order before calling this function.
    (FPCore (alpha beta)
     :precision binary64
     (let* ((t_0 (+ 2.0 (+ beta alpha))))
       (if (<= beta 4e+77)
         (/
          (- (fma beta alpha (+ beta alpha)) -1.0)
          (* t_0 (* (+ 3.0 (+ beta alpha)) t_0)))
         (/ (/ (+ 1.0 alpha) t_0) (+ (+ 3.0 beta) alpha)))))
    assert(alpha < beta);
    double code(double alpha, double beta) {
    	double t_0 = 2.0 + (beta + alpha);
    	double tmp;
    	if (beta <= 4e+77) {
    		tmp = (fma(beta, alpha, (beta + alpha)) - -1.0) / (t_0 * ((3.0 + (beta + alpha)) * t_0));
    	} else {
    		tmp = ((1.0 + alpha) / t_0) / ((3.0 + beta) + alpha);
    	}
    	return tmp;
    }
    
    alpha, beta = sort([alpha, beta])
    function code(alpha, beta)
    	t_0 = Float64(2.0 + Float64(beta + alpha))
    	tmp = 0.0
    	if (beta <= 4e+77)
    		tmp = Float64(Float64(fma(beta, alpha, Float64(beta + alpha)) - -1.0) / Float64(t_0 * Float64(Float64(3.0 + Float64(beta + alpha)) * t_0)));
    	else
    		tmp = Float64(Float64(Float64(1.0 + alpha) / t_0) / Float64(Float64(3.0 + 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[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[beta, 4e+77], N[(N[(N[(beta * alpha + N[(beta + alpha), $MachinePrecision]), $MachinePrecision] - -1.0), $MachinePrecision] / N[(t$95$0 * N[(N[(3.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision] * t$95$0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(N[(3.0 + beta), $MachinePrecision] + alpha), $MachinePrecision]), $MachinePrecision]]]
    
    \begin{array}{l}
    [alpha, beta] = \mathsf{sort}([alpha, beta])\\
    \\
    \begin{array}{l}
    t_0 := 2 + \left(\beta + \alpha\right)\\
    \mathbf{if}\;\beta \leq 4 \cdot 10^{+77}:\\
    \;\;\;\;\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) - -1}{t\_0 \cdot \left(\left(3 + \left(\beta + \alpha\right)\right) \cdot t\_0\right)}\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{\frac{1 + \alpha}{t\_0}}{\left(3 + \beta\right) + \alpha}\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if beta < 3.99999999999999993e77

      1. Initial program 98.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 \color{blue}{\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. lift-/.f64N/A

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

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

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

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

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

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

      if 3.99999999999999993e77 < beta

      1. Initial program 79.1%

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

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

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

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

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

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

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

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

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

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

          \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) - 1\right) + 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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)} - 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
        12. associate--l+N/A

          \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\alpha + \beta\right) + \left(2 \cdot 1 - 1\right)\right)} + 1}}{\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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \left(\color{blue}{2 \cdot 1} - 1\right)\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
        14. metadata-evalN/A

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

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

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

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

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

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

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

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

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

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

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

          \[\leadsto \frac{\frac{-\left(\color{blue}{\left(\mathsf{neg}\left(\alpha\right)\right)} - 1\right)}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
        5. lower-neg.f6489.6

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

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

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

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

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

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

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

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

          \[\leadsto \frac{\frac{-\left(\left(-\alpha\right) - 1\right)}{2 + \color{blue}{\left(\beta + \alpha\right)}}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
        8. lift-+.f6489.6

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

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

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

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

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

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

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

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

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

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

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

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

          \[\leadsto \frac{\frac{-\left(\left(-\alpha\right) - 1\right)}{2 + \left(\beta + \alpha\right)}}{\color{blue}{\left(3 + \beta\right) + \alpha}} \]
      9. Applied rewrites89.6%

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

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

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

      Alternative 5: 98.5% accurate, 1.6× speedup?

      \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := 2 + \left(\beta + \alpha\right)\\ \mathbf{if}\;\beta \leq 1.9 \cdot 10^{+17}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) - -1}{t\_0 \cdot \left(\left(3 + \beta\right) \cdot \left(2 + \beta\right)\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{t\_0}}{\left(3 + \beta\right) + \alpha}\\ \end{array} \end{array} \]
      NOTE: alpha and beta should be sorted in increasing order before calling this function.
      (FPCore (alpha beta)
       :precision binary64
       (let* ((t_0 (+ 2.0 (+ beta alpha))))
         (if (<= beta 1.9e+17)
           (/
            (- (fma beta alpha (+ beta alpha)) -1.0)
            (* t_0 (* (+ 3.0 beta) (+ 2.0 beta))))
           (/ (/ (+ 1.0 alpha) t_0) (+ (+ 3.0 beta) alpha)))))
      assert(alpha < beta);
      double code(double alpha, double beta) {
      	double t_0 = 2.0 + (beta + alpha);
      	double tmp;
      	if (beta <= 1.9e+17) {
      		tmp = (fma(beta, alpha, (beta + alpha)) - -1.0) / (t_0 * ((3.0 + beta) * (2.0 + beta)));
      	} else {
      		tmp = ((1.0 + alpha) / t_0) / ((3.0 + beta) + alpha);
      	}
      	return tmp;
      }
      
      alpha, beta = sort([alpha, beta])
      function code(alpha, beta)
      	t_0 = Float64(2.0 + Float64(beta + alpha))
      	tmp = 0.0
      	if (beta <= 1.9e+17)
      		tmp = Float64(Float64(fma(beta, alpha, Float64(beta + alpha)) - -1.0) / Float64(t_0 * Float64(Float64(3.0 + beta) * Float64(2.0 + beta))));
      	else
      		tmp = Float64(Float64(Float64(1.0 + alpha) / t_0) / Float64(Float64(3.0 + 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[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[beta, 1.9e+17], N[(N[(N[(beta * alpha + N[(beta + alpha), $MachinePrecision]), $MachinePrecision] - -1.0), $MachinePrecision] / N[(t$95$0 * N[(N[(3.0 + beta), $MachinePrecision] * N[(2.0 + beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / t$95$0), $MachinePrecision] / N[(N[(3.0 + beta), $MachinePrecision] + alpha), $MachinePrecision]), $MachinePrecision]]]
      
      \begin{array}{l}
      [alpha, beta] = \mathsf{sort}([alpha, beta])\\
      \\
      \begin{array}{l}
      t_0 := 2 + \left(\beta + \alpha\right)\\
      \mathbf{if}\;\beta \leq 1.9 \cdot 10^{+17}:\\
      \;\;\;\;\frac{\mathsf{fma}\left(\beta, \alpha, \beta + \alpha\right) - -1}{t\_0 \cdot \left(\left(3 + \beta\right) \cdot \left(2 + \beta\right)\right)}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{\frac{1 + \alpha}{t\_0}}{\left(3 + \beta\right) + \alpha}\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 2 regimes
      2. if beta < 1.9e17

        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 \color{blue}{\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. lift-/.f64N/A

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

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

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

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

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

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

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

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

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

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

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

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

        if 1.9e17 < beta

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

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

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

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

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

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

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

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

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

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

            \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) - 1\right) + 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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)} - 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
          12. associate--l+N/A

            \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\alpha + \beta\right) + \left(2 \cdot 1 - 1\right)\right)} + 1}}{\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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \left(\color{blue}{2 \cdot 1} - 1\right)\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
          14. metadata-evalN/A

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

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

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

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

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

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

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

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

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

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

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

            \[\leadsto \frac{\frac{-\left(\color{blue}{\left(\mathsf{neg}\left(\alpha\right)\right)} - 1\right)}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
          5. lower-neg.f6482.7

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

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

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

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

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

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

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

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

            \[\leadsto \frac{\frac{-\left(\left(-\alpha\right) - 1\right)}{2 + \color{blue}{\left(\beta + \alpha\right)}}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
          8. lift-+.f6482.7

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        Alternative 6: 98.5% accurate, 1.8× speedup?

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

          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(\left(\alpha + \beta\right) + \beta \cdot \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} \]
            2. lift-*.f64N/A

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

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

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

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

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

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

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

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

              \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) - 1\right) + 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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)} - 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            12. associate--l+N/A

              \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\alpha + \beta\right) + \left(2 \cdot 1 - 1\right)\right)} + 1}}{\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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \left(\color{blue}{2 \cdot 1} - 1\right)\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            14. metadata-evalN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

          if 5e16 < beta

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

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

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

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

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

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

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

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

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

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

              \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) - 1\right) + 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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)} - 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            12. associate--l+N/A

              \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\alpha + \beta\right) + \left(2 \cdot 1 - 1\right)\right)} + 1}}{\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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \left(\color{blue}{2 \cdot 1} - 1\right)\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            14. metadata-evalN/A

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

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

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

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

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

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

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

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

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

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

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

              \[\leadsto \frac{\frac{-\left(\color{blue}{\left(\mathsf{neg}\left(\alpha\right)\right)} - 1\right)}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            5. lower-neg.f6482.7

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

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

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

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

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

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

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

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

              \[\leadsto \frac{\frac{-\left(\left(-\alpha\right) - 1\right)}{2 + \color{blue}{\left(\beta + \alpha\right)}}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            8. lift-+.f6482.7

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

          Alternative 7: 98.4% accurate, 1.8× speedup?

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

            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(\left(\alpha + \beta\right) + \beta \cdot \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} \]
              2. lift-*.f64N/A

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) - 1\right) + 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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)} - 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
              12. associate--l+N/A

                \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\alpha + \beta\right) + \left(2 \cdot 1 - 1\right)\right)} + 1}}{\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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \left(\color{blue}{2 \cdot 1} - 1\right)\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
              14. metadata-evalN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

            if 5e16 < beta

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) - 1\right) + 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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)} - 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
              12. associate--l+N/A

                \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\alpha + \beta\right) + \left(2 \cdot 1 - 1\right)\right)} + 1}}{\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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \left(\color{blue}{2 \cdot 1} - 1\right)\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
              14. metadata-evalN/A

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

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\color{blue}{\frac{1 + \alpha}{\beta}}}{3 + \beta} \]
              2. lower-+.f6482.0

                \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\beta}}{3 + \beta} \]
            10. Applied rewrites82.0%

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

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

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

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

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

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

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

          Alternative 8: 62.2% accurate, 2.2× speedup?

          \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := 3 + \left(\beta + \alpha\right)\\ \mathbf{if}\;\beta \leq 1.5 \cdot 10^{+151}:\\ \;\;\;\;\frac{1 + \alpha}{t\_0 \cdot \left(2 + \left(\beta + \alpha\right)\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{\beta}}{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))))
             (if (<= beta 1.5e+151)
               (/ (+ 1.0 alpha) (* t_0 (+ 2.0 (+ beta alpha))))
               (/ (/ (+ 1.0 alpha) beta) t_0))))
          assert(alpha < beta);
          double code(double alpha, double beta) {
          	double t_0 = 3.0 + (beta + alpha);
          	double tmp;
          	if (beta <= 1.5e+151) {
          		tmp = (1.0 + alpha) / (t_0 * (2.0 + (beta + alpha)));
          	} else {
          		tmp = ((1.0 + alpha) / beta) / t_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) :: t_0
              real(8) :: tmp
              t_0 = 3.0d0 + (beta + alpha)
              if (beta <= 1.5d+151) then
                  tmp = (1.0d0 + alpha) / (t_0 * (2.0d0 + (beta + alpha)))
              else
                  tmp = ((1.0d0 + alpha) / beta) / t_0
              end if
              code = tmp
          end function
          
          assert alpha < beta;
          public static double code(double alpha, double beta) {
          	double t_0 = 3.0 + (beta + alpha);
          	double tmp;
          	if (beta <= 1.5e+151) {
          		tmp = (1.0 + alpha) / (t_0 * (2.0 + (beta + alpha)));
          	} else {
          		tmp = ((1.0 + alpha) / beta) / t_0;
          	}
          	return tmp;
          }
          
          [alpha, beta] = sort([alpha, beta])
          def code(alpha, beta):
          	t_0 = 3.0 + (beta + alpha)
          	tmp = 0
          	if beta <= 1.5e+151:
          		tmp = (1.0 + alpha) / (t_0 * (2.0 + (beta + alpha)))
          	else:
          		tmp = ((1.0 + alpha) / beta) / t_0
          	return tmp
          
          alpha, beta = sort([alpha, beta])
          function code(alpha, beta)
          	t_0 = Float64(3.0 + Float64(beta + alpha))
          	tmp = 0.0
          	if (beta <= 1.5e+151)
          		tmp = Float64(Float64(1.0 + alpha) / Float64(t_0 * Float64(2.0 + Float64(beta + alpha))));
          	else
          		tmp = Float64(Float64(Float64(1.0 + alpha) / beta) / t_0);
          	end
          	return tmp
          end
          
          alpha, beta = num2cell(sort([alpha, beta])){:}
          function tmp_2 = code(alpha, beta)
          	t_0 = 3.0 + (beta + alpha);
          	tmp = 0.0;
          	if (beta <= 1.5e+151)
          		tmp = (1.0 + alpha) / (t_0 * (2.0 + (beta + alpha)));
          	else
          		tmp = ((1.0 + alpha) / beta) / t_0;
          	end
          	tmp_2 = tmp;
          end
          
          NOTE: alpha and beta should be sorted in increasing order before calling this function.
          code[alpha_, beta_] := Block[{t$95$0 = N[(3.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[beta, 1.5e+151], N[(N[(1.0 + alpha), $MachinePrecision] / N[(t$95$0 * N[(2.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / beta), $MachinePrecision] / t$95$0), $MachinePrecision]]]
          
          \begin{array}{l}
          [alpha, beta] = \mathsf{sort}([alpha, beta])\\
          \\
          \begin{array}{l}
          t_0 := 3 + \left(\beta + \alpha\right)\\
          \mathbf{if}\;\beta \leq 1.5 \cdot 10^{+151}:\\
          \;\;\;\;\frac{1 + \alpha}{t\_0 \cdot \left(2 + \left(\beta + \alpha\right)\right)}\\
          
          \mathbf{else}:\\
          \;\;\;\;\frac{\frac{1 + \alpha}{\beta}}{t\_0}\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 2 regimes
          2. if beta < 1.5e151

            1. Initial program 97.0%

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) - 1\right) + 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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)} - 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
              12. associate--l+N/A

                \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\alpha + \beta\right) + \left(2 \cdot 1 - 1\right)\right)} + 1}}{\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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \left(\color{blue}{2 \cdot 1} - 1\right)\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
              14. metadata-evalN/A

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

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{-\left(\color{blue}{\left(\mathsf{neg}\left(\alpha\right)\right)} - 1\right)}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
              5. lower-neg.f6428.4

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{-\left(\left(-\alpha\right) - 1\right)}{\color{blue}{\left(\alpha + \beta\right)} + 2}}{\left(\left(\alpha + \beta\right) + 2\right) + 1} \]
            11. Applied rewrites43.6%

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

            if 1.5e151 < beta

            1. Initial program 74.8%

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) - 1\right) + 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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)} - 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
              12. associate--l+N/A

                \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\alpha + \beta\right) + \left(2 \cdot 1 - 1\right)\right)} + 1}}{\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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \left(\color{blue}{2 \cdot 1} - 1\right)\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
              14. metadata-evalN/A

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

                \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \color{blue}{1}\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
              16. lower-+.f6474.8

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

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

                \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\beta + \alpha\right)} + 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
              19. lower-+.f6474.8

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

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

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

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

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

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

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

                \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\beta}}{3 + \beta} \]
            10. Applied rewrites97.1%

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

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

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

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

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

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

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

          Alternative 9: 55.8% accurate, 2.6× speedup?

          \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \frac{\frac{1 + \alpha}{\beta}}{3 + \left(\beta + \alpha\right)} \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) (+ 3.0 (+ beta alpha))))
          assert(alpha < beta);
          double code(double alpha, double beta) {
          	return ((1.0 + alpha) / beta) / (3.0 + (beta + alpha));
          }
          
          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) / (3.0d0 + (beta + alpha))
          end function
          
          assert alpha < beta;
          public static double code(double alpha, double beta) {
          	return ((1.0 + alpha) / beta) / (3.0 + (beta + alpha));
          }
          
          [alpha, beta] = sort([alpha, beta])
          def code(alpha, beta):
          	return ((1.0 + alpha) / beta) / (3.0 + (beta + alpha))
          
          alpha, beta = sort([alpha, beta])
          function code(alpha, beta)
          	return Float64(Float64(Float64(1.0 + alpha) / beta) / Float64(3.0 + Float64(beta + alpha)))
          end
          
          alpha, beta = num2cell(sort([alpha, beta])){:}
          function tmp = code(alpha, beta)
          	tmp = ((1.0 + alpha) / beta) / (3.0 + (beta + alpha));
          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] / N[(3.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
          
          \begin{array}{l}
          [alpha, beta] = \mathsf{sort}([alpha, beta])\\
          \\
          \frac{\frac{1 + \alpha}{\beta}}{3 + \left(\beta + \alpha\right)}
          \end{array}
          
          Derivation
          1. Initial program 92.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(\left(\alpha + \beta\right) + \beta \cdot \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} \]
            2. lift-*.f64N/A

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

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

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

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

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

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

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

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

              \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) - 1\right) + 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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)} - 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            12. associate--l+N/A

              \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\alpha + \beta\right) + \left(2 \cdot 1 - 1\right)\right)} + 1}}{\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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \left(\color{blue}{2 \cdot 1} - 1\right)\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            14. metadata-evalN/A

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

              \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \color{blue}{1}\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            16. lower-+.f6492.9

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

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

              \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\beta + \alpha\right)} + 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
            19. lower-+.f6492.9

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

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

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

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

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

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

              \[\leadsto \frac{\color{blue}{\frac{1 + \alpha}{\beta}}}{3 + \beta} \]
            2. lower-+.f6433.4

              \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\beta}}{3 + \beta} \]
          10. Applied rewrites33.4%

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

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

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

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

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

            \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{\color{blue}{3 + \left(\beta + \alpha\right)}} \]
          14. Final simplification33.5%

            \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{3 + \left(\beta + \alpha\right)} \]
          15. Add Preprocessing

          Alternative 10: 55.2% accurate, 2.9× speedup?

          \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 1.35 \cdot 10^{+154}:\\ \;\;\;\;\frac{1 + \alpha}{\beta \cdot \beta}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\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 1.35e+154)
             (/ (+ 1.0 alpha) (* beta beta))
             (/ (/ alpha beta) beta)))
          assert(alpha < beta);
          double code(double alpha, double beta) {
          	double tmp;
          	if (beta <= 1.35e+154) {
          		tmp = (1.0 + alpha) / (beta * beta);
          	} else {
          		tmp = (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 <= 1.35d+154) then
                  tmp = (1.0d0 + alpha) / (beta * beta)
              else
                  tmp = (alpha / beta) / beta
              end if
              code = tmp
          end function
          
          assert alpha < beta;
          public static double code(double alpha, double beta) {
          	double tmp;
          	if (beta <= 1.35e+154) {
          		tmp = (1.0 + alpha) / (beta * beta);
          	} else {
          		tmp = (alpha / beta) / beta;
          	}
          	return tmp;
          }
          
          [alpha, beta] = sort([alpha, beta])
          def code(alpha, beta):
          	tmp = 0
          	if beta <= 1.35e+154:
          		tmp = (1.0 + alpha) / (beta * beta)
          	else:
          		tmp = (alpha / beta) / beta
          	return tmp
          
          alpha, beta = sort([alpha, beta])
          function code(alpha, beta)
          	tmp = 0.0
          	if (beta <= 1.35e+154)
          		tmp = Float64(Float64(1.0 + alpha) / Float64(beta * beta));
          	else
          		tmp = Float64(Float64(alpha / beta) / beta);
          	end
          	return tmp
          end
          
          alpha, beta = num2cell(sort([alpha, beta])){:}
          function tmp_2 = code(alpha, beta)
          	tmp = 0.0;
          	if (beta <= 1.35e+154)
          		tmp = (1.0 + alpha) / (beta * beta);
          	else
          		tmp = (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, 1.35e+154], N[(N[(1.0 + alpha), $MachinePrecision] / N[(beta * beta), $MachinePrecision]), $MachinePrecision], N[(N[(alpha / beta), $MachinePrecision] / beta), $MachinePrecision]]
          
          \begin{array}{l}
          [alpha, beta] = \mathsf{sort}([alpha, beta])\\
          \\
          \begin{array}{l}
          \mathbf{if}\;\beta \leq 1.35 \cdot 10^{+154}:\\
          \;\;\;\;\frac{1 + \alpha}{\beta \cdot \beta}\\
          
          \mathbf{else}:\\
          \;\;\;\;\frac{\frac{\alpha}{\beta}}{\beta}\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 2 regimes
          2. if beta < 1.35000000000000003e154

            1. Initial program 97.0%

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

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

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

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

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

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

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

            if 1.35000000000000003e154 < beta

            1. Initial program 74.3%

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

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

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

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

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

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

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

              \[\leadsto \frac{\alpha}{\color{blue}{{\beta}^{2}}} \]
            7. Step-by-step derivation
              1. Applied rewrites85.0%

                \[\leadsto \frac{\alpha}{\color{blue}{\beta \cdot \beta}} \]
              2. Step-by-step derivation
                1. Applied rewrites96.5%

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

              Alternative 11: 55.8% accurate, 2.9× speedup?

              \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \frac{\frac{1 + \alpha}{\beta}}{3 + \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) (+ 3.0 beta)))
              assert(alpha < beta);
              double code(double alpha, double beta) {
              	return ((1.0 + alpha) / beta) / (3.0 + 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) / (3.0d0 + beta)
              end function
              
              assert alpha < beta;
              public static double code(double alpha, double beta) {
              	return ((1.0 + alpha) / beta) / (3.0 + beta);
              }
              
              [alpha, beta] = sort([alpha, beta])
              def code(alpha, beta):
              	return ((1.0 + alpha) / beta) / (3.0 + beta)
              
              alpha, beta = sort([alpha, beta])
              function code(alpha, beta)
              	return Float64(Float64(Float64(1.0 + alpha) / beta) / Float64(3.0 + beta))
              end
              
              alpha, beta = num2cell(sort([alpha, beta])){:}
              function tmp = code(alpha, beta)
              	tmp = ((1.0 + alpha) / beta) / (3.0 + 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] / N[(3.0 + beta), $MachinePrecision]), $MachinePrecision]
              
              \begin{array}{l}
              [alpha, beta] = \mathsf{sort}([alpha, beta])\\
              \\
              \frac{\frac{1 + \alpha}{\beta}}{3 + \beta}
              \end{array}
              
              Derivation
              1. Initial program 92.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(\left(\alpha + \beta\right) + \beta \cdot \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} \]
                2. lift-*.f64N/A

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

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

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

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

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

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

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

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

                  \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) - 1\right) + 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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right)} - 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
                12. associate--l+N/A

                  \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\color{blue}{\left(\left(\alpha + \beta\right) + \left(2 \cdot 1 - 1\right)\right)} + 1}}{\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{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \left(\color{blue}{2 \cdot 1} - 1\right)\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
                14. metadata-evalN/A

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

                  \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\left(\alpha + \beta\right) + \color{blue}{1}\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
                16. lower-+.f6492.9

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

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

                  \[\leadsto \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\color{blue}{\left(\beta + \alpha\right)} + 1\right) + 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
                19. lower-+.f6492.9

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

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

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

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

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

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

                  \[\leadsto \frac{\color{blue}{\frac{1 + \alpha}{\beta}}}{3 + \beta} \]
                2. lower-+.f6433.4

                  \[\leadsto \frac{\frac{\color{blue}{1 + \alpha}}{\beta}}{3 + \beta} \]
              10. Applied rewrites33.4%

                \[\leadsto \frac{\color{blue}{\frac{1 + \alpha}{\beta}}}{3 + \beta} \]
              11. Final simplification33.4%

                \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{3 + \beta} \]
              12. Add Preprocessing

              Alternative 12: 55.6% accurate, 3.2× speedup?

              \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \frac{\frac{\alpha - -1}{\beta}}{\beta} \end{array} \]
              NOTE: alpha and beta should be sorted in increasing order before calling this function.
              (FPCore (alpha beta) :precision binary64 (/ (/ (- alpha -1.0) beta) beta))
              assert(alpha < beta);
              double code(double alpha, double beta) {
              	return ((alpha - -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 = ((alpha - (-1.0d0)) / beta) / beta
              end function
              
              assert alpha < beta;
              public static double code(double alpha, double beta) {
              	return ((alpha - -1.0) / beta) / beta;
              }
              
              [alpha, beta] = sort([alpha, beta])
              def code(alpha, beta):
              	return ((alpha - -1.0) / beta) / beta
              
              alpha, beta = sort([alpha, beta])
              function code(alpha, beta)
              	return Float64(Float64(Float64(alpha - -1.0) / beta) / beta)
              end
              
              alpha, beta = num2cell(sort([alpha, beta])){:}
              function tmp = code(alpha, beta)
              	tmp = ((alpha - -1.0) / beta) / beta;
              end
              
              NOTE: alpha and beta should be sorted in increasing order before calling this function.
              code[alpha_, beta_] := N[(N[(N[(alpha - -1.0), $MachinePrecision] / beta), $MachinePrecision] / beta), $MachinePrecision]
              
              \begin{array}{l}
              [alpha, beta] = \mathsf{sort}([alpha, beta])\\
              \\
              \frac{\frac{\alpha - -1}{\beta}}{\beta}
              \end{array}
              
              Derivation
              1. Initial program 92.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 \color{blue}{\frac{1 + \alpha}{{\beta}^{2}}} \]
                2. lower-+.f64N/A

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

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

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

                \[\leadsto \color{blue}{\frac{1 + \alpha}{\beta \cdot \beta}} \]
              6. Step-by-step derivation
                1. Applied rewrites33.8%

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

                Alternative 13: 52.0% accurate, 3.6× speedup?

                \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\alpha \leq 1:\\ \;\;\;\;\frac{1}{\beta \cdot \beta}\\ \mathbf{else}:\\ \;\;\;\;\frac{\alpha}{\beta \cdot \beta}\\ \end{array} \end{array} \]
                NOTE: alpha and beta should be sorted in increasing order before calling this function.
                (FPCore (alpha beta)
                 :precision binary64
                 (if (<= alpha 1.0) (/ 1.0 (* beta beta)) (/ alpha (* beta beta))))
                assert(alpha < beta);
                double code(double alpha, double beta) {
                	double tmp;
                	if (alpha <= 1.0) {
                		tmp = 1.0 / (beta * beta);
                	} else {
                		tmp = 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 (alpha <= 1.0d0) then
                        tmp = 1.0d0 / (beta * beta)
                    else
                        tmp = alpha / (beta * beta)
                    end if
                    code = tmp
                end function
                
                assert alpha < beta;
                public static double code(double alpha, double beta) {
                	double tmp;
                	if (alpha <= 1.0) {
                		tmp = 1.0 / (beta * beta);
                	} else {
                		tmp = alpha / (beta * beta);
                	}
                	return tmp;
                }
                
                [alpha, beta] = sort([alpha, beta])
                def code(alpha, beta):
                	tmp = 0
                	if alpha <= 1.0:
                		tmp = 1.0 / (beta * beta)
                	else:
                		tmp = alpha / (beta * beta)
                	return tmp
                
                alpha, beta = sort([alpha, beta])
                function code(alpha, beta)
                	tmp = 0.0
                	if (alpha <= 1.0)
                		tmp = Float64(1.0 / Float64(beta * beta));
                	else
                		tmp = Float64(alpha / Float64(beta * beta));
                	end
                	return tmp
                end
                
                alpha, beta = num2cell(sort([alpha, beta])){:}
                function tmp_2 = code(alpha, beta)
                	tmp = 0.0;
                	if (alpha <= 1.0)
                		tmp = 1.0 / (beta * beta);
                	else
                		tmp = 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[alpha, 1.0], N[(1.0 / N[(beta * beta), $MachinePrecision]), $MachinePrecision], N[(alpha / N[(beta * beta), $MachinePrecision]), $MachinePrecision]]
                
                \begin{array}{l}
                [alpha, beta] = \mathsf{sort}([alpha, beta])\\
                \\
                \begin{array}{l}
                \mathbf{if}\;\alpha \leq 1:\\
                \;\;\;\;\frac{1}{\beta \cdot \beta}\\
                
                \mathbf{else}:\\
                \;\;\;\;\frac{\alpha}{\beta \cdot \beta}\\
                
                
                \end{array}
                \end{array}
                
                Derivation
                1. Split input into 2 regimes
                2. if alpha < 1

                  1. Initial program 99.9%

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

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

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

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

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

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

                    \[\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 rewrites38.4%

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

                    if 1 < alpha

                    1. Initial program 79.6%

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

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

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

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

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

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

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

                      \[\leadsto \frac{\alpha}{\color{blue}{{\beta}^{2}}} \]
                    7. Step-by-step derivation
                      1. Applied rewrites17.4%

                        \[\leadsto \frac{\alpha}{\color{blue}{\beta \cdot \beta}} \]
                    8. Recombined 2 regimes into one program.
                    9. Add Preprocessing

                    Alternative 14: 52.7% 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 92.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 \color{blue}{\frac{1 + \alpha}{{\beta}^{2}}} \]
                      2. lower-+.f64N/A

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

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

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

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

                    Alternative 15: 32.2% accurate, 4.9× speedup?

                    \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \frac{\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 (/ alpha (* beta beta)))
                    assert(alpha < beta);
                    double code(double alpha, double beta) {
                    	return 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 = alpha / (beta * beta)
                    end function
                    
                    assert alpha < beta;
                    public static double code(double alpha, double beta) {
                    	return alpha / (beta * beta);
                    }
                    
                    [alpha, beta] = sort([alpha, beta])
                    def code(alpha, beta):
                    	return alpha / (beta * beta)
                    
                    alpha, beta = sort([alpha, beta])
                    function code(alpha, beta)
                    	return Float64(alpha / Float64(beta * beta))
                    end
                    
                    alpha, beta = num2cell(sort([alpha, beta])){:}
                    function tmp = code(alpha, beta)
                    	tmp = alpha / (beta * beta);
                    end
                    
                    NOTE: alpha and beta should be sorted in increasing order before calling this function.
                    code[alpha_, beta_] := N[(alpha / N[(beta * beta), $MachinePrecision]), $MachinePrecision]
                    
                    \begin{array}{l}
                    [alpha, beta] = \mathsf{sort}([alpha, beta])\\
                    \\
                    \frac{\alpha}{\beta \cdot \beta}
                    \end{array}
                    
                    Derivation
                    1. Initial program 92.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 \color{blue}{\frac{1 + \alpha}{{\beta}^{2}}} \]
                      2. lower-+.f64N/A

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

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

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

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

                      \[\leadsto \frac{\alpha}{\color{blue}{{\beta}^{2}}} \]
                    7. Step-by-step derivation
                      1. Applied rewrites19.0%

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

                      Reproduce

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