\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}{1}, \frac{\sqrt{t + a}}{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 r336085 = x;
double r336086 = y;
double r336087 = 2.0;
double r336088 = z;
double r336089 = t;
double r336090 = a;
double r336091 = r336089 + r336090;
double r336092 = sqrt(r336091);
double r336093 = r336088 * r336092;
double r336094 = r336093 / r336089;
double r336095 = b;
double r336096 = c;
double r336097 = r336095 - r336096;
double r336098 = 5.0;
double r336099 = 6.0;
double r336100 = r336098 / r336099;
double r336101 = r336090 + r336100;
double r336102 = 3.0;
double r336103 = r336089 * r336102;
double r336104 = r336087 / r336103;
double r336105 = r336101 - r336104;
double r336106 = r336097 * r336105;
double r336107 = r336094 - r336106;
double r336108 = r336087 * r336107;
double r336109 = exp(r336108);
double r336110 = r336086 * r336109;
double r336111 = r336085 + r336110;
double r336112 = r336085 / r336111;
return r336112;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r336113 = x;
double r336114 = y;
double r336115 = 2.0;
double r336116 = z;
double r336117 = 1.0;
double r336118 = r336116 / r336117;
double r336119 = t;
double r336120 = a;
double r336121 = r336119 + r336120;
double r336122 = sqrt(r336121);
double r336123 = r336122 / r336119;
double r336124 = b;
double r336125 = c;
double r336126 = r336124 - r336125;
double r336127 = 5.0;
double r336128 = 6.0;
double r336129 = r336127 / r336128;
double r336130 = r336120 + r336129;
double r336131 = 3.0;
double r336132 = r336119 * r336131;
double r336133 = r336115 / r336132;
double r336134 = r336130 - r336133;
double r336135 = r336126 * r336134;
double r336136 = -r336135;
double r336137 = fma(r336118, r336123, r336136);
double r336138 = r336115 * r336137;
double r336139 = exp(r336138);
double r336140 = r336114 * r336139;
double r336141 = r336113 + r336140;
double r336142 = r336113 / r336141;
return r336142;
}




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.9 |
|---|---|
| Target | 2.8 |
| Herbie | 2.1 |
Initial program 3.9
rmApplied *-un-lft-identity3.9
Applied times-frac3.4
Applied fma-neg2.1
Final simplification2.1
herbie shell --seed 2020002 +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)))))))))))