\frac{x}{x + y \cdot e^{2 \cdot \left(\frac{z \cdot \sqrt{t + a}}{t} - \left(b - c\right) \cdot \left(\left(a + \frac{5}{6}\right) - \frac{2}{t \cdot 3}\right)\right)}}\frac{x}{x + y \cdot e^{2 \cdot \left(\mathsf{fma}\left(\frac{z}{\sqrt[3]{t} \cdot \sqrt[3]{t}}, \frac{\sqrt{t + a}}{\sqrt[3]{t}}, -\left(\left(a + \frac{5}{6}\right) - \frac{2}{t \cdot 3}\right) \cdot \left(b - c\right)\right) + \left(\left(a + \frac{5}{6}\right) - \frac{2}{t \cdot 3}\right) \cdot \left(\left(-\left(b - c\right)\right) + \left(b - c\right)\right)\right)}}double f(double x, double y, double z, double t, double a, double b, double c) {
double r499867 = x;
double r499868 = y;
double r499869 = 2.0;
double r499870 = z;
double r499871 = t;
double r499872 = a;
double r499873 = r499871 + r499872;
double r499874 = sqrt(r499873);
double r499875 = r499870 * r499874;
double r499876 = r499875 / r499871;
double r499877 = b;
double r499878 = c;
double r499879 = r499877 - r499878;
double r499880 = 5.0;
double r499881 = 6.0;
double r499882 = r499880 / r499881;
double r499883 = r499872 + r499882;
double r499884 = 3.0;
double r499885 = r499871 * r499884;
double r499886 = r499869 / r499885;
double r499887 = r499883 - r499886;
double r499888 = r499879 * r499887;
double r499889 = r499876 - r499888;
double r499890 = r499869 * r499889;
double r499891 = exp(r499890);
double r499892 = r499868 * r499891;
double r499893 = r499867 + r499892;
double r499894 = r499867 / r499893;
return r499894;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r499895 = x;
double r499896 = y;
double r499897 = 2.0;
double r499898 = z;
double r499899 = t;
double r499900 = cbrt(r499899);
double r499901 = r499900 * r499900;
double r499902 = r499898 / r499901;
double r499903 = a;
double r499904 = r499899 + r499903;
double r499905 = sqrt(r499904);
double r499906 = r499905 / r499900;
double r499907 = 5.0;
double r499908 = 6.0;
double r499909 = r499907 / r499908;
double r499910 = r499903 + r499909;
double r499911 = 3.0;
double r499912 = r499899 * r499911;
double r499913 = r499897 / r499912;
double r499914 = r499910 - r499913;
double r499915 = b;
double r499916 = c;
double r499917 = r499915 - r499916;
double r499918 = r499914 * r499917;
double r499919 = -r499918;
double r499920 = fma(r499902, r499906, r499919);
double r499921 = -r499917;
double r499922 = r499921 + r499917;
double r499923 = r499914 * r499922;
double r499924 = r499920 + r499923;
double r499925 = r499897 * r499924;
double r499926 = exp(r499925);
double r499927 = r499896 * r499926;
double r499928 = r499895 + r499927;
double r499929 = r499895 / r499928;
return r499929;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a




Bits error versus b




Bits error versus c
| Original | 3.8 |
|---|---|
| Target | 3.0 |
| Herbie | 1.8 |
Initial program 3.8
rmApplied add-cube-cbrt3.8
Applied times-frac2.6
Applied prod-diff21.9
Simplified1.8
Final simplification1.8
herbie shell --seed 2019354 +o rules:numerics
(FPCore (x y z t a b c)
:name "Numeric.SpecFunctions:invIncompleteBetaWorker from math-functions-0.1.5.2, I"
:precision binary64
:herbie-target
(if (< t -2.118326644891581e-50) (/ x (+ x (* y (exp (* 2 (- (+ (* a c) (* 0.8333333333333334 c)) (* a b))))))) (if (< t 5.196588770651547e-123) (/ x (+ x (* y (exp (* 2 (/ (- (* (* z (sqrt (+ t a))) (* (* 3 t) (- a (/ 5 6)))) (* (- (* (+ (/ 5 6) a) (* 3 t)) 2) (* (- a (/ 5 6)) (* (- b c) t)))) (* (* (* t t) 3) (- a (/ 5 6))))))))) (/ x (+ x (* y (exp (* 2 (- (/ (* z (sqrt (+ t a))) t) (* (- b c) (- (+ a (/ 5 6)) (/ 2 (* t 3))))))))))))
(/ x (+ x (* y (exp (* 2 (- (/ (* z (sqrt (+ t a))) t) (* (- b c) (- (+ a (/ 5 6)) (/ 2 (* t 3)))))))))))