\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} \le -2.7174285457743678 \cdot 10^{-303}:\\
\;\;\;\;\left(\frac{b}{z \cdot c} + 9 \cdot \frac{x}{\frac{z \cdot c}{y}}\right) - 4 \cdot \frac{a \cdot t}{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 2.16459358474136627 \cdot 10^{-66}:\\
\;\;\;\;\frac{\frac{\left(\left(x \cdot 9\right) \cdot y - \left(\left(z \cdot 4\right) \cdot t\right) \cdot a\right) + b}{z}}{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 1.37691030763784186 \cdot 10^{238}:\\
\;\;\;\;\left(\frac{b}{z \cdot c} + 9 \cdot \frac{x \cdot y}{z \cdot c}\right) - 4 \cdot \frac{a}{\frac{c}{t}}\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{b}{z \cdot c} + 9 \cdot \frac{\frac{x}{z}}{\frac{c}{y}}\right) - 4 \cdot \frac{a \cdot t}{c}\\
\end{array}double f(double x, double y, double z, double t, double a, double b, double c) {
double r840755 = x;
double r840756 = 9.0;
double r840757 = r840755 * r840756;
double r840758 = y;
double r840759 = r840757 * r840758;
double r840760 = z;
double r840761 = 4.0;
double r840762 = r840760 * r840761;
double r840763 = t;
double r840764 = r840762 * r840763;
double r840765 = a;
double r840766 = r840764 * r840765;
double r840767 = r840759 - r840766;
double r840768 = b;
double r840769 = r840767 + r840768;
double r840770 = c;
double r840771 = r840760 * r840770;
double r840772 = r840769 / r840771;
return r840772;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r840773 = x;
double r840774 = 9.0;
double r840775 = r840773 * r840774;
double r840776 = y;
double r840777 = r840775 * r840776;
double r840778 = z;
double r840779 = 4.0;
double r840780 = r840778 * r840779;
double r840781 = t;
double r840782 = r840780 * r840781;
double r840783 = a;
double r840784 = r840782 * r840783;
double r840785 = r840777 - r840784;
double r840786 = b;
double r840787 = r840785 + r840786;
double r840788 = c;
double r840789 = r840778 * r840788;
double r840790 = r840787 / r840789;
double r840791 = -2.7174285457743678e-303;
bool r840792 = r840790 <= r840791;
double r840793 = r840786 / r840789;
double r840794 = r840789 / r840776;
double r840795 = r840773 / r840794;
double r840796 = r840774 * r840795;
double r840797 = r840793 + r840796;
double r840798 = r840783 * r840781;
double r840799 = r840798 / r840788;
double r840800 = r840779 * r840799;
double r840801 = r840797 - r840800;
double r840802 = 2.1645935847413663e-66;
bool r840803 = r840790 <= r840802;
double r840804 = r840787 / r840778;
double r840805 = r840804 / r840788;
double r840806 = 1.376910307637842e+238;
bool r840807 = r840790 <= r840806;
double r840808 = r840773 * r840776;
double r840809 = r840808 / r840789;
double r840810 = r840774 * r840809;
double r840811 = r840793 + r840810;
double r840812 = r840788 / r840781;
double r840813 = r840783 / r840812;
double r840814 = r840779 * r840813;
double r840815 = r840811 - r840814;
double r840816 = r840773 / r840778;
double r840817 = r840788 / r840776;
double r840818 = r840816 / r840817;
double r840819 = r840774 * r840818;
double r840820 = r840793 + r840819;
double r840821 = r840820 - r840800;
double r840822 = r840807 ? r840815 : r840821;
double r840823 = r840803 ? r840805 : r840822;
double r840824 = r840792 ? r840801 : r840823;
return r840824;
}




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 | 20.8 |
|---|---|
| Target | 14.7 |
| Herbie | 7.2 |
if (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) < -2.7174285457743678e-303Initial program 12.2
Taylor expanded around 0 7.1
rmApplied associate-/l*7.1
if -2.7174285457743678e-303 < (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) < 2.1645935847413663e-66Initial program 25.2
rmApplied associate-/r*1.0
if 2.1645935847413663e-66 < (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) < 1.376910307637842e+238Initial program 0.6
Taylor expanded around 0 2.6
rmApplied associate-/l*1.4
if 1.376910307637842e+238 < (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) Initial program 51.6
Taylor expanded around 0 25.0
rmApplied associate-/l*20.7
rmApplied *-un-lft-identity20.7
Applied times-frac17.1
Applied associate-/r*17.6
Simplified17.6
Final simplification7.2
herbie shell --seed 2020027
(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)))