\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}{\mathsf{fma}\left(y, {\left(e^{2}\right)}^{\left(\mathsf{fma}\left(\frac{2}{t \cdot 3} - \left(a + \frac{5}{6}\right), b - c, \frac{z}{\sqrt[3]{t} \cdot \sqrt[3]{t}} \cdot \frac{\sqrt{t + a}}{\sqrt[3]{t}}\right)\right)}, x\right)}double f(double x, double y, double z, double t, double a, double b, double c) {
double r488135 = x;
double r488136 = y;
double r488137 = 2.0;
double r488138 = z;
double r488139 = t;
double r488140 = a;
double r488141 = r488139 + r488140;
double r488142 = sqrt(r488141);
double r488143 = r488138 * r488142;
double r488144 = r488143 / r488139;
double r488145 = b;
double r488146 = c;
double r488147 = r488145 - r488146;
double r488148 = 5.0;
double r488149 = 6.0;
double r488150 = r488148 / r488149;
double r488151 = r488140 + r488150;
double r488152 = 3.0;
double r488153 = r488139 * r488152;
double r488154 = r488137 / r488153;
double r488155 = r488151 - r488154;
double r488156 = r488147 * r488155;
double r488157 = r488144 - r488156;
double r488158 = r488137 * r488157;
double r488159 = exp(r488158);
double r488160 = r488136 * r488159;
double r488161 = r488135 + r488160;
double r488162 = r488135 / r488161;
return r488162;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r488163 = x;
double r488164 = y;
double r488165 = 2.0;
double r488166 = exp(r488165);
double r488167 = t;
double r488168 = 3.0;
double r488169 = r488167 * r488168;
double r488170 = r488165 / r488169;
double r488171 = a;
double r488172 = 5.0;
double r488173 = 6.0;
double r488174 = r488172 / r488173;
double r488175 = r488171 + r488174;
double r488176 = r488170 - r488175;
double r488177 = b;
double r488178 = c;
double r488179 = r488177 - r488178;
double r488180 = z;
double r488181 = cbrt(r488167);
double r488182 = r488181 * r488181;
double r488183 = r488180 / r488182;
double r488184 = r488167 + r488171;
double r488185 = sqrt(r488184);
double r488186 = r488185 / r488181;
double r488187 = r488183 * r488186;
double r488188 = fma(r488176, r488179, r488187);
double r488189 = pow(r488166, r488188);
double r488190 = fma(r488164, r488189, r488163);
double r488191 = r488163 / r488190;
return r488191;
}




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.6 |
Initial program 4.0
Simplified2.6
rmApplied add-cube-cbrt2.6
Applied times-frac1.6
Final simplification1.6
herbie shell --seed 2020046 +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)))))))))))