Optimisation.CirclePacking:place from circle-packing-0.1.0.4, B

Percentage Accurate: 99.9% → 99.9%
Time: 6.6s
Alternatives: 9
Speedup: 1.0×

Specification

?
\[\begin{array}{l} \\ \frac{\left(x + y\right) - z}{t \cdot 2} \end{array} \]
(FPCore (x y z t) :precision binary64 (/ (- (+ x y) z) (* t 2.0)))
double code(double x, double y, double z, double t) {
	return ((x + y) - z) / (t * 2.0);
}
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = ((x + y) - z) / (t * 2.0d0)
end function
public static double code(double x, double y, double z, double t) {
	return ((x + y) - z) / (t * 2.0);
}
def code(x, y, z, t):
	return ((x + y) - z) / (t * 2.0)
function code(x, y, z, t)
	return Float64(Float64(Float64(x + y) - z) / Float64(t * 2.0))
end
function tmp = code(x, y, z, t)
	tmp = ((x + y) - z) / (t * 2.0);
end
code[x_, y_, z_, t_] := N[(N[(N[(x + y), $MachinePrecision] - z), $MachinePrecision] / N[(t * 2.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{\left(x + y\right) - z}{t \cdot 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 9 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: 99.9% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{\left(x + y\right) - z}{t \cdot 2} \end{array} \]
(FPCore (x y z t) :precision binary64 (/ (- (+ x y) z) (* t 2.0)))
double code(double x, double y, double z, double t) {
	return ((x + y) - z) / (t * 2.0);
}
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = ((x + y) - z) / (t * 2.0d0)
end function
public static double code(double x, double y, double z, double t) {
	return ((x + y) - z) / (t * 2.0);
}
def code(x, y, z, t):
	return ((x + y) - z) / (t * 2.0)
function code(x, y, z, t)
	return Float64(Float64(Float64(x + y) - z) / Float64(t * 2.0))
end
function tmp = code(x, y, z, t)
	tmp = ((x + y) - z) / (t * 2.0);
end
code[x_, y_, z_, t_] := N[(N[(N[(x + y), $MachinePrecision] - z), $MachinePrecision] / N[(t * 2.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{\left(x + y\right) - z}{t \cdot 2}
\end{array}

Alternative 1: 99.9% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{\left(x + y\right) - z}{t \cdot 2} \end{array} \]
(FPCore (x y z t) :precision binary64 (/ (- (+ x y) z) (* t 2.0)))
double code(double x, double y, double z, double t) {
	return ((x + y) - z) / (t * 2.0);
}
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = ((x + y) - z) / (t * 2.0d0)
end function
public static double code(double x, double y, double z, double t) {
	return ((x + y) - z) / (t * 2.0);
}
def code(x, y, z, t):
	return ((x + y) - z) / (t * 2.0)
function code(x, y, z, t)
	return Float64(Float64(Float64(x + y) - z) / Float64(t * 2.0))
end
function tmp = code(x, y, z, t)
	tmp = ((x + y) - z) / (t * 2.0);
end
code[x_, y_, z_, t_] := N[(N[(N[(x + y), $MachinePrecision] - z), $MachinePrecision] / N[(t * 2.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{\left(x + y\right) - z}{t \cdot 2}
\end{array}
Derivation
  1. Initial program 100.0%

    \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
  2. Add Preprocessing
  3. Final simplification100.0%

    \[\leadsto \frac{\left(x + y\right) - z}{t \cdot 2} \]
  4. Add Preprocessing

Alternative 2: 60.9% accurate, 0.3× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_1 := \frac{z - x}{t \cdot -2}\\ \mathbf{if}\;x + y \leq 10^{-123}:\\ \;\;\;\;t_1\\ \mathbf{elif}\;x + y \leq 5 \cdot 10^{-53}:\\ \;\;\;\;0.5 \cdot \frac{x + y}{t}\\ \mathbf{elif}\;x + y \leq 10^{+39}:\\ \;\;\;\;t_1\\ \mathbf{else}:\\ \;\;\;\;0.5 \cdot \frac{y}{t}\\ \end{array} \end{array} \]
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (/ (- z x) (* t -2.0))))
   (if (<= (+ x y) 1e-123)
     t_1
     (if (<= (+ x y) 5e-53)
       (* 0.5 (/ (+ x y) t))
       (if (<= (+ x y) 1e+39) t_1 (* 0.5 (/ y t)))))))
double code(double x, double y, double z, double t) {
	double t_1 = (z - x) / (t * -2.0);
	double tmp;
	if ((x + y) <= 1e-123) {
		tmp = t_1;
	} else if ((x + y) <= 5e-53) {
		tmp = 0.5 * ((x + y) / t);
	} else if ((x + y) <= 1e+39) {
		tmp = t_1;
	} else {
		tmp = 0.5 * (y / t);
	}
	return tmp;
}
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: t_1
    real(8) :: tmp
    t_1 = (z - x) / (t * (-2.0d0))
    if ((x + y) <= 1d-123) then
        tmp = t_1
    else if ((x + y) <= 5d-53) then
        tmp = 0.5d0 * ((x + y) / t)
    else if ((x + y) <= 1d+39) then
        tmp = t_1
    else
        tmp = 0.5d0 * (y / t)
    end if
    code = tmp
end function
public static double code(double x, double y, double z, double t) {
	double t_1 = (z - x) / (t * -2.0);
	double tmp;
	if ((x + y) <= 1e-123) {
		tmp = t_1;
	} else if ((x + y) <= 5e-53) {
		tmp = 0.5 * ((x + y) / t);
	} else if ((x + y) <= 1e+39) {
		tmp = t_1;
	} else {
		tmp = 0.5 * (y / t);
	}
	return tmp;
}
def code(x, y, z, t):
	t_1 = (z - x) / (t * -2.0)
	tmp = 0
	if (x + y) <= 1e-123:
		tmp = t_1
	elif (x + y) <= 5e-53:
		tmp = 0.5 * ((x + y) / t)
	elif (x + y) <= 1e+39:
		tmp = t_1
	else:
		tmp = 0.5 * (y / t)
	return tmp
function code(x, y, z, t)
	t_1 = Float64(Float64(z - x) / Float64(t * -2.0))
	tmp = 0.0
	if (Float64(x + y) <= 1e-123)
		tmp = t_1;
	elseif (Float64(x + y) <= 5e-53)
		tmp = Float64(0.5 * Float64(Float64(x + y) / t));
	elseif (Float64(x + y) <= 1e+39)
		tmp = t_1;
	else
		tmp = Float64(0.5 * Float64(y / t));
	end
	return tmp
end
function tmp_2 = code(x, y, z, t)
	t_1 = (z - x) / (t * -2.0);
	tmp = 0.0;
	if ((x + y) <= 1e-123)
		tmp = t_1;
	elseif ((x + y) <= 5e-53)
		tmp = 0.5 * ((x + y) / t);
	elseif ((x + y) <= 1e+39)
		tmp = t_1;
	else
		tmp = 0.5 * (y / t);
	end
	tmp_2 = tmp;
end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[(z - x), $MachinePrecision] / N[(t * -2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(x + y), $MachinePrecision], 1e-123], t$95$1, If[LessEqual[N[(x + y), $MachinePrecision], 5e-53], N[(0.5 * N[(N[(x + y), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision], If[LessEqual[N[(x + y), $MachinePrecision], 1e+39], t$95$1, N[(0.5 * N[(y / t), $MachinePrecision]), $MachinePrecision]]]]]
\begin{array}{l}

\\
\begin{array}{l}
t_1 := \frac{z - x}{t \cdot -2}\\
\mathbf{if}\;x + y \leq 10^{-123}:\\
\;\;\;\;t_1\\

\mathbf{elif}\;x + y \leq 5 \cdot 10^{-53}:\\
\;\;\;\;0.5 \cdot \frac{x + y}{t}\\

\mathbf{elif}\;x + y \leq 10^{+39}:\\
\;\;\;\;t_1\\

\mathbf{else}:\\
\;\;\;\;0.5 \cdot \frac{y}{t}\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if (+.f64 x y) < 1.0000000000000001e-123 or 5e-53 < (+.f64 x y) < 9.9999999999999994e38

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

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

        \[\leadsto \frac{\color{blue}{-\left(\left(x + y\right) - z\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. sub-neg100.0%

        \[\leadsto \frac{-\color{blue}{\left(\left(x + y\right) + \left(-z\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      6. +-commutative100.0%

        \[\leadsto \frac{-\color{blue}{\left(\left(-z\right) + \left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      7. distribute-neg-in100.0%

        \[\leadsto \frac{\color{blue}{\left(-\left(-z\right)\right) + \left(-\left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      8. remove-double-neg100.0%

        \[\leadsto \frac{\color{blue}{z} + \left(-\left(x + y\right)\right)}{-1 \cdot \left(t \cdot 2\right)} \]
      9. sub-neg100.0%

        \[\leadsto \frac{\color{blue}{z - \left(x + y\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      10. +-commutative100.0%

        \[\leadsto \frac{z - \color{blue}{\left(y + x\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      11. associate--r+100.0%

        \[\leadsto \frac{\color{blue}{\left(z - y\right) - x}}{-1 \cdot \left(t \cdot 2\right)} \]
      12. neg-mul-1100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{-t \cdot 2}} \]
      13. distribute-rgt-neg-in100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{t \cdot \left(-2\right)}} \]
      14. metadata-eval100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{t \cdot \color{blue}{-2}} \]
    3. Simplified100.0%

      \[\leadsto \color{blue}{\frac{\left(z - y\right) - x}{t \cdot -2}} \]
    4. Add Preprocessing
    5. Taylor expanded in y around 0 79.6%

      \[\leadsto \frac{\color{blue}{z - x}}{t \cdot -2} \]

    if 1.0000000000000001e-123 < (+.f64 x y) < 5e-53

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
      4. *-commutative100.0%

        \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. times-frac99.4%

        \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
      6. remove-double-neg99.4%

        \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      7. sub0-neg99.4%

        \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      8. div-sub99.4%

        \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
      9. metadata-eval99.4%

        \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      10. neg-mul-199.4%

        \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      11. *-commutative99.4%

        \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      12. associate-/l*99.4%

        \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
      13. metadata-eval99.4%

        \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
      14. /-rgt-identity99.4%

        \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      15. associate--r-99.4%

        \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
      16. neg-sub099.4%

        \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
      17. +-commutative99.4%

        \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      18. sub-neg99.4%

        \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      19. +-commutative99.4%

        \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      20. associate--r+99.4%

        \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
      21. *-commutative99.4%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
      22. associate-/r*99.4%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
      23. metadata-eval99.4%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
    3. Simplified99.4%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
    4. Add Preprocessing
    5. Taylor expanded in z around 0 73.9%

      \[\leadsto \color{blue}{0.5 \cdot \frac{x + y}{t}} \]

    if 9.9999999999999994e38 < (+.f64 x y)

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
      4. *-commutative100.0%

        \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. times-frac99.8%

        \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
      6. remove-double-neg99.8%

        \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      7. sub0-neg99.8%

        \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      8. div-sub99.8%

        \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
      9. metadata-eval99.8%

        \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      10. neg-mul-199.8%

        \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      11. *-commutative99.8%

        \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      12. associate-/l*99.8%

        \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
      13. metadata-eval99.8%

        \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
      14. /-rgt-identity99.8%

        \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      15. associate--r-99.8%

        \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
      16. neg-sub099.8%

        \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
      17. +-commutative99.8%

        \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      18. sub-neg99.8%

        \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      19. +-commutative99.8%

        \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      20. associate--r+99.8%

        \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
      21. *-commutative99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
      22. associate-/r*99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
      23. metadata-eval99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
    3. Simplified99.8%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
    4. Add Preprocessing
    5. Taylor expanded in y around inf 46.3%

      \[\leadsto \color{blue}{0.5 \cdot \frac{y}{t}} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification66.4%

    \[\leadsto \begin{array}{l} \mathbf{if}\;x + y \leq 10^{-123}:\\ \;\;\;\;\frac{z - x}{t \cdot -2}\\ \mathbf{elif}\;x + y \leq 5 \cdot 10^{-53}:\\ \;\;\;\;0.5 \cdot \frac{x + y}{t}\\ \mathbf{elif}\;x + y \leq 10^{+39}:\\ \;\;\;\;\frac{z - x}{t \cdot -2}\\ \mathbf{else}:\\ \;\;\;\;0.5 \cdot \frac{y}{t}\\ \end{array} \]
  5. Add Preprocessing

Alternative 3: 58.9% accurate, 0.3× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x + y \leq 10^{-123}:\\ \;\;\;\;\frac{-0.5}{\frac{t}{z - x}}\\ \mathbf{elif}\;x + y \leq 5 \cdot 10^{-53}:\\ \;\;\;\;0.5 \cdot \frac{x + y}{t}\\ \mathbf{elif}\;x + y \leq 10^{+39}:\\ \;\;\;\;\frac{z}{t \cdot -2}\\ \mathbf{else}:\\ \;\;\;\;0.5 \cdot \frac{y}{t}\\ \end{array} \end{array} \]
(FPCore (x y z t)
 :precision binary64
 (if (<= (+ x y) 1e-123)
   (/ -0.5 (/ t (- z x)))
   (if (<= (+ x y) 5e-53)
     (* 0.5 (/ (+ x y) t))
     (if (<= (+ x y) 1e+39) (/ z (* t -2.0)) (* 0.5 (/ y t))))))
double code(double x, double y, double z, double t) {
	double tmp;
	if ((x + y) <= 1e-123) {
		tmp = -0.5 / (t / (z - x));
	} else if ((x + y) <= 5e-53) {
		tmp = 0.5 * ((x + y) / t);
	} else if ((x + y) <= 1e+39) {
		tmp = z / (t * -2.0);
	} else {
		tmp = 0.5 * (y / t);
	}
	return tmp;
}
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: tmp
    if ((x + y) <= 1d-123) then
        tmp = (-0.5d0) / (t / (z - x))
    else if ((x + y) <= 5d-53) then
        tmp = 0.5d0 * ((x + y) / t)
    else if ((x + y) <= 1d+39) then
        tmp = z / (t * (-2.0d0))
    else
        tmp = 0.5d0 * (y / t)
    end if
    code = tmp
end function
public static double code(double x, double y, double z, double t) {
	double tmp;
	if ((x + y) <= 1e-123) {
		tmp = -0.5 / (t / (z - x));
	} else if ((x + y) <= 5e-53) {
		tmp = 0.5 * ((x + y) / t);
	} else if ((x + y) <= 1e+39) {
		tmp = z / (t * -2.0);
	} else {
		tmp = 0.5 * (y / t);
	}
	return tmp;
}
def code(x, y, z, t):
	tmp = 0
	if (x + y) <= 1e-123:
		tmp = -0.5 / (t / (z - x))
	elif (x + y) <= 5e-53:
		tmp = 0.5 * ((x + y) / t)
	elif (x + y) <= 1e+39:
		tmp = z / (t * -2.0)
	else:
		tmp = 0.5 * (y / t)
	return tmp
function code(x, y, z, t)
	tmp = 0.0
	if (Float64(x + y) <= 1e-123)
		tmp = Float64(-0.5 / Float64(t / Float64(z - x)));
	elseif (Float64(x + y) <= 5e-53)
		tmp = Float64(0.5 * Float64(Float64(x + y) / t));
	elseif (Float64(x + y) <= 1e+39)
		tmp = Float64(z / Float64(t * -2.0));
	else
		tmp = Float64(0.5 * Float64(y / t));
	end
	return tmp
end
function tmp_2 = code(x, y, z, t)
	tmp = 0.0;
	if ((x + y) <= 1e-123)
		tmp = -0.5 / (t / (z - x));
	elseif ((x + y) <= 5e-53)
		tmp = 0.5 * ((x + y) / t);
	elseif ((x + y) <= 1e+39)
		tmp = z / (t * -2.0);
	else
		tmp = 0.5 * (y / t);
	end
	tmp_2 = tmp;
end
code[x_, y_, z_, t_] := If[LessEqual[N[(x + y), $MachinePrecision], 1e-123], N[(-0.5 / N[(t / N[(z - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[N[(x + y), $MachinePrecision], 5e-53], N[(0.5 * N[(N[(x + y), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision], If[LessEqual[N[(x + y), $MachinePrecision], 1e+39], N[(z / N[(t * -2.0), $MachinePrecision]), $MachinePrecision], N[(0.5 * N[(y / t), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x + y \leq 10^{-123}:\\
\;\;\;\;\frac{-0.5}{\frac{t}{z - x}}\\

\mathbf{elif}\;x + y \leq 5 \cdot 10^{-53}:\\
\;\;\;\;0.5 \cdot \frac{x + y}{t}\\

\mathbf{elif}\;x + y \leq 10^{+39}:\\
\;\;\;\;\frac{z}{t \cdot -2}\\

\mathbf{else}:\\
\;\;\;\;0.5 \cdot \frac{y}{t}\\


\end{array}
\end{array}
Derivation
  1. Split input into 4 regimes
  2. if (+.f64 x y) < 1.0000000000000001e-123

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
      4. *-commutative100.0%

        \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. times-frac99.7%

        \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
      6. remove-double-neg99.7%

        \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      7. sub0-neg99.7%

        \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      8. div-sub99.7%

        \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
      9. metadata-eval99.7%

        \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      10. neg-mul-199.7%

        \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      11. *-commutative99.7%

        \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      12. associate-/l*99.7%

        \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
      13. metadata-eval99.7%

        \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
      14. /-rgt-identity99.7%

        \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      15. associate--r-99.7%

        \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
      16. neg-sub099.7%

        \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
      17. +-commutative99.7%

        \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      18. sub-neg99.7%

        \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      19. +-commutative99.7%

        \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      20. associate--r+99.7%

        \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
      21. *-commutative99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
      22. associate-/r*99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
      23. metadata-eval99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
    3. Simplified99.7%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
    4. Add Preprocessing
    5. Step-by-step derivation
      1. associate-*r/100.0%

        \[\leadsto \color{blue}{\frac{\left(\left(z - y\right) - x\right) \cdot -0.5}{t}} \]
      2. clear-num99.2%

        \[\leadsto \color{blue}{\frac{1}{\frac{t}{\left(\left(z - y\right) - x\right) \cdot -0.5}}} \]
      3. associate--l-99.2%

        \[\leadsto \frac{1}{\frac{t}{\color{blue}{\left(z - \left(y + x\right)\right)} \cdot -0.5}} \]
    6. Applied egg-rr99.2%

      \[\leadsto \color{blue}{\frac{1}{\frac{t}{\left(z - \left(y + x\right)\right) \cdot -0.5}}} \]
    7. Taylor expanded in y around 0 79.1%

      \[\leadsto \color{blue}{-0.5 \cdot \frac{z - x}{t}} \]
    8. Step-by-step derivation
      1. associate-*r/79.1%

        \[\leadsto \color{blue}{\frac{-0.5 \cdot \left(z - x\right)}{t}} \]
      2. associate-/l*78.4%

        \[\leadsto \color{blue}{\frac{-0.5}{\frac{t}{z - x}}} \]
    9. Simplified78.4%

      \[\leadsto \color{blue}{\frac{-0.5}{\frac{t}{z - x}}} \]

    if 1.0000000000000001e-123 < (+.f64 x y) < 5e-53

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
      4. *-commutative100.0%

        \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. times-frac99.4%

        \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
      6. remove-double-neg99.4%

        \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      7. sub0-neg99.4%

        \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      8. div-sub99.4%

        \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
      9. metadata-eval99.4%

        \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      10. neg-mul-199.4%

        \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      11. *-commutative99.4%

        \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      12. associate-/l*99.4%

        \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
      13. metadata-eval99.4%

        \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
      14. /-rgt-identity99.4%

        \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      15. associate--r-99.4%

        \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
      16. neg-sub099.4%

        \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
      17. +-commutative99.4%

        \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      18. sub-neg99.4%

        \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      19. +-commutative99.4%

        \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      20. associate--r+99.4%

        \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
      21. *-commutative99.4%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
      22. associate-/r*99.4%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
      23. metadata-eval99.4%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
    3. Simplified99.4%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
    4. Add Preprocessing
    5. Taylor expanded in z around 0 73.9%

      \[\leadsto \color{blue}{0.5 \cdot \frac{x + y}{t}} \]

    if 5e-53 < (+.f64 x y) < 9.9999999999999994e38

    1. Initial program 99.9%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity99.9%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval99.9%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac99.9%

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
      4. neg-mul-199.9%

        \[\leadsto \frac{\color{blue}{-\left(\left(x + y\right) - z\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. sub-neg99.9%

        \[\leadsto \frac{-\color{blue}{\left(\left(x + y\right) + \left(-z\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      6. +-commutative99.9%

        \[\leadsto \frac{-\color{blue}{\left(\left(-z\right) + \left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      7. distribute-neg-in99.9%

        \[\leadsto \frac{\color{blue}{\left(-\left(-z\right)\right) + \left(-\left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      8. remove-double-neg99.9%

        \[\leadsto \frac{\color{blue}{z} + \left(-\left(x + y\right)\right)}{-1 \cdot \left(t \cdot 2\right)} \]
      9. sub-neg99.9%

        \[\leadsto \frac{\color{blue}{z - \left(x + y\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      10. +-commutative99.9%

        \[\leadsto \frac{z - \color{blue}{\left(y + x\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      11. associate--r+99.9%

        \[\leadsto \frac{\color{blue}{\left(z - y\right) - x}}{-1 \cdot \left(t \cdot 2\right)} \]
      12. neg-mul-199.9%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{-t \cdot 2}} \]
      13. distribute-rgt-neg-in99.9%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{t \cdot \left(-2\right)}} \]
      14. metadata-eval99.9%

        \[\leadsto \frac{\left(z - y\right) - x}{t \cdot \color{blue}{-2}} \]
    3. Simplified99.9%

      \[\leadsto \color{blue}{\frac{\left(z - y\right) - x}{t \cdot -2}} \]
    4. Add Preprocessing
    5. Taylor expanded in z around inf 70.2%

      \[\leadsto \frac{\color{blue}{z}}{t \cdot -2} \]

    if 9.9999999999999994e38 < (+.f64 x y)

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
      4. *-commutative100.0%

        \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. times-frac99.8%

        \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
      6. remove-double-neg99.8%

        \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      7. sub0-neg99.8%

        \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      8. div-sub99.8%

        \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
      9. metadata-eval99.8%

        \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      10. neg-mul-199.8%

        \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      11. *-commutative99.8%

        \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      12. associate-/l*99.8%

        \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
      13. metadata-eval99.8%

        \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
      14. /-rgt-identity99.8%

        \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      15. associate--r-99.8%

        \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
      16. neg-sub099.8%

        \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
      17. +-commutative99.8%

        \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      18. sub-neg99.8%

        \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      19. +-commutative99.8%

        \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      20. associate--r+99.8%

        \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
      21. *-commutative99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
      22. associate-/r*99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
      23. metadata-eval99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
    3. Simplified99.8%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
    4. Add Preprocessing
    5. Taylor expanded in y around inf 46.3%

      \[\leadsto \color{blue}{0.5 \cdot \frac{y}{t}} \]
  3. Recombined 4 regimes into one program.
  4. Final simplification65.3%

    \[\leadsto \begin{array}{l} \mathbf{if}\;x + y \leq 10^{-123}:\\ \;\;\;\;\frac{-0.5}{\frac{t}{z - x}}\\ \mathbf{elif}\;x + y \leq 5 \cdot 10^{-53}:\\ \;\;\;\;0.5 \cdot \frac{x + y}{t}\\ \mathbf{elif}\;x + y \leq 10^{+39}:\\ \;\;\;\;\frac{z}{t \cdot -2}\\ \mathbf{else}:\\ \;\;\;\;0.5 \cdot \frac{y}{t}\\ \end{array} \]
  5. Add Preprocessing

Alternative 4: 82.0% accurate, 0.5× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;z \leq -5 \cdot 10^{+152} \lor \neg \left(z \leq 9 \cdot 10^{+152}\right):\\ \;\;\;\;\frac{z}{t \cdot -2}\\ \mathbf{else}:\\ \;\;\;\;0.5 \cdot \frac{x + y}{t}\\ \end{array} \end{array} \]
(FPCore (x y z t)
 :precision binary64
 (if (or (<= z -5e+152) (not (<= z 9e+152)))
   (/ z (* t -2.0))
   (* 0.5 (/ (+ x y) t))))
double code(double x, double y, double z, double t) {
	double tmp;
	if ((z <= -5e+152) || !(z <= 9e+152)) {
		tmp = z / (t * -2.0);
	} else {
		tmp = 0.5 * ((x + y) / t);
	}
	return tmp;
}
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: tmp
    if ((z <= (-5d+152)) .or. (.not. (z <= 9d+152))) then
        tmp = z / (t * (-2.0d0))
    else
        tmp = 0.5d0 * ((x + y) / t)
    end if
    code = tmp
end function
public static double code(double x, double y, double z, double t) {
	double tmp;
	if ((z <= -5e+152) || !(z <= 9e+152)) {
		tmp = z / (t * -2.0);
	} else {
		tmp = 0.5 * ((x + y) / t);
	}
	return tmp;
}
def code(x, y, z, t):
	tmp = 0
	if (z <= -5e+152) or not (z <= 9e+152):
		tmp = z / (t * -2.0)
	else:
		tmp = 0.5 * ((x + y) / t)
	return tmp
function code(x, y, z, t)
	tmp = 0.0
	if ((z <= -5e+152) || !(z <= 9e+152))
		tmp = Float64(z / Float64(t * -2.0));
	else
		tmp = Float64(0.5 * Float64(Float64(x + y) / t));
	end
	return tmp
end
function tmp_2 = code(x, y, z, t)
	tmp = 0.0;
	if ((z <= -5e+152) || ~((z <= 9e+152)))
		tmp = z / (t * -2.0);
	else
		tmp = 0.5 * ((x + y) / t);
	end
	tmp_2 = tmp;
end
code[x_, y_, z_, t_] := If[Or[LessEqual[z, -5e+152], N[Not[LessEqual[z, 9e+152]], $MachinePrecision]], N[(z / N[(t * -2.0), $MachinePrecision]), $MachinePrecision], N[(0.5 * N[(N[(x + y), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;z \leq -5 \cdot 10^{+152} \lor \neg \left(z \leq 9 \cdot 10^{+152}\right):\\
\;\;\;\;\frac{z}{t \cdot -2}\\

\mathbf{else}:\\
\;\;\;\;0.5 \cdot \frac{x + y}{t}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if z < -5e152 or 9.0000000000000002e152 < z

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

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

        \[\leadsto \frac{\color{blue}{-\left(\left(x + y\right) - z\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. sub-neg100.0%

        \[\leadsto \frac{-\color{blue}{\left(\left(x + y\right) + \left(-z\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      6. +-commutative100.0%

        \[\leadsto \frac{-\color{blue}{\left(\left(-z\right) + \left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      7. distribute-neg-in100.0%

        \[\leadsto \frac{\color{blue}{\left(-\left(-z\right)\right) + \left(-\left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      8. remove-double-neg100.0%

        \[\leadsto \frac{\color{blue}{z} + \left(-\left(x + y\right)\right)}{-1 \cdot \left(t \cdot 2\right)} \]
      9. sub-neg100.0%

        \[\leadsto \frac{\color{blue}{z - \left(x + y\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      10. +-commutative100.0%

        \[\leadsto \frac{z - \color{blue}{\left(y + x\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      11. associate--r+100.0%

        \[\leadsto \frac{\color{blue}{\left(z - y\right) - x}}{-1 \cdot \left(t \cdot 2\right)} \]
      12. neg-mul-1100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{-t \cdot 2}} \]
      13. distribute-rgt-neg-in100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{t \cdot \left(-2\right)}} \]
      14. metadata-eval100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{t \cdot \color{blue}{-2}} \]
    3. Simplified100.0%

      \[\leadsto \color{blue}{\frac{\left(z - y\right) - x}{t \cdot -2}} \]
    4. Add Preprocessing
    5. Taylor expanded in z around inf 86.0%

      \[\leadsto \frac{\color{blue}{z}}{t \cdot -2} \]

    if -5e152 < z < 9.0000000000000002e152

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
      4. *-commutative100.0%

        \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. times-frac99.7%

        \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
      6. remove-double-neg99.7%

        \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      7. sub0-neg99.7%

        \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      8. div-sub99.7%

        \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
      9. metadata-eval99.7%

        \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      10. neg-mul-199.7%

        \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      11. *-commutative99.7%

        \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      12. associate-/l*99.7%

        \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
      13. metadata-eval99.7%

        \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
      14. /-rgt-identity99.7%

        \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      15. associate--r-99.7%

        \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
      16. neg-sub099.7%

        \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
      17. +-commutative99.7%

        \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      18. sub-neg99.7%

        \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      19. +-commutative99.7%

        \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      20. associate--r+99.7%

        \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
      21. *-commutative99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
      22. associate-/r*99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
      23. metadata-eval99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
    3. Simplified99.7%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
    4. Add Preprocessing
    5. Taylor expanded in z around 0 85.1%

      \[\leadsto \color{blue}{0.5 \cdot \frac{x + y}{t}} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification85.3%

    \[\leadsto \begin{array}{l} \mathbf{if}\;z \leq -5 \cdot 10^{+152} \lor \neg \left(z \leq 9 \cdot 10^{+152}\right):\\ \;\;\;\;\frac{z}{t \cdot -2}\\ \mathbf{else}:\\ \;\;\;\;0.5 \cdot \frac{x + y}{t}\\ \end{array} \]
  5. Add Preprocessing

Alternative 5: 46.6% accurate, 0.6× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -9.5 \cdot 10^{+64}:\\ \;\;\;\;0.5 \cdot \frac{x}{t}\\ \mathbf{elif}\;x \leq -1 \cdot 10^{-136}:\\ \;\;\;\;\frac{z}{t \cdot -2}\\ \mathbf{else}:\\ \;\;\;\;0.5 \cdot \frac{y}{t}\\ \end{array} \end{array} \]
(FPCore (x y z t)
 :precision binary64
 (if (<= x -9.5e+64)
   (* 0.5 (/ x t))
   (if (<= x -1e-136) (/ z (* t -2.0)) (* 0.5 (/ y t)))))
double code(double x, double y, double z, double t) {
	double tmp;
	if (x <= -9.5e+64) {
		tmp = 0.5 * (x / t);
	} else if (x <= -1e-136) {
		tmp = z / (t * -2.0);
	} else {
		tmp = 0.5 * (y / t);
	}
	return tmp;
}
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: tmp
    if (x <= (-9.5d+64)) then
        tmp = 0.5d0 * (x / t)
    else if (x <= (-1d-136)) then
        tmp = z / (t * (-2.0d0))
    else
        tmp = 0.5d0 * (y / t)
    end if
    code = tmp
end function
public static double code(double x, double y, double z, double t) {
	double tmp;
	if (x <= -9.5e+64) {
		tmp = 0.5 * (x / t);
	} else if (x <= -1e-136) {
		tmp = z / (t * -2.0);
	} else {
		tmp = 0.5 * (y / t);
	}
	return tmp;
}
def code(x, y, z, t):
	tmp = 0
	if x <= -9.5e+64:
		tmp = 0.5 * (x / t)
	elif x <= -1e-136:
		tmp = z / (t * -2.0)
	else:
		tmp = 0.5 * (y / t)
	return tmp
function code(x, y, z, t)
	tmp = 0.0
	if (x <= -9.5e+64)
		tmp = Float64(0.5 * Float64(x / t));
	elseif (x <= -1e-136)
		tmp = Float64(z / Float64(t * -2.0));
	else
		tmp = Float64(0.5 * Float64(y / t));
	end
	return tmp
end
function tmp_2 = code(x, y, z, t)
	tmp = 0.0;
	if (x <= -9.5e+64)
		tmp = 0.5 * (x / t);
	elseif (x <= -1e-136)
		tmp = z / (t * -2.0);
	else
		tmp = 0.5 * (y / t);
	end
	tmp_2 = tmp;
end
code[x_, y_, z_, t_] := If[LessEqual[x, -9.5e+64], N[(0.5 * N[(x / t), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, -1e-136], N[(z / N[(t * -2.0), $MachinePrecision]), $MachinePrecision], N[(0.5 * N[(y / t), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq -9.5 \cdot 10^{+64}:\\
\;\;\;\;0.5 \cdot \frac{x}{t}\\

\mathbf{elif}\;x \leq -1 \cdot 10^{-136}:\\
\;\;\;\;\frac{z}{t \cdot -2}\\

\mathbf{else}:\\
\;\;\;\;0.5 \cdot \frac{y}{t}\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if x < -9.50000000000000028e64

    1. Initial program 99.9%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity99.9%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval99.9%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac99.9%

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
      4. *-commutative99.9%

        \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. times-frac99.7%

        \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
      6. remove-double-neg99.7%

        \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      7. sub0-neg99.7%

        \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      8. div-sub99.7%

        \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
      9. metadata-eval99.7%

        \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      10. neg-mul-199.7%

        \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      11. *-commutative99.7%

        \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      12. associate-/l*99.7%

        \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
      13. metadata-eval99.7%

        \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
      14. /-rgt-identity99.7%

        \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      15. associate--r-99.7%

        \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
      16. neg-sub099.7%

        \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
      17. +-commutative99.7%

        \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      18. sub-neg99.7%

        \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      19. +-commutative99.7%

        \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      20. associate--r+99.7%

        \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
      21. *-commutative99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
      22. associate-/r*99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
      23. metadata-eval99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
    3. Simplified99.7%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
    4. Add Preprocessing
    5. Taylor expanded in x around inf 66.4%

      \[\leadsto \color{blue}{0.5 \cdot \frac{x}{t}} \]

    if -9.50000000000000028e64 < x < -1e-136

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

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

        \[\leadsto \frac{\color{blue}{-\left(\left(x + y\right) - z\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. sub-neg100.0%

        \[\leadsto \frac{-\color{blue}{\left(\left(x + y\right) + \left(-z\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      6. +-commutative100.0%

        \[\leadsto \frac{-\color{blue}{\left(\left(-z\right) + \left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      7. distribute-neg-in100.0%

        \[\leadsto \frac{\color{blue}{\left(-\left(-z\right)\right) + \left(-\left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      8. remove-double-neg100.0%

        \[\leadsto \frac{\color{blue}{z} + \left(-\left(x + y\right)\right)}{-1 \cdot \left(t \cdot 2\right)} \]
      9. sub-neg100.0%

        \[\leadsto \frac{\color{blue}{z - \left(x + y\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      10. +-commutative100.0%

        \[\leadsto \frac{z - \color{blue}{\left(y + x\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      11. associate--r+100.0%

        \[\leadsto \frac{\color{blue}{\left(z - y\right) - x}}{-1 \cdot \left(t \cdot 2\right)} \]
      12. neg-mul-1100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{-t \cdot 2}} \]
      13. distribute-rgt-neg-in100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{t \cdot \left(-2\right)}} \]
      14. metadata-eval100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{t \cdot \color{blue}{-2}} \]
    3. Simplified100.0%

      \[\leadsto \color{blue}{\frac{\left(z - y\right) - x}{t \cdot -2}} \]
    4. Add Preprocessing
    5. Taylor expanded in z around inf 40.3%

      \[\leadsto \frac{\color{blue}{z}}{t \cdot -2} \]

    if -1e-136 < x

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
      4. *-commutative100.0%

        \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. times-frac99.8%

        \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
      6. remove-double-neg99.8%

        \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      7. sub0-neg99.8%

        \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      8. div-sub99.8%

        \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
      9. metadata-eval99.8%

        \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      10. neg-mul-199.8%

        \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      11. *-commutative99.8%

        \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      12. associate-/l*99.8%

        \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
      13. metadata-eval99.8%

        \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
      14. /-rgt-identity99.8%

        \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      15. associate--r-99.8%

        \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
      16. neg-sub099.8%

        \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
      17. +-commutative99.8%

        \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      18. sub-neg99.8%

        \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      19. +-commutative99.8%

        \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      20. associate--r+99.8%

        \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
      21. *-commutative99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
      22. associate-/r*99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
      23. metadata-eval99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
    3. Simplified99.8%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
    4. Add Preprocessing
    5. Taylor expanded in y around inf 41.3%

      \[\leadsto \color{blue}{0.5 \cdot \frac{y}{t}} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification46.3%

    \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -9.5 \cdot 10^{+64}:\\ \;\;\;\;0.5 \cdot \frac{x}{t}\\ \mathbf{elif}\;x \leq -1 \cdot 10^{-136}:\\ \;\;\;\;\frac{z}{t \cdot -2}\\ \mathbf{else}:\\ \;\;\;\;0.5 \cdot \frac{y}{t}\\ \end{array} \]
  5. Add Preprocessing

Alternative 6: 69.2% accurate, 0.6× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x + y \leq -5 \cdot 10^{-80}:\\ \;\;\;\;\frac{z - x}{t \cdot -2}\\ \mathbf{else}:\\ \;\;\;\;\frac{z - y}{t \cdot -2}\\ \end{array} \end{array} \]
(FPCore (x y z t)
 :precision binary64
 (if (<= (+ x y) -5e-80) (/ (- z x) (* t -2.0)) (/ (- z y) (* t -2.0))))
double code(double x, double y, double z, double t) {
	double tmp;
	if ((x + y) <= -5e-80) {
		tmp = (z - x) / (t * -2.0);
	} else {
		tmp = (z - y) / (t * -2.0);
	}
	return tmp;
}
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: tmp
    if ((x + y) <= (-5d-80)) then
        tmp = (z - x) / (t * (-2.0d0))
    else
        tmp = (z - y) / (t * (-2.0d0))
    end if
    code = tmp
end function
public static double code(double x, double y, double z, double t) {
	double tmp;
	if ((x + y) <= -5e-80) {
		tmp = (z - x) / (t * -2.0);
	} else {
		tmp = (z - y) / (t * -2.0);
	}
	return tmp;
}
def code(x, y, z, t):
	tmp = 0
	if (x + y) <= -5e-80:
		tmp = (z - x) / (t * -2.0)
	else:
		tmp = (z - y) / (t * -2.0)
	return tmp
function code(x, y, z, t)
	tmp = 0.0
	if (Float64(x + y) <= -5e-80)
		tmp = Float64(Float64(z - x) / Float64(t * -2.0));
	else
		tmp = Float64(Float64(z - y) / Float64(t * -2.0));
	end
	return tmp
end
function tmp_2 = code(x, y, z, t)
	tmp = 0.0;
	if ((x + y) <= -5e-80)
		tmp = (z - x) / (t * -2.0);
	else
		tmp = (z - y) / (t * -2.0);
	end
	tmp_2 = tmp;
end
code[x_, y_, z_, t_] := If[LessEqual[N[(x + y), $MachinePrecision], -5e-80], N[(N[(z - x), $MachinePrecision] / N[(t * -2.0), $MachinePrecision]), $MachinePrecision], N[(N[(z - y), $MachinePrecision] / N[(t * -2.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x + y \leq -5 \cdot 10^{-80}:\\
\;\;\;\;\frac{z - x}{t \cdot -2}\\

\mathbf{else}:\\
\;\;\;\;\frac{z - y}{t \cdot -2}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (+.f64 x y) < -5e-80

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

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

        \[\leadsto \frac{\color{blue}{-\left(\left(x + y\right) - z\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. sub-neg100.0%

        \[\leadsto \frac{-\color{blue}{\left(\left(x + y\right) + \left(-z\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      6. +-commutative100.0%

        \[\leadsto \frac{-\color{blue}{\left(\left(-z\right) + \left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      7. distribute-neg-in100.0%

        \[\leadsto \frac{\color{blue}{\left(-\left(-z\right)\right) + \left(-\left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      8. remove-double-neg100.0%

        \[\leadsto \frac{\color{blue}{z} + \left(-\left(x + y\right)\right)}{-1 \cdot \left(t \cdot 2\right)} \]
      9. sub-neg100.0%

        \[\leadsto \frac{\color{blue}{z - \left(x + y\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      10. +-commutative100.0%

        \[\leadsto \frac{z - \color{blue}{\left(y + x\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      11. associate--r+100.0%

        \[\leadsto \frac{\color{blue}{\left(z - y\right) - x}}{-1 \cdot \left(t \cdot 2\right)} \]
      12. neg-mul-1100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{-t \cdot 2}} \]
      13. distribute-rgt-neg-in100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{t \cdot \left(-2\right)}} \]
      14. metadata-eval100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{t \cdot \color{blue}{-2}} \]
    3. Simplified100.0%

      \[\leadsto \color{blue}{\frac{\left(z - y\right) - x}{t \cdot -2}} \]
    4. Add Preprocessing
    5. Taylor expanded in y around 0 74.1%

      \[\leadsto \frac{\color{blue}{z - x}}{t \cdot -2} \]

    if -5e-80 < (+.f64 x y)

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

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

        \[\leadsto \frac{\color{blue}{-\left(\left(x + y\right) - z\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. sub-neg100.0%

        \[\leadsto \frac{-\color{blue}{\left(\left(x + y\right) + \left(-z\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      6. +-commutative100.0%

        \[\leadsto \frac{-\color{blue}{\left(\left(-z\right) + \left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      7. distribute-neg-in100.0%

        \[\leadsto \frac{\color{blue}{\left(-\left(-z\right)\right) + \left(-\left(x + y\right)\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      8. remove-double-neg100.0%

        \[\leadsto \frac{\color{blue}{z} + \left(-\left(x + y\right)\right)}{-1 \cdot \left(t \cdot 2\right)} \]
      9. sub-neg100.0%

        \[\leadsto \frac{\color{blue}{z - \left(x + y\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      10. +-commutative100.0%

        \[\leadsto \frac{z - \color{blue}{\left(y + x\right)}}{-1 \cdot \left(t \cdot 2\right)} \]
      11. associate--r+100.0%

        \[\leadsto \frac{\color{blue}{\left(z - y\right) - x}}{-1 \cdot \left(t \cdot 2\right)} \]
      12. neg-mul-1100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{-t \cdot 2}} \]
      13. distribute-rgt-neg-in100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{\color{blue}{t \cdot \left(-2\right)}} \]
      14. metadata-eval100.0%

        \[\leadsto \frac{\left(z - y\right) - x}{t \cdot \color{blue}{-2}} \]
    3. Simplified100.0%

      \[\leadsto \color{blue}{\frac{\left(z - y\right) - x}{t \cdot -2}} \]
    4. Add Preprocessing
    5. Taylor expanded in x around 0 71.3%

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

    \[\leadsto \begin{array}{l} \mathbf{if}\;x + y \leq -5 \cdot 10^{-80}:\\ \;\;\;\;\frac{z - x}{t \cdot -2}\\ \mathbf{else}:\\ \;\;\;\;\frac{z - y}{t \cdot -2}\\ \end{array} \]
  5. Add Preprocessing

Alternative 7: 46.3% accurate, 0.9× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.42 \cdot 10^{-11}:\\ \;\;\;\;0.5 \cdot \frac{x}{t}\\ \mathbf{else}:\\ \;\;\;\;0.5 \cdot \frac{y}{t}\\ \end{array} \end{array} \]
(FPCore (x y z t)
 :precision binary64
 (if (<= x -1.42e-11) (* 0.5 (/ x t)) (* 0.5 (/ y t))))
double code(double x, double y, double z, double t) {
	double tmp;
	if (x <= -1.42e-11) {
		tmp = 0.5 * (x / t);
	} else {
		tmp = 0.5 * (y / t);
	}
	return tmp;
}
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: tmp
    if (x <= (-1.42d-11)) then
        tmp = 0.5d0 * (x / t)
    else
        tmp = 0.5d0 * (y / t)
    end if
    code = tmp
end function
public static double code(double x, double y, double z, double t) {
	double tmp;
	if (x <= -1.42e-11) {
		tmp = 0.5 * (x / t);
	} else {
		tmp = 0.5 * (y / t);
	}
	return tmp;
}
def code(x, y, z, t):
	tmp = 0
	if x <= -1.42e-11:
		tmp = 0.5 * (x / t)
	else:
		tmp = 0.5 * (y / t)
	return tmp
function code(x, y, z, t)
	tmp = 0.0
	if (x <= -1.42e-11)
		tmp = Float64(0.5 * Float64(x / t));
	else
		tmp = Float64(0.5 * Float64(y / t));
	end
	return tmp
end
function tmp_2 = code(x, y, z, t)
	tmp = 0.0;
	if (x <= -1.42e-11)
		tmp = 0.5 * (x / t);
	else
		tmp = 0.5 * (y / t);
	end
	tmp_2 = tmp;
end
code[x_, y_, z_, t_] := If[LessEqual[x, -1.42e-11], N[(0.5 * N[(x / t), $MachinePrecision]), $MachinePrecision], N[(0.5 * N[(y / t), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq -1.42 \cdot 10^{-11}:\\
\;\;\;\;0.5 \cdot \frac{x}{t}\\

\mathbf{else}:\\
\;\;\;\;0.5 \cdot \frac{y}{t}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if x < -1.42e-11

    1. Initial program 99.9%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity99.9%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval99.9%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac99.9%

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
      4. *-commutative99.9%

        \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. times-frac99.7%

        \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
      6. remove-double-neg99.7%

        \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      7. sub0-neg99.7%

        \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      8. div-sub99.7%

        \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
      9. metadata-eval99.7%

        \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      10. neg-mul-199.7%

        \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      11. *-commutative99.7%

        \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      12. associate-/l*99.7%

        \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
      13. metadata-eval99.7%

        \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
      14. /-rgt-identity99.7%

        \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      15. associate--r-99.7%

        \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
      16. neg-sub099.7%

        \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
      17. +-commutative99.7%

        \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      18. sub-neg99.7%

        \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      19. +-commutative99.7%

        \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      20. associate--r+99.7%

        \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
      21. *-commutative99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
      22. associate-/r*99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
      23. metadata-eval99.7%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
    3. Simplified99.7%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
    4. Add Preprocessing
    5. Taylor expanded in x around inf 55.9%

      \[\leadsto \color{blue}{0.5 \cdot \frac{x}{t}} \]

    if -1.42e-11 < x

    1. Initial program 100.0%

      \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
    2. Step-by-step derivation
      1. *-lft-identity100.0%

        \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
      2. metadata-eval100.0%

        \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
      3. times-frac100.0%

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
      4. *-commutative100.0%

        \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
      5. times-frac99.8%

        \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
      6. remove-double-neg99.8%

        \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      7. sub0-neg99.8%

        \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
      8. div-sub99.8%

        \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
      9. metadata-eval99.8%

        \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      10. neg-mul-199.8%

        \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      11. *-commutative99.8%

        \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
      12. associate-/l*99.8%

        \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
      13. metadata-eval99.8%

        \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
      14. /-rgt-identity99.8%

        \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      15. associate--r-99.8%

        \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
      16. neg-sub099.8%

        \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
      17. +-commutative99.8%

        \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      18. sub-neg99.8%

        \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
      19. +-commutative99.8%

        \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
      20. associate--r+99.8%

        \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
      21. *-commutative99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
      22. associate-/r*99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
      23. metadata-eval99.8%

        \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
    3. Simplified99.8%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
    4. Add Preprocessing
    5. Taylor expanded in y around inf 41.6%

      \[\leadsto \color{blue}{0.5 \cdot \frac{y}{t}} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification45.7%

    \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -1.42 \cdot 10^{-11}:\\ \;\;\;\;0.5 \cdot \frac{x}{t}\\ \mathbf{else}:\\ \;\;\;\;0.5 \cdot \frac{y}{t}\\ \end{array} \]
  5. Add Preprocessing

Alternative 8: 99.7% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t} \end{array} \]
(FPCore (x y z t) :precision binary64 (* (- (- z y) x) (/ -0.5 t)))
double code(double x, double y, double z, double t) {
	return ((z - y) - x) * (-0.5 / t);
}
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = ((z - y) - x) * ((-0.5d0) / t)
end function
public static double code(double x, double y, double z, double t) {
	return ((z - y) - x) * (-0.5 / t);
}
def code(x, y, z, t):
	return ((z - y) - x) * (-0.5 / t)
function code(x, y, z, t)
	return Float64(Float64(Float64(z - y) - x) * Float64(-0.5 / t))
end
function tmp = code(x, y, z, t)
	tmp = ((z - y) - x) * (-0.5 / t);
end
code[x_, y_, z_, t_] := N[(N[(N[(z - y), $MachinePrecision] - x), $MachinePrecision] * N[(-0.5 / t), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}
\end{array}
Derivation
  1. Initial program 100.0%

    \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
  2. Step-by-step derivation
    1. *-lft-identity100.0%

      \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
    2. metadata-eval100.0%

      \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
    3. times-frac100.0%

      \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
    4. *-commutative100.0%

      \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
    5. times-frac99.7%

      \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
    6. remove-double-neg99.7%

      \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
    7. sub0-neg99.7%

      \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
    8. div-sub99.7%

      \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
    9. metadata-eval99.7%

      \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
    10. neg-mul-199.7%

      \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
    11. *-commutative99.7%

      \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
    12. associate-/l*99.7%

      \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
    13. metadata-eval99.7%

      \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
    14. /-rgt-identity99.7%

      \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
    15. associate--r-99.7%

      \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
    16. neg-sub099.7%

      \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
    17. +-commutative99.7%

      \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
    18. sub-neg99.7%

      \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
    19. +-commutative99.7%

      \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
    20. associate--r+99.7%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
    21. *-commutative99.7%

      \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
    22. associate-/r*99.7%

      \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
    23. metadata-eval99.7%

      \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
  3. Simplified99.7%

    \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
  4. Add Preprocessing
  5. Final simplification99.7%

    \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t} \]
  6. Add Preprocessing

Alternative 9: 37.1% accurate, 1.8× speedup?

\[\begin{array}{l} \\ 0.5 \cdot \frac{x}{t} \end{array} \]
(FPCore (x y z t) :precision binary64 (* 0.5 (/ x t)))
double code(double x, double y, double z, double t) {
	return 0.5 * (x / t);
}
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = 0.5d0 * (x / t)
end function
public static double code(double x, double y, double z, double t) {
	return 0.5 * (x / t);
}
def code(x, y, z, t):
	return 0.5 * (x / t)
function code(x, y, z, t)
	return Float64(0.5 * Float64(x / t))
end
function tmp = code(x, y, z, t)
	tmp = 0.5 * (x / t);
end
code[x_, y_, z_, t_] := N[(0.5 * N[(x / t), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
0.5 \cdot \frac{x}{t}
\end{array}
Derivation
  1. Initial program 100.0%

    \[\frac{\left(x + y\right) - z}{t \cdot 2} \]
  2. Step-by-step derivation
    1. *-lft-identity100.0%

      \[\leadsto \color{blue}{1 \cdot \frac{\left(x + y\right) - z}{t \cdot 2}} \]
    2. metadata-eval100.0%

      \[\leadsto \color{blue}{\frac{-1}{-1}} \cdot \frac{\left(x + y\right) - z}{t \cdot 2} \]
    3. times-frac100.0%

      \[\leadsto \color{blue}{\frac{-1 \cdot \left(\left(x + y\right) - z\right)}{-1 \cdot \left(t \cdot 2\right)}} \]
    4. *-commutative100.0%

      \[\leadsto \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1 \cdot \left(t \cdot 2\right)} \]
    5. times-frac99.7%

      \[\leadsto \color{blue}{\frac{\left(x + y\right) - z}{-1} \cdot \frac{-1}{t \cdot 2}} \]
    6. remove-double-neg99.7%

      \[\leadsto \frac{\color{blue}{-\left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
    7. sub0-neg99.7%

      \[\leadsto \frac{\color{blue}{0 - \left(-\left(\left(x + y\right) - z\right)\right)}}{-1} \cdot \frac{-1}{t \cdot 2} \]
    8. div-sub99.7%

      \[\leadsto \color{blue}{\left(\frac{0}{-1} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right)} \cdot \frac{-1}{t \cdot 2} \]
    9. metadata-eval99.7%

      \[\leadsto \left(\color{blue}{0} - \frac{-\left(\left(x + y\right) - z\right)}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
    10. neg-mul-199.7%

      \[\leadsto \left(0 - \frac{\color{blue}{-1 \cdot \left(\left(x + y\right) - z\right)}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
    11. *-commutative99.7%

      \[\leadsto \left(0 - \frac{\color{blue}{\left(\left(x + y\right) - z\right) \cdot -1}}{-1}\right) \cdot \frac{-1}{t \cdot 2} \]
    12. associate-/l*99.7%

      \[\leadsto \left(0 - \color{blue}{\frac{\left(x + y\right) - z}{\frac{-1}{-1}}}\right) \cdot \frac{-1}{t \cdot 2} \]
    13. metadata-eval99.7%

      \[\leadsto \left(0 - \frac{\left(x + y\right) - z}{\color{blue}{1}}\right) \cdot \frac{-1}{t \cdot 2} \]
    14. /-rgt-identity99.7%

      \[\leadsto \left(0 - \color{blue}{\left(\left(x + y\right) - z\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
    15. associate--r-99.7%

      \[\leadsto \color{blue}{\left(\left(0 - \left(x + y\right)\right) + z\right)} \cdot \frac{-1}{t \cdot 2} \]
    16. neg-sub099.7%

      \[\leadsto \left(\color{blue}{\left(-\left(x + y\right)\right)} + z\right) \cdot \frac{-1}{t \cdot 2} \]
    17. +-commutative99.7%

      \[\leadsto \color{blue}{\left(z + \left(-\left(x + y\right)\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
    18. sub-neg99.7%

      \[\leadsto \color{blue}{\left(z - \left(x + y\right)\right)} \cdot \frac{-1}{t \cdot 2} \]
    19. +-commutative99.7%

      \[\leadsto \left(z - \color{blue}{\left(y + x\right)}\right) \cdot \frac{-1}{t \cdot 2} \]
    20. associate--r+99.7%

      \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right)} \cdot \frac{-1}{t \cdot 2} \]
    21. *-commutative99.7%

      \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{-1}{\color{blue}{2 \cdot t}} \]
    22. associate-/r*99.7%

      \[\leadsto \left(\left(z - y\right) - x\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{t}} \]
    23. metadata-eval99.7%

      \[\leadsto \left(\left(z - y\right) - x\right) \cdot \frac{\color{blue}{-0.5}}{t} \]
  3. Simplified99.7%

    \[\leadsto \color{blue}{\left(\left(z - y\right) - x\right) \cdot \frac{-0.5}{t}} \]
  4. Add Preprocessing
  5. Taylor expanded in x around inf 39.2%

    \[\leadsto \color{blue}{0.5 \cdot \frac{x}{t}} \]
  6. Final simplification39.2%

    \[\leadsto 0.5 \cdot \frac{x}{t} \]
  7. Add Preprocessing

Reproduce

?
herbie shell --seed 2024019 
(FPCore (x y z t)
  :name "Optimisation.CirclePacking:place from circle-packing-0.1.0.4, B"
  :precision binary64
  (/ (- (+ x y) z) (* t 2.0)))