\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(\frac{z}{\sqrt[3]{t} \cdot \sqrt[3]{t}} \cdot \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 r430752 = x;
double r430753 = y;
double r430754 = 2.0;
double r430755 = z;
double r430756 = t;
double r430757 = a;
double r430758 = r430756 + r430757;
double r430759 = sqrt(r430758);
double r430760 = r430755 * r430759;
double r430761 = r430760 / r430756;
double r430762 = b;
double r430763 = c;
double r430764 = r430762 - r430763;
double r430765 = 5.0;
double r430766 = 6.0;
double r430767 = r430765 / r430766;
double r430768 = r430757 + r430767;
double r430769 = 3.0;
double r430770 = r430756 * r430769;
double r430771 = r430754 / r430770;
double r430772 = r430768 - r430771;
double r430773 = r430764 * r430772;
double r430774 = r430761 - r430773;
double r430775 = r430754 * r430774;
double r430776 = exp(r430775);
double r430777 = r430753 * r430776;
double r430778 = r430752 + r430777;
double r430779 = r430752 / r430778;
return r430779;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r430780 = x;
double r430781 = y;
double r430782 = 2.0;
double r430783 = z;
double r430784 = t;
double r430785 = cbrt(r430784);
double r430786 = r430785 * r430785;
double r430787 = r430783 / r430786;
double r430788 = a;
double r430789 = r430784 + r430788;
double r430790 = sqrt(r430789);
double r430791 = r430790 / r430785;
double r430792 = r430787 * r430791;
double r430793 = b;
double r430794 = c;
double r430795 = r430793 - r430794;
double r430796 = 5.0;
double r430797 = 6.0;
double r430798 = r430796 / r430797;
double r430799 = r430788 + r430798;
double r430800 = 3.0;
double r430801 = r430784 * r430800;
double r430802 = r430782 / r430801;
double r430803 = r430799 - r430802;
double r430804 = r430795 * r430803;
double r430805 = r430792 - r430804;
double r430806 = r430782 * r430805;
double r430807 = exp(r430806);
double r430808 = r430781 * r430807;
double r430809 = r430780 + r430808;
double r430810 = r430780 / r430809;
return r430810;
}




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
Results
| Original | 3.8 |
|---|---|
| Target | 3.1 |
| Herbie | 2.6 |
Initial program 3.8
rmApplied add-cube-cbrt3.8
Applied times-frac2.6
Final simplification2.6
herbie shell --seed 2020060
(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)))))))))))