x \cdot \left(\frac{y}{z} - \frac{t}{1 - z}\right)x \cdot \left(\frac{y}{z} - t \cdot \frac{1}{1 - z}\right)double f(double x, double y, double z, double t) {
double r276154 = x;
double r276155 = y;
double r276156 = z;
double r276157 = r276155 / r276156;
double r276158 = t;
double r276159 = 1.0;
double r276160 = r276159 - r276156;
double r276161 = r276158 / r276160;
double r276162 = r276157 - r276161;
double r276163 = r276154 * r276162;
return r276163;
}
double f(double x, double y, double z, double t) {
double r276164 = x;
double r276165 = y;
double r276166 = z;
double r276167 = r276165 / r276166;
double r276168 = t;
double r276169 = 1.0;
double r276170 = 1.0;
double r276171 = r276170 - r276166;
double r276172 = r276169 / r276171;
double r276173 = r276168 * r276172;
double r276174 = r276167 - r276173;
double r276175 = r276164 * r276174;
return r276175;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
Results
| Original | 4.7 |
|---|---|
| Target | 4.3 |
| Herbie | 4.8 |
if (- (/ y z) (/ t (- 1.0 z))) < -inf.0 or 8.142281339311981e+291 < (- (/ y z) (/ t (- 1.0 z))) Initial program 54.9
rmApplied frac-sub55.1
Applied associate-*r/0.4
if -inf.0 < (- (/ y z) (/ t (- 1.0 z))) < 8.142281339311981e+291Initial program 1.4
rmApplied div-inv1.5
Final simplification4.8
herbie shell --seed 2019298
(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)))))