Average Error: 10.7 → 0.4
Time: 4.1s
Precision: binary64
\[x + \frac{y \cdot \left(z - t\right)}{z - a} \]
\[\begin{array}{l} t_1 := \frac{y \cdot \left(z - t\right)}{z - a}\\ \mathbf{if}\;t_1 \leq -2 \cdot 10^{+292}:\\ \;\;\;\;x + \frac{y}{\frac{z - a}{z - t}}\\ \mathbf{elif}\;t_1 \leq 10^{+245}:\\ \;\;\;\;t_1 + x\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, \frac{z - t}{z - a}, x\right)\\ \end{array} \]
(FPCore (x y z t a) :precision binary64 (+ x (/ (* y (- z t)) (- z a))))
(FPCore (x y z t a)
 :precision binary64
 (let* ((t_1 (/ (* y (- z t)) (- z a))))
   (if (<= t_1 -2e+292)
     (+ x (/ y (/ (- z a) (- z t))))
     (if (<= t_1 1e+245) (+ t_1 x) (fma y (/ (- z t) (- z a)) x)))))
double code(double x, double y, double z, double t, double a) {
	return x + ((y * (z - t)) / (z - a));
}
double code(double x, double y, double z, double t, double a) {
	double t_1 = (y * (z - t)) / (z - a);
	double tmp;
	if (t_1 <= -2e+292) {
		tmp = x + (y / ((z - a) / (z - t)));
	} else if (t_1 <= 1e+245) {
		tmp = t_1 + x;
	} else {
		tmp = fma(y, ((z - t) / (z - a)), x);
	}
	return tmp;
}
function code(x, y, z, t, a)
	return Float64(x + Float64(Float64(y * Float64(z - t)) / Float64(z - a)))
end
function code(x, y, z, t, a)
	t_1 = Float64(Float64(y * Float64(z - t)) / Float64(z - a))
	tmp = 0.0
	if (t_1 <= -2e+292)
		tmp = Float64(x + Float64(y / Float64(Float64(z - a) / Float64(z - t))));
	elseif (t_1 <= 1e+245)
		tmp = Float64(t_1 + x);
	else
		tmp = fma(y, Float64(Float64(z - t) / Float64(z - a)), x);
	end
	return tmp
end
code[x_, y_, z_, t_, a_] := N[(x + N[(N[(y * N[(z - t), $MachinePrecision]), $MachinePrecision] / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(N[(y * N[(z - t), $MachinePrecision]), $MachinePrecision] / N[(z - a), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -2e+292], N[(x + N[(y / N[(N[(z - a), $MachinePrecision] / N[(z - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 1e+245], N[(t$95$1 + x), $MachinePrecision], N[(y * N[(N[(z - t), $MachinePrecision] / N[(z - a), $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision]]]]
x + \frac{y \cdot \left(z - t\right)}{z - a}
\begin{array}{l}
t_1 := \frac{y \cdot \left(z - t\right)}{z - a}\\
\mathbf{if}\;t_1 \leq -2 \cdot 10^{+292}:\\
\;\;\;\;x + \frac{y}{\frac{z - a}{z - t}}\\

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

\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(y, \frac{z - t}{z - a}, x\right)\\


\end{array}

Error

Bits error versus x

Bits error versus y

Bits error versus z

Bits error versus t

Bits error versus a

Target

Original10.7
Target1.3
Herbie0.4
\[x + \frac{y}{\frac{z - a}{z - t}} \]

Derivation

  1. Split input into 3 regimes
  2. if (/.f64 (*.f64 y (-.f64 z t)) (-.f64 z a)) < -2e292

    1. Initial program 61.7

      \[x + \frac{y \cdot \left(z - t\right)}{z - a} \]
    2. Simplified0.6

      \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{z - t}{z - a}, x\right)} \]
    3. Applied egg-rr0.6

      \[\leadsto \color{blue}{x + \frac{y}{\frac{z - a}{z - t}}} \]

    if -2e292 < (/.f64 (*.f64 y (-.f64 z t)) (-.f64 z a)) < 1.00000000000000004e245

    1. Initial program 0.2

      \[x + \frac{y \cdot \left(z - t\right)}{z - a} \]

    if 1.00000000000000004e245 < (/.f64 (*.f64 y (-.f64 z t)) (-.f64 z a))

    1. Initial program 54.2

      \[x + \frac{y \cdot \left(z - t\right)}{z - a} \]
    2. Simplified1.9

      \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{z - t}{z - a}, x\right)} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification0.4

    \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{y \cdot \left(z - t\right)}{z - a} \leq -2 \cdot 10^{+292}:\\ \;\;\;\;x + \frac{y}{\frac{z - a}{z - t}}\\ \mathbf{elif}\;\frac{y \cdot \left(z - t\right)}{z - a} \leq 10^{+245}:\\ \;\;\;\;\frac{y \cdot \left(z - t\right)}{z - a} + x\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, \frac{z - t}{z - a}, x\right)\\ \end{array} \]

Reproduce

herbie shell --seed 2022162 
(FPCore (x y z t a)
  :name "Graphics.Rendering.Plot.Render.Plot.Axis:renderAxisTicks from plot-0.2.3.4, A"
  :precision binary64

  :herbie-target
  (+ x (/ y (/ (- z a) (- z t))))

  (+ x (/ (* y (- z t)) (- z a))))