\begin{array}{l}
\mathbf{if}\;b \ge 0.0:\\
\;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\
\end{array}\begin{array}{l}
\mathbf{if}\;b \le -9.912992538019245038104285116114079132063 \cdot 10^{108}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \ge 0.0:\\
\;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left(2 \cdot \frac{a \cdot c}{b} - b\right)}\\
\end{array}\\
\mathbf{elif}\;b \le 1.042426094136287989665052757228371789389 \cdot 10^{152}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \ge 0.0:\\
\;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \sqrt{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}} \cdot \sqrt{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\
\end{array}\\
\mathbf{elif}\;b \ge 0.0:\\
\;\;\;\;\frac{\left(-b\right) - \left(b - 2 \cdot \frac{a \cdot c}{b}\right)}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{c \cdot 2}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + \left(-b\right)}\\
\end{array}double f(double a, double b, double c) {
double r1159528 = b;
double r1159529 = 0.0;
bool r1159530 = r1159528 >= r1159529;
double r1159531 = -r1159528;
double r1159532 = r1159528 * r1159528;
double r1159533 = 4.0;
double r1159534 = a;
double r1159535 = r1159533 * r1159534;
double r1159536 = c;
double r1159537 = r1159535 * r1159536;
double r1159538 = r1159532 - r1159537;
double r1159539 = sqrt(r1159538);
double r1159540 = r1159531 - r1159539;
double r1159541 = 2.0;
double r1159542 = r1159541 * r1159534;
double r1159543 = r1159540 / r1159542;
double r1159544 = r1159541 * r1159536;
double r1159545 = r1159531 + r1159539;
double r1159546 = r1159544 / r1159545;
double r1159547 = r1159530 ? r1159543 : r1159546;
return r1159547;
}
double f(double a, double b, double c) {
double r1159548 = b;
double r1159549 = -9.912992538019245e+108;
bool r1159550 = r1159548 <= r1159549;
double r1159551 = 0.0;
bool r1159552 = r1159548 >= r1159551;
double r1159553 = -r1159548;
double r1159554 = r1159548 * r1159548;
double r1159555 = 4.0;
double r1159556 = a;
double r1159557 = r1159555 * r1159556;
double r1159558 = c;
double r1159559 = r1159557 * r1159558;
double r1159560 = r1159554 - r1159559;
double r1159561 = sqrt(r1159560);
double r1159562 = r1159553 - r1159561;
double r1159563 = 2.0;
double r1159564 = r1159563 * r1159556;
double r1159565 = r1159562 / r1159564;
double r1159566 = r1159558 * r1159563;
double r1159567 = r1159556 * r1159558;
double r1159568 = r1159567 / r1159548;
double r1159569 = r1159563 * r1159568;
double r1159570 = r1159569 - r1159548;
double r1159571 = r1159553 + r1159570;
double r1159572 = r1159566 / r1159571;
double r1159573 = r1159552 ? r1159565 : r1159572;
double r1159574 = 1.042426094136288e+152;
bool r1159575 = r1159548 <= r1159574;
double r1159576 = sqrt(r1159561);
double r1159577 = r1159576 * r1159576;
double r1159578 = r1159553 + r1159577;
double r1159579 = r1159566 / r1159578;
double r1159580 = r1159552 ? r1159565 : r1159579;
double r1159581 = r1159548 - r1159569;
double r1159582 = r1159553 - r1159581;
double r1159583 = r1159582 / r1159564;
double r1159584 = r1159561 + r1159553;
double r1159585 = r1159566 / r1159584;
double r1159586 = r1159552 ? r1159583 : r1159585;
double r1159587 = r1159575 ? r1159580 : r1159586;
double r1159588 = r1159550 ? r1159573 : r1159587;
return r1159588;
}



Bits error versus a



Bits error versus b



Bits error versus c
Results
if b < -9.912992538019245e+108Initial program 31.3
Taylor expanded around -inf 6.6
if -9.912992538019245e+108 < b < 1.042426094136288e+152Initial program 8.8
rmApplied add-sqr-sqrt8.8
Applied sqrt-prod8.9
if 1.042426094136288e+152 < b Initial program 62.9
Taylor expanded around inf 11.0
Final simplification8.6
herbie shell --seed 2019172
(FPCore (a b c)
:name "jeff quadratic root 1"
(if (>= b 0.0) (/ (- (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))) (* 2.0 a)) (/ (* 2.0 c) (+ (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))))))