\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(\frac{z}{\sqrt[3]{t} \cdot \sqrt[3]{t}} \cdot \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 r411214 = x;
double r411215 = y;
double r411216 = 2.0;
double r411217 = z;
double r411218 = t;
double r411219 = a;
double r411220 = r411218 + r411219;
double r411221 = sqrt(r411220);
double r411222 = r411217 * r411221;
double r411223 = r411222 / r411218;
double r411224 = b;
double r411225 = c;
double r411226 = r411224 - r411225;
double r411227 = 5.0;
double r411228 = 6.0;
double r411229 = r411227 / r411228;
double r411230 = r411219 + r411229;
double r411231 = 3.0;
double r411232 = r411218 * r411231;
double r411233 = r411216 / r411232;
double r411234 = r411230 - r411233;
double r411235 = r411226 * r411234;
double r411236 = r411223 - r411235;
double r411237 = r411216 * r411236;
double r411238 = exp(r411237);
double r411239 = r411215 * r411238;
double r411240 = r411214 + r411239;
double r411241 = r411214 / r411240;
return r411241;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r411242 = x;
double r411243 = y;
double r411244 = 2.0;
double r411245 = z;
double r411246 = t;
double r411247 = cbrt(r411246);
double r411248 = r411247 * r411247;
double r411249 = r411245 / r411248;
double r411250 = a;
double r411251 = r411246 + r411250;
double r411252 = sqrt(r411251);
double r411253 = r411252 / r411247;
double r411254 = r411249 * r411253;
double r411255 = b;
double r411256 = c;
double r411257 = r411255 - r411256;
double r411258 = 5.0;
double r411259 = 6.0;
double r411260 = r411258 / r411259;
double r411261 = r411250 + r411260;
double r411262 = 3.0;
double r411263 = r411246 * r411262;
double r411264 = r411244 / r411263;
double r411265 = r411261 - r411264;
double r411266 = r411257 * r411265;
double r411267 = r411254 - r411266;
double r411268 = r411244 * r411267;
double r411269 = exp(r411268);
double r411270 = r411243 * r411269;
double r411271 = r411242 + r411270;
double r411272 = r411242 / r411271;
return r411272;
}




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
Results
| Original | 4.0 |
|---|---|
| Target | 3.1 |
| Herbie | 2.7 |
Initial program 4.0
rmApplied add-cube-cbrt4.0
Applied times-frac2.7
Final simplification2.7
herbie shell --seed 2020047
(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)))))))))))