\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 -4.632381428632677 \cdot 10^{+153}:\\
\;\;\;\;\frac{\left(-b\right) - b}{3 \cdot a}\\
\mathbf{elif}\;b \leq -2.2723855696978872 \cdot 10^{-219}:\\
\;\;\;\;\frac{\sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c} - b}{3 \cdot a}\\
\mathbf{elif}\;b \leq 7.524306741962282 \cdot 10^{+62}:\\
\;\;\;\;\frac{-1}{\frac{b + \sqrt{b \cdot b - 3 \cdot \left(a \cdot c\right)}}{c}}\\
\mathbf{else}:\\
\;\;\;\;-0.5 \cdot \frac{c}{b}\\
\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 -4.632381428632677e+153)
(/ (- (- b) b) (* 3.0 a))
(if (<= b -2.2723855696978872e-219)
(/ (- (sqrt (- (* b b) (* (* 3.0 a) c))) b) (* 3.0 a))
(if (<= b 7.524306741962282e+62)
(/ -1.0 (/ (+ b (sqrt (- (* b b) (* 3.0 (* a c))))) c))
(* -0.5 (/ c b))))))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 <= -4.632381428632677e+153) {
tmp = (-b - b) / (3.0 * a);
} else if (b <= -2.2723855696978872e-219) {
tmp = (sqrt((b * b) - ((3.0 * a) * c)) - b) / (3.0 * a);
} else if (b <= 7.524306741962282e+62) {
tmp = -1.0 / ((b + sqrt((b * b) - (3.0 * (a * c)))) / c);
} else {
tmp = -0.5 * (c / b);
}
return tmp;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -4.632381428632677e153Initial program 63.9
Simplified63.9
Taylor expanded around -inf 2.7
if -4.632381428632677e153 < b < -2.2723855696978872e-219Initial program 7.8
Simplified7.8
if -2.2723855696978872e-219 < b < 7.5243067419622818e62Initial program 27.9
Simplified27.9
rmApplied flip--_binary64_244028.0
Simplified17.6
Simplified17.6
rmApplied clear-num_binary64_246417.7
Simplified11.2
rmApplied frac-2neg_binary64_247611.2
Simplified11.2
Simplified11.1
if 7.5243067419622818e62 < b Initial program 57.7
Simplified57.7
rmApplied flip--_binary64_244057.7
Simplified28.8
Simplified28.8
Taylor expanded around 0 3.6
Final simplification7.1
herbie shell --seed 2021019
(FPCore (a b c)
:name "Cubic critical"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)))