Octave 3.8, jcobi/1

Percentage Accurate: 74.2% → 99.4%
Time: 7.4s
Alternatives: 8
Speedup: 0.9×

Specification

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

\\
\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2}
\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 8 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: 74.2% accurate, 1.0× speedup?

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

\\
\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2}
\end{array}

Alternative 1: 99.4% accurate, 0.4× speedup?

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

\\
\begin{array}{l}
t_0 := \beta + \left(\alpha + 2\right)\\
\mathbf{if}\;\frac{\beta - \alpha}{\left(\beta + \alpha\right) + 2} \leq -1:\\
\;\;\;\;\frac{\frac{\beta + \left(\beta + 2\right)}{\alpha}}{2}\\

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


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

    1. Initial program 5.5%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative5.5%

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

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

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

        \[\leadsto \frac{\color{blue}{\frac{-1 \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}{\alpha}}}{2} \]
      2. sub-neg100.0%

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

        \[\leadsto \frac{\frac{\color{blue}{-1 \cdot \left(-1 \cdot \beta\right) + -1 \cdot \left(-\left(2 + \beta\right)\right)}}{\alpha}}{2} \]
      4. neg-mul-1100.0%

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

        \[\leadsto \frac{\frac{\left(-\color{blue}{\left(-\beta\right)}\right) + -1 \cdot \left(-\left(2 + \beta\right)\right)}{\alpha}}{2} \]
      6. remove-double-neg100.0%

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

        \[\leadsto \frac{\frac{\beta + \color{blue}{\left(-\left(-\left(2 + \beta\right)\right)\right)}}{\alpha}}{2} \]
      8. remove-double-neg100.0%

        \[\leadsto \frac{\frac{\beta + \color{blue}{\left(2 + \beta\right)}}{\alpha}}{2} \]
    7. Simplified100.0%

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

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

    1. Initial program 100.0%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative100.0%

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

      \[\leadsto \color{blue}{\frac{\frac{\beta - \alpha}{\left(\beta + \alpha\right) + 2} + 1}{2}} \]
    4. Add Preprocessing
    5. Step-by-step derivation
      1. div-sub100.0%

        \[\leadsto \frac{\color{blue}{\left(\frac{\beta}{\left(\beta + \alpha\right) + 2} - \frac{\alpha}{\left(\beta + \alpha\right) + 2}\right)} + 1}{2} \]
      2. associate-+l-100.0%

        \[\leadsto \frac{\color{blue}{\frac{\beta}{\left(\beta + \alpha\right) + 2} - \left(\frac{\alpha}{\left(\beta + \alpha\right) + 2} - 1\right)}}{2} \]
      3. associate-+l+100.0%

        \[\leadsto \frac{\frac{\beta}{\color{blue}{\beta + \left(\alpha + 2\right)}} - \left(\frac{\alpha}{\left(\beta + \alpha\right) + 2} - 1\right)}{2} \]
      4. associate-+l+100.0%

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

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

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

Alternative 2: 99.4% accurate, 0.5× speedup?

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

\\
\begin{array}{l}
t_0 := \frac{\beta - \alpha}{\left(\beta + \alpha\right) + 2}\\
\mathbf{if}\;t\_0 \leq -1:\\
\;\;\;\;\frac{\frac{\beta + \left(\beta + 2\right)}{\alpha}}{2}\\

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


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

    1. Initial program 5.5%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative5.5%

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

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

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

        \[\leadsto \frac{\color{blue}{\frac{-1 \cdot \left(-1 \cdot \beta - \left(2 + \beta\right)\right)}{\alpha}}}{2} \]
      2. sub-neg100.0%

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

        \[\leadsto \frac{\frac{\color{blue}{-1 \cdot \left(-1 \cdot \beta\right) + -1 \cdot \left(-\left(2 + \beta\right)\right)}}{\alpha}}{2} \]
      4. neg-mul-1100.0%

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

        \[\leadsto \frac{\frac{\left(-\color{blue}{\left(-\beta\right)}\right) + -1 \cdot \left(-\left(2 + \beta\right)\right)}{\alpha}}{2} \]
      6. remove-double-neg100.0%

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

        \[\leadsto \frac{\frac{\beta + \color{blue}{\left(-\left(-\left(2 + \beta\right)\right)\right)}}{\alpha}}{2} \]
      8. remove-double-neg100.0%

        \[\leadsto \frac{\frac{\beta + \color{blue}{\left(2 + \beta\right)}}{\alpha}}{2} \]
    7. Simplified100.0%

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

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

    1. Initial program 100.0%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Add Preprocessing
  3. Recombined 2 regimes into one program.
  4. Final simplification100.0%

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

