\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 -1.4363725490879053 \cdot 10^{-6}:\\
\;\;\;\;\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 r96969 = b;
double r96970 = -r96969;
double r96971 = r96969 * r96969;
double r96972 = 3.0;
double r96973 = a;
double r96974 = r96972 * r96973;
double r96975 = c;
double r96976 = r96974 * r96975;
double r96977 = r96971 - r96976;
double r96978 = sqrt(r96977);
double r96979 = r96970 + r96978;
double r96980 = r96979 / r96974;
return r96980;
}
double f(double a, double b, double c) {
double r96981 = b;
double r96982 = -r96981;
double r96983 = r96981 * r96981;
double r96984 = 3.0;
double r96985 = a;
double r96986 = r96984 * r96985;
double r96987 = c;
double r96988 = r96986 * r96987;
double r96989 = r96983 - r96988;
double r96990 = sqrt(r96989);
double r96991 = r96982 + r96990;
double r96992 = r96991 / r96986;
double r96993 = -1.4363725490879053e-06;
bool r96994 = r96992 <= r96993;
double r96995 = -r96989;
double r96996 = fma(r96981, r96981, r96995);
double r96997 = r96982 - r96990;
double r96998 = r96996 / r96997;
double r96999 = r96998 / r96986;
double r97000 = -0.5;
double r97001 = r96987 / r96981;
double r97002 = r97000 * r97001;
double r97003 = r96994 ? r96999 : r97002;
return r97003;
}



Bits error versus a



Bits error versus b



Bits error versus c
if (/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)) < -1.4363725490879053e-06Initial program 21.6
rmApplied flip-+21.6
Simplified20.9
if -1.4363725490879053e-06 < (/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)) Initial program 52.5
Taylor expanded around inf 5.8
Final simplification10.0
herbie shell --seed 2020060 +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)))