\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}\;t \le -9.473153273384903490502724565303245723582 \cdot 10^{-244} \lor \neg \left(t \le 9.548444342446725028979639354139199225475 \cdot 10^{-247}\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)}}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{x + y \cdot e^{2 \cdot \frac{\left(z \cdot \frac{\sqrt{t + a}}{\sqrt[3]{t}}\right) \cdot \left(\left(a - \frac{5}{6}\right) \cdot \left(t \cdot 3\right)\right) - \left(\sqrt[3]{t} \cdot \sqrt[3]{t}\right) \cdot \left(\left(b - c\right) \cdot \left(\left(a \cdot a - \frac{5}{6} \cdot \frac{5}{6}\right) \cdot \left(t \cdot 3\right) - \left(a - \frac{5}{6}\right) \cdot 2\right)\right)}{\left(\sqrt[3]{t} \cdot \sqrt[3]{t}\right) \cdot \left(\left(a - \frac{5}{6}\right) \cdot \left(t \cdot 3\right)\right)}}}\\
\end{array}double f(double x, double y, double z, double t, double a, double b, double c) {
double r324423 = x;
double r324424 = y;
double r324425 = 2.0;
double r324426 = z;
double r324427 = t;
double r324428 = a;
double r324429 = r324427 + r324428;
double r324430 = sqrt(r324429);
double r324431 = r324426 * r324430;
double r324432 = r324431 / r324427;
double r324433 = b;
double r324434 = c;
double r324435 = r324433 - r324434;
double r324436 = 5.0;
double r324437 = 6.0;
double r324438 = r324436 / r324437;
double r324439 = r324428 + r324438;
double r324440 = 3.0;
double r324441 = r324427 * r324440;
double r324442 = r324425 / r324441;
double r324443 = r324439 - r324442;
double r324444 = r324435 * r324443;
double r324445 = r324432 - r324444;
double r324446 = r324425 * r324445;
double r324447 = exp(r324446);
double r324448 = r324424 * r324447;
double r324449 = r324423 + r324448;
double r324450 = r324423 / r324449;
return r324450;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r324451 = t;
double r324452 = -9.473153273384903e-244;
bool r324453 = r324451 <= r324452;
double r324454 = 9.548444342446725e-247;
bool r324455 = r324451 <= r324454;
double r324456 = !r324455;
bool r324457 = r324453 || r324456;
double r324458 = x;
double r324459 = y;
double r324460 = 2.0;
double r324461 = z;
double r324462 = cbrt(r324451);
double r324463 = r324462 * r324462;
double r324464 = r324461 / r324463;
double r324465 = a;
double r324466 = r324451 + r324465;
double r324467 = sqrt(r324466);
double r324468 = r324467 / r324462;
double r324469 = r324464 * r324468;
double r324470 = b;
double r324471 = c;
double r324472 = r324470 - r324471;
double r324473 = 5.0;
double r324474 = 6.0;
double r324475 = r324473 / r324474;
double r324476 = r324465 + r324475;
double r324477 = 3.0;
double r324478 = r324451 * r324477;
double r324479 = r324460 / r324478;
double r324480 = r324476 - r324479;
double r324481 = r324472 * r324480;
double r324482 = r324469 - r324481;
double r324483 = r324460 * r324482;
double r324484 = exp(r324483);
double r324485 = r324459 * r324484;
double r324486 = r324458 + r324485;
double r324487 = r324458 / r324486;
double r324488 = r324461 * r324468;
double r324489 = r324465 - r324475;
double r324490 = r324489 * r324478;
double r324491 = r324488 * r324490;
double r324492 = r324465 * r324465;
double r324493 = r324475 * r324475;
double r324494 = r324492 - r324493;
double r324495 = r324494 * r324478;
double r324496 = r324489 * r324460;
double r324497 = r324495 - r324496;
double r324498 = r324472 * r324497;
double r324499 = r324463 * r324498;
double r324500 = r324491 - r324499;
double r324501 = r324463 * r324490;
double r324502 = r324500 / r324501;
double r324503 = r324460 * r324502;
double r324504 = exp(r324503);
double r324505 = r324459 * r324504;
double r324506 = r324458 + r324505;
double r324507 = r324458 / r324506;
double r324508 = r324457 ? r324487 : r324507;
return r324508;
}




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.9 |
| Herbie | 2.4 |
if t < -9.473153273384903e-244 or 9.548444342446725e-247 < t Initial program 3.0
rmApplied add-cube-cbrt3.0
Applied times-frac1.8
if -9.473153273384903e-244 < t < 9.548444342446725e-247Initial program 10.4
rmApplied add-cube-cbrt10.4
Applied times-frac10.5
rmApplied flip-+13.9
Applied frac-sub13.9
Applied associate-*r/13.9
Applied associate-*l/13.8
Applied frac-sub7.9
Final simplification2.4
herbie shell --seed 2019323
(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)))))))))))