\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 -2.80527760114902836 \cdot 10^{-12}:\\
\;\;\;\;\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 r108322 = b;
double r108323 = -r108322;
double r108324 = r108322 * r108322;
double r108325 = 3.0;
double r108326 = a;
double r108327 = r108325 * r108326;
double r108328 = c;
double r108329 = r108327 * r108328;
double r108330 = r108324 - r108329;
double r108331 = sqrt(r108330);
double r108332 = r108323 + r108331;
double r108333 = r108332 / r108327;
return r108333;
}
double f(double a, double b, double c) {
double r108334 = b;
double r108335 = -r108334;
double r108336 = r108334 * r108334;
double r108337 = 3.0;
double r108338 = a;
double r108339 = r108337 * r108338;
double r108340 = c;
double r108341 = r108339 * r108340;
double r108342 = r108336 - r108341;
double r108343 = sqrt(r108342);
double r108344 = r108335 + r108343;
double r108345 = r108344 / r108339;
double r108346 = -2.8052776011490284e-12;
bool r108347 = r108345 <= r108346;
double r108348 = -r108342;
double r108349 = fma(r108334, r108334, r108348);
double r108350 = r108335 - r108343;
double r108351 = r108349 / r108350;
double r108352 = r108351 / r108339;
double r108353 = -0.5;
double r108354 = r108340 / r108334;
double r108355 = r108353 * r108354;
double r108356 = r108347 ? r108352 : r108355;
return r108356;
}



Bits error versus a



Bits error versus b



Bits error versus c
if (/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)) < -2.8052776011490284e-12Initial program 23.2
rmApplied flip-+23.2
Simplified22.4
if -2.8052776011490284e-12 < (/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)) Initial program 57.7
Taylor expanded around inf 2.5
Final simplification10.4
herbie shell --seed 2020081 +o rules:numerics
(FPCore (a b c)
:name "Cubic critical, medium range"
:precision binary64
:pre (and (< 1.11022e-16 a 9.0072e+15) (< 1.11022e-16 b 9.0072e+15) (< 1.11022e-16 c 9.0072e+15))
(/ (+ (- b) (sqrt (- (* b b) (* (* 3 a) c)))) (* 3 a)))