\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}{\mathsf{fma}\left(-2, b, \frac{2 \cdot \left(a \cdot c\right)}{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 - \frac{a \cdot c}{b} \cdot 2\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 r1225664 = b;
double r1225665 = 0.0;
bool r1225666 = r1225664 >= r1225665;
double r1225667 = -r1225664;
double r1225668 = r1225664 * r1225664;
double r1225669 = 4.0;
double r1225670 = a;
double r1225671 = r1225669 * r1225670;
double r1225672 = c;
double r1225673 = r1225671 * r1225672;
double r1225674 = r1225668 - r1225673;
double r1225675 = sqrt(r1225674);
double r1225676 = r1225667 - r1225675;
double r1225677 = 2.0;
double r1225678 = r1225677 * r1225670;
double r1225679 = r1225676 / r1225678;
double r1225680 = r1225677 * r1225672;
double r1225681 = r1225667 + r1225675;
double r1225682 = r1225680 / r1225681;
double r1225683 = r1225666 ? r1225679 : r1225682;
return r1225683;
}
double f(double a, double b, double c) {
double r1225684 = b;
double r1225685 = -9.912992538019245e+108;
bool r1225686 = r1225684 <= r1225685;
double r1225687 = 0.0;
bool r1225688 = r1225684 >= r1225687;
double r1225689 = -r1225684;
double r1225690 = r1225684 * r1225684;
double r1225691 = 4.0;
double r1225692 = a;
double r1225693 = r1225691 * r1225692;
double r1225694 = c;
double r1225695 = r1225693 * r1225694;
double r1225696 = r1225690 - r1225695;
double r1225697 = sqrt(r1225696);
double r1225698 = r1225689 - r1225697;
double r1225699 = 2.0;
double r1225700 = r1225699 * r1225692;
double r1225701 = r1225698 / r1225700;
double r1225702 = r1225694 * r1225699;
double r1225703 = -2.0;
double r1225704 = r1225692 * r1225694;
double r1225705 = r1225699 * r1225704;
double r1225706 = r1225705 / r1225684;
double r1225707 = fma(r1225703, r1225684, r1225706);
double r1225708 = r1225702 / r1225707;
double r1225709 = r1225688 ? r1225701 : r1225708;
double r1225710 = 1.042426094136288e+152;
bool r1225711 = r1225684 <= r1225710;
double r1225712 = sqrt(r1225697);
double r1225713 = r1225712 * r1225712;
double r1225714 = r1225689 + r1225713;
double r1225715 = r1225702 / r1225714;
double r1225716 = r1225688 ? r1225701 : r1225715;
double r1225717 = r1225704 / r1225684;
double r1225718 = r1225717 * r1225699;
double r1225719 = r1225684 - r1225718;
double r1225720 = r1225689 - r1225719;
double r1225721 = r1225720 / r1225700;
double r1225722 = r1225697 + r1225689;
double r1225723 = r1225702 / r1225722;
double r1225724 = r1225688 ? r1225721 : r1225723;
double r1225725 = r1225711 ? r1225716 : r1225724;
double r1225726 = r1225686 ? r1225709 : r1225725;
return r1225726;
}



Bits error versus a



Bits error versus b



Bits error versus c
if b < -9.912992538019245e+108Initial program 31.3
rmApplied add-sqr-sqrt31.3
Applied sqrt-prod31.3
Taylor expanded around -inf 6.6
Simplified6.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 +o rules:numerics
(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)))))))