\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 r378993 = x;
double r378994 = y;
double r378995 = 2.0;
double r378996 = z;
double r378997 = t;
double r378998 = a;
double r378999 = r378997 + r378998;
double r379000 = sqrt(r378999);
double r379001 = r378996 * r379000;
double r379002 = r379001 / r378997;
double r379003 = b;
double r379004 = c;
double r379005 = r379003 - r379004;
double r379006 = 5.0;
double r379007 = 6.0;
double r379008 = r379006 / r379007;
double r379009 = r378998 + r379008;
double r379010 = 3.0;
double r379011 = r378997 * r379010;
double r379012 = r378995 / r379011;
double r379013 = r379009 - r379012;
double r379014 = r379005 * r379013;
double r379015 = r379002 - r379014;
double r379016 = r378995 * r379015;
double r379017 = exp(r379016);
double r379018 = r378994 * r379017;
double r379019 = r378993 + r379018;
double r379020 = r378993 / r379019;
return r379020;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r379021 = x;
double r379022 = y;
double r379023 = 2.0;
double r379024 = z;
double r379025 = t;
double r379026 = a;
double r379027 = r379025 + r379026;
double r379028 = sqrt(r379027);
double r379029 = r379028 / r379025;
double r379030 = b;
double r379031 = c;
double r379032 = r379030 - r379031;
double r379033 = 5.0;
double r379034 = 6.0;
double r379035 = r379033 / r379034;
double r379036 = r379026 + r379035;
double r379037 = 3.0;
double r379038 = r379025 * r379037;
double r379039 = r379023 / r379038;
double r379040 = r379036 - r379039;
double r379041 = r379032 * r379040;
double r379042 = -r379041;
double r379043 = fma(r379024, r379029, r379042);
double r379044 = -r379032;
double r379045 = r379044 + r379032;
double r379046 = r379040 * r379045;
double r379047 = r379043 + r379046;
double r379048 = r379023 * r379047;
double r379049 = exp(r379048);
double r379050 = r379022 * r379049;
double r379051 = r379021 + r379050;
double r379052 = r379021 / r379051;
return r379052;
}




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.2 |
|---|---|
| Target | 3.1 |
| Herbie | 2.3 |
Initial program 4.2
rmApplied *-un-lft-identity4.2
Applied times-frac3.5
Applied prod-diff22.5
Simplified22.5
Simplified2.3
Final simplification2.3
herbie shell --seed 2020083 +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)))))))))))