\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 1370.7193624353706:\\
\;\;\;\;\frac{\frac{\left(b \cdot b - c \cdot \left(3 \cdot a\right)\right) \cdot \sqrt{b \cdot b - c \cdot \left(3 \cdot a\right)} - \left(b \cdot b\right) \cdot b}{\left(b \cdot b + \left(b \cdot b - c \cdot \left(3 \cdot a\right)\right)\right) + b \cdot \sqrt{b \cdot b - c \cdot \left(3 \cdot a\right)}}}{3 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{-1}{2} \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c, double __attribute__((unused)) d) {
double r13760957 = b;
double r13760958 = -r13760957;
double r13760959 = r13760957 * r13760957;
double r13760960 = 3.0;
double r13760961 = a;
double r13760962 = r13760960 * r13760961;
double r13760963 = c;
double r13760964 = r13760962 * r13760963;
double r13760965 = r13760959 - r13760964;
double r13760966 = sqrt(r13760965);
double r13760967 = r13760958 + r13760966;
double r13760968 = r13760967 / r13760962;
return r13760968;
}
double f(double a, double b, double c, double __attribute__((unused)) d) {
double r13760969 = b;
double r13760970 = 1370.7193624353706;
bool r13760971 = r13760969 <= r13760970;
double r13760972 = r13760969 * r13760969;
double r13760973 = c;
double r13760974 = 3.0;
double r13760975 = a;
double r13760976 = r13760974 * r13760975;
double r13760977 = r13760973 * r13760976;
double r13760978 = r13760972 - r13760977;
double r13760979 = sqrt(r13760978);
double r13760980 = r13760978 * r13760979;
double r13760981 = r13760972 * r13760969;
double r13760982 = r13760980 - r13760981;
double r13760983 = r13760972 + r13760978;
double r13760984 = r13760969 * r13760979;
double r13760985 = r13760983 + r13760984;
double r13760986 = r13760982 / r13760985;
double r13760987 = r13760986 / r13760976;
double r13760988 = -0.5;
double r13760989 = r13760973 / r13760969;
double r13760990 = r13760988 * r13760989;
double r13760991 = r13760971 ? r13760987 : r13760990;
return r13760991;
}



Bits error versus a



Bits error versus b



Bits error versus c



Bits error versus d
Results
if b < 1370.7193624353706Initial program 18.4
Simplified18.4
rmApplied flip3--18.4
Simplified17.7
Simplified17.7
if 1370.7193624353706 < b Initial program 36.8
Simplified36.8
Taylor expanded around inf 15.9
Taylor expanded around -inf 15.8
Final simplification16.6
herbie shell --seed 2019125
(FPCore (a b c d)
: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)))