Alternative 3: 68.0% accurate, 0.6× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{1 + \beta \cdot 0.5}{2}\\ \mathbf{if}\;\beta \leq 3.2 \cdot 10^{-302}:\\ \;\;\;\;t\_0\\ \mathbf{elif}\;\beta \leq 2.9 \cdot 10^{-207}:\\ \;\;\;\;\frac{\frac{2}{\alpha}}{2}\\ \mathbf{elif}\;\beta \leq 2:\\ \;\;\;\;t\_0\\ \mathbf{else}:\\ \;\;\;\;1\\ \end{array} \end{array} \]
(FPCore (alpha beta)
 :precision binary64
 (let* ((t_0 (/ (+ 1.0 (* beta 0.5)) 2.0)))
   (if (<= beta 3.2e-302)
     t_0
     (if (<= beta 2.9e-207)
       (/ (/ 2.0 alpha) 2.0)
       (if (<= beta 2.0) t_0 1.0)))))
double code(double alpha, double beta) {
	double t_0 = (1.0 + (beta * 0.5)) / 2.0;
	double tmp;
	if (beta <= 3.2e-302) {
		tmp = t_0;
	} else if (beta <= 2.9e-207) {
		tmp = (2.0 / alpha) / 2.0;
	} else if (beta <= 2.0) {
		tmp = t_0;
	} else {
		tmp = 1.0;
	}
	return tmp;
}
real(8) function code(alpha, beta)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    real(8) :: t_0
    real(8) :: tmp
    t_0 = (1.0d0 + (beta * 0.5d0)) / 2.0d0
    if (beta <= 3.2d-302) then
        tmp = t_0
    else if (beta <= 2.9d-207) then
        tmp = (2.0d0 / alpha) / 2.0d0
    else if (beta <= 2.0d0) then
        tmp = t_0
    else
        tmp = 1.0d0
    end if
    code = tmp
end function
public static double code(double alpha, double beta) {
	double t_0 = (1.0 + (beta * 0.5)) / 2.0;
	double tmp;
	if (beta <= 3.2e-302) {
		tmp = t_0;
	} else if (beta <= 2.9e-207) {
		tmp = (2.0 / alpha) / 2.0;
	} else if (beta <= 2.0) {
		tmp = t_0;
	} else {
		tmp = 1.0;
	}
	return tmp;
}
def code(alpha, beta):
	t_0 = (1.0 + (beta * 0.5)) / 2.0
	tmp = 0
	if beta <= 3.2e-302:
		tmp = t_0
	elif beta <= 2.9e-207:
		tmp = (2.0 / alpha) / 2.0
	elif beta <= 2.0:
		tmp = t_0
	else:
		tmp = 1.0
	return tmp
function code(alpha, beta)
	t_0 = Float64(Float64(1.0 + Float64(beta * 0.5)) / 2.0)
	tmp = 0.0
	if (beta <= 3.2e-302)
		tmp = t_0;
	elseif (beta <= 2.9e-207)
		tmp = Float64(Float64(2.0 / alpha) / 2.0);
	elseif (beta <= 2.0)
		tmp = t_0;
	else
		tmp = 1.0;
	end
	return tmp
end
function tmp_2 = code(alpha, beta)
	t_0 = (1.0 + (beta * 0.5)) / 2.0;
	tmp = 0.0;
	if (beta <= 3.2e-302)
		tmp = t_0;
	elseif (beta <= 2.9e-207)
		tmp = (2.0 / alpha) / 2.0;
	elseif (beta <= 2.0)
		tmp = t_0;
	else
		tmp = 1.0;
	end
	tmp_2 = tmp;
