\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 60.51244836482759836826517130248248577118:\\
\;\;\;\;\frac{\frac{\left(b \cdot b - c \cdot \left(a \cdot 3\right)\right) \cdot \sqrt{b \cdot b - c \cdot \left(a \cdot 3\right)} - \left(b \cdot b\right) \cdot b}{\left(b \cdot b - c \cdot \left(a \cdot 3\right)\right) + \left(b \cdot \sqrt{b \cdot b - c \cdot \left(a \cdot 3\right)} + b \cdot b\right)}}{a \cdot 3}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{a \cdot 3}{\frac{a}{\frac{b}{c}} \cdot -1.5}}\\
\end{array}double f(double a, double b, double c) {
double r3398037 = b;
double r3398038 = -r3398037;
double r3398039 = r3398037 * r3398037;
double r3398040 = 3.0;
double r3398041 = a;
double r3398042 = r3398040 * r3398041;
double r3398043 = c;
double r3398044 = r3398042 * r3398043;
double r3398045 = r3398039 - r3398044;
double r3398046 = sqrt(r3398045);
double r3398047 = r3398038 + r3398046;
double r3398048 = r3398047 / r3398042;
return r3398048;
}
double f(double a, double b, double c) {
double r3398049 = b;
double r3398050 = 60.5124483648276;
bool r3398051 = r3398049 <= r3398050;
double r3398052 = r3398049 * r3398049;
double r3398053 = c;
double r3398054 = a;
double r3398055 = 3.0;
double r3398056 = r3398054 * r3398055;
double r3398057 = r3398053 * r3398056;
double r3398058 = r3398052 - r3398057;
double r3398059 = sqrt(r3398058);
double r3398060 = r3398058 * r3398059;
double r3398061 = r3398052 * r3398049;
double r3398062 = r3398060 - r3398061;
double r3398063 = r3398049 * r3398059;
double r3398064 = r3398063 + r3398052;
double r3398065 = r3398058 + r3398064;
double r3398066 = r3398062 / r3398065;
double r3398067 = r3398066 / r3398056;
double r3398068 = 1.0;
double r3398069 = r3398049 / r3398053;
double r3398070 = r3398054 / r3398069;
double r3398071 = -1.5;
double r3398072 = r3398070 * r3398071;
double r3398073 = r3398056 / r3398072;
double r3398074 = r3398068 / r3398073;
double r3398075 = r3398051 ? r3398067 : r3398074;
return r3398075;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < 60.5124483648276Initial program 14.5
Simplified14.5
rmApplied flip3--14.6
Simplified13.9
Simplified13.9
if 60.5124483648276 < b Initial program 34.2
Simplified34.2
Taylor expanded around inf 18.0
rmApplied associate-/l*18.0
rmApplied clear-num18.0
Final simplification16.8
herbie shell --seed 2019172
(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.0 a) c)))) (* 3.0 a)))