\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}\begin{array}{l}
\mathbf{if}\;b \le -1.35706658714402349 \cdot 10^{154}:\\
\;\;\;\;\frac{1.5 \cdot \frac{a \cdot c}{b} - 2 \cdot b}{3 \cdot a}\\
\mathbf{elif}\;b \le 8.712853556825131 \cdot 10^{-110}:\\
\;\;\;\;\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}\\
\mathbf{elif}\;b \le 1.23006157124891213 \cdot 10^{154}:\\
\;\;\;\;\frac{\frac{\sqrt[3]{0 + 3 \cdot \left(a \cdot c\right)} \cdot \sqrt[3]{0 + 3 \cdot \left(a \cdot c\right)}}{\sqrt[3]{\left(-b\right) - \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}} \cdot \sqrt[3]{\left(-b\right) - e^{\log \left(\sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}\right)}}}}{3} \cdot \frac{\frac{\sqrt[3]{0 + 3 \cdot \left(a \cdot c\right)}}{\sqrt[3]{\left(-b\right) - \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}}}{a}\\
\mathbf{else}:\\
\;\;\;\;\frac{-1.5 \cdot \frac{a \cdot c}{b}}{3 \cdot a}\\
\end{array}double code(double a, double b, double c) {
return ((double) (((double) (((double) -(b)) + ((double) sqrt(((double) (((double) (b * b)) - ((double) (((double) (3.0 * a)) * c)))))))) / ((double) (3.0 * a))));
}
double code(double a, double b, double c) {
double VAR;
if ((b <= -1.3570665871440235e+154)) {
VAR = ((double) (((double) (((double) (1.5 * ((double) (((double) (a * c)) / b)))) - ((double) (2.0 * b)))) / ((double) (3.0 * a))));
} else {
double VAR_1;
if ((b <= 8.71285355682513e-110)) {
VAR_1 = ((double) (((double) (((double) -(b)) + ((double) sqrt(((double) (((double) (b * b)) - ((double) (((double) (3.0 * a)) * c)))))))) / ((double) (3.0 * a))));
} else {
double VAR_2;
if ((b <= 1.2300615712489121e+154)) {
VAR_2 = ((double) (((double) (((double) (((double) (((double) cbrt(((double) (0.0 + ((double) (3.0 * ((double) (a * c)))))))) * ((double) cbrt(((double) (0.0 + ((double) (3.0 * ((double) (a * c)))))))))) / ((double) (((double) cbrt(((double) (((double) -(b)) - ((double) sqrt(((double) (((double) (b * b)) - ((double) (((double) (3.0 * a)) * c)))))))))) * ((double) cbrt(((double) (((double) -(b)) - ((double) exp(((double) log(((double) sqrt(((double) (((double) (b * b)) - ((double) (((double) (3.0 * a)) * c)))))))))))))))))) / 3.0)) * ((double) (((double) (((double) cbrt(((double) (0.0 + ((double) (3.0 * ((double) (a * c)))))))) / ((double) cbrt(((double) (((double) -(b)) - ((double) sqrt(((double) (((double) (b * b)) - ((double) (((double) (3.0 * a)) * c)))))))))))) / a))));
} else {
VAR_2 = ((double) (((double) (-1.5 * ((double) (((double) (a * c)) / b)))) / ((double) (3.0 * a))));
}
VAR_1 = VAR_2;
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -1.3570665871440235e+154Initial program 64.0
Taylor expanded around -inf 12.4
if -1.3570665871440235e+154 < b < 8.71285355682513e-110Initial program 12.0
if 8.71285355682513e-110 < b < 1.2300615712489121e+154Initial program 44.1
rmApplied flip-+44.1
Simplified15.7
rmApplied add-cube-cbrt16.2
Applied add-cube-cbrt16.4
Applied times-frac16.4
Applied times-frac14.0
rmApplied add-exp-log14.8
if 1.2300615712489121e+154 < b Initial program 64.0
Taylor expanded around inf 13.7
Final simplification13.1
herbie shell --seed 2020123
(FPCore (a b c)
:name "Cubic critical"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 3 a) c)))) (* 3 a)))