\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}
\begin{array}{l}
\mathbf{if}\;b \leq -2.412892212611534 \cdot 10^{+148}:\\
\;\;\;\;\frac{b \cdot -2}{3 \cdot a}\\
\mathbf{elif}\;b \leq 1.4510006837108914 \cdot 10^{-139}:\\
\;\;\;\;\frac{\sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c} - b}{3 \cdot a}\\
\mathbf{elif}\;b \leq 7.672052807609023 \cdot 10^{+49}:\\
\;\;\;\;\frac{\frac{3 \cdot \left(a \cdot c\right)}{\left(-b\right) - \mathsf{hypot}\left(\sqrt{c \cdot \left(a \cdot -3\right)}, b\right)}}{3 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{-1.5 \cdot \frac{a \cdot c}{b}}{3 \cdot a}\\
\end{array}
(FPCore (a b c) :precision binary64 (/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)))
(FPCore (a b c)
:precision binary64
(if (<= b -2.412892212611534e+148)
(/ (* b -2.0) (* 3.0 a))
(if (<= b 1.4510006837108914e-139)
(/ (- (sqrt (- (* b b) (* (* 3.0 a) c))) b) (* 3.0 a))
(if (<= b 7.672052807609023e+49)
(/
(/ (* 3.0 (* a c)) (- (- b) (hypot (sqrt (* c (* a -3.0))) b)))
(* 3.0 a))
(/ (* -1.5 (/ (* a c) b)) (* 3.0 a))))))double code(double a, double b, double c) {
return (-b + sqrt((b * b) - ((3.0 * a) * c))) / (3.0 * a);
}
double code(double a, double b, double c) {
double tmp;
if (b <= -2.412892212611534e+148) {
tmp = (b * -2.0) / (3.0 * a);
} else if (b <= 1.4510006837108914e-139) {
tmp = (sqrt((b * b) - ((3.0 * a) * c)) - b) / (3.0 * a);
} else if (b <= 7.672052807609023e+49) {
tmp = ((3.0 * (a * c)) / (-b - hypot(sqrt(c * (a * -3.0)), b))) / (3.0 * a);
} else {
tmp = (-1.5 * ((a * c) / b)) / (3.0 * a);
}
return tmp;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -2.4128922126115341e148Initial program 62.1
Taylor expanded in b around -inf 3.5
if -2.4128922126115341e148 < b < 1.4510006837108914e-139Initial program 10.7
Applied neg-sub0_binary6410.7
Applied associate-+l-_binary6410.7
if 1.4510006837108914e-139 < b < 7.67205280760902282e49Initial program 37.9
Applied flip-+_binary6438.0
Simplified16.4
Simplified28.6
if 7.67205280760902282e49 < b Initial program 57.4
Taylor expanded in b around inf 15.1
Final simplification13.7
herbie shell --seed 2021344
(FPCore (a b c)
:name "Cubic critical"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)))