Octave 3.8, jcobi/3

Percentage Accurate: 94.4% → 99.7%
Time: 5.3s
Alternatives: 15
Speedup: 2.6×

Specification

?
\[\alpha > -1 \land \beta > -1\]
\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\alpha + \beta\right) + 2 \cdot 1\\ \frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{t\_0}}{t\_0}}{t\_0 + 1} \end{array} \end{array} \]
(FPCore (alpha beta)
 :precision binary64
 (let* ((t_0 (+ (+ alpha beta) (* 2.0 1.0))))
   (/ (/ (/ (+ (+ (+ alpha beta) (* beta alpha)) 1.0) t_0) t_0) (+ t_0 1.0))))
double code(double alpha, double beta) {
	double t_0 = (alpha + beta) + (2.0 * 1.0);
	return (((((alpha + beta) + (beta * alpha)) + 1.0) / t_0) / t_0) / (t_0 + 1.0);
}
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.4% 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, 0.9× speedup?

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

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


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

    1. Initial program 99.3%

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

        \[\leadsto \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}} \]
    4. Applied rewrites98.6%

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

    if 3.9999999999999997e112 < beta

    1. Initial program 75.4%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Alternative 2: 99.7% accurate, 1.2× speedup?

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

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


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

    1. Initial program 99.3%

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

        \[\leadsto \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}} \]
    4. Applied rewrites98.6%

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

    if 3.9999999999999997e112 < beta

    1. Initial program 75.4%

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

      \[\leadsto \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{\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}}{\color{blue}{\beta}}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1} \]
    5. Applied rewrites93.5%

      \[\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 beta around inf

      \[\leadsto \frac{\frac{\left(\alpha + 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} \]
    7. Step-by-step derivation
      1. Applied rewrites93.5%

        \[\leadsto \frac{\frac{\left(\alpha + 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} \]
    8. Recombined 2 regimes into one program.
    9. Final simplification97.3%

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

    Alternative 3: 99.5% accurate, 1.3× speedup?

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

      1. Initial program 99.3%

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

          \[\leadsto \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}} \]
      4. Applied rewrites98.6%

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

      if 3.9999999999999997e112 < beta

      1. Initial program 75.4%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

    Alternative 4: 98.4% accurate, 1.9× speedup?

    \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 5.5 \cdot 10^{+23}:\\ \;\;\;\;\frac{\frac{1 + \beta}{2 + \beta}}{\mathsf{fma}\left(5 + \beta, \beta, 6\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)}\\ \end{array} \end{array} \]
    NOTE: alpha and beta should be sorted in increasing order before calling this function.
    (FPCore (alpha beta)
     :precision binary64
     (if (<= beta 5.5e+23)
       (/ (/ (+ 1.0 beta) (+ 2.0 beta)) (fma (+ 5.0 beta) beta 6.0))
       (/ (/ (+ 1.0 alpha) (+ (+ beta alpha) 2.0)) (+ 3.0 (+ beta alpha)))))
    assert(alpha < beta);
    double code(double alpha, double beta) {
    	double tmp;
    	if (beta <= 5.5e+23) {
    		tmp = ((1.0 + beta) / (2.0 + beta)) / fma((5.0 + beta), beta, 6.0);
    	} else {
    		tmp = ((1.0 + alpha) / ((beta + alpha) + 2.0)) / (3.0 + (beta + alpha));
    	}
    	return tmp;
    }
    
    alpha, beta = sort([alpha, beta])
    function code(alpha, beta)
    	tmp = 0.0
    	if (beta <= 5.5e+23)
    		tmp = Float64(Float64(Float64(1.0 + beta) / Float64(2.0 + beta)) / fma(Float64(5.0 + beta), beta, 6.0));
    	else
    		tmp = Float64(Float64(Float64(1.0 + alpha) / Float64(Float64(beta + alpha) + 2.0)) / Float64(3.0 + Float64(beta + alpha)));
    	end
    	return tmp
    end
    
    NOTE: alpha and beta should be sorted in increasing order before calling this function.
    code[alpha_, beta_] := If[LessEqual[beta, 5.5e+23], N[(N[(N[(1.0 + beta), $MachinePrecision] / N[(2.0 + beta), $MachinePrecision]), $MachinePrecision] / N[(N[(5.0 + beta), $MachinePrecision] * beta + 6.0), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / N[(N[(beta + alpha), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision] / N[(3.0 + N[(beta + alpha), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
    
    \begin{array}{l}
    [alpha, beta] = \mathsf{sort}([alpha, beta])\\
    \\
    \begin{array}{l}
    \mathbf{if}\;\beta \leq 5.5 \cdot 10^{+23}:\\
    \;\;\;\;\frac{\frac{1 + \beta}{2 + \beta}}{\mathsf{fma}\left(5 + \beta, \beta, 6\right)}\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{\frac{1 + \alpha}{\left(\beta + \alpha\right) + 2}}{3 + \left(\beta + \alpha\right)}\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if beta < 5.50000000000000004e23

      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}} \]
      4. Applied rewrites99.1%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

          \[\leadsto \frac{\frac{1 + \beta}{2 + \beta}}{\mathsf{fma}\left(5 + \beta, \beta, 6\right)} \]
        4. lower-+.f6467.1

          \[\leadsto \frac{\frac{1 + \beta}{2 + \beta}}{\mathsf{fma}\left(5 + \beta, \beta, 6\right)} \]
      13. Applied rewrites67.1%

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

      if 5.50000000000000004e23 < beta

      1. Initial program 79.7%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

    Alternative 5: 98.4% accurate, 1.9× speedup?

    \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 5.5 \cdot 10^{+23}:\\ \;\;\;\;\frac{\frac{1 + \beta}{2 + \beta}}{\mathsf{fma}\left(5 + \beta, \beta, 6\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{1 + \alpha}{\beta}}{\left(\alpha + \beta\right) + 3}\\ \end{array} \end{array} \]
    NOTE: alpha and beta should be sorted in increasing order before calling this function.
    (FPCore (alpha beta)
     :precision binary64
     (if (<= beta 5.5e+23)
       (/ (/ (+ 1.0 beta) (+ 2.0 beta)) (fma (+ 5.0 beta) beta 6.0))
       (/ (/ (+ 1.0 alpha) beta) (+ (+ alpha beta) 3.0))))
    assert(alpha < beta);
    double code(double alpha, double beta) {
    	double tmp;
    	if (beta <= 5.5e+23) {
    		tmp = ((1.0 + beta) / (2.0 + beta)) / fma((5.0 + beta), beta, 6.0);
    	} else {
    		tmp = ((1.0 + alpha) / beta) / ((alpha + beta) + 3.0);
    	}
    	return tmp;
    }
    
    alpha, beta = sort([alpha, beta])
    function code(alpha, beta)
    	tmp = 0.0
    	if (beta <= 5.5e+23)
    		tmp = Float64(Float64(Float64(1.0 + beta) / Float64(2.0 + beta)) / fma(Float64(5.0 + beta), beta, 6.0));
    	else
    		tmp = Float64(Float64(Float64(1.0 + alpha) / beta) / Float64(Float64(alpha + beta) + 3.0));
    	end
    	return tmp
    end
    
    NOTE: alpha and beta should be sorted in increasing order before calling this function.
    code[alpha_, beta_] := If[LessEqual[beta, 5.5e+23], N[(N[(N[(1.0 + beta), $MachinePrecision] / N[(2.0 + beta), $MachinePrecision]), $MachinePrecision] / N[(N[(5.0 + beta), $MachinePrecision] * beta + 6.0), $MachinePrecision]), $MachinePrecision], N[(N[(N[(1.0 + alpha), $MachinePrecision] / beta), $MachinePrecision] / N[(N[(alpha + beta), $MachinePrecision] + 3.0), $MachinePrecision]), $MachinePrecision]]
    
    \begin{array}{l}
    [alpha, beta] = \mathsf{sort}([alpha, beta])\\
    \\
    \begin{array}{l}
    \mathbf{if}\;\beta \leq 5.5 \cdot 10^{+23}:\\
    \;\;\;\;\frac{\frac{1 + \beta}{2 + \beta}}{\mathsf{fma}\left(5 + \beta, \beta, 6\right)}\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{\frac{1 + \alpha}{\beta}}{\left(\alpha + \beta\right) + 3}\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if beta < 5.50000000000000004e23

      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}} \]
      4. Applied rewrites99.1%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

          \[\leadsto \frac{\frac{1 + \beta}{2 + \beta}}{\mathsf{fma}\left(5 + \beta, \beta, 6\right)} \]
        4. lower-+.f6467.1

          \[\leadsto \frac{\frac{1 + \beta}{2 + \beta}}{\mathsf{fma}\left(5 + \beta, \beta, 6\right)} \]
      13. Applied rewrites67.1%

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

      if 5.50000000000000004e23 < beta

      1. Initial program 79.7%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

    Alternative 6: 97.4% accurate, 2.0× speedup?

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

      1. Initial program 99.9%

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

          \[\leadsto \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}} \]
      4. Applied rewrites99.1%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

          \[\leadsto \frac{\mathsf{fma}\left(\mathsf{fma}\left(-0.125, \beta, 0.25\right), \beta, 0.5\right)}{\left(2 + \beta\right) \cdot \left(3 + \beta\right)} \]
      13. Applied rewrites65.8%

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

      if 2.5 < beta

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

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

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

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

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

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

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

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

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

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

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

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

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

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

    Alternative 7: 96.5% accurate, 2.2× speedup?

    \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} t_0 := \left(2 + \beta\right) \cdot \left(3 + \beta\right)\\ \mathbf{if}\;\beta \leq 1.8:\\ \;\;\;\;\frac{0.5}{t\_0}\\ \mathbf{elif}\;\beta \leq 1.4 \cdot 10^{+154}:\\ \;\;\;\;\frac{1 + \alpha}{t\_0}\\ \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
     (let* ((t_0 (* (+ 2.0 beta) (+ 3.0 beta))))
       (if (<= beta 1.8)
         (/ 0.5 t_0)
         (if (<= beta 1.4e+154) (/ (+ 1.0 alpha) t_0) (/ (/ alpha beta) beta)))))
    assert(alpha < beta);
    double code(double alpha, double beta) {
    	double t_0 = (2.0 + beta) * (3.0 + beta);
    	double tmp;
    	if (beta <= 1.8) {
    		tmp = 0.5 / t_0;
    	} else if (beta <= 1.4e+154) {
    		tmp = (1.0 + alpha) / t_0;
    	} 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) :: t_0
        real(8) :: tmp
        t_0 = (2.0d0 + beta) * (3.0d0 + beta)
        if (beta <= 1.8d0) then
            tmp = 0.5d0 / t_0
        else if (beta <= 1.4d+154) then
            tmp = (1.0d0 + alpha) / t_0
        else
            tmp = (alpha / beta) / beta
        end if
        code = tmp
    end function
    
    assert alpha < beta;
    public static double code(double alpha, double beta) {
    	double t_0 = (2.0 + beta) * (3.0 + beta);
    	double tmp;
    	if (beta <= 1.8) {
    		tmp = 0.5 / t_0;
    	} else if (beta <= 1.4e+154) {
    		tmp = (1.0 + alpha) / t_0;
    	} else {
    		tmp = (alpha / beta) / beta;
    	}
    	return tmp;
    }
    
    [alpha, beta] = sort([alpha, beta])
    def code(alpha, beta):
    	t_0 = (2.0 + beta) * (3.0 + beta)
    	tmp = 0
    	if beta <= 1.8:
    		tmp = 0.5 / t_0
    	elif beta <= 1.4e+154:
    		tmp = (1.0 + alpha) / t_0
    	else:
    		tmp = (alpha / beta) / beta
    	return tmp
    
    alpha, beta = sort([alpha, beta])
    function code(alpha, beta)
    	t_0 = Float64(Float64(2.0 + beta) * Float64(3.0 + beta))
    	tmp = 0.0
    	if (beta <= 1.8)
    		tmp = Float64(0.5 / t_0);
    	elseif (beta <= 1.4e+154)
    		tmp = Float64(Float64(1.0 + alpha) / t_0);
    	else
    		tmp = Float64(Float64(alpha / beta) / beta);
    	end
    	return tmp
    end
    
    alpha, beta = num2cell(sort([alpha, beta])){:}
    function tmp_2 = code(alpha, beta)
    	t_0 = (2.0 + beta) * (3.0 + beta);
    	tmp = 0.0;
    	if (beta <= 1.8)
    		tmp = 0.5 / t_0;
    	elseif (beta <= 1.4e+154)
    		tmp = (1.0 + alpha) / t_0;
    	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_] := Block[{t$95$0 = N[(N[(2.0 + beta), $MachinePrecision] * N[(3.0 + beta), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[beta, 1.8], N[(0.5 / t$95$0), $MachinePrecision], If[LessEqual[beta, 1.4e+154], N[(N[(1.0 + alpha), $MachinePrecision] / t$95$0), $MachinePrecision], N[(N[(alpha / beta), $MachinePrecision] / beta), $MachinePrecision]]]]
    
    \begin{array}{l}
    [alpha, beta] = \mathsf{sort}([alpha, beta])\\
    \\
    \begin{array}{l}
    t_0 := \left(2 + \beta\right) \cdot \left(3 + \beta\right)\\
    \mathbf{if}\;\beta \leq 1.8:\\
    \;\;\;\;\frac{0.5}{t\_0}\\
    
    \mathbf{elif}\;\beta \leq 1.4 \cdot 10^{+154}:\\
    \;\;\;\;\frac{1 + \alpha}{t\_0}\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{\frac{\alpha}{\beta}}{\beta}\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 3 regimes
    2. if beta < 1.80000000000000004

      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}} \]
      4. Applied rewrites99.1%

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

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

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

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

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

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

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

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

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

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

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

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

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

        if 1.80000000000000004 < beta < 1.4e154

        1. Initial program 90.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}} \]
        4. Applied rewrites90.9%

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

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

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

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

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

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

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

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

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

        if 1.4e154 < beta

        1. Initial program 74.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 \frac{1 + \alpha}{\color{blue}{{\beta}^{2}}} \]
          2. lower-+.f64N/A

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

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

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

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

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

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

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

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

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

              \[\leadsto \frac{\frac{\alpha}{\beta}}{\color{blue}{\beta}} \]
            5. lower-/.f6494.6

              \[\leadsto \frac{\frac{\alpha}{\beta}}{\beta} \]
          3. Applied rewrites94.6%

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

        Alternative 8: 97.2% accurate, 2.2× speedup?

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

          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}} \]
          4. Applied rewrites99.1%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

          if 4 < beta

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        Alternative 9: 96.3% accurate, 2.4× speedup?

        \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 10:\\ \;\;\;\;\frac{0.5}{\left(2 + \beta\right) \cdot \left(3 + \beta\right)}\\ \mathbf{elif}\;\beta \leq 6 \cdot 10^{+159}:\\ \;\;\;\;\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 10.0)
           (/ 0.5 (* (+ 2.0 beta) (+ 3.0 beta)))
           (if (<= beta 6e+159)
             (/ (+ 1.0 alpha) (* beta beta))
             (/ (/ alpha beta) beta))))
        assert(alpha < beta);
        double code(double alpha, double beta) {
        	double tmp;
        	if (beta <= 10.0) {
        		tmp = 0.5 / ((2.0 + beta) * (3.0 + beta));
        	} else if (beta <= 6e+159) {
        		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 <= 10.0d0) then
                tmp = 0.5d0 / ((2.0d0 + beta) * (3.0d0 + beta))
            else if (beta <= 6d+159) 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 <= 10.0) {
        		tmp = 0.5 / ((2.0 + beta) * (3.0 + beta));
        	} else if (beta <= 6e+159) {
        		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 <= 10.0:
        		tmp = 0.5 / ((2.0 + beta) * (3.0 + beta))
        	elif beta <= 6e+159:
        		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 <= 10.0)
        		tmp = Float64(0.5 / Float64(Float64(2.0 + beta) * Float64(3.0 + beta)));
        	elseif (beta <= 6e+159)
        		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 <= 10.0)
        		tmp = 0.5 / ((2.0 + beta) * (3.0 + beta));
        	elseif (beta <= 6e+159)
        		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, 10.0], N[(0.5 / N[(N[(2.0 + beta), $MachinePrecision] * N[(3.0 + beta), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[beta, 6e+159], 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 10:\\
        \;\;\;\;\frac{0.5}{\left(2 + \beta\right) \cdot \left(3 + \beta\right)}\\
        
        \mathbf{elif}\;\beta \leq 6 \cdot 10^{+159}:\\
        \;\;\;\;\frac{1 + \alpha}{\beta \cdot \beta}\\
        
        \mathbf{else}:\\
        \;\;\;\;\frac{\frac{\alpha}{\beta}}{\beta}\\
        
        
        \end{array}
        \end{array}
        
        Derivation
        1. Split input into 3 regimes
        2. if beta < 10

          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}} \]
          4. Applied rewrites99.1%

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

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

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

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

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

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

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

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

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

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

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

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

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

            if 10 < beta < 6.0000000000000004e159

            1. Initial program 88.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 \frac{1 + \alpha}{\color{blue}{{\beta}^{2}}} \]
              2. lower-+.f64N/A

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

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

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

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

            if 6.0000000000000004e159 < beta

            1. Initial program 74.9%

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

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

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

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

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

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

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

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

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

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

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

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

                  \[\leadsto \frac{\frac{\alpha}{\beta}}{\color{blue}{\beta}} \]
                5. lower-/.f6496.8

                  \[\leadsto \frac{\frac{\alpha}{\beta}}{\beta} \]
              3. Applied rewrites96.8%

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

            Alternative 10: 97.2% accurate, 2.4× speedup?

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

              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}} \]
              4. Applied rewrites99.1%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

              if 4.20000000000000018 < beta

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

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

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

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

                \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{\color{blue}{3 + \beta}} \]
              7. Step-by-step derivation
                1. lower-+.f6489.5

                  \[\leadsto \frac{\frac{1 + \alpha}{\beta}}{3 + \color{blue}{\beta}} \]
              8. Applied rewrites89.5%

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

            Alternative 11: 97.2% accurate, 2.4× speedup?

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

              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}} \]
              4. Applied rewrites99.1%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

              if 6.20000000000000018 < beta

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

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

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

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

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

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

              Alternative 12: 96.8% accurate, 2.6× speedup?

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

                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}} \]
                4. Applied rewrites99.1%

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

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

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

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

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

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

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

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

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

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

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

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

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

                  if 10 < beta

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

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

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

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

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

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

                  Alternative 13: 55.7% accurate, 2.9× speedup?

                  \[\begin{array}{l} [alpha, beta] = \mathsf{sort}([alpha, beta])\\ \\ \begin{array}{l} \mathbf{if}\;\beta \leq 6 \cdot 10^{+159}:\\ \;\;\;\;\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 6e+159) (/ (+ 1.0 alpha) (* beta beta)) (/ (/ alpha beta) beta)))
                  assert(alpha < beta);
                  double code(double alpha, double beta) {
                  	double tmp;
                  	if (beta <= 6e+159) {
                  		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 <= 6d+159) 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 <= 6e+159) {
                  		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 <= 6e+159:
                  		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 <= 6e+159)
                  		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 <= 6e+159)
                  		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, 6e+159], 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 6 \cdot 10^{+159}:\\
                  \;\;\;\;\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 < 6.0000000000000004e159

                    1. Initial program 97.9%

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

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

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

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

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

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

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

                    if 6.0000000000000004e159 < beta

                    1. Initial program 74.9%

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

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

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

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

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

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

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

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

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

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

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

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

                          \[\leadsto \frac{\frac{\alpha}{\beta}}{\color{blue}{\beta}} \]
                        5. lower-/.f6496.8

                          \[\leadsto \frac{\frac{\alpha}{\beta}}{\beta} \]
                      3. Applied rewrites96.8%

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

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

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

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

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

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

                    Alternative 15: 50.7% accurate, 4.9× speedup?

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

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

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

                        \[\leadsto \frac{1 + \alpha}{\beta \cdot \color{blue}{\beta}} \]
                    5. Applied rewrites30.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 rewrites28.6%

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

                      Reproduce

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