x \cdot \left(\frac{y}{z} - \frac{t}{1 - z}\right)\frac{y \cdot x}{z} - \frac{t \cdot x}{1 - z}double f(double x, double y, double z, double t) {
double r296161 = x;
double r296162 = y;
double r296163 = z;
double r296164 = r296162 / r296163;
double r296165 = t;
double r296166 = 1.0;
double r296167 = r296166 - r296163;
double r296168 = r296165 / r296167;
double r296169 = r296164 - r296168;
double r296170 = r296161 * r296169;
return r296170;
}
double f(double x, double y, double z, double t) {
double r296171 = y;
double r296172 = x;
double r296173 = r296171 * r296172;
double r296174 = z;
double r296175 = r296173 / r296174;
double r296176 = t;
double r296177 = r296176 * r296172;
double r296178 = 1.0;
double r296179 = r296178 - r296174;
double r296180 = r296177 / r296179;
double r296181 = r296175 - r296180;
return r296181;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
Results
| Original | 4.5 |
|---|---|
| Target | 4.2 |
| Herbie | 7.2 |
if x < -4.3520223404451874e+135 or 3.262047267833346e+162 < x Initial program 4.1
rmApplied add-cube-cbrt5.1
Applied associate-*r*5.1
if -4.3520223404451874e+135 < x < 3.262047267833346e+162Initial program 4.6
rmApplied sub-neg4.6
Applied distribute-rgt-in4.6
rmApplied associate-*l/3.2
rmApplied distribute-neg-frac3.2
Applied associate-*l/4.1
Simplified4.1
Final simplification7.2
herbie shell --seed 2019291
(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 z)))) -7.62322630331204244e-196) (* x (- (/ y z) (* t (/ 1 (- 1 z))))) (if (< (* x (- (/ y z) (/ t (- 1 z)))) 1.41339449277023022e-211) (+ (/ (* y x) z) (- (/ (* t x) (- 1 z)))) (* x (- (/ y z) (* t (/ 1 (- 1 z)))))))
(* x (- (/ y z) (/ t (- 1 z)))))