\frac{x \cdot e^{\left(y \cdot \log z + \left(t - 1\right) \cdot \log a\right) - b}}{y}\left(x \cdot \frac{{\left(\frac{1}{a}\right)}^{1}}{e^{y \cdot \log \left(\frac{1}{z}\right) + \left(\log \left(\frac{1}{a}\right) \cdot t + b\right)}}\right) \cdot \frac{1}{y}double f(double x, double y, double z, double t, double a, double b) {
double r2357 = x;
double r2358 = y;
double r2359 = z;
double r2360 = log(r2359);
double r2361 = r2358 * r2360;
double r2362 = t;
double r2363 = 1.0;
double r2364 = r2362 - r2363;
double r2365 = a;
double r2366 = log(r2365);
double r2367 = r2364 * r2366;
double r2368 = r2361 + r2367;
double r2369 = b;
double r2370 = r2368 - r2369;
double r2371 = exp(r2370);
double r2372 = r2357 * r2371;
double r2373 = r2372 / r2358;
return r2373;
}
double f(double x, double y, double z, double t, double a, double b) {
double r2374 = x;
double r2375 = 1.0;
double r2376 = a;
double r2377 = r2375 / r2376;
double r2378 = 1.0;
double r2379 = pow(r2377, r2378);
double r2380 = y;
double r2381 = z;
double r2382 = r2375 / r2381;
double r2383 = log(r2382);
double r2384 = r2380 * r2383;
double r2385 = log(r2377);
double r2386 = t;
double r2387 = r2385 * r2386;
double r2388 = b;
double r2389 = r2387 + r2388;
double r2390 = r2384 + r2389;
double r2391 = exp(r2390);
double r2392 = r2379 / r2391;
double r2393 = r2374 * r2392;
double r2394 = r2375 / r2380;
double r2395 = r2393 * r2394;
return r2395;
}




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 | 1.8 |
|---|---|
| Target | 11.0 |
| Herbie | 1.1 |
Initial program 1.8
Taylor expanded around inf 1.8
Simplified1.1
rmApplied div-inv1.1
Final simplification1.1
herbie shell --seed 2020025
(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))