\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)}}\begin{array}{l}
\mathbf{if}\;a \le 3.45477252400855375 \cdot 10^{233}:\\
\;\;\;\;\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) - \sqrt[3]{{\left(\frac{2}{t \cdot 3}\right)}^{3}}\right)\right)}}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{x + y \cdot e^{2 \cdot \left(c \cdot \left(a + 0.83333333333333337\right) - a \cdot b\right)}}\\
\end{array}double f(double x, double y, double z, double t, double a, double b, double c) {
double r362405 = x;
double r362406 = y;
double r362407 = 2.0;
double r362408 = z;
double r362409 = t;
double r362410 = a;
double r362411 = r362409 + r362410;
double r362412 = sqrt(r362411);
double r362413 = r362408 * r362412;
double r362414 = r362413 / r362409;
double r362415 = b;
double r362416 = c;
double r362417 = r362415 - r362416;
double r362418 = 5.0;
double r362419 = 6.0;
double r362420 = r362418 / r362419;
double r362421 = r362410 + r362420;
double r362422 = 3.0;
double r362423 = r362409 * r362422;
double r362424 = r362407 / r362423;
double r362425 = r362421 - r362424;
double r362426 = r362417 * r362425;
double r362427 = r362414 - r362426;
double r362428 = r362407 * r362427;
double r362429 = exp(r362428);
double r362430 = r362406 * r362429;
double r362431 = r362405 + r362430;
double r362432 = r362405 / r362431;
return r362432;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r362433 = a;
double r362434 = 3.4547725240085537e+233;
bool r362435 = r362433 <= r362434;
double r362436 = x;
double r362437 = y;
double r362438 = 2.0;
double r362439 = z;
double r362440 = t;
double r362441 = r362440 + r362433;
double r362442 = sqrt(r362441);
double r362443 = r362439 * r362442;
double r362444 = r362443 / r362440;
double r362445 = b;
double r362446 = c;
double r362447 = r362445 - r362446;
double r362448 = 5.0;
double r362449 = 6.0;
double r362450 = r362448 / r362449;
double r362451 = r362433 + r362450;
double r362452 = 3.0;
double r362453 = r362440 * r362452;
double r362454 = r362438 / r362453;
double r362455 = 3.0;
double r362456 = pow(r362454, r362455);
double r362457 = cbrt(r362456);
double r362458 = r362451 - r362457;
double r362459 = r362447 * r362458;
double r362460 = r362444 - r362459;
double r362461 = r362438 * r362460;
double r362462 = exp(r362461);
double r362463 = r362437 * r362462;
double r362464 = r362436 + r362463;
double r362465 = r362436 / r362464;
double r362466 = 0.8333333333333334;
double r362467 = r362433 + r362466;
double r362468 = r362446 * r362467;
double r362469 = r362433 * r362445;
double r362470 = r362468 - r362469;
double r362471 = r362438 * r362470;
double r362472 = exp(r362471);
double r362473 = r362437 * r362472;
double r362474 = r362436 + r362473;
double r362475 = r362436 / r362474;
double r362476 = r362435 ? r362465 : r362475;
return r362476;
}




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 | 3.8 |
|---|---|
| Target | 2.8 |
| Herbie | 7.0 |
if a < 3.4547725240085537e+233Initial program 3.2
rmApplied add-cbrt-cube3.2
Applied add-cbrt-cube6.0
Applied cbrt-unprod6.0
Applied add-cbrt-cube6.0
Applied cbrt-undiv6.1
Simplified6.1
if 3.4547725240085537e+233 < a Initial program 8.1
Taylor expanded around inf 14.0
Simplified14.0
Final simplification7.0
herbie shell --seed 2020045
(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)))))))))))