end
code[alpha_, beta_] := Block[{t$95$0 = N[(N[(1.0 + N[(beta * 0.5), $MachinePrecision]), $MachinePrecision] / 2.0), $MachinePrecision]}, If[LessEqual[beta, 3.2e-302], t$95$0, If[LessEqual[beta, 2.9e-207], N[(N[(2.0 / alpha), $MachinePrecision] / 2.0), $MachinePrecision], If[LessEqual[beta, 2.0], t$95$0, 1.0]]]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \frac{1 + \beta \cdot 0.5}{2}\\
\mathbf{if}\;\beta \leq 3.2 \cdot 10^{-302}:\\
\;\;\;\;t\_0\\

\mathbf{elif}\;\beta \leq 2.9 \cdot 10^{-207}:\\
\;\;\;\;\frac{\frac{2}{\alpha}}{2}\\

\mathbf{elif}\;\beta \leq 2:\\
\;\;\;\;t\_0\\

\mathbf{else}:\\
\;\;\;\;1\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if beta < 3.19999999999999978e-302 or 2.90000000000000011e-207 < beta < 2

    1. Initial program 71.8%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative71.8%

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

      \[\leadsto \color{blue}{\frac{\frac{\beta - \alpha}{\left(\beta + \alpha\right) + 2} + 1}{2}} \]
    4. Add Preprocessing
    5. Taylor expanded in alpha around 0 68.9%

      \[\leadsto \frac{\color{blue}{\frac{\beta}{2 + \beta}} + 1}{2} \]
    6. Taylor expanded in beta around 0 67.5%

      \[\leadsto \frac{\color{blue}{0.5 \cdot \beta} + 1}{2} \]
    7. Step-by-step derivation
      1. *-commutative67.5%

        \[\leadsto \frac{\color{blue}{\beta \cdot 0.5} + 1}{2} \]
    8. Simplified67.5%

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

    if 3.19999999999999978e-302 < beta < 2.90000000000000011e-207

    1. Initial program 36.5%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative36.5%

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

      \[\leadsto \color{blue}{\frac{\frac{\beta - \alpha}{\left(\beta + \alpha\right) + 2} + 1}{2}} \]
    4. Add Preprocessing
    5. Taylor expanded in beta around 0 36.5%

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

        \[\leadsto \frac{1 - \frac{\alpha}{\color{blue}{\alpha + 2}}}{2} \]
    7. Simplified36.5%

      \[\leadsto \frac{\color{blue}{1 - \frac{\alpha}{\alpha + 2}}}{2} \]
    8. Taylor expanded in alpha around inf 67.6%

      \[\leadsto \frac{\color{blue}{\frac{2}{\alpha}}}{2} \]

    if 2 < beta

    1. Initial program 81.7%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative81.7%

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

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

      \[\leadsto \frac{\color{blue}{2}}{2} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification72.4%

    \[\leadsto \begin{array}{l} \mathbf{if}\;\beta \leq 3.2 \cdot 10^{-302}:\\ \;\;\;\;\frac{1 + \beta \cdot 0.5}{2}\\ \mathbf{elif}\;\beta \leq 2.9 \cdot 10^{-207}:\\ \;\;\;\;\frac{\frac{2}{\alpha}}{2}\\ \mathbf{elif}\;\beta \leq 2:\\ \;\;\;\;\frac{1 + \beta \cdot 0.5}{2}\\ \mathbf{else}:\\ \;\;\;\;1\\ \end{array} \]
  5. Add Preprocessing

Alternative 4: 87.2% accurate, 0.9× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\alpha \leq 1.65 \cdot 10^{+22}:\\ \;\;\;\;\frac{1 + \frac{\beta}{\beta + 2}}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{2}{\alpha}}{2}\\ \end{array} \end{array} \]
(FPCore (alpha beta)
 :precision binary64
 (if (<= alpha 1.65e+22)
   (/ (+ 1.0 (/ beta (+ beta 2.0))) 2.0)
   (/ (/ 2.0 alpha) 2.0)))
