x + \frac{\left(y - x\right) \cdot \left(z - t\right)}{a - t}
\begin{array}{l}
\mathbf{if}\;\begin{array}{l}
t_1 := x + \frac{\left(y - x\right) \cdot \left(z - t\right)}{a - t}\\
t_1 \leq -8.350288291143691 \cdot 10^{-287} \lor \neg \left(t_1 \leq 0\right)
\end{array}:\\
\;\;\;\;\begin{array}{l}
t_2 := \frac{a - t}{z - t}\\
\frac{y}{t_2} - \left(\frac{x}{t_2} - x\right)
\end{array}\\
\mathbf{else}:\\
\;\;\;\;\left(y + \left(\frac{x \cdot z}{t} + \frac{y \cdot a}{t}\right)\right) - \left(\frac{x \cdot a}{t} + \frac{y \cdot z}{t}\right)\\
\end{array}
(FPCore (x y z t a) :precision binary64 (+ x (/ (* (- y x) (- z t)) (- a t))))
(FPCore (x y z t a)
:precision binary64
(if (let* ((t_1 (+ x (/ (* (- y x) (- z t)) (- a t)))))
(or (<= t_1 -8.350288291143691e-287) (not (<= t_1 0.0))))
(let* ((t_2 (/ (- a t) (- z t)))) (- (/ y t_2) (- (/ x t_2) x)))
(- (+ y (+ (/ (* x z) t) (/ (* y a) t))) (+ (/ (* x a) t) (/ (* y z) t)))))double code(double x, double y, double z, double t, double a) {
return x + (((y - x) * (z - t)) / (a - t));
}
double code(double x, double y, double z, double t, double a) {
double t_1 = x + (((y - x) * (z - t)) / (a - t));
double tmp;
if ((t_1 <= -8.350288291143691e-287) || !(t_1 <= 0.0)) {
double t_2_1 = (a - t) / (z - t);
tmp = (y / t_2_1) - ((x / t_2_1) - x);
} else {
tmp = (y + (((x * z) / t) + ((y * a) / t))) - (((x * a) / t) + ((y * z) / t));
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 24.1 |
|---|---|
| Target | 9.0 |
| Herbie | 4.6 |
if (+.f64 x (/.f64 (*.f64 (-.f64 y x) (-.f64 z t)) (-.f64 a t))) < -8.3502882911436909e-287 or 0.0 < (+.f64 x (/.f64 (*.f64 (-.f64 y x) (-.f64 z t)) (-.f64 a t))) Initial program 20.7
Simplified7.1
Applied clear-num_binary647.2
Applied fma-udef_binary647.2
Simplified7.1
Applied div-sub_binary647.1
Applied associate-+l-_binary644.8
if -8.3502882911436909e-287 < (+.f64 x (/.f64 (*.f64 (-.f64 y x) (-.f64 z t)) (-.f64 a t))) < 0.0Initial program 59.5
Simplified59.4
Taylor expanded in t around inf 2.0
Final simplification4.6
herbie shell --seed 2022068
(FPCore (x y z t a)
:name "Graphics.Rendering.Chart.Axis.Types:linMap from Chart-1.5.3"
:precision binary64
:herbie-target
(if (< a -1.6153062845442575e-142) (+ x (* (/ (- y x) 1.0) (/ (- z t) (- a t)))) (if (< a 3.774403170083174e-182) (- y (* (/ z t) (- y x))) (+ x (* (/ (- y x) 1.0) (/ (- z t) (- a t))))))
(+ x (/ (* (- y x) (- z t)) (- a t))))