\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}\;\left(x \cdot 9\right) \cdot y \le -8.9016891666786241 \cdot 10^{227}:\\
\;\;\;\;\left(\frac{b}{z \cdot c} + 9 \cdot \left(\frac{x}{z} \cdot \frac{y}{c}\right)\right) - 4 \cdot \frac{a \cdot t}{c}\\
\mathbf{elif}\;\left(x \cdot 9\right) \cdot y \le -9.64150997701673271 \cdot 10^{68}:\\
\;\;\;\;\left(\frac{b}{z \cdot c} + 9 \cdot \frac{x \cdot y}{z \cdot c}\right) - 4 \cdot \frac{a}{\frac{c}{t}}\\
\mathbf{elif}\;\left(x \cdot 9\right) \cdot y \le 7.9066737785887235 \cdot 10^{-233}:\\
\;\;\;\;\left(\frac{b}{z \cdot c} + \left(\sqrt[3]{9} \cdot \sqrt[3]{9}\right) \cdot \left(\sqrt[3]{9} \cdot \frac{x \cdot y}{z \cdot c}\right)\right) - 4 \cdot \frac{a \cdot t}{c}\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{\sqrt[3]{b} \cdot \sqrt[3]{b}}{z} \cdot \frac{\sqrt[3]{b}}{c} + 9 \cdot \frac{x \cdot y}{z \cdot c}\right) - 4 \cdot \left(\frac{a}{\sqrt[3]{c} \cdot \sqrt[3]{c}} \cdot \frac{t}{\sqrt[3]{c}}\right)\\
\end{array}double f(double x, double y, double z, double t, double a, double b, double c) {
double r755791 = x;
double r755792 = 9.0;
double r755793 = r755791 * r755792;
double r755794 = y;
double r755795 = r755793 * r755794;
double r755796 = z;
double r755797 = 4.0;
double r755798 = r755796 * r755797;
double r755799 = t;
double r755800 = r755798 * r755799;
double r755801 = a;
double r755802 = r755800 * r755801;
double r755803 = r755795 - r755802;
double r755804 = b;
double r755805 = r755803 + r755804;
double r755806 = c;
double r755807 = r755796 * r755806;
double r755808 = r755805 / r755807;
return r755808;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r755809 = x;
double r755810 = 9.0;
double r755811 = r755809 * r755810;
double r755812 = y;
double r755813 = r755811 * r755812;
double r755814 = -8.901689166678624e+227;
bool r755815 = r755813 <= r755814;
double r755816 = b;
double r755817 = z;
double r755818 = c;
double r755819 = r755817 * r755818;
double r755820 = r755816 / r755819;
double r755821 = r755809 / r755817;
double r755822 = r755812 / r755818;
double r755823 = r755821 * r755822;
double r755824 = r755810 * r755823;
double r755825 = r755820 + r755824;
double r755826 = 4.0;
double r755827 = a;
double r755828 = t;
double r755829 = r755827 * r755828;
double r755830 = r755829 / r755818;
double r755831 = r755826 * r755830;
double r755832 = r755825 - r755831;
double r755833 = -9.641509977016733e+68;
bool r755834 = r755813 <= r755833;
double r755835 = r755809 * r755812;
double r755836 = r755835 / r755819;
double r755837 = r755810 * r755836;
double r755838 = r755820 + r755837;
double r755839 = r755818 / r755828;
double r755840 = r755827 / r755839;
double r755841 = r755826 * r755840;
double r755842 = r755838 - r755841;
double r755843 = 7.9066737785887235e-233;
bool r755844 = r755813 <= r755843;
double r755845 = cbrt(r755810);
double r755846 = r755845 * r755845;
double r755847 = r755845 * r755836;
double r755848 = r755846 * r755847;
double r755849 = r755820 + r755848;
double r755850 = r755849 - r755831;
double r755851 = cbrt(r755816);
double r755852 = r755851 * r755851;
double r755853 = r755852 / r755817;
double r755854 = r755851 / r755818;
double r755855 = r755853 * r755854;
double r755856 = r755855 + r755837;
double r755857 = cbrt(r755818);
double r755858 = r755857 * r755857;
double r755859 = r755827 / r755858;
double r755860 = r755828 / r755857;
double r755861 = r755859 * r755860;
double r755862 = r755826 * r755861;
double r755863 = r755856 - r755862;
double r755864 = r755844 ? r755850 : r755863;
double r755865 = r755834 ? r755842 : r755864;
double r755866 = r755815 ? r755832 : r755865;
return r755866;
}




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.6 |
| Herbie | 10.0 |
if (* (* x 9.0) y) < -8.901689166678624e+227Initial program 43.6
Taylor expanded around 0 38.3
rmApplied times-frac12.1
if -8.901689166678624e+227 < (* (* x 9.0) y) < -9.641509977016733e+68Initial program 18.9
Taylor expanded around 0 8.4
rmApplied associate-/l*7.2
if -9.641509977016733e+68 < (* (* x 9.0) y) < 7.9066737785887235e-233Initial program 17.3
Taylor expanded around 0 7.4
rmApplied add-cube-cbrt7.4
Applied associate-*l*7.4
if 7.9066737785887235e-233 < (* (* x 9.0) y) Initial program 21.7
Taylor expanded around 0 13.6
rmApplied add-cube-cbrt13.9
Applied times-frac12.7
rmApplied add-cube-cbrt12.9
Applied times-frac13.3
Final simplification10.0
herbie shell --seed 2020034
(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)))