double code(double alpha, double beta) {
	double tmp;
	if (alpha <= 1.65e+22) {
		tmp = (1.0 + (beta / (beta + 2.0))) / 2.0;
	} else {
		tmp = (2.0 / alpha) / 2.0;
	}
	return tmp;
}
real(8) function code(alpha, beta)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    real(8) :: tmp
    if (alpha <= 1.65d+22) then
        tmp = (1.0d0 + (beta / (beta + 2.0d0))) / 2.0d0
    else
        tmp = (2.0d0 / alpha) / 2.0d0
    end if
    code = tmp
end function
public static double code(double alpha, double beta) {
	double tmp;
	if (alpha <= 1.65e+22) {
		tmp = (1.0 + (beta / (beta + 2.0))) / 2.0;
	} else {
		tmp = (2.0 / alpha) / 2.0;
	}
	return tmp;
}
def code(alpha, beta):
	tmp = 0
	if alpha <= 1.65e+22:
		tmp = (1.0 + (beta / (beta + 2.0))) / 2.0
	else:
		tmp = (2.0 / alpha) / 2.0
	return tmp
function code(alpha, beta)
	tmp = 0.0
	if (alpha <= 1.65e+22)
		tmp = Float64(Float64(1.0 + Float64(beta / Float64(beta + 2.0))) / 2.0);
	else
		tmp = Float64(Float64(2.0 / alpha) / 2.0);
	end
	return tmp
end
function tmp_2 = code(alpha, beta)
	tmp = 0.0;
	if (alpha <= 1.65e+22)
		tmp = (1.0 + (beta / (beta + 2.0))) / 2.0;
	else
		tmp = (2.0 / alpha) / 2.0;
	end
	tmp_2 = tmp;
