\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 1549.9005570311153:\\
\;\;\;\;\frac{\frac{\left(b \cdot b + -3 \cdot \left(a \cdot c\right)\right) \cdot \sqrt{b \cdot b + -3 \cdot \left(a \cdot c\right)} - \left(b \cdot b\right) \cdot b}{\left(b \cdot b + -3 \cdot \left(a \cdot c\right)\right) + \left(b \cdot \sqrt{b \cdot b + -3 \cdot \left(a \cdot c\right)} + b \cdot b\right)}}{a \cdot 3}\\
\mathbf{else}:\\
\;\;\;\;\frac{-1}{2} \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r3651832 = b;
double r3651833 = -r3651832;
double r3651834 = r3651832 * r3651832;
double r3651835 = 3.0;
double r3651836 = a;
double r3651837 = r3651835 * r3651836;
double r3651838 = c;
double r3651839 = r3651837 * r3651838;
double r3651840 = r3651834 - r3651839;
double r3651841 = sqrt(r3651840);
double r3651842 = r3651833 + r3651841;
double r3651843 = r3651842 / r3651837;
return r3651843;
}
double f(double a, double b, double c) {
double r3651844 = b;
double r3651845 = 1549.9005570311153;
bool r3651846 = r3651844 <= r3651845;
double r3651847 = r3651844 * r3651844;
double r3651848 = -3.0;
double r3651849 = a;
double r3651850 = c;
double r3651851 = r3651849 * r3651850;
double r3651852 = r3651848 * r3651851;
double r3651853 = r3651847 + r3651852;
double r3651854 = sqrt(r3651853);
double r3651855 = r3651853 * r3651854;
double r3651856 = r3651847 * r3651844;
double r3651857 = r3651855 - r3651856;
double r3651858 = r3651844 * r3651854;
double r3651859 = r3651858 + r3651847;
double r3651860 = r3651853 + r3651859;
double r3651861 = r3651857 / r3651860;
double r3651862 = 3.0;
double r3651863 = r3651849 * r3651862;
double r3651864 = r3651861 / r3651863;
double r3651865 = -0.5;
double r3651866 = r3651850 / r3651844;
double r3651867 = r3651865 * r3651866;
double r3651868 = r3651846 ? r3651864 : r3651867;
return r3651868;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < 1549.9005570311153Initial program 17.1
Simplified17.1
rmApplied flip3--17.2
Simplified16.5
Simplified16.5
if 1549.9005570311153 < b Initial program 36.5
Simplified36.5
Taylor expanded around inf 16.2
Final simplification16.3
herbie shell --seed 2019144
(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)))