\begin{array}{l}
\mathbf{if}\;b \ge 0:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\end{array}\begin{array}{l}
\mathbf{if}\;b \le -6.376253530740768 \cdot 10^{+152}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \ge 0:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\
\mathbf{else}:\\
\;\;\;\;\frac{2 \cdot \left(a \cdot \frac{c}{b} - b\right)}{2 \cdot a}\\
\end{array}\\
\mathbf{elif}\;b \le 9.430072636989722 \cdot 10^{+95}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \ge 0:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) - \sqrt{\sqrt[3]{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}} \cdot \sqrt[3]{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}} \cdot \left|\sqrt[3]{b \cdot b - \left(4 \cdot a\right) \cdot c}\right|}\\
\mathbf{else}:\\
\;\;\;\;\frac{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + \left(-b\right)}{2 \cdot a}\\
\end{array}\\
\mathbf{elif}\;b \ge 0:\\
\;\;\;\;\frac{2 \cdot c}{2 \cdot \left(a \cdot \frac{c}{b} - b\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + \left(-b\right)}{2 \cdot a}\\
\end{array}double f(double a, double b, double c) {
double r1479332 = b;
double r1479333 = 0.0;
bool r1479334 = r1479332 >= r1479333;
double r1479335 = 2.0;
double r1479336 = c;
double r1479337 = r1479335 * r1479336;
double r1479338 = -r1479332;
double r1479339 = r1479332 * r1479332;
double r1479340 = 4.0;
double r1479341 = a;
double r1479342 = r1479340 * r1479341;
double r1479343 = r1479342 * r1479336;
double r1479344 = r1479339 - r1479343;
double r1479345 = sqrt(r1479344);
double r1479346 = r1479338 - r1479345;
double r1479347 = r1479337 / r1479346;
double r1479348 = r1479338 + r1479345;
double r1479349 = r1479335 * r1479341;
double r1479350 = r1479348 / r1479349;
double r1479351 = r1479334 ? r1479347 : r1479350;
return r1479351;
}
double f(double a, double b, double c) {
double r1479352 = b;
double r1479353 = -6.376253530740768e+152;
bool r1479354 = r1479352 <= r1479353;
double r1479355 = 0.0;
bool r1479356 = r1479352 >= r1479355;
double r1479357 = 2.0;
double r1479358 = c;
double r1479359 = r1479357 * r1479358;
double r1479360 = -r1479352;
double r1479361 = r1479352 * r1479352;
double r1479362 = 4.0;
double r1479363 = a;
double r1479364 = r1479362 * r1479363;
double r1479365 = r1479364 * r1479358;
double r1479366 = r1479361 - r1479365;
double r1479367 = sqrt(r1479366);
double r1479368 = r1479360 - r1479367;
double r1479369 = r1479359 / r1479368;
double r1479370 = r1479358 / r1479352;
double r1479371 = r1479363 * r1479370;
double r1479372 = r1479371 - r1479352;
double r1479373 = r1479357 * r1479372;
double r1479374 = r1479357 * r1479363;
double r1479375 = r1479373 / r1479374;
double r1479376 = r1479356 ? r1479369 : r1479375;
double r1479377 = 9.430072636989722e+95;
bool r1479378 = r1479352 <= r1479377;
double r1479379 = cbrt(r1479367);
double r1479380 = r1479379 * r1479379;
double r1479381 = sqrt(r1479380);
double r1479382 = cbrt(r1479366);
double r1479383 = fabs(r1479382);
double r1479384 = r1479381 * r1479383;
double r1479385 = r1479360 - r1479384;
double r1479386 = r1479359 / r1479385;
double r1479387 = r1479367 + r1479360;
double r1479388 = r1479387 / r1479374;
double r1479389 = r1479356 ? r1479386 : r1479388;
double r1479390 = r1479359 / r1479373;
double r1479391 = r1479356 ? r1479390 : r1479388;
double r1479392 = r1479378 ? r1479389 : r1479391;
double r1479393 = r1479354 ? r1479376 : r1479392;
return r1479393;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -6.376253530740768e+152Initial program 60.5
Taylor expanded around -inf 12.3
Simplified2.0
if -6.376253530740768e+152 < b < 9.430072636989722e+95Initial program 8.4
rmApplied add-cube-cbrt8.6
Applied sqrt-prod8.6
Simplified8.6
rmApplied add-sqr-sqrt8.6
Applied cbrt-prod8.6
if 9.430072636989722e+95 < b Initial program 29.8
Taylor expanded around inf 6.5
Simplified2.7
Final simplification6.4
herbie shell --seed 2019104
(FPCore (a b c)
:name "jeff quadratic root 2"
(if (>= b 0) (/ (* 2 c) (- (- b) (sqrt (- (* b b) (* (* 4 a) c))))) (/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a))))