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 -8.105941789493128 \cdot 10^{-279}:\\
\;\;\;\;x + \frac{y - z}{\sqrt[3]{a - z} \cdot \sqrt[3]{a - z}} \cdot \frac{t - x}{\sqrt[3]{a - z}}\\
\mathbf{elif}\;x + \left(y - z\right) \cdot \frac{t - x}{a - z} \leq 0:\\
\;\;\;\;\left(t + \left(\frac{x \cdot y}{z} + \frac{t \cdot a}{z}\right)\right) - \left(\frac{x \cdot a}{z} + \frac{y \cdot t}{z}\right)\\
\mathbf{else}:\\
\;\;\;\;x + \left(y - z\right) \cdot \frac{t - x}{a - z}\\
\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 (<= (+ x (* (- y z) (/ (- t x) (- a z)))) -8.105941789493128e-279)
(+
x
(*
(/ (- y z) (* (cbrt (- a z)) (cbrt (- a z))))
(/ (- t x) (cbrt (- a z)))))
(if (<= (+ x (* (- y z) (/ (- t x) (- a z)))) 0.0)
(- (+ t (+ (/ (* x y) z) (/ (* t a) z))) (+ (/ (* x a) z) (/ (* y t) z)))
(+ x (* (- y z) (/ (- t x) (- a 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)))) <= -8.105941789493128e-279) {
tmp = x + (((y - z) / (cbrt(a - z) * cbrt(a - z))) * ((t - x) / cbrt(a - z)));
} else if ((x + ((y - z) * ((t - x) / (a - z)))) <= 0.0) {
tmp = (t + (((x * y) / z) + ((t * a) / z))) - (((x * a) / z) + ((y * t) / z));
} else {
tmp = x + ((y - z) * ((t - x) / (a - 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)))) < -8.10594178949312758e-279Initial program 6.6
rmApplied add-cube-cbrt_binary647.3
Applied *-un-lft-identity_binary647.3
Applied times-frac_binary647.3
Applied associate-*r*_binary645.1
Simplified5.1
if -8.10594178949312758e-279 < (+.f64 x (*.f64 (-.f64 y z) (/.f64 (-.f64 t x) (-.f64 a z)))) < 0.0Initial program 60.8
Taylor expanded around inf 12.5
if 0.0 < (+.f64 x (*.f64 (-.f64 y z) (/.f64 (-.f64 t x) (-.f64 a z)))) Initial program 7.3
rmApplied *-un-lft-identity_binary647.3
Applied *-un-lft-identity_binary647.3
Applied times-frac_binary647.3
Simplified7.3
rmApplied associate-*r*_binary647.3
Final simplification7.1
herbie shell --seed 2021173
(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)))))