x \cdot \left(\frac{y}{z} - \frac{t}{1 - z}\right)\begin{array}{l}
\mathbf{if}\;\frac{y}{z} - \frac{t}{1 - z} \leq -3.761222765310758 \cdot 10^{+227}:\\
\;\;\;\;\frac{x \cdot \left(y - z \cdot \left(y + t\right)\right)}{z \cdot \left(1 - z\right)}\\
\mathbf{elif}\;\frac{y}{z} - \frac{t}{1 - z} \leq -1.7597655312189485 \cdot 10^{-244}:\\
\;\;\;\;\left(\frac{y}{z} - \frac{t}{1 - z}\right) \cdot x\\
\mathbf{elif}\;\frac{y}{z} - \frac{t}{1 - z} \leq 0:\\
\;\;\;\;\frac{x}{z} \cdot \frac{y - z \cdot \left(y + t\right)}{1 - z}\\
\mathbf{elif}\;\frac{y}{z} - \frac{t}{1 - z} \leq 4.734846625701712 \cdot 10^{+278}:\\
\;\;\;\;\left(\frac{y}{z} - \frac{t}{1 - z}\right) \cdot x\\
\mathbf{else}:\\
\;\;\;\;\frac{x \cdot \left(y - z \cdot \left(y + t\right)\right)}{z \cdot \left(1 - z\right)}\\
\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))) -3.761222765310758e+227)
(/ (* x (- y (* z (+ y t)))) (* z (- 1.0 z)))
(if (<= (- (/ y z) (/ t (- 1.0 z))) -1.7597655312189485e-244)
(* (- (/ y z) (/ t (- 1.0 z))) x)
(if (<= (- (/ y z) (/ t (- 1.0 z))) 0.0)
(* (/ x z) (/ (- y (* z (+ y t))) (- 1.0 z)))
(if (<= (- (/ y z) (/ t (- 1.0 z))) 4.734846625701712e+278)
(* (- (/ y z) (/ t (- 1.0 z))) x)
(/ (* x (- y (* z (+ y t)))) (* z (- 1.0 z))))))))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))) <= -3.761222765310758e+227) {
tmp = (x * (y - (z * (y + t)))) / (z * (1.0 - z));
} else if (((y / z) - (t / (1.0 - z))) <= -1.7597655312189485e-244) {
tmp = ((y / z) - (t / (1.0 - z))) * x;
} else if (((y / z) - (t / (1.0 - z))) <= 0.0) {
tmp = (x / z) * ((y - (z * (y + t))) / (1.0 - z));
} else if (((y / z) - (t / (1.0 - z))) <= 4.734846625701712e+278) {
tmp = ((y / z) - (t / (1.0 - z))) * x;
} else {
tmp = (x * (y - (z * (y + t)))) / (z * (1.0 - z));
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
Results
| Original | 4.6 |
|---|---|
| Target | 4.3 |
| Herbie | 0.6 |
if (-.f64 (/.f64 y z) (/.f64 t (-.f64 1 z))) < -3.7612227653107582e227 or 4.73484662570171171e278 < (-.f64 (/.f64 y z) (/.f64 t (-.f64 1 z))) Initial program 31.3
rmApplied frac-sub_binary6433.6
Applied associate-*r/_binary642.9
Simplified2.9
if -3.7612227653107582e227 < (-.f64 (/.f64 y z) (/.f64 t (-.f64 1 z))) < -1.7597655312189485e-244 or 0.0 < (-.f64 (/.f64 y z) (/.f64 t (-.f64 1 z))) < 4.73484662570171171e278Initial program 0.3
if -1.7597655312189485e-244 < (-.f64 (/.f64 y z) (/.f64 t (-.f64 1 z))) < 0.0Initial program 14.2
rmApplied frac-sub_binary6423.8
Applied associate-*r/_binary6422.2
Simplified22.2
rmApplied times-frac_binary641.7
Simplified1.7
Final simplification0.6
herbie shell --seed 2020233
(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)))))