x + \frac{\left(y - x\right) \cdot \left(z - t\right)}{a - t}\begin{array}{l}
\mathbf{if}\;x + \frac{\left(y - x\right) \cdot \left(z - t\right)}{a - t} \leq -3.7142688836398297 \cdot 10^{-236}:\\
\;\;\;\;x + \frac{y - x}{\frac{a - t}{z - t}}\\
\mathbf{elif}\;x + \frac{\left(y - x\right) \cdot \left(z - t\right)}{a - t} \leq 1.6489340850168661 \cdot 10^{-229}:\\
\;\;\;\;\left(y + \frac{x \cdot z}{t}\right) - \frac{y \cdot z}{t}\\
\mathbf{else}:\\
\;\;\;\;x + \frac{y - x}{\sqrt[3]{a - t} \cdot \sqrt[3]{a - t}} \cdot \frac{z - t}{\sqrt[3]{a - t}}\\
\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 (<= (+ x (/ (* (- y x) (- z t)) (- a t))) -3.7142688836398297e-236)
(+ x (/ (- y x) (/ (- a t) (- z t))))
(if (<= (+ x (/ (* (- y x) (- z t)) (- a t))) 1.6489340850168661e-229)
(- (+ y (/ (* x z) t)) (/ (* y z) t))
(+
x
(*
(/ (- y x) (* (cbrt (- a t)) (cbrt (- a t))))
(/ (- z t) (cbrt (- a 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 tmp;
if ((x + (((y - x) * (z - t)) / (a - t))) <= -3.7142688836398297e-236) {
tmp = x + ((y - x) / ((a - t) / (z - t)));
} else if ((x + (((y - x) * (z - t)) / (a - t))) <= 1.6489340850168661e-229) {
tmp = (y + ((x * z) / t)) - ((y * z) / t);
} else {
tmp = x + (((y - x) / (cbrt(a - t) * cbrt(a - t))) * ((z - t) / cbrt(a - 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.4 |
|---|---|
| Target | 9.6 |
| Herbie | 10.4 |
if (+.f64 x (/.f64 (*.f64 (-.f64 y x) (-.f64 z t)) (-.f64 a t))) < -3.71426888363982966e-236Initial program 21.4
rmApplied associate-/l*_binary647.0
if -3.71426888363982966e-236 < (+.f64 x (/.f64 (*.f64 (-.f64 y x) (-.f64 z t)) (-.f64 a t))) < 1.64893e-229Initial program 49.3
Taylor expanded around inf 25.7
Simplified25.7
if 1.64893e-229 < (+.f64 x (/.f64 (*.f64 (-.f64 y x) (-.f64 z t)) (-.f64 a t))) Initial program 21.8
rmApplied add-cube-cbrt_binary6422.3
Applied times-frac_binary6410.4
Final simplification10.4
herbie shell --seed 2020231
(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))))