\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 781.9086092205042:\\
\;\;\;\;\frac{\frac{\left(c \cdot \left(a \cdot -3\right) + b \cdot b\right) \cdot \sqrt{c \cdot \left(a \cdot -3\right) + b \cdot b} - b \cdot \left(b \cdot b\right)}{\left(c \cdot \left(a \cdot -3\right) + b \cdot b\right) + \left(b \cdot b + b \cdot \sqrt{c \cdot \left(a \cdot -3\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 r4392391 = b;
double r4392392 = -r4392391;
double r4392393 = r4392391 * r4392391;
double r4392394 = 3.0;
double r4392395 = a;
double r4392396 = r4392394 * r4392395;
double r4392397 = c;
double r4392398 = r4392396 * r4392397;
double r4392399 = r4392393 - r4392398;
double r4392400 = sqrt(r4392399);
double r4392401 = r4392392 + r4392400;
double r4392402 = r4392401 / r4392396;
return r4392402;
}
double f(double a, double b, double c) {
double r4392403 = b;
double r4392404 = 781.9086092205042;
bool r4392405 = r4392403 <= r4392404;
double r4392406 = c;
double r4392407 = a;
double r4392408 = -3.0;
double r4392409 = r4392407 * r4392408;
double r4392410 = r4392406 * r4392409;
double r4392411 = r4392403 * r4392403;
double r4392412 = r4392410 + r4392411;
double r4392413 = sqrt(r4392412);
double r4392414 = r4392412 * r4392413;
double r4392415 = r4392403 * r4392411;
double r4392416 = r4392414 - r4392415;
double r4392417 = r4392403 * r4392413;
double r4392418 = r4392411 + r4392417;
double r4392419 = r4392412 + r4392418;
double r4392420 = r4392416 / r4392419;
double r4392421 = 3.0;
double r4392422 = r4392407 * r4392421;
double r4392423 = r4392420 / r4392422;
double r4392424 = -0.5;
double r4392425 = r4392406 / r4392403;
double r4392426 = r4392424 * r4392425;
double r4392427 = r4392405 ? r4392423 : r4392426;
return r4392427;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < 781.9086092205042Initial program 17.1
Simplified17.1
rmApplied flip3--17.1
Simplified16.4
Simplified16.4
if 781.9086092205042 < b Initial program 35.8
Simplified35.8
Taylor expanded around inf 16.7
Final simplification16.6
herbie shell --seed 2019165
(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)))