x + \left(y - z\right) \cdot \frac{t - x}{a - z}\begin{array}{l}
\mathbf{if}\;x + \left(y - z\right) \cdot \frac{t - x}{a - z} \leq -1.1633361054314008 \cdot 10^{-299} \lor \neg \left(x + \left(y - z\right) \cdot \frac{t - x}{a - z} \leq 3.9488626972043147 \cdot 10^{-277}\right):\\
\;\;\;\;x + \frac{y - z}{\sqrt[3]{a - z} \cdot \sqrt[3]{a - z}} \cdot \frac{t - x}{\sqrt[3]{a - z}}\\
\mathbf{else}:\\
\;\;\;\;t + y \cdot \left(\frac{x}{z} - \frac{t}{z}\right)\\
\end{array}(FPCore (x y z t a) :precision binary64 (+ x (* (- y z) (/ (- t x) (- a z)))))
(FPCore (x y z t a)
:precision binary64
(if (or (<= (+ x (* (- y z) (/ (- t x) (- a z)))) -1.1633361054314008e-299)
(not
(<= (+ x (* (- y z) (/ (- t x) (- a z)))) 3.9488626972043147e-277)))
(+
x
(*
(/ (- y z) (* (cbrt (- a z)) (cbrt (- a z))))
(/ (- t x) (cbrt (- a z)))))
(+ t (* y (- (/ x z) (/ t z))))))double code(double x, double y, double z, double t, double a) {
return x + ((y - z) * ((t - x) / (a - z)));
}
double code(double x, double y, double z, double t, double a) {
double tmp;
if (((x + ((y - z) * ((t - x) / (a - z)))) <= -1.1633361054314008e-299) || !((x + ((y - z) * ((t - x) / (a - z)))) <= 3.9488626972043147e-277)) {
tmp = x + (((y - z) / (cbrt(a - z) * cbrt(a - z))) * ((t - x) / cbrt(a - z)));
} else {
tmp = t + (y * ((x / z) - (t / z)));
}
return tmp;
}



Bits error versus x



Bits error versus y



Bits error versus z



Bits error versus t



Bits error versus a
Results
if (+.f64 x (*.f64 (-.f64 y z) (/.f64 (-.f64 t x) (-.f64 a z)))) < -1.1633361054314008e-299 or 3.94886e-277 < (+.f64 x (*.f64 (-.f64 y z) (/.f64 (-.f64 t x) (-.f64 a z)))) Initial program 7.0
rmApplied add-cube-cbrt_binary647.7
Applied *-un-lft-identity_binary647.7
Applied times-frac_binary647.7
Applied associate-*r*_binary645.0
Simplified5.0
if -1.1633361054314008e-299 < (+.f64 x (*.f64 (-.f64 y z) (/.f64 (-.f64 t x) (-.f64 a z)))) < 3.94886e-277Initial program 60.1
Taylor expanded around inf 27.6
Simplified22.7
Final simplification7.5
herbie shell --seed 2020253
(FPCore (x y z t a)
:name "Numeric.Signal:interpolate from hsignal-0.2.7.1"
:precision binary64
(+ x (* (- y z) (/ (- t x) (- a z)))))