\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 -4.694684309811035 \cdot 10^{+121}:\\
\;\;\;\;\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(\frac{a}{b} \cdot c - b\right)}{2 \cdot a}\\
\end{array}\\
\mathbf{elif}\;b \le 3.6885722464483736 \cdot 10^{+80}:\\
\;\;\;\;\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{\sqrt[3]{b \cdot b - \left(4 \cdot a\right) \cdot c} \cdot \sqrt[3]{b \cdot b - \left(4 \cdot a\right) \cdot c}} \cdot \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}}}}{2 \cdot a}\\
\end{array}\\
\mathbf{elif}\;b \ge 0:\\
\;\;\;\;\frac{2 \cdot c}{2 \cdot \left(\frac{a}{b} \cdot c - 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 r849429 = b;
double r849430 = 0.0;
bool r849431 = r849429 >= r849430;
double r849432 = 2.0;
double r849433 = c;
double r849434 = r849432 * r849433;
double r849435 = -r849429;
double r849436 = r849429 * r849429;
double r849437 = 4.0;
double r849438 = a;
double r849439 = r849437 * r849438;
double r849440 = r849439 * r849433;
double r849441 = r849436 - r849440;
double r849442 = sqrt(r849441);
double r849443 = r849435 - r849442;
double r849444 = r849434 / r849443;
double r849445 = r849435 + r849442;
double r849446 = r849432 * r849438;
double r849447 = r849445 / r849446;
double r849448 = r849431 ? r849444 : r849447;
return r849448;
}
double f(double a, double b, double c) {
double r849449 = b;
double r849450 = -4.694684309811035e+121;
bool r849451 = r849449 <= r849450;
double r849452 = 0.0;
bool r849453 = r849449 >= r849452;
double r849454 = 2.0;
double r849455 = c;
double r849456 = r849454 * r849455;
double r849457 = -r849449;
double r849458 = r849449 * r849449;
double r849459 = 4.0;
double r849460 = a;
double r849461 = r849459 * r849460;
double r849462 = r849461 * r849455;
double r849463 = r849458 - r849462;
double r849464 = sqrt(r849463);
double r849465 = r849457 - r849464;
double r849466 = r849456 / r849465;
double r849467 = r849460 / r849449;
double r849468 = r849467 * r849455;
double r849469 = r849468 - r849449;
double r849470 = r849454 * r849469;
double r849471 = r849454 * r849460;
double r849472 = r849470 / r849471;
double r849473 = r849453 ? r849466 : r849472;
double r849474 = 3.6885722464483736e+80;
bool r849475 = r849449 <= r849474;
double r849476 = cbrt(r849463);
double r849477 = r849476 * r849476;
double r849478 = sqrt(r849477);
double r849479 = cbrt(r849464);
double r849480 = r849479 * r849479;
double r849481 = sqrt(r849480);
double r849482 = r849478 * r849481;
double r849483 = r849457 + r849482;
double r849484 = r849483 / r849471;
double r849485 = r849453 ? r849466 : r849484;
double r849486 = r849456 / r849470;
double r849487 = r849464 + r849457;
double r849488 = r849487 / r849471;
double r849489 = r849453 ? r849486 : r849488;
double r849490 = r849475 ? r849485 : r849489;
double r849491 = r849451 ? r849473 : r849490;
return r849491;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -4.694684309811035e+121Initial program 49.8
Taylor expanded around -inf 8.8
Simplified2.7
if -4.694684309811035e+121 < b < 3.6885722464483736e+80Initial program 8.8
rmApplied add-cube-cbrt9.1
Applied sqrt-prod9.1
rmApplied add-sqr-sqrt9.0
Applied cbrt-prod9.1
if 3.6885722464483736e+80 < b Initial program 27.4
Taylor expanded around inf 6.5
Simplified2.9
Final simplification6.6
herbie shell --seed 2019144
(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))))