x \cdot \left(\frac{y}{z} - \frac{t}{1 - z}\right)\begin{array}{l}
\mathbf{if}\;\frac{y}{z} - \frac{t}{1 - z} \leq -6.338278408620658 \cdot 10^{+272}:\\
\;\;\;\;\frac{x \cdot \left(y \cdot \left(1 - z\right) - z \cdot t\right)}{z \cdot \left(1 - z\right)}\\
\mathbf{elif}\;\frac{y}{z} - \frac{t}{1 - z} \leq -2.6029472443445743 \cdot 10^{-137}:\\
\;\;\;\;\left(\frac{y}{z} - \frac{t}{1 - z}\right) \cdot x\\
\mathbf{elif}\;\frac{y}{z} - \frac{t}{1 - z} \leq 1.5263134903262498 \cdot 10^{-149}:\\
\;\;\;\;\frac{y \cdot x}{z} - \frac{t \cdot x}{1 - z}\\
\mathbf{elif}\;\frac{y}{z} - \frac{t}{1 - z} \leq 6.762714657603032 \cdot 10^{+91}:\\
\;\;\;\;\frac{y}{z} \cdot x - \frac{t}{1 - z} \cdot x\\
\mathbf{else}:\\
\;\;\;\;\frac{y \cdot x}{z} - \frac{t}{1 - z} \cdot x\\
\end{array}(FPCore (x y z t) :precision binary64 (* x (- (/ y z) (/ t (- 1.0 z)))))
(FPCore (x y z t)
:precision binary64
(if (<= (- (/ y z) (/ t (- 1.0 z))) -6.338278408620658e+272)
(/ (* x (- (* y (- 1.0 z)) (* z t))) (* z (- 1.0 z)))
(if (<= (- (/ y z) (/ t (- 1.0 z))) -2.6029472443445743e-137)
(* (- (/ y z) (/ t (- 1.0 z))) x)
(if (<= (- (/ y z) (/ t (- 1.0 z))) 1.5263134903262498e-149)
(- (/ (* y x) z) (/ (* t x) (- 1.0 z)))
(if (<= (- (/ y z) (/ t (- 1.0 z))) 6.762714657603032e+91)
(- (* (/ y z) x) (* (/ t (- 1.0 z)) x))
(- (/ (* y x) z) (* (/ t (- 1.0 z)) x)))))))double code(double x, double y, double z, double t) {
return x * ((y / z) - (t / (1.0 - z)));
}
double code(double x, double y, double z, double t) {
double tmp;
if (((y / z) - (t / (1.0 - z))) <= -6.338278408620658e+272) {
tmp = (x * ((y * (1.0 - z)) - (z * t))) / (z * (1.0 - z));
} else if (((y / z) - (t / (1.0 - z))) <= -2.6029472443445743e-137) {
tmp = ((y / z) - (t / (1.0 - z))) * x;
} else if (((y / z) - (t / (1.0 - z))) <= 1.5263134903262498e-149) {
tmp = ((y * x) / z) - ((t * x) / (1.0 - z));
} else if (((y / z) - (t / (1.0 - z))) <= 6.762714657603032e+91) {
tmp = ((y / z) * x) - ((t / (1.0 - z)) * x);
} else {
tmp = ((y * x) / z) - ((t / (1.0 - z)) * x);
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
Results
| Original | 4.4 |
|---|---|
| Target | 4.1 |
| Herbie | 1.2 |
if (-.f64 (/.f64 y z) (/.f64 t (-.f64 1 z))) < -6.33827840862065845e272Initial program 36.5
rmApplied frac-sub_binary64_997636.7
Applied associate-*r/_binary64_99090.5
if -6.33827840862065845e272 < (-.f64 (/.f64 y z) (/.f64 t (-.f64 1 z))) < -2.60294724434457431e-137Initial program 0.2
if -2.60294724434457431e-137 < (-.f64 (/.f64 y z) (/.f64 t (-.f64 1 z))) < 1.5263134903262498e-149Initial program 5.4
rmApplied add-cube-cbrt_binary64_100025.9
Applied associate-*l*_binary64_99085.9
Simplified5.9
Taylor expanded around 0 2.2
if 1.5263134903262498e-149 < (-.f64 (/.f64 y z) (/.f64 t (-.f64 1 z))) < 6.762714657603032e91Initial program 0.2
rmApplied sub-neg_binary64_99600.2
Applied distribute-rgt-in_binary64_99170.2
if 6.762714657603032e91 < (-.f64 (/.f64 y z) (/.f64 t (-.f64 1 z))) Initial program 9.4
rmApplied add-cube-cbrt_binary64_1000210.5
Applied associate-*l*_binary64_990810.5
Simplified10.5
rmApplied add-cube-cbrt_binary64_1000210.6
Applied associate-*l*_binary64_990810.6
Simplified10.6
Taylor expanded around 0 4.9
Simplified3.3
Final simplification1.2
herbie shell --seed 2021043
(FPCore (x y z t)
:name "Numeric.SpecFunctions:invIncompleteBetaWorker from math-functions-0.1.5.2, C"
:precision binary64
:herbie-target
(if (< (* x (- (/ y z) (/ t (- 1.0 z)))) -7.623226303312042e-196) (* x (- (/ y z) (* t (/ 1.0 (- 1.0 z))))) (if (< (* x (- (/ y z) (/ t (- 1.0 z)))) 1.4133944927702302e-211) (+ (/ (* y x) z) (- (/ (* t x) (- 1.0 z)))) (* x (- (/ y z) (* t (/ 1.0 (- 1.0 z)))))))
(* x (- (/ y z) (/ t (- 1.0 z)))))