\frac{\left(\left(x \cdot 9\right) \cdot y - \left(\left(z \cdot 4\right) \cdot t\right) \cdot a\right) + b}{z \cdot c}\begin{array}{l}
\mathbf{if}\;\frac{\left(\left(x \cdot 9\right) \cdot y - \left(\left(z \cdot 4\right) \cdot t\right) \cdot a\right) + b}{z \cdot c} = -\infty:\\
\;\;\;\;\mathsf{fma}\left(-4, \frac{t}{\frac{c}{a}}, \frac{1}{\frac{z \cdot c}{\mathsf{fma}\left(x, 9 \cdot y, b\right)}}\right)\\
\mathbf{elif}\;\frac{\left(\left(x \cdot 9\right) \cdot y - \left(\left(z \cdot 4\right) \cdot t\right) \cdot a\right) + b}{z \cdot c} \le -1.10785782730221187 \cdot 10^{-139}:\\
\;\;\;\;\frac{\left(\left(x \cdot 9\right) \cdot y - \left(\left(z \cdot 4\right) \cdot t\right) \cdot a\right) + b}{z \cdot c}\\
\mathbf{elif}\;\frac{\left(\left(x \cdot 9\right) \cdot y - \left(\left(z \cdot 4\right) \cdot t\right) \cdot a\right) + b}{z \cdot c} \le 5.1338393807630104 \cdot 10^{80}:\\
\;\;\;\;\mathsf{fma}\left(-4, \frac{t \cdot a}{c}, \frac{\frac{\mathsf{fma}\left(9 \cdot x, y, b\right)}{z}}{c}\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(-4, \frac{\frac{t}{c}}{\frac{1}{a}}, \mathsf{fma}\left(9, \frac{x \cdot y}{z \cdot c}, \frac{b}{z \cdot c}\right)\right)\\
\end{array}double f(double x, double y, double z, double t, double a, double b, double c) {
double r817591 = x;
double r817592 = 9.0;
double r817593 = r817591 * r817592;
double r817594 = y;
double r817595 = r817593 * r817594;
double r817596 = z;
double r817597 = 4.0;
double r817598 = r817596 * r817597;
double r817599 = t;
double r817600 = r817598 * r817599;
double r817601 = a;
double r817602 = r817600 * r817601;
double r817603 = r817595 - r817602;
double r817604 = b;
double r817605 = r817603 + r817604;
double r817606 = c;
double r817607 = r817596 * r817606;
double r817608 = r817605 / r817607;
return r817608;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r817609 = x;
double r817610 = 9.0;
double r817611 = r817609 * r817610;
double r817612 = y;
double r817613 = r817611 * r817612;
double r817614 = z;
double r817615 = 4.0;
double r817616 = r817614 * r817615;
double r817617 = t;
double r817618 = r817616 * r817617;
double r817619 = a;
double r817620 = r817618 * r817619;
double r817621 = r817613 - r817620;
double r817622 = b;
double r817623 = r817621 + r817622;
double r817624 = c;
double r817625 = r817614 * r817624;
double r817626 = r817623 / r817625;
double r817627 = -inf.0;
bool r817628 = r817626 <= r817627;
double r817629 = -r817615;
double r817630 = r817624 / r817619;
double r817631 = r817617 / r817630;
double r817632 = 1.0;
double r817633 = r817610 * r817612;
double r817634 = fma(r817609, r817633, r817622);
double r817635 = r817625 / r817634;
double r817636 = r817632 / r817635;
double r817637 = fma(r817629, r817631, r817636);
double r817638 = -1.1078578273022119e-139;
bool r817639 = r817626 <= r817638;
double r817640 = 5.13383938076301e+80;
bool r817641 = r817626 <= r817640;
double r817642 = r817617 * r817619;
double r817643 = r817642 / r817624;
double r817644 = r817610 * r817609;
double r817645 = fma(r817644, r817612, r817622);
double r817646 = r817645 / r817614;
double r817647 = r817646 / r817624;
double r817648 = fma(r817629, r817643, r817647);
double r817649 = r817617 / r817624;
double r817650 = r817632 / r817619;
double r817651 = r817649 / r817650;
double r817652 = r817609 * r817612;
double r817653 = r817652 / r817625;
double r817654 = r817622 / r817625;
double r817655 = fma(r817610, r817653, r817654);
double r817656 = fma(r817629, r817651, r817655);
double r817657 = r817641 ? r817648 : r817656;
double r817658 = r817639 ? r817626 : r817657;
double r817659 = r817628 ? r817637 : r817658;
return r817659;
}




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 | 20.5 |
|---|---|
| Target | 14.9 |
| Herbie | 7.4 |
if (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) < -inf.0Initial program 64.0
Simplified31.4
rmApplied associate-/l*24.9
rmApplied clear-num24.9
if -inf.0 < (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) < -1.1078578273022119e-139Initial program 0.7
if -1.1078578273022119e-139 < (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) < 5.13383938076301e+80Initial program 14.2
Simplified8.9
rmApplied associate-/r*1.6
Simplified1.5
if 5.13383938076301e+80 < (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) Initial program 33.0
Simplified18.7
rmApplied associate-/l*16.0
rmApplied div-inv16.0
Applied associate-/r*14.3
Taylor expanded around 0 14.2
Simplified14.2
Final simplification7.4
herbie shell --seed 2020018 +o rules:numerics
(FPCore (x y z t a b c)
:name "Diagrams.Solve.Polynomial:cubForm from diagrams-solve-0.1, J"
:precision binary64
:herbie-target
(if (< (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)) -1.1001567408041051e-171) (/ (+ (- (* (* x 9) y) (* (* z 4) (* t a))) b) (* z c)) (if (< (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)) -0.0) (/ (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) z) c) (if (< (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)) 1.1708877911747488e-53) (/ (+ (- (* (* x 9) y) (* (* z 4) (* t a))) b) (* z c)) (if (< (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)) 2.876823679546137e+130) (- (+ (* (* 9 (/ y c)) (/ x z)) (/ b (* c z))) (* 4 (/ (* a t) c))) (if (< (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)) 1.3838515042456319e+158) (/ (+ (- (* (* x 9) y) (* (* z 4) (* t a))) b) (* z c)) (- (+ (* 9 (* (/ y (* c z)) x)) (/ b (* c z))) (* 4 (/ (* a t) c))))))))
(/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)))