\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(z, \frac{\sqrt{t + a}}{t}, -\left(b - c\right) \cdot \left(\left(a + \frac{5}{6}\right) - \frac{2}{t \cdot 3}\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 r496734 = x;
double r496735 = y;
double r496736 = 2.0;
double r496737 = z;
double r496738 = t;
double r496739 = a;
double r496740 = r496738 + r496739;
double r496741 = sqrt(r496740);
double r496742 = r496737 * r496741;
double r496743 = r496742 / r496738;
double r496744 = b;
double r496745 = c;
double r496746 = r496744 - r496745;
double r496747 = 5.0;
double r496748 = 6.0;
double r496749 = r496747 / r496748;
double r496750 = r496739 + r496749;
double r496751 = 3.0;
double r496752 = r496738 * r496751;
double r496753 = r496736 / r496752;
double r496754 = r496750 - r496753;
double r496755 = r496746 * r496754;
double r496756 = r496743 - r496755;
double r496757 = r496736 * r496756;
double r496758 = exp(r496757);
double r496759 = r496735 * r496758;
double r496760 = r496734 + r496759;
double r496761 = r496734 / r496760;
return r496761;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r496762 = x;
double r496763 = y;
double r496764 = 2.0;
double r496765 = z;
double r496766 = t;
double r496767 = a;
double r496768 = r496766 + r496767;
double r496769 = sqrt(r496768);
double r496770 = r496769 / r496766;
double r496771 = b;
double r496772 = c;
double r496773 = r496771 - r496772;
double r496774 = 5.0;
double r496775 = 6.0;
double r496776 = r496774 / r496775;
double r496777 = r496767 + r496776;
double r496778 = 3.0;
double r496779 = r496766 * r496778;
double r496780 = r496764 / r496779;
double r496781 = r496777 - r496780;
double r496782 = r496773 * r496781;
double r496783 = -r496782;
double r496784 = fma(r496765, r496770, r496783);
double r496785 = -r496773;
double r496786 = r496785 + r496773;
double r496787 = r496781 * r496786;
double r496788 = r496784 + r496787;
double r496789 = r496764 * r496788;
double r496790 = exp(r496789);
double r496791 = r496763 * r496790;
double r496792 = r496762 + r496791;
double r496793 = r496762 / r496792;
return r496793;
}




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.2 |
| Herbie | 2.1 |
Initial program 3.8
rmApplied *-un-lft-identity3.8
Applied times-frac3.2
Applied prod-diff21.4
Simplified21.4
Simplified2.1
Final simplification2.1
herbie shell --seed 2020100 +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)))))))))))