\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}\begin{array}{l}
\mathbf{if}\;\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a} \le -5.45047898796907951275402149588394784737 \cdot 10^{-29}:\\
\;\;\;\;\frac{\frac{\mathsf{fma}\left(b, b, -\left(b \cdot b - \left(3 \cdot a\right) \cdot c\right)\right)}{\left(-b\right) - \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}}{3 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;-0.5 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r68219 = b;
double r68220 = -r68219;
double r68221 = r68219 * r68219;
double r68222 = 3.0;
double r68223 = a;
double r68224 = r68222 * r68223;
double r68225 = c;
double r68226 = r68224 * r68225;
double r68227 = r68221 - r68226;
double r68228 = sqrt(r68227);
double r68229 = r68220 + r68228;
double r68230 = r68229 / r68224;
return r68230;
}
double f(double a, double b, double c) {
double r68231 = b;
double r68232 = -r68231;
double r68233 = r68231 * r68231;
double r68234 = 3.0;
double r68235 = a;
double r68236 = r68234 * r68235;
double r68237 = c;
double r68238 = r68236 * r68237;
double r68239 = r68233 - r68238;
double r68240 = sqrt(r68239);
double r68241 = r68232 + r68240;
double r68242 = r68241 / r68236;
double r68243 = -5.45047898796908e-29;
bool r68244 = r68242 <= r68243;
double r68245 = -r68239;
double r68246 = fma(r68231, r68231, r68245);
double r68247 = r68232 - r68240;
double r68248 = r68246 / r68247;
double r68249 = r68248 / r68236;
double r68250 = -0.5;
double r68251 = r68237 / r68231;
double r68252 = r68250 * r68251;
double r68253 = r68244 ? r68249 : r68252;
return r68253;
}



Bits error versus a



Bits error versus b



Bits error versus c
if (/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)) < -5.45047898796908e-29Initial program 25.0
rmApplied flip-+25.0
Simplified24.2
if -5.45047898796908e-29 < (/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)) Initial program 61.6
Taylor expanded around inf 0.2
Final simplification6.1
herbie shell --seed 2019356 +o rules:numerics
(FPCore (a b c)
:name "Cubic critical, wide range"
:precision binary64
:pre (and (< 4.9303800000000003e-32 a 2.02824e+31) (< 4.9303800000000003e-32 b 2.02824e+31) (< 4.9303800000000003e-32 c 2.02824e+31))
(/ (+ (- b) (sqrt (- (* b b) (* (* 3 a) c)))) (* 3 a)))