\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 -8.575640252968764 \cdot 10^{+151}:\\
\;\;\;\;\frac{1}{\frac{a}{b} \cdot -1.5}\\
\mathbf{elif}\;b \leq -3.4742121233166865 \cdot 10^{-259}:\\
\;\;\;\;\frac{\sqrt{b \cdot b - \left(a \cdot 3\right) \cdot c}}{a \cdot 3} - \frac{b}{a \cdot 3}\\
\mathbf{elif}\;b \leq 1.474316731636549 \cdot 10^{+89}:\\
\;\;\;\;\frac{1}{\frac{-\left(b + \sqrt{b \cdot b - \left(a \cdot 3\right) \cdot c}\right)}{c}}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{a}{b} \cdot 1.5 - 2 \cdot \frac{b}{c}}\\
\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 -8.575640252968764e+151)
(/ 1.0 (* (/ a b) -1.5))
(if (<= b -3.4742121233166865e-259)
(- (/ (sqrt (- (* b b) (* (* a 3.0) c))) (* a 3.0)) (/ b (* a 3.0)))
(if (<= b 1.474316731636549e+89)
(/ 1.0 (/ (- (+ b (sqrt (- (* b b) (* (* a 3.0) c))))) c))
(/ 1.0 (- (* (/ a b) 1.5) (* 2.0 (/ b c))))))))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 <= -8.575640252968764e+151) {
tmp = 1.0 / ((a / b) * -1.5);
} else if (b <= -3.4742121233166865e-259) {
tmp = (sqrt((b * b) - ((a * 3.0) * c)) / (a * 3.0)) - (b / (a * 3.0));
} else if (b <= 1.474316731636549e+89) {
tmp = 1.0 / (-(b + sqrt((b * b) - ((a * 3.0) * c))) / c);
} else {
tmp = 1.0 / (((a / b) * 1.5) - (2.0 * (b / c)));
}
return tmp;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -8.5756402529687641e151Initial program 63.1
Simplified63.1
rmApplied flip--_binary64_108664.0
Simplified62.7
Simplified62.7
rmApplied clear-num_binary64_111062.7
Simplified62.5
Taylor expanded around -inf 3.5
Simplified3.5
if -8.5756402529687641e151 < b < -3.47421212331668654e-259Initial program 8.4
Simplified8.4
rmApplied div-sub_binary64_11168.4
if -3.47421212331668654e-259 < b < 1.474316731636549e89Initial program 30.5
Simplified30.5
rmApplied flip--_binary64_108630.5
Simplified16.7
Simplified16.7
rmApplied clear-num_binary64_111016.8
Simplified9.7
rmApplied associate-*r/_binary64_10539.6
Simplified9.6
if 1.474316731636549e89 < b Initial program 58.4
Simplified58.4
rmApplied flip--_binary64_108658.4
Simplified30.9
Simplified30.9
rmApplied clear-num_binary64_111031.0
Simplified28.8
Taylor expanded around inf 3.8
Final simplification7.1
herbie shell --seed 2020292
(FPCore (a b c)
:name "Cubic critical"
:precision binary64
(/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)))