\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 \mathsf{fma}\left(\frac{z}{\sqrt[3]{t} \cdot \sqrt[3]{t}}, \frac{\sqrt{t + a}}{\sqrt[3]{t}}, -\left(b - c\right) \cdot \left(\left(a + \frac{5}{6}\right) - \frac{2}{t \cdot 3}\right)\right)}}double f(double x, double y, double z, double t, double a, double b, double c) {
double r551849 = x;
double r551850 = y;
double r551851 = 2.0;
double r551852 = z;
double r551853 = t;
double r551854 = a;
double r551855 = r551853 + r551854;
double r551856 = sqrt(r551855);
double r551857 = r551852 * r551856;
double r551858 = r551857 / r551853;
double r551859 = b;
double r551860 = c;
double r551861 = r551859 - r551860;
double r551862 = 5.0;
double r551863 = 6.0;
double r551864 = r551862 / r551863;
double r551865 = r551854 + r551864;
double r551866 = 3.0;
double r551867 = r551853 * r551866;
double r551868 = r551851 / r551867;
double r551869 = r551865 - r551868;
double r551870 = r551861 * r551869;
double r551871 = r551858 - r551870;
double r551872 = r551851 * r551871;
double r551873 = exp(r551872);
double r551874 = r551850 * r551873;
double r551875 = r551849 + r551874;
double r551876 = r551849 / r551875;
return r551876;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r551877 = x;
double r551878 = y;
double r551879 = 2.0;
double r551880 = z;
double r551881 = t;
double r551882 = cbrt(r551881);
double r551883 = r551882 * r551882;
double r551884 = r551880 / r551883;
double r551885 = a;
double r551886 = r551881 + r551885;
double r551887 = sqrt(r551886);
double r551888 = r551887 / r551882;
double r551889 = b;
double r551890 = c;
double r551891 = r551889 - r551890;
double r551892 = 5.0;
double r551893 = 6.0;
double r551894 = r551892 / r551893;
double r551895 = r551885 + r551894;
double r551896 = 3.0;
double r551897 = r551881 * r551896;
double r551898 = r551879 / r551897;
double r551899 = r551895 - r551898;
double r551900 = r551891 * r551899;
double r551901 = -r551900;
double r551902 = fma(r551884, r551888, r551901);
double r551903 = r551879 * r551902;
double r551904 = exp(r551903);
double r551905 = r551878 * r551904;
double r551906 = r551877 + r551905;
double r551907 = r551877 / r551906;
return r551907;
}




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.1 |
| Herbie | 1.8 |
Initial program 3.8
rmApplied add-cube-cbrt3.8
Applied times-frac2.6
Applied fma-neg1.8
Final simplification1.8
herbie shell --seed 2020060 +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)))))))))))