\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 174.55343675894656:\\
\;\;\;\;\frac{\frac{\left(b \cdot b + \left(a \cdot c\right) \cdot -3\right) \cdot \sqrt{b \cdot b + \left(a \cdot c\right) \cdot -3} - \left(b \cdot b\right) \cdot b}{\left(b \cdot b + \left(b \cdot b + \left(a \cdot c\right) \cdot -3\right)\right) + b \cdot \sqrt{b \cdot b + \left(a \cdot c\right) \cdot -3}}}{a \cdot 3}\\
\mathbf{else}:\\
\;\;\;\;\frac{c}{b} \cdot \frac{-1}{2}\\
\end{array}double f(double a, double b, double c) {
double r3706102 = b;
double r3706103 = -r3706102;
double r3706104 = r3706102 * r3706102;
double r3706105 = 3.0;
double r3706106 = a;
double r3706107 = r3706105 * r3706106;
double r3706108 = c;
double r3706109 = r3706107 * r3706108;
double r3706110 = r3706104 - r3706109;
double r3706111 = sqrt(r3706110);
double r3706112 = r3706103 + r3706111;
double r3706113 = r3706112 / r3706107;
return r3706113;
}
double f(double a, double b, double c) {
double r3706114 = b;
double r3706115 = 174.55343675894656;
bool r3706116 = r3706114 <= r3706115;
double r3706117 = r3706114 * r3706114;
double r3706118 = a;
double r3706119 = c;
double r3706120 = r3706118 * r3706119;
double r3706121 = -3.0;
double r3706122 = r3706120 * r3706121;
double r3706123 = r3706117 + r3706122;
double r3706124 = sqrt(r3706123);
double r3706125 = r3706123 * r3706124;
double r3706126 = r3706117 * r3706114;
double r3706127 = r3706125 - r3706126;
double r3706128 = r3706117 + r3706123;
double r3706129 = r3706114 * r3706124;
double r3706130 = r3706128 + r3706129;
double r3706131 = r3706127 / r3706130;
double r3706132 = 3.0;
double r3706133 = r3706118 * r3706132;
double r3706134 = r3706131 / r3706133;
double r3706135 = r3706119 / r3706114;
double r3706136 = -0.5;
double r3706137 = r3706135 * r3706136;
double r3706138 = r3706116 ? r3706134 : r3706137;
return r3706138;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < 174.55343675894656Initial program 15.8
Simplified15.8
rmApplied flip3--15.9
Simplified15.2
Simplified15.2
if 174.55343675894656 < b Initial program 35.3
Simplified35.3
Taylor expanded around inf 17.1
rmApplied *-un-lft-identity17.1
Applied times-frac17.1
Applied associate-*r*17.0
Simplified17.0
rmApplied *-un-lft-identity17.0
Applied *-commutative17.0
Applied times-frac17.0
Simplified17.0
Simplified17.0
Final simplification16.4
herbie shell --seed 2019158
(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)))