\frac{x \cdot e^{\left(y \cdot \log z + \left(t - 1\right) \cdot \log a\right) - b}}{y}\frac{{\left(\frac{1}{{a}^{1}}\right)}^{1}}{\frac{e^{b}}{{z}^{y}}} \cdot \frac{\frac{x}{y}}{{\left(\frac{1}{a}\right)}^{t}}double f(double x, double y, double z, double t, double a, double b) {
double r347959 = x;
double r347960 = y;
double r347961 = z;
double r347962 = log(r347961);
double r347963 = r347960 * r347962;
double r347964 = t;
double r347965 = 1.0;
double r347966 = r347964 - r347965;
double r347967 = a;
double r347968 = log(r347967);
double r347969 = r347966 * r347968;
double r347970 = r347963 + r347969;
double r347971 = b;
double r347972 = r347970 - r347971;
double r347973 = exp(r347972);
double r347974 = r347959 * r347973;
double r347975 = r347974 / r347960;
return r347975;
}
double f(double x, double y, double z, double t, double a, double b) {
double r347976 = 1.0;
double r347977 = a;
double r347978 = 1.0;
double r347979 = pow(r347977, r347978);
double r347980 = r347976 / r347979;
double r347981 = pow(r347980, r347978);
double r347982 = b;
double r347983 = exp(r347982);
double r347984 = z;
double r347985 = y;
double r347986 = pow(r347984, r347985);
double r347987 = r347983 / r347986;
double r347988 = r347981 / r347987;
double r347989 = x;
double r347990 = r347989 / r347985;
double r347991 = r347976 / r347977;
double r347992 = t;
double r347993 = pow(r347991, r347992);
double r347994 = r347990 / r347993;
double r347995 = r347988 * r347994;
return r347995;
}




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.1 |
| Herbie | 23.0 |
Initial program 2.0
rmApplied add-cube-cbrt2.0
Taylor expanded around inf 2.0
Simplified6.6
Taylor expanded around inf 1.5
Final simplification23.0
herbie shell --seed 2019308
(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.88458485041274715) (/ (* x (/ (pow a (- t 1)) y)) (- (+ b 1) (* y (log z)))) (if (< t 852031.22883740731) (/ (* (/ 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))