\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 r527738 = x;
double r527739 = y;
double r527740 = 2.0;
double r527741 = z;
double r527742 = t;
double r527743 = a;
double r527744 = r527742 + r527743;
double r527745 = sqrt(r527744);
double r527746 = r527741 * r527745;
double r527747 = r527746 / r527742;
double r527748 = b;
double r527749 = c;
double r527750 = r527748 - r527749;
double r527751 = 5.0;
double r527752 = 6.0;
double r527753 = r527751 / r527752;
double r527754 = r527743 + r527753;
double r527755 = 3.0;
double r527756 = r527742 * r527755;
double r527757 = r527740 / r527756;
double r527758 = r527754 - r527757;
double r527759 = r527750 * r527758;
double r527760 = r527747 - r527759;
double r527761 = r527740 * r527760;
double r527762 = exp(r527761);
double r527763 = r527739 * r527762;
double r527764 = r527738 + r527763;
double r527765 = r527738 / r527764;
return r527765;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r527766 = x;
double r527767 = y;
double r527768 = 2.0;
double r527769 = z;
double r527770 = t;
double r527771 = cbrt(r527770);
double r527772 = r527771 * r527771;
double r527773 = r527769 / r527772;
double r527774 = a;
double r527775 = r527770 + r527774;
double r527776 = sqrt(r527775);
double r527777 = r527776 / r527771;
double r527778 = b;
double r527779 = c;
double r527780 = r527778 - r527779;
double r527781 = 5.0;
double r527782 = 6.0;
double r527783 = r527781 / r527782;
double r527784 = r527774 + r527783;
double r527785 = 3.0;
double r527786 = r527770 * r527785;
double r527787 = r527768 / r527786;
double r527788 = r527784 - r527787;
double r527789 = r527780 * r527788;
double r527790 = -r527789;
double r527791 = fma(r527773, r527777, r527790);
double r527792 = r527768 * r527791;
double r527793 = exp(r527792);
double r527794 = r527767 * r527793;
double r527795 = r527766 + r527794;
double r527796 = r527766 / r527795;
return r527796;
}




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 | 4.0 |
|---|---|
| Target | 3.1 |
| Herbie | 1.9 |
Initial program 4.0
rmApplied add-cube-cbrt4.0
Applied times-frac2.8
Applied fma-neg1.9
Final simplification1.9
herbie shell --seed 2020057 +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)))))))))))