\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}\begin{array}{l}
\mathbf{if}\;b \le 1083.7283358723973:\\
\;\;\;\;\frac{\frac{\left(\left(-3 \cdot c\right) \cdot a + b \cdot b\right) \cdot \sqrt{\left(-3 \cdot c\right) \cdot a + b \cdot b} - b \cdot \left(b \cdot b\right)}{b \cdot \sqrt{\left(-3 \cdot c\right) \cdot a + b \cdot b} + \left(b \cdot b + \left(\left(-3 \cdot c\right) \cdot a + b \cdot b\right)\right)}}{3 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{-1}{2} \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r4038550 = b;
double r4038551 = -r4038550;
double r4038552 = r4038550 * r4038550;
double r4038553 = 3.0;
double r4038554 = a;
double r4038555 = r4038553 * r4038554;
double r4038556 = c;
double r4038557 = r4038555 * r4038556;
double r4038558 = r4038552 - r4038557;
double r4038559 = sqrt(r4038558);
double r4038560 = r4038551 + r4038559;
double r4038561 = r4038560 / r4038555;
return r4038561;
}
double f(double a, double b, double c) {
double r4038562 = b;
double r4038563 = 1083.7283358723973;
bool r4038564 = r4038562 <= r4038563;
double r4038565 = -3.0;
double r4038566 = c;
double r4038567 = r4038565 * r4038566;
double r4038568 = a;
double r4038569 = r4038567 * r4038568;
double r4038570 = r4038562 * r4038562;
double r4038571 = r4038569 + r4038570;
double r4038572 = sqrt(r4038571);
double r4038573 = r4038571 * r4038572;
double r4038574 = r4038562 * r4038570;
double r4038575 = r4038573 - r4038574;
double r4038576 = r4038562 * r4038572;
double r4038577 = r4038570 + r4038571;
double r4038578 = r4038576 + r4038577;
double r4038579 = r4038575 / r4038578;
double r4038580 = 3.0;
double r4038581 = r4038580 * r4038568;
double r4038582 = r4038579 / r4038581;
double r4038583 = -0.5;
double r4038584 = r4038566 / r4038562;
double r4038585 = r4038583 * r4038584;
double r4038586 = r4038564 ? r4038582 : r4038585;
return r4038586;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < 1083.7283358723973Initial program 17.5
Simplified17.5
rmApplied flip3--17.6
Simplified16.9
Simplified16.9
if 1083.7283358723973 < b Initial program 36.9
Simplified36.9
Taylor expanded around inf 15.8
rmApplied clear-num15.8
Simplified15.7
Taylor expanded around -inf 15.7
Final simplification16.2
herbie shell --seed 2019151
(FPCore (a b c)
:name "Cubic critical, narrow range"
:pre (and (< 1.0536712127723509e-08 a 94906265.62425156) (< 1.0536712127723509e-08 b 94906265.62425156) (< 1.0536712127723509e-08 c 94906265.62425156))
(/ (+ (- b) (sqrt (- (* b b) (* (* 3 a) c)))) (* 3 a)))