end
code[alpha_, beta_] := If[LessEqual[alpha, 1.65e+22], N[(N[(1.0 + N[(beta / N[(beta + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / 2.0), $MachinePrecision], N[(N[(2.0 / alpha), $MachinePrecision] / 2.0), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;\alpha \leq 1.65 \cdot 10^{+22}:\\
\;\;\;\;\frac{1 + \frac{\beta}{\beta + 2}}{2}\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{2}{\alpha}}{2}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if alpha < 1.6499999999999999e22

    1. Initial program 99.4%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative99.4%

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

      \[\leadsto \color{blue}{\frac{\frac{\beta - \alpha}{\left(\beta + \alpha\right) + 2} + 1}{2}} \]
    4. Add Preprocessing
    5. Taylor expanded in alpha around 0 97.3%

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

    if 1.6499999999999999e22 < alpha

    1. Initial program 22.1%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative22.1%

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

      \[\leadsto \color{blue}{\frac{\frac{\beta - \alpha}{\left(\beta + \alpha\right) + 2} + 1}{2}} \]
    4. Add Preprocessing
    5. Taylor expanded in beta around 0 5.1%

      \[\leadsto \frac{\color{blue}{1 - \frac{\alpha}{2 + \alpha}}}{2} \]
    6. Step-by-step derivation
      1. +-commutative5.1%

        \[\leadsto \frac{1 - \frac{\alpha}{\color{blue}{\alpha + 2}}}{2} \]
    7. Simplified5.1%

      \[\leadsto \frac{\color{blue}{1 - \frac{\alpha}{\alpha + 2}}}{2} \]
    8. Taylor expanded in alpha around inf 65.3%

      \[\leadsto \frac{\color{blue}{\frac{2}{\alpha}}}{2} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification85.9%

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

Alternative 5: 93.3% accurate, 0.9× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\alpha \leq 7.4 \cdot 10^{+21}:\\ \;\;\;\;\frac{1 + \frac{\beta}{\beta + 2}}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\beta + \left(\beta + 2\right)}{\alpha}}{2}\\ \end{array} \end{array} \]
(FPCore (alpha beta)
 :precision binary64
 (if (<= alpha 7.4e+21)
   (/ (+ 1.0 (/ beta (+ beta 2.0))) 2.0)
   (/ (/ (+ beta (+ beta 2.0)) alpha) 2.0)))
double code(double alpha, double beta) {
	double tmp;
	if (alpha <= 7.4e+21) {
		tmp = (1.0 + (beta / (beta + 2.0))) / 2.0;
	} else {
		tmp = ((beta + (beta + 2.0)) / alpha) / 2.0;
	}
	return tmp;
}
real(8) function code(alpha, beta)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    real(8) :: tmp
    if (alpha <= 7.4d+21) then
        tmp = (1.0d0 + (beta / (beta + 2.0d0))) / 2.0d0
    else
        tmp = ((beta + (beta + 2.0d0)) / alpha) / 2.0d0
    end if
    code = tmp
end function
public static double code(double alpha, double beta) {
	double tmp;
	if (alpha <= 7.4e+21) {
		tmp = (1.0 + (beta / (beta + 2.0))) / 2.0;
	} else {
		tmp = ((beta + (beta + 2.0)) / alpha) / 2.0;
	}
	return tmp;
}
def code(alpha, beta):
	tmp = 0
	if alpha <= 7.4e+21:
		tmp = (1.0 + (beta / (beta + 2.0))) / 2.0
	else:
		tmp = ((beta + (beta + 2.0)) / alpha) / 2.0
	return tmp
function code(alpha, beta)
	tmp = 0.0
	if (alpha <= 7.4e+21)
		tmp = Float64(Float64(1.0 + Float64(beta / Float64(beta + 2.0))) / 2.0);
	else
		tmp = Float64(Float64(Float64(beta + Float64(beta + 2.0)) / alpha) / 2.0);
	end
	return tmp
end
function tmp_2 = code(alpha, beta)
	tmp = 0.0;
	if (alpha <= 7.4e+21)
		tmp = (1.0 + (beta / (beta + 2.0))) / 2.0;
	else
		tmp = ((beta + (beta + 2.0)) / alpha) / 2.0;
	end
	tmp_2 = tmp;
end
code[alpha_, beta_] := If[LessEqual[alpha, 7.4e+21], N[(N[(1.0 + N[(beta / N[(beta + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / 2.0), $MachinePrecision], N[(N[(N[(beta + N[(beta + 2.0), $MachinePrecision]), $MachinePrecision] / alpha), $MachinePrecision] / 2.0), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;\alpha \leq 7.4 \cdot 10^{+21}:\\
\;\;\;\;\frac{1 + \frac{\beta}{\beta + 2}}{2}\\

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


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if alpha < 7.4e21

    1. Initial program 99.4%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative99.4%

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

      \[\leadsto \color{blue}{\frac{\frac{\beta - \alpha}{\left(\beta + \alpha\right) + 2} + 1}{2}} \]
    4. Add Preprocessing
    5. Taylor expanded in alpha around 0 97.3%

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

    if 7.4e21 < alpha

    1. Initial program 22.1%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative22.1%

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

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

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

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

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

        \[\leadsto \frac{\frac{\color{blue}{-1 \cdot \left(-1 \cdot \beta\right) + -1 \cdot \left(-\left(2 + \beta\right)\right)}}{\alpha}}{2} \]
      4. neg-mul-183.6%

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

        \[\leadsto \frac{\frac{\left(-\color{blue}{\left(-\beta\right)}\right) + -1 \cdot \left(-\left(2 + \beta\right)\right)}{\alpha}}{2} \]
      6. remove-double-neg83.6%

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

        \[\leadsto \frac{\frac{\beta + \color{blue}{\left(-\left(-\left(2 + \beta\right)\right)\right)}}{\alpha}}{2} \]
      8. remove-double-neg83.6%

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

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

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

Alternative 6: 51.4% accurate, 1.3× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\alpha \leq 7.4 \cdot 10^{+21}:\\ \;\;\;\;1\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{2}{\alpha}}{2}\\ \end{array} \end{array} \]
(FPCore (alpha beta)
 :precision binary64
 (if (<= alpha 7.4e+21) 1.0 (/ (/ 2.0 alpha) 2.0)))
double code(double alpha, double beta) {
	double tmp;
	if (alpha <= 7.4e+21) {
		tmp = 1.0;
	} else {
		tmp = (2.0 / alpha) / 2.0;
	}
	return tmp;
}
real(8) function code(alpha, beta)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    real(8) :: tmp
    if (alpha <= 7.4d+21) then
        tmp = 1.0d0
    else
        tmp = (2.0d0 / alpha) / 2.0d0
    end if
    code = tmp
end function
public static double code(double alpha, double beta) {
	double tmp;
	if (alpha <= 7.4e+21) {
		tmp = 1.0;
	} else {
		tmp = (2.0 / alpha) / 2.0;
	}
	return tmp;
}
def code(alpha, beta):
	tmp = 0
	if alpha <= 7.4e+21:
		tmp = 1.0
	else:
		tmp = (2.0 / alpha) / 2.0
	return tmp
function code(alpha, beta)
	tmp = 0.0
	if (alpha <= 7.4e+21)
		tmp = 1.0;
	else
		tmp = Float64(Float64(2.0 / alpha) / 2.0);
	end
	return tmp
end
function tmp_2 = code(alpha, beta)
	tmp = 0.0;
	if (alpha <= 7.4e+21)
		tmp = 1.0;
	else
		tmp = (2.0 / alpha) / 2.0;
	end
	tmp_2 = tmp;
end
code[alpha_, beta_] := If[LessEqual[alpha, 7.4e+21], 1.0, N[(N[(2.0 / alpha), $MachinePrecision] / 2.0), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;\alpha \leq 7.4 \cdot 10^{+21}:\\
\;\;\;\;1\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{2}{\alpha}}{2}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if alpha < 7.4e21

    1. Initial program 99.4%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative99.4%

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

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

      \[\leadsto \frac{\color{blue}{2}}{2} \]

    if 7.4e21 < alpha

    1. Initial program 22.1%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative22.1%

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

      \[\leadsto \color{blue}{\frac{\frac{\beta - \alpha}{\left(\beta + \alpha\right) + 2} + 1}{2}} \]
    4. Add Preprocessing
    5. Taylor expanded in beta around 0 5.1%

      \[\leadsto \frac{\color{blue}{1 - \frac{\alpha}{2 + \alpha}}}{2} \]
    6. Step-by-step derivation
      1. +-commutative5.1%

        \[\leadsto \frac{1 - \frac{\alpha}{\color{blue}{\alpha + 2}}}{2} \]
    7. Simplified5.1%

      \[\leadsto \frac{\color{blue}{1 - \frac{\alpha}{\alpha + 2}}}{2} \]
    8. Taylor expanded in alpha around inf 65.3%

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

    \[\leadsto \begin{array}{l} \mathbf{if}\;\alpha \leq 7.4 \cdot 10^{+21}:\\ \;\;\;\;1\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{2}{\alpha}}{2}\\ \end{array} \]
  5. Add Preprocessing

Alternative 7: 39.8% accurate, 1.6× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\alpha \leq 2.4 \cdot 10^{+170}:\\ \;\;\;\;1\\ \mathbf{else}:\\ \;\;\;\;\frac{\beta}{\alpha}\\ \end{array} \end{array} \]
(FPCore (alpha beta)
 :precision binary64
 (if (<= alpha 2.4e+170) 1.0 (/ beta alpha)))
double code(double alpha, double beta) {
	double tmp;
	if (alpha <= 2.4e+170) {
		tmp = 1.0;
	} else {
		tmp = beta / alpha;
	}
	return tmp;
}
real(8) function code(alpha, beta)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    real(8) :: tmp
    if (alpha <= 2.4d+170) then
        tmp = 1.0d0
    else
        tmp = beta / alpha
    end if
    code = tmp
end function
public static double code(double alpha, double beta) {
	double tmp;
	if (alpha <= 2.4e+170) {
		tmp = 1.0;
	} else {
		tmp = beta / alpha;
	}
	return tmp;
}
def code(alpha, beta):
	tmp = 0
	if alpha <= 2.4e+170:
		tmp = 1.0
	else:
		tmp = beta / alpha
	return tmp
function code(alpha, beta)
	tmp = 0.0
	if (alpha <= 2.4e+170)
		tmp = 1.0;
	else
		tmp = Float64(beta / alpha);
	end
	return tmp
end
function tmp_2 = code(alpha, beta)
	tmp = 0.0;
	if (alpha <= 2.4e+170)
		tmp = 1.0;
	else
		tmp = beta / alpha;
	end
	tmp_2 = tmp;
end
code[alpha_, beta_] := If[LessEqual[alpha, 2.4e+170], 1.0, N[(beta / alpha), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;\alpha \leq 2.4 \cdot 10^{+170}:\\
\;\;\;\;1\\

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


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if alpha < 2.4e170

    1. Initial program 84.1%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative84.1%

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

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

      \[\leadsto \frac{\color{blue}{2}}{2} \]

    if 2.4e170 < alpha

    1. Initial program 15.0%

      \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
    2. Step-by-step derivation
      1. +-commutative15.0%

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

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

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

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

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

        \[\leadsto \frac{\frac{\color{blue}{-1 \cdot \left(-1 \cdot \beta\right) + -1 \cdot \left(-\left(2 + \beta\right)\right)}}{\alpha}}{2} \]
      4. neg-mul-191.8%

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

        \[\leadsto \frac{\frac{\left(-\color{blue}{\left(-\beta\right)}\right) + -1 \cdot \left(-\left(2 + \beta\right)\right)}{\alpha}}{2} \]
      6. remove-double-neg91.8%

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

        \[\leadsto \frac{\frac{\beta + \color{blue}{\left(-\left(-\left(2 + \beta\right)\right)\right)}}{\alpha}}{2} \]
      8. remove-double-neg91.8%

        \[\leadsto \frac{\frac{\beta + \color{blue}{\left(2 + \beta\right)}}{\alpha}}{2} \]
    7. Simplified91.8%

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

      \[\leadsto \frac{\frac{\color{blue}{2 \cdot \beta}}{\alpha}}{2} \]
    9. Taylor expanded in beta around 0 35.7%

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

    \[\leadsto \begin{array}{l} \mathbf{if}\;\alpha \leq 2.4 \cdot 10^{+170}:\\ \;\;\;\;1\\ \mathbf{else}:\\ \;\;\;\;\frac{\beta}{\alpha}\\ \end{array} \]
  5. Add Preprocessing

Alternative 8: 36.5% accurate, 13.0× speedup?

\[\begin{array}{l} \\ 1 \end{array} \]
(FPCore (alpha beta) :precision binary64 1.0)
double code(double alpha, double beta) {
	return 1.0;
}
real(8) function code(alpha, beta)
    real(8), intent (in) :: alpha
    real(8), intent (in) :: beta
    code = 1.0d0
end function
public static double code(double alpha, double beta) {
	return 1.0;
}
def code(alpha, beta):
	return 1.0
function code(alpha, beta)
	return 1.0
end
function tmp = code(alpha, beta)
	tmp = 1.0;
end
code[alpha_, beta_] := 1.0
\begin{array}{l}

\\
1
\end{array}
Derivation
  1. Initial program 71.9%

    \[\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2} \]
  2. Step-by-step derivation
    1. +-commutative71.9%

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

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

    \[\leadsto \frac{\color{blue}{2}}{2} \]
  6. Final simplification37.4%

    \[\leadsto 1 \]
  7. Add Preprocessing

Reproduce

?
herbie shell --seed 2024081 
(FPCore (alpha beta)
  :name "Octave 3.8, jcobi/1"
  :precision binary64
  :pre (and (> alpha -1.0) (> beta -1.0))
  (/ (+ (/ (- beta alpha) (+ (+ alpha beta) 2.0)) 1.0) 2.0))