\frac{x \cdot e^{\left(y \cdot \log z + \left(t - 1\right) \cdot \log a\right) - b}}{y}\frac{x \cdot \frac{e^{\log z \cdot y - \left(b - t \cdot \log a\right)}}{{a}^{1}}}{y}double f(double x, double y, double z, double t, double a, double b) {
double r500218 = x;
double r500219 = y;
double r500220 = z;
double r500221 = log(r500220);
double r500222 = r500219 * r500221;
double r500223 = t;
double r500224 = 1.0;
double r500225 = r500223 - r500224;
double r500226 = a;
double r500227 = log(r500226);
double r500228 = r500225 * r500227;
double r500229 = r500222 + r500228;
double r500230 = b;
double r500231 = r500229 - r500230;
double r500232 = exp(r500231);
double r500233 = r500218 * r500232;
double r500234 = r500233 / r500219;
return r500234;
}
double f(double x, double y, double z, double t, double a, double b) {
double r500235 = x;
double r500236 = z;
double r500237 = log(r500236);
double r500238 = y;
double r500239 = r500237 * r500238;
double r500240 = b;
double r500241 = t;
double r500242 = a;
double r500243 = log(r500242);
double r500244 = r500241 * r500243;
double r500245 = r500240 - r500244;
double r500246 = r500239 - r500245;
double r500247 = exp(r500246);
double r500248 = 1.0;
double r500249 = pow(r500242, r500248);
double r500250 = r500247 / r500249;
double r500251 = r500235 * r500250;
double r500252 = r500251 / r500238;
return r500252;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a




Bits error versus b
Results
| Original | 2.0 |
|---|---|
| Target | 11.2 |
| Herbie | 1.3 |
Initial program 2.0
Taylor expanded around inf 2.0
Simplified1.3
Final simplification1.3
herbie shell --seed 2020047
(FPCore (x y z t a b)
:name "Numeric.SpecFunctions:incompleteBetaWorker from math-functions-0.1.5.2, A"
:precision binary64
:herbie-target
(if (< t -0.8845848504127471) (/ (* x (/ (pow a (- t 1)) y)) (- (+ b 1) (* y (log z)))) (if (< t 852031.2288374073) (/ (* (/ x y) (pow a (- t 1))) (exp (- b (* (log z) y)))) (/ (* x (/ (pow a (- t 1)) y)) (- (+ b 1) (* y (log z))))))
(/ (* x (exp (- (+ (* y (log z)) (* (- t 1) (log a))) b))) y))